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.