;LOGICAL-anl test
MOV A,#33H
MOV R0,#0FH
ANL A,R0
DEC A
DEC A
DEC A
jnz anl_err
MOV A,#33H
MOV R1,#0FH
ANL A,R1
DEC A
DEC A
DEC A
jnz anl_err
MOV A,#33H
MOV R2,#0FH
ANL A,R2
DEC A
DEC A
DEC A
jnz anl_err
MOV A,#33H
MOV R3,#0FH
ANL A,R3
DEC A
DEC A
DEC A
jnz anl_err
MOV A,#33H
MOV R4,#0FH
ANL A,R4
DEC A
DEC A
DEC A
jnz anl_err
MOV A,#33H
MOV R5,#0FH
ANL A,R5
DEC A
DEC A
DEC A
jnz anl_err
MOV A,#33H
MOV R6,#0FH
ANL A,R6
DEC A
DEC A
DEC A
jnz anl_err
MOV A,#33H
MOV R7,#0FH
ANL A,R7
DEC A
DEC A
DEC A
jnz anl_err
MOV A,#33H
MOV 50h,#0FH
ANL A,50h
DEC A
DEC A
DEC A
jnz anl_err
MOV A,#33H
MOV @R0,#0FH
ANL A,@R0
DEC A
DEC A
DEC A
jnz anl_err
MOV A,#33H
MOV @R1,#0FH
ANL A,@R1
DEC A
DEC A
DEC A
jnz anl_err
MOV A,#33H
ANL A,#0fh
DEC A
DEC A
DEC A
jnz anl_err
mov 50h, #33h
anl 50h, #0fh
mov a, 50h
DEC a
DEC a
DEC a
jz Q01FC
anl_err: MOV A,#44 ;a=44
mov dptr, #0fffeh
movx @dptr,a
ljmp test_bad |