semester 1




Laporan

Nama:       jerry paleevi
No/nis:       29/7889
Kelas:        3e2
SMK BINAWIYATA SRAGEN
TUGAS:1
1.JUDUL:membuat program untuk meng hidupkan dan mematikan 8 lampu led dg 2  sklar push button


 2.          Tujuan Instrumen Umum (TIU)
1.     Siswa dapat menunjukan komponen-komponen yang digunakan.
3.          Tujuan Instrumen Khusus (TIK)
1.     Siswa dapat merakit Rangkaian di dalam soft were PROTEUS.
2.     Siswa dapat membuat program dengan menggunakan Notepad .
3.     Siswa dapat mengirim program tadi ke dalam rangkaian melalui ASM51 dan diteruskan di panggil di rangkaian IC.
   4.          ALAT DAN BAHAN
*  ALAT
1.      PC computer…………………………1buah

 *BAHAN
 ic AT89C51 ........................................1 buah
resitor 10k ohm ....................................1buah
resistor 300 ohm ..................................8 buah
capistor 33 pf .......................................2 buah
capasitor elektrolit 10 uf ......................1 buah
crystal ...................................................1 buah
led green ...............................................8 buah
push button............................................2 buah
soft ware proteus...................................1
software note pad .................................1
software asm51 ....................................1


5.          KESELAMATAN KERJA
1.     Sebelum praktek berdoa terlebih dahulu.
2.     Pakailah seragam praktek saat praktek
3.     Siswa sewaktu praktek di larang bersendau gurau.
4.     Gunakan bahan dan alat sesuai dengan fungsinya
5.     Jika tugas kurang jelas tanyakan pada guru penguji.
6.     Setelah selesai laporkan pada guru penguji.

6.          LANGKAH KERJA
1.       Nyalakan komputer
2.       Klik START -> all program -> klik soft wre proteus
3.       Setelah masuk pada soft were Proteus,keluarkan komponen-komponen dengan cara klik P pada soft were Proteus yang berada di bagian kiri komputer kita.
4.       Selanjutnya tulis pada Keywords komponen apa saja yang butuhkan.
5.       Setelah itu, rangkailah sesuai dengan perintah
6.       Setelah selesai ,Selanjutnya kita membuat program menggunakan note pad.
contoh :
$mod51

                   org 0h
mulai:         mov A,p3
                   cjne A,#0FEH,mati
                   mov p0,#11111110B
                   sjmp mulai 

Mati:           mov A,p3
                   cjne A, #0FDH,mulai
                   mov p0,#11111111b
                   sjmp mulai

end
7.              Jika sudah selesai,simpan file dengan menggunakan ekstensi ASM ,misalnya1.asm
           Lalu simpan di dalam folder yang ada software asm51 nya
8.              Setelah selesai buka soft were ASM51.
9.              Ketik nama softwere pada notepad tadi  tetapi tidak mengunakan kata-kata asm  dan di ENTER.Misal 1 .
10.           Jika soft were benar akan menampilkan 0 ERRORS FOUND
11.           Kemudian masukkan softwere tadi pada rangkaian yang ada pada softwere Proteus.
12.           Dengan cara mengeklik double pada IC dan panggil soft were dari dalam IC.
13.           Klik program File,dan pilih softwere yang kita buat tadi.
14.           Klik ok.
15.           Coba dan nyalakan hasil rangkaian

7.            Data pengamatan
Jika tekan saklar 1 maka lampu akan menyala semua
Jika tekan saklar 2 maka lampu akan mati
Kalau sama di tekan lampu harus menyala
Sedangkan jika tidak sama maka akan meloncat ke berikutnya

Gambar rangaian

TUGAS 2

1.JUDUL:
Program demo pemasangan keypad 3x4 data out berupa angka 7segment pada  port 0
2.          Tujuan Instrumen Umum (TIU)
1.     Siswa dapat menunjukan komponen-komponen yang digunakan.
3.          Tujuan Instrumen Khusus (TIK)
1.     Siswa dapat merakit Rangkaian di dalam soft were PROTEUS.
2.     Siswa dapat membuat program dengan menggunakan Notepad .
3.     Siswa dapat mengirim program tadi ke dalam rangkaian melalui ASM51 dan diteruskan di panggil di rangkaian IC.
   4.          ALAT DAN BAHAN
*  ALAT
1.      PC computer…………………………1buah

 *BAHAN
 ic AT89C51 ........................................1 buah
resitor 10k ohm ....................................1buah
resistor 300 ohm ..................................8 buah
capistor 33 pf .......................................2 buah
capasitor elektrolit 10 uf ......................1 buah
crystal ...................................................1 buah
7segment anode .....................................1 buah
keypad............................................1 buah
soft ware proteus...................................1
software note pad .................................1
software asm51 ....................................1


5.          KESELAMATAN KERJA
1.     Sebelum praktek berdoa terlebih dahulu.
2.     Pakailah seragam praktek saat praktek
3.     Siswa sewaktu praktek di larang bersendau gurau.
4.     Gunakan bahan dan alat sesuai dengan fungsinya
5.     Jika tugas kurang jelas tanyakan pada guru penguji.
6.     Setelah selesai laporkan pada guru penguji.

6.          LANGKAH KERJA
1.       Nyalakan komputer
2.       Klik START -> all program -> klik soft wre proteus
3.       Setelah masuk pada soft were Proteus,keluarkan komponen-komponen dengan cara klik P pada soft were Proteus yang berada di bagian kiri komputer kita.
4.       Selanjutnya tulis pada Keywords komponen apa saja yang butuhkan.
5.       Setelah itu, rangkailah sesuai dengan perintah
6.       Setelah selesai ,Selanjutnya kita membuat program menggunakan note pad.
contoh :
$mod51
;============================================
;Program demo pemasangan keypad 3x4
; data out berupa angka 7segment pada  port 0
;============================================
kolom1      bit     p2.4
kolom2      bit     p2.5
kolom3      bit     p2.6
baris1        bit     p2.0
baris2        bit     p2.1
baris3        bit     p2.2
baris4        bit     p2.3
keyport     equ   p2
keydata     equ   40h
;
          org   0h
mulai:        call   keypad3x4
          mov  A,keydata
          cjne  a,#0ffh,terus
          sjmp mulai
terus:        cpl    a
          mov  p0,a
          sjmp mulai
;===================================
;routine u/ baca keypad 3x4
;output pada key data(0-9,e = redial,f = #)
;===================================
keypad3x4:
          mov  keyport,#0ffh
          clr     kolom1
ul1:   jb      baris1,key1
          mov  keydata,#6
          ret    
key1:         jb      baris2,key2
          mov  keydata,#102d
          ret
key2:         jb      baris3,key3
          mov  keydata,#7
          ret
key3:         jb      baris4,key4
          mov  keydata,#0eh
          ret
key4:         setb  kolom1
          clr     kolom2
          jb      baris1,key5
          mov  keydata,#91d
          ret
key5:         jb      baris2,key6
          mov  keydata,#109d
          ret
key6:         jb      baris3,key7
          mov  keydata,#127d
          ret
key7:         jb      baris4,key8
          mov  keydata,#63d
          ret
key8:         setb  kolom2
          clr     kolom3
          jb      baris1,key9
          mov  keydata,#79d
          ret
key9:         jb      baris2,key10
          mov  keydata,#125d
          ret    
key10:       jb      baris3,key11
          mov  keydata,#111d
          ret
key11:       jb      baris4,key12
          mov  keydata,#0fh
          ret
key12:       mov  keydata,#0ffh
          ret
;       
          End
7.              Jika sudah selesai,simpan file dengan menggunakan ekstensi ASM ,misalnya2.asm.
           Lalu simpan di dalam folder yang ada software asm51 nya
8.              Setelah selesai buka soft were ASM51.
9.              Ketik nama softwere pada notepad tadi  tetapi tidak mengunakan kata-kata asm  dan di ENTER.Misal 2 .
10.           Jika soft were benar akan menampilkan 0 ERRORS FOUND
11.           Kemudian masukkan softwere tadi pada rangkaian yang ada pada softwere Proteus.
12.           Dengan cara mengeklik double pada IC dan panggil soft were dari dalam IC.
13.           Klik program File,dan pilih softwere yang kita buat tadi.
14.           Klik ok.
15.           Coba dan nyalakan hasil rangkaian


Gambar kerja



TUGAS 3
1.JUDUL:
Program menghidupkan display 8x7 segment untuk menampilkan huruf OUtSIdEr
2.          Tujuan Instrumen Umum (TIU)
1.     Siswa dapat menunjukan komponen-komponen yang digunakan.
3.          Tujuan Instrumen Khusus (TIK)
1.     Siswa dapat merakit Rangkaian di dalam soft were PROTEUS.
2.     Siswa dapat membuat program dengan menggunakan Notepad .
3.     Siswa dapat mengirim program tadi ke dalam rangkaian melalui ASM51 dan diteruskan di panggil di rangkaian IC.
   4.          ALAT DAN BAHAN
*  ALAT
1.      PC computer…………………………1buah

 *BAHAN
 ic AT89C51 ........................................1 buah
resitor 10k ohm ....................................1buah
respack 8………...................................1 buah
capistor 33 pf .......................................2 buah
capasitor elektrolit 10 uf ......................1 buah
crystal ...................................................1 buah
segment7x8 anode .................................1 buah
soft ware proteus...................................1
software note pad .................................1
software asm51 ....................................1


5.          KESELAMATAN KERJA
1.     Sebelum praktek berdoa terlebih dahulu.
2.     Pakailah seragam praktek saat praktek
3.     Siswa sewaktu praktek di larang bersendau gurau.
4.     Gunakan bahan dan alat sesuai dengan fungsinya
5.     Jika tugas kurang jelas tanyakan pada guru penguji.
6.     Setelah selesai laporkan pada guru penguji.

6.          LANGKAH KERJA
1.       Nyalakan komputer
2.       Klik START -> all program -> klik soft wre proteus
3.       Setelah masuk pada soft were Proteus,keluarkan komponen-komponen dengan cara klik P pada soft were Proteus yang berada di bagian kiri komputer kita.
4.       Selanjutnya tulis pada Keywords komponen apa saja yang butuhkan.
5.       Setelah itu, rangkailah sesuai dengan perintah
6.       Setelah selesai ,Selanjutnya kita membuat program menggunakan note pad.
contoh :
$mod51
;========================================
;Program menghidupkan display 8x7 segment
;untuk menampilkan huruf OUtSIdEr
;design  : JERRY PALEEVI
;========================================

org   0h
mulai:        mov  dptr,#angka
          mov  r6,#08h
          mov  r1,#01h
ulang:       clr     a
          movc         a,@a+dptr
          inc    dptr
          mov  p0,a
          mov  a,r1
          mov  p3,a
          rl       a


          mov  r1,a
          mov  r2,#5h
delay:        djnz  r2,delay
          mov  p0,#0ffh
          djnz  r6,ulang
          jmp   mulai
;==================
; data angka
;==================
angka:
          db     1,65,70,132,241,80,6,39

          end

7.              Jika sudah selesai,simpan file dengan menggunakan ekstensi ASM ,misalnya3.asm
           Lalu simpan di dalam folder yang ada software asm51 nya
8.              Setelah selesai buka soft were ASM51.
9.              Ketik nama softwere pada notepad tadi  tetapi tidak mengunakan kata-kata asm  dan di ENTER.Misal 3 .
10.           Jika soft were benar akan menampilkan 0 ERRORS FOUND
11.           Kemudian masukkan softwere tadi pada rangkaian yang ada pada softwere Proteus.
12.           Dengan cara mengeklik double pada IC dan panggil soft were dari dalam IC.
13.           Klik program File,dan pilih softwere yang kita buat tadi.
14.           Klik ok.
15.           Coba dan nyalakan hasil rangkaian


Gambar kerja


GAS 3
1.JUDUL:
Program menghidupkan tulisan berjalan dengan dotmetrik
2.          Tujuan Instrumen Umum (TIU)
1.     Siswa dapat menunjukan komponen-komponen yang digunakan.
3.          Tujuan Instrumen Khusus (TIK)
1.     Siswa dapat merakit Rangkaian di dalam soft were PROTEUS.
2.     Siswa dapat membuat program dengan menggunakan Notepad .
3.     Siswa dapat mengirim program tadi ke dalam rangkaian melalui ASM51 dan diteruskan di panggil di rangkaian IC.
   4.          ALAT DAN BAHAN
*  ALAT
1.      PC computer…………………………1buah

 *BAHAN
 ic AT89C51 ........................................1 buah
resitor 10k ohm ....................................1buah
respack 8………...................................1 buah
capistor 33 pf .......................................2 buah
capasitor elektrolit 10 uf ......................1 buah
crystal ...................................................1 buah 
ic
dot .................................1 buah
soft ware proteus...................................1
software note pad .................................1
software asm51 ....................................1


5.          KESELAMATAN KERJA
1.     Sebelum praktek berdoa terlebih dahulu.
2.     Pakailah seragam praktek saat praktek
3.     Siswa sewaktu praktek di larang bersendau gurau.
4.     Gunakan bahan dan alat sesuai dengan fungsinya
5.     Jika tugas kurang jelas tanyakan pada guru penguji.
6.     Setelah selesai laporkan pada guru penguji.

6.          LANGKAH KERJA
1.       Nyalakan komputer
2.       Klik START -> all program -> klik soft wre proteus
3.       Setelah masuk pada soft were Proteus,keluarkan komponen-komponen dengan cara klik P pada soft were Proteus yang berada di bagian kiri komputer kita.
4.       Selanjutnya tulis pada Keywords komponen apa saja yang butuhkan.
5.       Setelah itu, rangkailah sesuai dengan perintah
6.       Setelah selesai ,Selanjutnya kita membuat program menggunakan notepad. contoh:

$mod51
baris    equ    p0
dta    bit    p2.0
mrst    bit    p2.2
clock    bit    p2.4

jkl    equ    24

start:    mov    p0,#127
        mov    dptr,#ud1
        call    upi
        call    fl
        call    lr
        mov    dptr,#BINA
        call    dni
        call    fl
        call    lr
        mov    dptr,#wyt
        call    rs
        mov    dptr,#tbl
        call    lr
        mov    dptr,#ud1
        call    fl
        call    upo
        mov    dptr,#ud1
        call    dni
        call    fl
        call    lr
        mov    dptr,#ud1
        call    upi
        call    upo
        mov    dptr,#bina
        call    lr
        mov    dptr,#ud1
        call    dno
        call    dni
        call    fl
        call    lr
        jmp    start

;geser kiri
lr:
lr3:        mov    r7,#20
lr2:        call    rst
        mov    r6,#0
lr1:        mov    a,R6
        movc    a,@a+dptr
        cjne    a,#255,ljt
        ret
ljt:        mov    baris,a
        call    tunda
        mov    baris,#127
        call    clk
        inc    r6
        cjne    r6,#jkl,lr1
        djnz    r7,lr2
        inc    dptr
        jmp    lr3
;geser kanan
rs:        mov    b,#0ffh
masih:        inc    b
        mov    a,b
        movc    a,@a+dptr

    cjne    a,#255,masih
rl3:    mov    r7,#20
rl2:    call    rst
    mov    r6,#0
rl1:    mov    a,r6
    add    a,b
    movc    a,@a+dptr
    mov    Baris,a
    call    tunda
    mov    Baris,#127
    call    clk
    inc    r6
    cjne    r6,#jkl,rl1
    djnz    r7,rl2
    djnz    b,rl3
    ret

;flash
fl:    mov    r5,#7
fl3:    mov    r7,#50
fl2:    call    rst
    mov    r6,#0
fl1:    mov    a,r6
    movc    a,@a+dptr
    mov    Baris,a
    call    tunda
    mov    Baris,#127
    call    clk
    inc    r6
    cjne    r6,#jkl,fl1
    djnz    r7,fl2
    mov    r4,#50
fl4:    mov    r3,#jkl
fl5:    call    tunda
    djnz    r3,fl5
    djnz    r4,fl4
    djnz    r5,fl3
    ret

;up    in
upi:    mov    r4,#255
    mov    r5,#0
up4:    inc    r5
    mov    a,r4
    clr    c
    rlc    a
    mov    r4,a
    mov    r7,#40
up3:    mov    baris,#127
    call    rst
    mov    r6,#0
up2:    mov    a,r6
    movc    a,@a+dptr
    setb    acc.7
    mov    b,r5
up1:    rl    a
    djnz    b,up1
    orl    a,r4
    mov    Baris,a
    call    tunda
    mov    Baris,#127
    call    clk
    inc    r6
    cjne    r6,#jkl,up2
    djnz    r7,up3
    cjne    r5,#8,up4
    ret

;up    out
upo:    mov    r4,#0

        mov r5,#0
uo4:        inc r5
        mov r7,#40
uo3:        mov baris,#127
        call rst
        mov r6,#0
uo2:        mov a,r6
        movc a,@a+dptr
        rr a
        mov b,r5
uo1:        rl a
        djnz b,uo1
        orl a,r4
        mov baris,a
        call tunda
        mov baris,#127
        call clk
        inc r6
        cjne r6,#jkl,uo2
        djnz r7,uo3
        mov a,r4
        setb c
        rlc a
        mov r4,a
        cjne r5,#8,uo4
        ret

;down in
dni:        mov r4,#255
        mov r5,#0
dn4:        inc r5
        mov a,r4
        clr c
        rrc a
        mov r4,a
        mov r7,#40
dn3:        mov baris,#127
        call rst
        mov r6,#0
dn2:        mov a,r6
        movc a,@a+dptr
        setb acc.7
        mov b,r5
dn1:        rr a
        djnz b,dn1
        orl a,r4
        mov baris,a
        call tunda
        mov baris,#127
        call clk
        inc r6
        cjne r6,#jkl,dn2
        djnz r7,dn3
        cjne r5,#8,dn4
        ret

;down out
dno:        mov r4,#0
        mov r5,#0
do4:        inc r5
        mov r7,#40
do3:        mov baris,#127
        call rst
        mov r6,#0
do2:        mov a,r6
        movc a,@a+dptr
        setb acc.7
        mov b,r5
do1:        rr a
        djnz b,do1

    orl    a,r4
    mov    baris,A
    call    tunda
    mov    baris,#127
    call    clk
    inc    r6
    cjne    r6,#jkl,do2
    djnz    r7,do3
    mov    a,r4
    setb    c
    rrc    a
    mov    r4,a
    cjne    r5,#8,do4
    ret

sdata:    SETB    dta
    call    clk
    clr    dta
    ret

rst:    clr    mrst
    nop
    setb    p2.2
    call    sdata
    ret

clk:    setb    clock
    nop
    clr    clock
    ret

tunda:    push    b
    mov    b,#45
    djnz    b,$
    pop    b
    ret

;smk    =    3 chr
ud1:    db 127,127,127,127,89,54,54,54,77,127,0,125,115,125,0,127,0,119,107,98,62,127
    db 127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,255
tlr:    db 127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127
    db 0,125,123,119,0,95,43,43,43,7,123,123,64,59,59,95,43,43,43,7,127,65,063,127

;BINA = 4 chr
BINA:    db    127,0,54,54,54,73,127,127,62,0,62,127,127,0,125,123,119,0,127
    db    1,118,118,118,1,127,127,127,127,127,127,127,127,127,127,127,255

;WIYATA = 6 chr
wyt:    db    127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,
    db    64,63,71,63,64,127,127,62,0,62,127,127,120,199,15,119,120,127
    db    1,118,118,118,1,127,126,126,0,126,126,127,1,118,118,118,1,127
    db    127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,
    db    127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,255

;smk binawiyata karangmalang sragen        Alamat:jln.Abimanyu No.18 Taman Asri Sr = 80 chr
tbl:    db    127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,127,
    db    89,54,54,54,77,127,0,125,115,125,0,127,0,119,107,93,62,127,
    db    127,127,127,127,127,127,0,54,54,54,73,127,127,59,2,63,127,127
    db    3,119,123,123,7,127,95,43,43,43,7,127,67,63,79,63,67,127
    db    127,59,2,63,127,127,123,119,15,119,123,127,95,43,43,43,7,127
    db    123,123,64,59,59,127,95,43,43,43,7,127,127,127,127,127,127,127
    db    0,119,107,93,62,127,95,43,43,43,7,127,3,119,123,123,119,127
    db    95, 43, 43, 43, 7, 127, 3, 119, 123, 123 ,7, 127, 119, 43, 43, 43, 67, 127
    db    3, 123, 3, 123, 7, 127, 95, 43, 43, 43, 7, 127, 127, 62, 0, 63, 127, 127
    db    95, 43, 43, 43, 7, 127, 3, 119, 123, 123, 7, 127, 119, 43, 43, 43, 67, 127
    db    127, 127, 127, 127, 127, 127, 89, 54, 54, 54, 77, 127, 3, 119, 123, 123, 119, 127
    db    95, 43, 43, 43, 7, 127, 119, 43, 43, 43, 67, 127, 71, 43, 43, 43, 103, 127
    db    3, 119, 123, 123, 7, 127, 127, 127, 127, 127, 127, 127, 127, 127, 127, 127, 127, 127
    db    127, 127, 127, 127, 127, 127, 127,127, 127, 127, 127, 127, 127, 127, 127, 127, 127, 127
    db    127, 127, 127, 127, 127, 127, 127,127, 127, 127, 127, 127, 1, 118, 118, 118, 1, 127
    db    127, 62, 0, 63, 127, 127, 95, 43, 43, 43, 7, 127, 3, 123, 3, 123, 7, 127
    db    95, 43, 43, 43, 7, 127, 123, 123, 64, 59, 59, 127, 127, 73, 73, 127, 127, 127
    db    95, 63, 62, 62, 64, 127, 127, 62, 0, 63, 127, 127, 3, 119, 123, 123, 7, 127
    db    127, 31, 31, 127, 127, 127, 1, 118, 118, 118, 1, 127, 0, 59, 59, 59, 71, 127
    db    127, 59, 2, 63, 127, 127, 3, 123, 3, 123, 7, 127, 95, 43, 43, 43, 7, 127
    db    3, 119, 123, 123, 7, 127, 123, 119, 15, 119, 123, 127, 67, 63, 63, 95, 3, 127
    db    127, 127, 127, 127, 127, 127, 0, 125, 123, 119, 0, 127, 71, 59, 59, 59, 71, 127
    db    127, 31, 31, 127, 127, 127, 127, 61, 0, 63, 127, 127, 73, 54, 54, 54, 73, 127
    db    127, 127, 127, 127, 127, 127, 126, 126, 0, 126, 126, 127, 95, 43, 43, 43, 7, 127
    db    3, 123, 3, 123, 7, 127, 95, 43, 43, 43, 7, 127, 3, 119, 123, 123, 7, 127
    db    127, 127, 127, 127, 127, 127, 1, 118, 118, 118, 1, 127, 55, 43, 43, 43, 91, 127
    db    3, 119, 123, 123, 119, 127, 127, 59, 2, 63, 127, 127, 127, 127, 127, 127, 127, 127
    db    89, 54, 54, 54, 77, 127, 3, 119, 123, 123, 119, 127,
    db    95, 43, 43, 43, 7, 127, 119, 43, 43, 43, 67, 127, 71, 43, 43, 43, 103, 127
    db    3, 119, 123, 123, 7, 127, 127, 127, 127, 127, 127, 127, 56, 58, 58, 58, 70, 127
    db    126, 14, 118, 122, 124, 127, 61, 30, 46, 54, 57, 127, 61, 30, 46, 54, 57, 127
    db    127, 61, 0, 63, 127, 127, 127, 127, 127, 127, 127, 127, 126, 126, 0, 126, 126, 127
    db    71, 43, 43, 43, 103, 127, 127, 62, 0, 63, 127, 127, 3, 107, 107, 107, 119, 127
    db    127, 31, 31, 127, 127, 127, 99, 93, 62, 127, 127, 127, 65, 62, 62, 62, 65, 127
    db    61, 30, 46, 54, 57, 127, 126, 14, 118, 122, 124, 127, 127, 61, 0, 63, 127, 127
    db    127, 127,   62, 93, 99, 127, 73, 54, 54, 54, 73, 127, 89, 54, 54, 54, 65, 127
    db    127, 61, 0, 63, 127, 127, 73, 54, 54, 54, 73, 127, 127, 61, 0, 63, 127, 127
    db    73, 54, 54, 54, 73, 127, 127, 127, 127, 127, 127, 127, 127, 0, 54, 54, 54, 62, 127
    db    119, 119, 119, 119, 119, 127, 3, 123, 3, 123, 7, 127, 95, 43, 43, 43, 7, 127
    db    127, 59, 2, 63, 127, 127, 127, 62, 0, 63, 127, 127, 127, 73, 73, 127, 127, 127
    db    55, 43, 43, 43, 91, 127, 3, 123, 3, 123, 7, 127, 0, 111, 87, 59, 127, 127
    db    0, 59, 59, 59, 71, 127, 67, 63, 79, 63, 67, 127, 63, 63, 63, 63, 63, 127
    db    55, 43, 43, 43, 91, 127, 3, 119, 123, 123, 119, 127, 119, 43, 43, 43, 67, 127
    db    65, 62, 34, 42, 33, 127, 123, 119, 15, 119, 123, 127, 95, 43, 43, 43, 7, 127
    db    0, 119, 123, 123, 7, 127, 71, 59, 59, 59, 71, 127, 71, 59, 59, 59, 71, 127
    db    127, 31, 31, 127, 127, 127, 71, 59, 59, 59, 59, 127, 71, 59, 59, 59, 71, 127
    db    3, 123, 3, 123, 7, 127, 127, 127, 127, 127, 127, 127, 64, 63, 71, 63, 64, 127
    db    71, 43, 43, 43, 103, 127, 0, 59, 59, 59, 71, 127, 55, 43, 43, 43, 91, 127
    db    127, 59, 2, 63, 127, 127, 123, 123, 64, 59, 59, 127, 71, 43, 43, 43, 103, 127
    db    127, 73, 73, 127, 127, 127, 127, 127, 127, 127, 127, 127, 0, 119, 123, 123, 7, 127
    db    123, 123, 64, 59, 59, 127, 123, 123, 64, 59, 59, 127, 3, 107, 107,107, 119, 127
    db    127, 73, 73, 127, 127, 127, 95, 111, 119, 33, 125, 127, 95, 111, 119, 123, 125, 127
    db    55, 43, 43, 43, 91, 127, 3, 123, 3, 123, 7, 127, 0, 111, 87, 59, 127, 127
    db    0, 59, 59, 59, 71, 127, 127, 59, 2, 63, 127, 127, 3, 119, 123, 123, 7, 127
    db    95, 43, 43, 43, 7, 127, 67, 63, 79, 63, 67, 127
    db    127, 59, 2, 63, 127, 127, 123, 119, 15, 119, 123, 127, 95, 43, 43, 43, 7, 127
    db    123, 123, 64, 59, 59, 123, 95, 43, 43, 43, 7, 127, 127, 31, 31, 127, 127, 127
    db    55, 43, 43, 43, 91, 127, 71, 59, 59, 59, 59, 127, 0, 119, 123, 123, 7, 127
    db    127, 31, 31, 127, 127, 127, 127, 59, 2, 63, 127, 127, 71, 59, 59, 59, 0, 127
    db    127, 127, 127, 127, 127, 127, 127, 127, 127, 127, 127, 127, 255

end  
7.              Jika sudah selesai,simpan file dengan menggunakan ekstensi ASM ,misalnyadotmetrik.asm
           Lalu simpan di dalam folder yang ada software asm51 nya
8.              Setelah selesai buka soft were ASM51.
9.              Ketik nama softwere pada notepad tadi  tetapi tidak mengunakan kata-kata asm  dan di ENTER.Misal dotmetrik .
10.           Jika soft were benar akan menampilkan 0 ERRORS FOUND
11.           Kemudian masukkan softwere tadi pada rangkaian yang ada pada softwere Proteus.
12.           Dengan cara mengeklik double pada IC dan panggil soft were dari dalam IC.
13.           Klik program File,dan pilih softwere yang kita buat tadi.
14.           Klik ok.
15.           Coba dan nyalakan hasil rangkaian







1.JUDUL:
Program menghidupkan jam digital dengan dot metrik
2.          Tujuan Instrumen Umum (TIU)
1.     Siswa dapat menunjukan komponen-komponen yang digunakan.
3.          Tujuan Instrumen Khusus (TIK)
1.     Siswa dapat merakit Rangkaian di dalam soft were PROTEUS.
2.     Siswa dapat membuat program dengan menggunakan Notepad .
3.     Siswa dapat mengirim program tadi ke dalam rangkaian melalui ASM51 dan diteruskan di panggil di rangkaian IC.
   4.          ALAT DAN BAHAN
*  ALAT
1.      PC computer…………………………1buah

 *BAHAN
 ic AT89C51 ........................................1 buah
resitor 10k ohm ....................................1buah
respack 8………...................................1 buah
capistor 33 pf .......................................2 buah
capasitor elektrolit 10 uf ......................1 buah
crystal ...................................................1 buah
segment7x8 anode .................................1 buah
soft ware proteus...................................1
software note pad .................................1
software asm51 ....................................1


5.          KESELAMATAN KERJA
1.     Sebelum praktek berdoa terlebih dahulu.
2.     Pakailah seragam praktek saat praktek
3.     Siswa sewaktu praktek di larang bersendau gurau.
4.     Gunakan bahan dan alat sesuai dengan fungsinya
5.     Jika tugas kurang jelas tanyakan pada guru penguji.
6.     Setelah selesai laporkan pada guru penguji.

6.          LANGKAH KERJA
1.       Nyalakan komputer
2.       Klik START -> all program -> klik soft wre proteus
3.       Setelah masuk pada soft were Proteus,keluarkan komponen-komponen dengan cara klik P pada soft were Proteus yang berada di bagian kiri komputer kita.
4.       Selanjutnya tulis pada Keywords komponen apa saja yang butuhkan.
5.       Setelah itu, rangkailah sesuai dengan perintah
6.       Setelah selesai ,Selanjutnya kita membuat program menggunakan note pad.
contoh :
;=================================================
;PROGRAM 4.1:
;=================================================

;PORT0=DATA SEGMEN
;PORT2=DIGIT SELECT
;PORT 3.2=SET JAM
;PORT 3.3=SET MENIT
;PORT 3.4=SET DETIK

$MOD51
SEGM    EQU    P0
DGSEL    EQU    P2
    DSEG
    ORG    50H
JAM:    DS 1
MENIT:    DS 1
DETIK:    DS 1
DTK20:    DS 1
TSCAN:    DS 1
DISPBUF:    DS 32
S_DTK    BIT    P3.0
S_MNT    BIT    P3.2
S_JAM    BIT    P2.4

BARIS    EQU    P0
DTA    BIT    P2.0
MRST    BIT    P2.2
CLOCK    BIT    P2.4
JKL    EQU    40

    CSEG
    ORG 0H
    JMP START

    ORG 0BH
    JMP TIMER0

START:    MOV JAM,#0
    MOV MENIT,#0
    MOV DETIK,#0
    MOV DPTR,#TBL
    MOV TMOD,#11H
    MOV TH0,#HIGH(-50000)
    MOV TL0,#LOW(-50000)
    MOV DTK20,#20
    SETB EA
    SETB ET0
    SETB TR0
MAIN:    MOV TSCAN,#100

LOOP:    CALL DISPLAY
    DJNZ TSCAN,LOOP
    CALL SCAN_INPUT
    JMP    MAIN
;SUB PROGRAM
TIMER0:    MOV TH0,#HIGH(-5000)
    MOV TL0,#LOW(-5000)
    MOV R4,DTK20
    CJNE R4,#10,TXX
    MOV DISPBUF+12,#107
    MOV DISPBUF+26,#107
   
TXX:    CJNE R4,#20,TXY
    MOV DISPBUF+12,#127
    MOV DISPBUF+26,#127

TXY:    DJNZ DTK20,X_TIM0
    MOV DTK20,#20
    INC DETIK
    MOV R4,DETIK
    CJNE R4,#60,X_TIM0
    MOV DETIK,#0
    INC MENIT
    MOV R4,MENIT
    CJNE R4,#60,X_TIM0
    MOV MENIT,#0
    INC JAM
    MOV R4,JAM
    CJNE R4,#24,X_TIM0
    MOV JAM,#0
X_TIM0:    RETI

SCAN_INPUT:
P_JAM:    JB S_JAM,P_MNT
    INC JAM
    MOV A,JAM
    CJNE A,#24,EXIT_SCAN
    MOV JAM,#0
   
P_MNT:    JB S_MNT,P_DTK
    INC MENIT
    MOV A,MENIT
    CJNE A,#60,EXIT_SCAN
    MOV MENIT,#0

P_DTK:    JB S_DTK,EXIT_SCAN
    INC DETIK
    MOV A,DETIK
    CJNE A,#60,EXIT_SCAN
    MOV DETIK,#0
EXIT_SCAN: RET

DISPLAY:CALL CONVERT
    MOV    R0,#DISPBUF
    CALL    RST
    MOV    R6,#0
NKOLOM:    MOV    A,@R0
    MOV    BARIS,A
    CALL    TUNDA
    MOV    BARIS,#127
    CALL    CLK
    INC    R6
    INC    R0
    CJNE    R6,#JKL,NKOLOM

SDATA:    SETB    DTA
    CALL    CLK
    CLR    DTA
    RET

RST:    CLR    MRST
    NOP
    SETB    MRST
    CALL    SDATA
    RET

CLK:    SETB    CLOCK
    NOP
    CLR    CLOCK
    RET

TUNDA:    MOV    B,#60
    DJNZ    B,$
    RET

CONVERT:MOV    DPTR,#TBL
    MOV    R0,#DISPBUF
    MOV    R1,#JAM
N_CONV:    MOV    A,@R1
    MOV    B,#10
    DIV    AB
    PUSH    B
    MOV    B,#6
    MUL    AB
    MOV    B,#6
CON1:    PUSH    ACC
    MOVC    A,@A+DPTR
    MOV    @R0,A
    INC    R0
    POP    ACC
    INC    A
    DJNZ    B,CON1
    pop b
    mov a,#6
    mul ab
    mov b,#6
con2:    push acc
    movc a,@a+dptr
    mov @r0,a
    inc r0
    pop acc
    inc a
    djnz b,con2
    inc r0
    mov @r0,#127
    inc r0
    inc r1
    cjne r1,#detik+1,n_conv
    ret
delay:    mov r6,#10
dly:    mov r5,#150
    djnz r5,$
    djnz r6,dly
    ret
;angka
;0123456789=10 chr
tbl:    db 65,46,54,58,65,127        ;0
    db 127,61,0,63,127,127        ;1
    db 29,46,54,54,57,127        ;2
    db 93,54,54,54,73,127        ;3
    db 103,107,109,0,111,127    ;4
    db 88,58,58,58,70,127        ;5
    db 67,53,54,54,79,127        ;6
    db 126,14,118,122,124,127    ;7
    db 73,54,54,54,73,127        ;8
    db 121,54,54,86,97,127        ;9
end
7.              Jika sudah selesai,simpan file dengan menggunakan ekstensi ASM ,misalnyajam.asm
           Lalu simpan di dalam folder yang ada software asm51 nya
8.              Setelah selesai buka soft were ASM51.
9.              Ketik nama softwere pada notepad tadi  tetapi tidak mengunakan kata-kata asm  dan di ENTER.Misal jam .
10.           Jika soft were benar akan menampilkan 0 ERRORS FOUND
11.           Kemudian masukkan softwere tadi pada rangkaian yang ada pada softwere Proteus.
12.           Dengan cara mengeklik double pada IC dan panggil soft were dari dalam IC.
13.           Klik program File,dan pilih softwere yang kita buat tadi.
14.           Klik ok.
15.           Coba dan nyalakan hasil rangkaian