Personal Information
Organization / Workplace
Djokja, Yogyakarta, Indonesia
Occupation
Design Engineering & Microcontroller Programmer (Lippo cikarang)
About
; Lampu flip-flop pada Port 1 (AT89S5x)
ORG 0H
MULAI: MOV P1,#00001111B
ACALL DELAY
MOV P1,#11110000B
ACALL DELAY
SJMP MULAI
;--------------------------------------------------------------------------
DELAY: MOV R0,#5H ; Isi Register R0 dengan 5 (5x ulang)
DELAY1: MOV R1,#0FFH
DELAY2: MOV R2,#0 ; Isi register R2 dengan 0 (256x ulang)
DJNZ R2,$ ; R2=R2-1, jika R2 belum 0 ulangi lagi
DJNZ R1,DELAY2 ; R1=R1-1, jika R1 belum 0 ulangi DELAY2
DJNZ R0,DELAY1 ; R0