Teknik Elektronika Industri SMK Negeri 1 Bandar Masilam

Ujian Kompetensi Keahlian Sekolah Menengah Kejuruan Tahun 2015

Ujian Kompetensi Keahlian Sekolah Menengah Kejuruan Tahun 2015
Jurusan Teknik Elektronika Industri

Assalamualaikum Wr.wb

Halaman Ini memberikan Hasil Ujian Kompetensi Keahlian SMK 2015

Dengan membuat Counter Display 00-99 dan 99-00

Komponen yang digunakan:

7-Segment Common Anoda (2 buah)
Capasitor Ceramic 30 parad (2 buah)
Resistor 1k ohm (1 buah)
Resistor 220 ohm (16 buah)
Resistor 10k ohm (2 buah)
Cristall 11,059 Mhz (1 buah)
Capasitor elco 1 micro parad (1 buah)
IC 89s51/89s52 (1 buah)
Swith Push Button (3 buah)
ISP

Gambar Skema Rangkaian:





Bahasa Program yang digunakan adalah Assembler:

; ************Conter Display 00-99 and 99-00***********
; ************By Ikhsan Fahri**************************
; ************Kelas XII TEI****************************
; ************Soal Ujian Kompentensi Keahlian**********
; ************Tahun Ajaran 2014/2015*******************  
    dispdata_satuan         equ     p2
        dispdata_puluhan        equ     p0

My_number       equ     30H
; ************Start************************************
Org             0000H
Main_prog:    Mov     p0,#0c0H
                       Mov     p2,#0c0H
                       Mov     My_number,#0
                       JNB     p1.0,up_A
                       JNB     p1.1,down_A
                       Sjmp    main_prog

Up_A:            Mov     a, My_number
                       Cjne    A,#99, Up
                       mov     My_number,#0FFH
                       Sjmp    Up

Down_A:       Mov     a,My_number
                       Cjne    A,#0,down
                       Mov     My_number,#99H
                       Sjmp    down

Up:                 Inc     My_number               :nilai ditambah
                       JNB     P1.1,down
                       call    BCD
                       call    delay
                       mov     a, My_number
                       Cjne    A,#99, Up
                       Mov     My_number,#0FFh         :jika Nilai sama 00 maka nilai sama dengan 255
                       Sjmp    Up

down:             dec     My_number               :Nilai dikurangi
                       Jnb     p1.0,Up
                       Call    Bcd
                       Call    delay
                       Mov     a, My_number
                       Cjne    A,#00,down              :Jika nilai tidak sama 00 maka kembali ke down
                       mov     My_number,#100          :Jika nilai sama 00 maka nilai sama dengan 100

BCD:              Mov     A,My_number
                        mov     B,#10
                        Div     AB                      :Pembagian A/10
                        call    seg_conv
                        mov     dispdata_puluhan, A:Puluhan
                        mov     A,B
                        call    seg_conv
                        mov     dispdata_satuan, A:satuan
                        Ret

Seg_conv:       Inc     A
                        Movc    A,@A+PC
                        RET
     
                         DB      0C0H    ;angka 0
                         DB      0F9H    ;angka 1
                         DB      0A4H    ;angka 2
                         DB      0B0H    ;angka 3
                         DB      099H    ;angka 4
                         DB      092H    ;angka 5
                         DB      082H    ;angka 6
                         DB      0F8H    ;angka 7
                         DB      080H    ;angka 8
                         DB      090H    ;angka 9

delay:               mov     R5,#0FFH
                         mov     R6,#0FFH
                         mov     R7,#2

delay_loop:    DJNZ    R5,delay_loop
                       DJNZ    R6,delay_loop
                       DJNZ    R7,delay_loop
                       RET
                       END
; ****************Selesai**********************

Gambar Simulasi di Proteus:




Gambar Tata Letak Komponen:


Gambar Layout:



Gambar Hasil Jadi:


Baik Demikianlah Hasil UKK SMK tahun 2015.
Mohon Maaf apabila ada kesalahan dalam membuat Halaman ini.
Sekian dan terima kasih.
Assalamualaikum Wr.wb

Posting Komentar - Back to Content