52 lines
409 B
Text
52 lines
409 B
Text
; bitwise AND
|
|
anl a, b
|
|
|
|
; bitwise OR
|
|
orl a, b
|
|
|
|
; bitwise XOR
|
|
xrl a, b
|
|
|
|
; bitwise NOT
|
|
cpl a
|
|
|
|
; left shift
|
|
inc b
|
|
rrc a
|
|
loop:
|
|
rlc a
|
|
clr c
|
|
djnz b, loop
|
|
|
|
; right shift
|
|
inc b
|
|
rlc a
|
|
loop:
|
|
rrc a
|
|
clr c
|
|
djnz b, loop
|
|
|
|
; arithmetic right shift
|
|
push 20
|
|
inc b
|
|
rlc a
|
|
mov 20.0, c
|
|
loop:
|
|
rrc a
|
|
mov c, 20.0
|
|
djnz b, loop
|
|
pop 20
|
|
|
|
; left rotate
|
|
inc b
|
|
rr a
|
|
loop:
|
|
rl a
|
|
djnz b, loop
|
|
|
|
; right rotate
|
|
inc b
|
|
rl a
|
|
loop:
|
|
rr a
|
|
djnz b, loop
|