;
ORG 0000H
MOV TMOD, #01H
SETB TR0
LOOP:
MOV R2, #16
SETB P1.0
REPEAT:
MOV TH0, #(65536 - 62500) / 256
MOV TL0, #(65536 - 62500) MOD 256
JNB TF0, $
CLR TF0
CLR P1.0
DJNZ R2, REPEAT
SJMP LOOP
END