QZG 00H
RESET:
LJMP START
ORG
COUNT1:
LJMP COUNTER
ORG 30H
MOV SP,#50H
MOV A,TMOD
ANL A,#1lll0000B
ORL A,#0 0 000010B
MOV TMOD,A
MOV TH0,#(256-100)
MOV TL0,#00
CLR #F0
SETB IE.1
SETB IE.7
SETB TR0
CLR P3.5
L1:
NOP
JMP L1
COUNTER:
CLR IE.1
CPL P3.5
SETB IE.1
RETI
END