 |
| Contoh Program Assembly Nyala LED Berjalan |
Sebuah pemrograman assembly untuk menampilkan animasi nyala LED berjalan menggunakan mikrokontroller 8051.
$MOD51 ; This includes 8051 definitions for the Metalink assembler
; Please insert your code here.
;--------------------------------------------------------------------------------
;
; Lampu berjalan dari P0.0 s/d P0.7 kemudian kembali lagi
; author: www.gatewan.com
;---------------------------------------------------------------------------------
Org 0h
Mov A,#00000001B ; data lampu menyala dikirim melalui akumulator
; agar P0.0 pertama kali menyala, akumulator
; diisi dengan 11111110B atau 0FEh
Mulai:
Mov P0,A ; kirimkan data di akumualtor ke port 1
Acall Delay ; lakukan penundaan sesaat
RL A ; rotasikan isi akumulator ke kiri
; +->------>----->----->+
; | |
; +<--7-6-5-4-3-2-1-0<--+
Sjmp Mulai ; ulangi lagi dari awal
;-subrutin DELAY------------------------------------------------------------------
;
; subrutin ini hanya sekedar melakukan penundaan sesaat dengan cara
; mengulangi proses (pengurangan isi register) hingga dicapai suatu
; kondisi tertentu
;
;---------------------------------------------------------------------------------
Delay:
Mov R0, #1h ; Isi Register R0 dengan 0 (256x ulang)
Delay1:
Mov R1, #0 ; Isi Register R1 dengan 0 (256x ulang)
Djnz R1,$
Djnz R0,Delay1
Ret
End
Demo: