ORG 0000H
SJMP MAIN
org 000bh;
sjmp fbsc
ORG 0031H;
MAIN:MOV P1,#00H;
MOV P0,#0ffh;
mov sp,#40h;
mov a,#01h;
acall zcxa
mov tmod,#00h;
mov tl0,#18h;
mov th0,#0e0h
setb tr0
setb et0
setb ea
sjmp $
ZCXA:jb p0.0,aa
clr p1.0;
ZCXB:jb p0.1,aab;
clr p1.1;
ZCXC:jb p0.2,aac;
clr p1.2;
sjmp ZCXD;
aa:setb p1.0;
sjmp ZCXA;
aab:setb p1.1;
sjmp ZCXB
aac:setb p1.2;
sjmp ZCXC
ZCXD:clr p1.2;
ret
END