LED (Mikroprosesor 8086)
[Kembali]
[Home]
1. Gambar Rangkaian
2. Litsting Program
Program 1
start: jmp mulai ; Awal program pada Org 0100Hporta equ 00h ; Menentukan alamat port A,B,C
portb equ 01h ; dan ctrlword sesuai dengan
portc equ 02h ; hardwarenya
cw equ 03h
mulai:
; TEMPAT PROGRAM UTAMA
putar:
jmp putar
delay proc near ; Procedure delay
push cx ; simpan cx
mov cx,02fffh ; isi cx dengan lama delay
loop $ ; loopng sampai cx=0
pop cx ; keluarkan cx
ret ; kembali ke program utama
delay endp ; akhir procedure delay
; KHUSUS UNTUK EPROM 2764 ATAU 2864
ORG 20F0H ; alamat yang dituju setelah reset
DB 0EAH ; JMP reset ke
DW 0100H ; alamat offset 0100h
DW 0FDF0H ; alamat segmen 0FDFh
CODE_SEG ENDS ; batas segment code_seg
END START ; akhir program
Program 2
start: jmp mulai ; Awal program pada Org 0100Hporta equ 00h ; Menentukan alamat port A,B,C
portb equ 01h ; dan ctrlword sesuai dengan
portc equ 02h ; hardwarenya
cw equ 03h
mulai:
mov al,80h ; init ppi
mov dx,cw ; 80H MODE = 0
out dx,al ; port ABC = output
putar:
mov al,255
mov dx,porta
out dx,al
call delay
mov dx,porta
mov al,0
out dx,al
call delay
jmp putardelay proc near ; Procedure delay
push cx ; simpan cx
mov cx,02fffh ; isi cx dengan lama delay
loop $ ; loopng sampai cx=0
pop cx ; keluarkan cx
ret ; kembali ke program utama
delay endp ; akhir procedure delay
; ROM 2764
ORG 20F0H ; alamat yang dituju setelah reset
DB 0EAH ; JMP reset ke
DW 0100H ; alamat offset 0100h
DW 0FDF0H ; alamat segmen 0FDFh
CODE_SEG ENDS ; batas segment code_seg
END START ; akhir program
Program 3
start: jmp mulai ; Awal program pada Org 0100Hporta equ 00h ; Menentukan alamat port A,B,C
portb equ 01h ; dan ctrlword sesuai dengan
portc equ 02h ; hardwarenya
cw equ 03h
mulai:
mov al,80h ; init ppi
mov dx,cw ; 80H MODE = 0
out dx,al ; port ABC = output
ulang:
mov al,1
mov cx,8
putar:
mov dx,porta
out dx,al
call delay
shl al,1
loop putar
jmp ulang
delay proc near ; Procedure delay
push cx ; simpan cx
mov cx,02fffh ; isi cx dengan lama delay
loop $ ; loopng sampai cx=0
pop cx ; keluarkan cx
ret ; kembali ke program utama
delay endp ; akhir procedure delay
; ROM 2764
ORG 20F0H ; alamat yang dituju setelah reset
DB 0EAH ; JMP reset ke
DW 0100H ; alamat offset 0100h
DW 0FDF0H ; alamat segmen 0FDFh
CODE_SEG ENDS ; batas segment code_seg
END START ; akhir program
Tidak ada komentar:
Posting Komentar