MENYALAKAN DISPLAY LED DI PORT 0

BioDaTAKu

Nama	Suhardi
Kelas	XI TOI
NO/Induk	33/8901
Alamat	Banaran,Jenggrik,Kedawung,Sragen
Tempat	Sragen
Tanggal Lahir	09, Agustus, 1996
Jenis Kelamin	Pria
Hobi	Internetan, Mencoba hal-hal baru,dll

LAPORAN PRAKTEK 1

MENYALAKAN LAMPU LED DI PORT 0

---

Wellcome in My html

1. Tujuan :
   Setelah siswa praktek diharapkan dapat :

   Melakukan Program Mikrokontroler Dengan Bahasa Basic (BASCOM).

   Menguji Coba Rangkaian Dengan Benar.

   Membuat Rangkaian Pengendali Nyala Lampu LED Di P0.

Alat Dan Bahan :

1. Alat :
   
   • Komputer Dengan Software Proteus.
   • Gambar Rencana Kerja.
   • Rencana Program.
   
   
2. Bahan :
   • Ic AT89S51
   • LED
   • Resistor 10K
   • Resistor 220 ohm
   • Kondensator 33 p

Keselamatan Kerja :

• Berdo'alah sebelum melakukan Praktek.
• Dilarang Bersendau-gurau Saat Pelaksanaan Praktek.
• Menghidupkan dan Mematikan Komputer dengan Prosedur Yang Benar.

Instruksi Kerja :

• Memastikan alat dan bahan siap digunakan.
• Memastikan telah memahami gambar kerja dan source code program.
• Menulis source program dengan bascom 89s51.
• Membuat rangkaian simulator rangkaian dengan proteus.
• Membuat komplier kode program untuk mendapatkan file *HEX.
• Melakukan uji coba rangkaian simulator.

Gambar Kerja :

Source Code :

$regfile = "reg51.dat"
$crystal = 12000000

Do

If P3.0 = 0 And P0.0 = 1 Then
P0.0 = 0

Waitms 250
End If



If P3.0 = 0 And P0.0 = 0 Then
P0.0 = 1
Waitms 250
End If



If P3.1 = 0 And P0.1 = 1 Then
P0.1 = 0
Waitms 250
End If

If P3.1 = 0 And P0.1 = 0 Then
P0.1 = 1
Waitms 250
End If

If P3.2 = 0 And P0.2 = 1 Then
P0.2 = 0
Waitms 250
End If

If P3.2 = 0 And P0.2 = 0 Then
P0.2 = 1
Waitms 250
End If

If P3.3 = 0 And P0.3 = 1 Then
P0.3 = 0
Waitms 250
End If

If P3.3 = 0 And P0.3 = 0 Then
P0.3 = 1
Waitms 250
End If

If P3.4 = 0 And P0.4 = 1 Then
P0.4 = 0
Waitms 250
End If

If P3.4 = 0 And P0.4 = 0 Then
P0.4 = 1
Waitms 250
End If


If P3.5 = 0 And P0.5 = 1 Then
P0.5 = 0
Waitms 250
End If

If P3.5 = 0 And P0.5 = 0 Then
P0.5 = 1
Waitms 250
End If

If P3.6 = 0 And P0.6 = 1 Then
P0.6 = 0
Waitms 250
End If

If P3.6 = 0 And P0.6 = 0 Then
P0.6 = 1
Waitms 250
End If

If P3.7 = 0 And P0.7 = 1 Then
P0.7 = 0
Waitms 250
End If

If P3.7 = 0 And P0.7 = 0 Then
P0.7 = 1
Waitms 250
End If

Loop

Kesimpulan :

"Apabila Led diberi logika 0 maka lampu akan menyala,sedangkan kalau diberi logika 1 lampu tidak menyala"

THANK YOU VERY MUCH