Bits testen über macros
Verfasst: 02.10.2006 18:59
Code: Alles auswählen
; Author: hellhound66
; Date: 02. October 2006
; OS: Windows
; Demo: Yes
#BIT_0 = 1 : #BIT_1 = 2*#BIT_0 : #BIT_2 = 2*#BIT_1
#BIT_3 = 2*#BIT_2 : #BIT_4 = 2*#BIT_3 : #BIT_5 = 2*#BIT_4
#BIT_6 = 2*#BIT_5 : #BIT_7 = 2*#BIT_6 : #BIT_8 = 2*#BIT_7
#BIT_9 = 2*#BIT_8 : #BIT_10 = 2*#BIT_9 : #BIT_11 = 2*#BIT_10
#BIT_12 = 2*#BIT_11 : #BIT_13 = 2*#BIT_12 : #BIT_14 = 2*#BIT_13
#BIT_15 = 2*#BIT_14 : #BIT_16 = 2*#BIT_15 : #BIT_17 = 2*#BIT_16
#BIT_18 = 2*#BIT_17 : #BIT_19 = 2*#BIT_18 : #BIT_20 = 2*#BIT_19
#BIT_21 = 2*#BIT_20 : #BIT_22 = 2*#BIT_21 : #BIT_23 = 2*#BIT_22
#BIT_24 = 2*#BIT_23 : #BIT_25 = 2*#BIT_24 : #BIT_26 = 2*#BIT_25
#BIT_27 = 2*#BIT_26 : #BIT_28 = 2*#BIT_27 : #BIT_29 = 2*#BIT_28
#BIT_30 = 2*#BIT_29 : #BIT_31 = 2*#BIT_30 ; Kann noch erweitert werden, bei Bedarf..
Macro CheckBit(__Var,__Bit)
(__Var#&#BIT_#__Bit#)
EndMacro
a= #BIT_1|#BIT_3
If CheckBit(a,1)
Debug "Bit 1 ist gesetzt"
EndIf
If CheckBit(a,5)
Debug "Bit 5 ist gesetzt"
EndIf