Pratikum Laboratorium Elektronika Digital: Januari 2018

Selasa, 02 Januari 2018

1. Rangkaian [Kembali]

2. Flowchart [Kembali]

3. Listing Program [Kembali]

; PROGGRAM6.ASM DIGUNAKAN UNTUK INPUT KEYPAD

; DITAMPILKAN KE LCD

; Data LCD: Port A

; E : PC0

; RS : PC1h

CODE_SEG SEGMENT

ASSUME CS:CODE_SEG,DS:CODE_SEG,SS:CODE_SEG

ORG 100H

start: jmp mulai

porta equ 00h

portb equ 01h

portc equ 02h

cw equ 03h

DISPCLR EQU 00000001B

FUNCSET EQU 00111000B

ENTRMOD EQU 00000110B

DISPON EQU 00001100B

awal db ?

data db ?

data_keypad db?

ratusan db ?

puluhan db ?

satuan db ?

akhir db ?

mulai:

Mov AX, CS

Mov DS, AX

Xor AX, AX

Mov ES, AX

Mov SS, AX

Lea SI, Awal

Lea CX, Akhir

Mov DI, SI

Sub CX, SI

Cld

Rep Movsb

Mov SP,800h

Xor AX,AX

Mov DS,AX

mov al,82h ; Port A dan Port C = output dan

; Port B = input

mov dx,cw

out dx,al

call initialisasi_LCD

balik:

mov dx,portb

in al,dx

and al,128

cmp al,128

je balik

in al,dx

and al,00001111B

call konversi_keypad_to_bin

mov data_keypad,al

mov data,80h

call controlout

mov al,data_keypad

mov ah,0

add ax,30h

mov data,al

call dataout

tunggu:

mov dx,portb

in al,dx

and al,128

cmp al,0

je tunggu

jmp balik

konversi_keypad_to_bin proc near

cmp al,4

jne keypad1

mov al,1

ret

keypad1:

cmp al,8

jne keypad2

mov al,2

ret

keypad2:

cmp al,12

jne keypad3

mov al,3

ret

keypad3:

cmp al,1

jne keypad4

mov al,4

ret

keypad4:

cmp al,4

jne keypad5

mov al,4

ret

keypad5:

cmp al,5

jne keypad6

mov al,5

ret

keypad6:

cmp al,9

jne keypad7

mov al,6

ret

keypad7:

cmp al,13

jne keypad8

mov al,7

ret

keypad8:

cmp al,2

jne keypad9

mov al,8

ret

keypad9:

cmp al,6

jne keypad0

mov al,9

ret

keypad0:

cmp al,10

jne bintang

mov al,0

ret

bintang:

cmp al,14

jne pagar

mov al,14

ret

pagar:

cmp al,3

jne keluar

mov al,3

ret

keluar:

ret

konversi_keypad_to_bin endp

;-------------------------

; control instruction

;-------------------------

; E : PC0

; RS : PC1

control_out proc near

mov dx,portc

mov al,00000000b ; E = 0, RS = 0

out dx,al

call delay_lcd

mov dx,portc

mov al,00000001b ; E = 1, RS = 0

out dx,al

call delay_lcd

mov dx,porta

mov al,data

out dx,al

call delay_lcd

mov dx,portc

mov al,00000000b ; E = 0, RS = 0

out dx,al

call delay_lcd

ret

control_out endp

;-------------------------

; data instruction

;-------------------------

; E : PC0

; RS : PC1

data_out proc near

mov dx,portc

mov al,00000010b ; E = 0, RS = 1

out dx,al

call delay_lcd

mov dx,portc

mov al,00000011b ; E = 1, RS = 1

out dx,al

call delay_lcd

mov dx,porta

mov al,data

out dx,al

call delay_lcd

mov dx,portc

mov al,00000010b ; E = 0, RS = 1

out dx,al

call delay_lcd

ret

data_out endp

;--------------------

; inisialisasi LCD

;--------------------

initialisasi_LCD proc near

mov data,DISPCLR

call control_out

call delay_lcd

mov data,FUNCSET

call control_out

call delay_lcd

mov data,ENTRMOD

call control_out

call delay_lcd

mov data,DISPON

call control_out

call delay_lcd

ret

initialisasi_LCD endp

delay_lcd proc near

push cx

mov cx,07fffh

loop $

pop cx

ret

delay_lcd endp

delay proc near

push cx

mov cx,0ffffh

loop $

pop cx

ret

delay endp

ORG 40F0H

DB 0EAH

DW 0100H

DW 0FBF0H

CODE_SEG ENDS

END START

4. Video Simulasi [Kembali]

5. Download [Kembali]

1. Rangkaian [Kembali]

Prinsip kerja dari rangkaian di atas adalah, ketika tombol pada keypad ditekan maka nilai yang ditekan pada keypad akan ditampilkan pada 7-Segment. Prinsipnya, pertama mikrokontroler mengirimkan alamat untuk mengakses I/O IC 8255 melewati A0-A15, kemudian masuk ke IC 74273 D0-D7. Alamat tersebut akan dilewatkan dari D0-D7 ke Q0-Q7 apabila sinyal kontrol alih dikeluarkan oleh pin ALE mikroprosesor dan diinverterkan sebelum diumpankan ke CLK IC 74273. Apabila telah aktif sinyal CLK, maka alamat akan ditahan di Q0-Q7 IC 74273. kemudian jika Q1-Q5 IC 74273 yang membawa alamat dari AD9-AD11 dihubungkan dengan decoder 74154. maka ketika nilai AD9-AD11 ini berlogika 0 semua dan E1 E1 IC ini juga berlogika 0, maka pin 0 IC 75154 akan berlogika nol yang kemudian pin ini dihubingkan dengan CS pada IC 8255. sehingga alamat yang dikirimkan adalah untuk akses IC 8255.
Kemudian untuk mengirim data dari Mikroprosesor 8086 ke IC I/O 8255, pin AD0-AD7 mikroprosesor dihubungkan dengan pin D0-D7 IC 8255. PORTA IC 8255 menjadi output bagi mikroprosesor untuk kemudian dihubungkan dengan output keypad dan PORTB pada IC ini dihubungkan dengan input Keypad serta PORTC pada IC ini sebagai output yang dihubungkan dengan 7-Segment.

2. Program [Kembali]

data segment ; Inisialisasi IC I/O 8255

PORTA EQU 00H
PORTB EQU 02H
PORTC EQU 04H
PCW EQU 06H

ends

stack segment
dw 128 dup(0)
ends

code segment
start:

mov ax, data ; masukkan data ke ax
mov ds, ax ; isi ds dengan ax
mov es, ax ; isi es dengan ax
MOV DX,PCW ; masukkan PWC ke DX
MOV AL,10000010B ; IC I/O Mode 2 PORTA dan C output, PORTB input
OUT DX,AL ; berikan mode ini ke IC I/O
BEGIN:
MOV CX,00FFH ; isi nilai CX dengan 00ffH
MOV AL,0FEH ; nilai agar PA0 PORTA IC 8255 berlogika 0, selebihnya 1 atau kolom 1 keypad low
MOV DX,PORTA ; masukkan PORTA ke DX
OUT DX,AL ; Berikan nilai tadi ke PORTA

EELOOP:

IN AL,PORTB ; Dapatkan nilai PORTB

CMP AL,0FEH ; Apakah PORTB bernilai 0FEH atau tombol 1 Keypad ditekan?
JNE NEXT1 ; Jika tidak, pergi ke NEXT1
MOV AL,006H; ; Jika iya, berikan nilai PORC 006H atau 7-Segment pada PORTC
OUT PORTC,AL; ; Menyalakan angka 1
JMP GO ; Pergi ke GO

NEXT1:
CMP AL,0FDH ; Apakah PORTB bernilai 0FDH atau tombol 4 Keypad ditekan?
JNE NEXT2 ; Jika tidak, pergi ke NEXT2
MOV AL,066H; ; Jika iya, berikan nilai PORC 066H atau 7-Segment pada PORTC
OUT PORTC,AL; ; Menyalakan angka 4
JMP GO ; Pergi ke GO

NEXT2:
CMP AL,0FBH ; Apakah PORTB bernilai 0FBH atau tombol 7 Keypad ditekan?
JNE NEXT3 ; Jika tidak, pergi ke NEXT3
MOV AL,007H; ; Jika iya, berikan nilai PORC 007H atau 7-Segment pada PORTC
OUT PORTC,AL; ; Menyalakan angka 7
JMP GO ; Pergi ke GO

NEXT3:
CMP AL,0F7H ; Apakah PORTB bernilai 0F7H atau tombol bintang Keypad ditekan?
JNE GO ; Jika tidak, pergi ke GO
MOV AL,07CH; ; Jika iya, berikan nilai PORC 07CH atau 7-Segment pada PORTC
OUT PORTC,AL; ; Menyalakan huruf b

GO:
LOOP EELOOP ; Looping ke EELOOP sebanyak CX

MOV CX,00FFH ; isi nilai CX dengan 00ffH
MOV AL,0FDH ; nilai agar PA1 PORTA IC 8255 berlogika 0, selebihnya 1 atau kolom 2 keypad low

MOV DX,PORTA ; masukkan PORTA ke DX
OUT DX,AL ; Berikan nilai tadi ke PORTA

EELOOP2:

IN AL,PORTB ; Dapatkan nilai PORTB
CMP AL,0FEH ; Apakan PORTB bernilai 0FEH atau tombol 2 Keypad ditekan?
JNE NEXT12 ; Jika tidak, pergi ke NEXT12
MOV AL,05BH; ; Jika iya, berikan nilai PORC 05BH atau 7-Segment pada PORTC
OUT PORTC,AL; ; Menyalakan angka 2
JMP GO2 ; Pergi ke GO2

NEXT12:
CMP AL,0FDH ; Apakah PORTB bernilai 0FDH atau tombol 5 Keypad ditekan?
JNE NEXT22 ; Jika tidak, pergi ke NEXT22
MOV AL,06DH ; Jika iya, berikan nilai PORC 06DH atau 7-Segment pada PORTC
OUT PORTC,AL ; Menyalakan angka 5
JMP GO2

NEXT22:
CMP AL,0FBH ; Apakah PORTB bernilai 0FBH atau tombol 8 Keypad ditekan?
JNE NEXT32 ; Jika tidak, pergi ke NEXT32
MOV AL,07FH; ; Jika iya, berikan nilai PORC 07FH atau 7-Segment pada PORTC
OUT PORTC,AL; ; Menyalakan angka 8
JMP GO2 ; Pergi ke GO3

NEXT32:
CMP AL,0F7H ; Apakah PORTB bernilai 0F7H atau tombol 0 Keypad ditekan?
JNE GO2 ; Jika tidak, pergi ke GO2
MOV AL,03FH; ; Jika iya, berikan nilai PORC 03FH atau 7-Segment pada PORTC
OUT PORTC,AL; ; Menyalakan angka 0

GO2:
LOOP EELOOP2 ; Looping ke EELOOP2 sebanyak CX

MOV CX,00FFH ; isi nilai CX dengan 00ffH
MOV AL,0FBH ; nilai agar PA2 PORTA IC 8255 berlogika 0, selebihnya 1 atau kolom 3 keypad low

MOV DX,PORTA ; masukkan PORTA ke DX
OUT DX,AL ; Berikan nilai tadi ke PORTA

EELOOP3:

IN AL,PORTB ; Dapatkan nilai PORTB
CMP AL,0FEH ; Apakah PORTB bernilai 0FEH atau tombol 3 Keypad ditekan?
JNE NEXT13 ; Jika tidak, pergi ke NEXT13
MOV AL,04FH; ; Jika iya, berikan nilai PORC 04FH atau 7-Segment pada PORTC
OUT PORTC,AL ; Menyalakan angka 3
JMP GO3 ; Pergi ke GO3

NEXT13:
CMP AL,0FDH ; Apakah PORTB bernilai 0FDH atau tombol 6 Keypad ditekan?
JNE NEXT23 ; Jika tidak, pergi ke NEXT23
MOV AL,07DH; ; Jika iya, berikan nilai PORC 07DH atau 7-Segment pada PORTC
OUT PORTC,AL; ; Menyalakan angka 6
JMP GO3 ; Pergi ke GO3

NEXT23:
CMP AL,0FBH ; Apakah PORTB bernilai 0FBH atau tombol 9 Keypad ditekan?
JNE NEXT33 ; Jika tidak, pergi ke NEXT33
MOV AL,06FH; ; Jika iya, berikan nilai PORC 06FH atau 7-Segment pada PORTC
OUT PORTC,AL; ; Menyalakan angka 9
JMP GO3 ; Pergi ke GO3

NEXT33: ; Apakah PORTB bernilai 0F7H atau tombol Pagar Keypad ditekan?
CMP AL,0F7H ; Jika tidak, pergi ke GO3
JNE GO3 ; Jika iya, berikan nilai PORC 00CH atau 7-Segment pada PORTC
MOV AL,00CH; ; Menyalakan huruf A
OUT PORTC,AL;

GO3:
LOOP EELOOP3 ; Looping ke EELOOP3 sebanyak CX
JMP BEGIN ; Kembali ulangi program

end start

3. Flowchart [Kembali]

4. Video Simulasi [Kembali]

5. Files Download Link [Kembali]

Running LED

Running LED (Mikroprosesor 8086)

[Kembali]

[Home]

1. Rangkaian [Kembali]

Prinsip kerja dari rangkaian di atas adalah, ketika diaktifkan, mikroproseor akan membuat LED bergrak dari kiri ke kanan, kemudian kanan ke kiri, begitu seterusnya. Prinsipnya, pertama mikrokontroler mengirimkan alamat untuk mengakses I/O IC 8255 melewati A0-A15, kemudian masuk ke IC 74273 D0-D7. Alamat tersebut akan dilewatkan dari D0-D7 ke Q0-Q7 apabila sinyal kontrol alih dikeluarkan oleh pin ALE mikroprosesor dan diinverterkan sebelum diumpankan ke CLK IC 74273. Apabila telah aktif sinyal CLK, maka alamat akan ditahan di Q0-Q7 IC 74273. kemudian jika Q1-Q5 IC 74273 yang membawa alamat dari AD9-AD11 dihubungkan dengan decoder 74154. maka ketika nilai AD9-AD11 ini berlogika 0 semua dan E1 E1 IC ini juga berlogika 0, maka pin 0 IC 75154 akan berlogika nol yang kemudian pin ini dihubingkan dengan CS pada IC 8255. sehingga alamat yang dikirimkan adalah untuk akses IC 8255.<br>

Kemudian untuk mengirim data dari Mikroprosesor 8086 ke IC I/O 8255, pin AD0-AD7 mikroprosesor dihubungkan dengan pin D0-D7 IC 8255. PORTA IC 8255 menjadi output bagi mikroprosesor untuk kemudian dihubungkan dengan 4 buah LED yang akan digerakkan dari kiri ke kanan dan kembali lagi ke kiri dengan settingan program di bawah ini.

2. Program [Kembali]

data segment ; inisialisasi data dari I/O 8255

PORTA EQU 00H
PORTB EQU 02H
PORTC EQU 04H
PCW EQU 06H

ends

stack segment
dw 128 dup(0)
ends

code segment
start:
;

mov ax, data ; masukkan data ke AX
mov ds, ax ; masukkan ax ke cs
mov es, ax ; masukkan ax ke es
MOV DX,PCW ; masukkan PWC ke DX
MOV AL,10000010B ; IC I/O Mode 2 PORTA dan C output, PORTB input
OUT DX,AL ; berikan mode ini ke IC I/O
BEGIN:
MOV CX,3 ; Membuat perulangan menjadi 3x
MOV AL,00000001B ; Bit untuk LED 1 menyala
KIRI: ; LED Bergerak ke kanan
MOV DX,PORTA ;
OUT DX,AL ; masukkan PORTA ke DX
SHL AX,1 ; Geser bit Hidup LED ke kanan
CALL DELAY ; Delay
LOOP KIRI ; Go to KIRI 3 kali karena cx 3

MOV CX,3 ; Membuat perulangan menjadi 3x
MOV AL,00001000B ; Bit untuk LED 4 menyala

KANAN: ; LED Bergerak ke kiri
MOV DX,PORTA ; masukkan PORTA ke DX
OUT DX,AL ; Hidupkan LED
SHR AX,1 ; Geser bit Hidup LED ke kanan
CALL DELAY ; Delay
LOOP KANAN ; Go to KANAN 3 kali karena cx 3

JMP BEGIN ; Ulangi proses dari led bergerak ke kanan

delay proc near ; Procedure delay
push cx ; simpan cx
mov cx,2fffh ; isi cx dengan lama delay
loop $ ; looping sampai cx=0
pop cx ; keluarkan kembali cx
ret ; kembali ke program utama
delay endp ; akhir procedure delay

end start

3. Flowchart [Kembali]

4. Video Simulasi [Kembali]

5. Files Download Link [Kembali]

Dot Matrix (Mikroprosesor 8086)

[Kembali]

[Home]

1. Gambar Rangkaian[Kembali]

2. Listing Program[Kembali]

CODE_SEG SEGMENT
        ASSUME CS:CODE_SEG,DS:CODE_SEG,SS:CODE_SEG,ES:CODE_SEG
        ORG 100H

start:     jmp mulai

porta     equ 00h
portb     equ 01h
portc     equ 02h
cw     equ 03h

awal    db ?
VAR1    DB ?

DATA    DB 7FH,41H,41H,41H,3EH,00H    ; D    data dalam
; define byte
; <ukurannya 1 byte>
        DB 7EH,09H,09H,09H,7EH,00H    ; A
        DB 7FH,09H,19H,29H,46H,00H    ; R
        DB 7FH,30H,18H,30H,7FH,00H    ; W
        DB 7FH,00H                ; I
        DB 26H,49H,49H,49H,32H,00H    ; S
        DB 3EH,41H,41H,41H,3EH,00H    ; O
        DB 7FH,02H,04H,08H,7FH,00H    ; N
akhir   db ?

mulai:
Mov AX, CS
   Mov DS, AX
   Xor AX, AX
        Mov ES, AX
        Mov SS, AX
        Lea SI, Awal
        Lea CX, Akhir
        Mov DI, SI
        Sub CX, SI
        Cld
        Rep Movsb
        Mov SP,800h
        Xor AX,AX
        Mov DS,AX
        mov al,82h        ; init ppi
        mov dx,cw       ; pada 80H MODE = 0
        out dx,al       ; port AC = output, B = input

tampil:
    CALL    huruf
    JMP    tampil

huruf PROC NEAR
    mov    AH,00h    ;MENENTUKAN BARIS
    MOV    SI,00H    ;tentukan data yang akan diambil
    mov    VAR1,20    ;counter untuk lop1
    LEA    BX,DATA    ;pindahkan data ke bx, maka
; bx=7FH,bx+1=41H,bx+2=41H..... dst
LOP:    MOV    DX,porta
    MOV    AL,BYTE PTR[BX+SI]
    OUT    DX,AL
    CALL    OUT
    inc    AH        ;NAIKKAN BARIS
    INC    SI        ;NAIKKAN DATA
    CALL    DELAY
    dec    VAR1
    CMP    VAR1,00H
    JNE    LOP
    CALL    DELAY
    RET
huruf ENDP

OUT PROC NEAR        ;prosedur pengambilan baris
    MOV    DX,portc
    MOV    AL,AH
    OUT    DX,AL
    RET
OUT ENDP

DELAY PROC NEAR
    MOV    CX,10    ; 1ffh
LAGI:    PUSH    CX
    MOV    CX,10    ; 18h
    LOOP    $
    POP    CX
    LOOP    LAGI
    RET
DELAY    ENDP

       ORG     40F0H
        DB     0EAH
        DW     0100H
        DW     0FBF0H

CODE_SEG ENDS
        END start

HLT           ; halt!

3. Download[Kembali]

download bahan klik disini

LCD dan Keypad (Mikroprosesor 8086)

[Kembali]

[Home]

1. Gambar Rangkaian

2. Listing Program

CODE_SEG SEGMENT
ASSUME CS:CODE_SEG,DS:CODE_SEG,ES:CODE_SEG,SS:CODE_SEG
ORG 100H ;program mulai origin 100h
start: jmp mulai
porta equ 300h ;port a ppi
portb equ 301h ;port b ppi
portc equ 302h ;port c ppi
ctrlword equ 303h ;port cw ppi
DISPCLR EQU 00000001B
FUNCSET EQU 00111000B
ENTRMOD EQU 00000110B
DISPON EQU 00001100B
CURSOR EQU 00001110B
BLINK EQU 00001101B
Mulai:
mov al,10000000b ;init ppi
mov dx,CtrlWord ;pada 80H mode = 0
out dx,al ;port a = output
;port b = output
;port c lower = output
;port c upper = output
call init_LCD
lagi:
mov al,80h
call control_out
mov al,30h
call data_out
mov al,0C0h
call control_out
mov al,31h
call data_out
jmp lagi
init_LCD proc near
mov al,DISPCLR
call control_out
mov al,FUNCSET
call control_out
mov al,ENTRMOD
call control_outmov al,DISPON
call control_out
mov al,CURSOR
call control_out
ret
init_LCD endp
; PA7 : E
; PA6 : RS
control_out proc near
mov dx,portc
out dx,al
call delay
mov dx,porta
mov al,00000000b
out dx,al
call delay
mov dx,porta
mov al,10000000b
out dx,al
call delay
mov dx,porta
mov al,00000000b
out dx,al
call delay
ret
control_out endp
data_out proc near
mov dx,portc
out dx,al
call delay
mov dx,porta
mov al,01000000b
out dx,al
call delay
mov dx,porta
mov al,11000000b
out dx,al
call delay
mov dx,porta
mov al,01000000b
out dx,al
call delayret
data_out endp
delay proc near ; Procedure delay
push cx ; simpan cx
mov cx,0ffffh ; isi cx dengan lama delay
loop $ ; loopng sampai cx=0
pop cx ; keluarkan cx
ret

3. Download

download bahan klik disini

Motor DC (Mikroprosesor 8086)

Motor DC (Mikroprosesor 8086)

[Kembali]

[Home]

1. Gambar Rangkaian[Kembali]

2. Listing Program[Kembali]

CODE_SEG SEGMENT ; code_seg sebagai segment
ASSUME CS:CODE_SEG,DS:CODE_SEG,SS:CODE_SEG
ORG 100H ; program ditulis mulai origin 100h
start: jmp mulai ; Awal program pada Org 0100H
porta 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
mov al,255 ; data DAC
mov dx,portc
out dx,al
call delay
putar:
jmp putar
delay proc near ; Procedure delay
push cx ; simpan cx
mov cx,0ffffh ; isi cx dengan lama delay
loop $ ; loopng sampai cx=0
pop cx ; keluarkan cx
ret ; kembali ke program utama
delay endp ; akhir procedure delay
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

Selasa, 02 Januari 2018

Display LCD

1. Rangkaian [Kembali]

2. Flowchart [Kembali]

3. Listing Program [Kembali]

4. Video Simulasi [Kembali]

5. Download [Kembali]

Display 7- Segment

1. Rangkaian [Kembali]

2. Program [Kembali]

3. Flowchart [Kembali]

4. Video Simulasi [Kembali]

5. Files Download Link [Kembali]

Running LED (Mikroprosesor 8086)

1. Rangkaian [Kembali]

2. Program [Kembali]

3. Flowchart [Kembali]

4. Video Simulasi [Kembali]

5. Files Download Link [Kembali]

Dot Matrix (Mikroprosesor 8086)

1. Gambar Rangkaian[Kembali]

2. Listing Program[Kembali]

2. Listing Program[Kembali]

3. Download[Kembali]

3. Download[Kembali]

download bahan klik disini

download bahan klik disini

1. Gambar Rangkaian

2. Listing Program

3. Download download bahan klik disini

3. Download

download bahan klik disini

1. Gambar Rangkaian[Kembali]

2. Listing Program[Kembali]

3. Video Simulasi[Kembali]

4. Download[Kembali]

4. Download[Kembali]

download bahan klik disini

download bahan klik disini

3. Download

download bahan klik disini