.data
Counter_5ms	Ds	1

	.CODE
	Org	*
Delay_1detik:
	Mov	Counter_5mS,#0200

Tunggu_1detik:
	Acall	Delay_5mS
	Djnz	Counter_5mS,Tunggu_1detik
	Ret
	
Delay_500mS:
	Mov	Counter_5mS,#0100

Tunggu_500mS:
	Acall	Delay_5mS
	Djnz	Counter_5mS,Tunggu_500mS
	Ret

Delay_100mS:
	Mov	Counter_5mS,#020

Tunggu_100mS:
	Acall	Delay_5mS
	Djnz	Counter_5mS,Tunggu_100mS
	Ret

Delay_75mS:
	Mov	Counter_5mS,#015

Tunggu_75mS:
	Acall	Delay_5mS
	Djnz	Counter_5mS,Tunggu_75mS
	Ret


Delay_5mS
	Push	TMOD
	Mov	TMOD,#21H
	Mov	TH0,#0EDH
	Mov	TL0,#0FFH
	Setb	TR0

Tunggu_5mS:
	Jbc	TF0,Sudah_5mS
	Ajmp	Tunggu_5mS	

Sudah_5mS:
	Clr	TR0
	Pop	TMOD
	Ret