gv天堂gv无码男同在线,欧美视频你懂的,毛片一级毛片毛片一级一级毛毛片,亚洲黄色视频免费播放,满18岁免费看的尤物视频,日本欧美三级片免费看,亚洲综合伊人影视在线播放

TIMEN EQU 30H
TIMES EQU 31H
TICK EQU 32H
FLAG BIT 00H
ORG 0000H
LJMP STA
ORG 000BH
LJMP T0INT
ORG 0030H
STA:
MOV TMOD,#01H
MOV TH0,#3CH
MOV TL0,#0B0H
SETB EA
SETB ET0
STA1:
CLR P0.0
SETB TR0
CLR FLAG
MOV TIMES,#5
MOV TIMEN,#10
MOV TICK,TIMEN
JNB FLAG ,$
LCALL SPEAKER
STA2:
CLR P0.0
SETB TR0
CLR FLAG
MOV TIMES,#10
MOV TIMEN,#20
MOV TICK,TIMEN
JNB FLAG ,$
LCALL SPEAKER
STA3:
CLR P0.0
SETB TR0
CLR FLAG
MOV TIMES,#20
MOV TIMEN,#40
MOV TICK,TIMEN
JNB FLAG ,$
LCALL SPEAKER
LJMP STA1
T0INT:
CLR TR0
MOV TH0,#3CH
MOV TL0,#0B0H
SETB TR0
DEC TICK
MOV A,TICK
JNZ T0END
MOV TICK,TIMEN
CPL P0.0
DEC TIMES
MOV A,TIMES
JNZ T0END
SETB FLAG
CLR TR0
T0END:
RETI
SPEAKER:
CLR P1.0
LCALL DELAY
SETB P1.0
LCALL DELAY
RET
DELAY:
MOV R2,#100
DELAY1:
MOV R3,#250
DJNZ R3,$
DJNZ R2,DELAY1
RET
END