membuat progam tampilan lcd

Geplaas deur hendra_prasetyo on Dinsdag 30 April 2013 / Etikette: / Comments: (0)
MEMBUAT PROGRAM TAMPILAN LCD => HENDRA PARASETYO
Nama Hendra
Kelas XI TOI
NO/Induk 15/8883
Alamat Balong,jenawi,karanganyar
Tempat karanganyar
Tanggal Lahir 05,september, 1995
Jenis Kelamin Pria
Hobi Internetan, Mencoba hal-hal baru,dll

LAPORAN PRAKTEK

MEMBUAT PROGRAM TAMPILAN LCD

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 Program Tampilan LCD.


  • Alat Dan Bahan :
    1. Alat :
      • Komputer Dengan Software Proteus.
      • Gambar Rencana Kerja.
      • Rencana Program. Loop
        •

    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 AVR.
    • Membuat rangkaian simulator rangkaian dengan proteus.
    • Membuat komplier kode program untuk mendapatkan file *HEX.
    • Melakukan uji coba rangkaian simulator.
  • Gambar Kerja :
  • Source Code : 
    $regfile = "m32def.dat"
$crystal = 8000000

Config Lcdpin = Pin , Db4 = Portd.4 ,
Db5 = Portd.5 , Db6 = Portd.6 , 
Db7 = Portd.7 , E = Portd.2 , Rs = Portd.0
Config Lcdpin = 16 * 2

Deflcdchar 1,32,10,31,14,4,32,32,32
' replace ? with number (0-7) '

Dim Y As Integer

Do

Cls
Cursor Off
Locate 1 , 1
Lcd Chr(1) ; "HENDRA P" ; Chr(1)
Locate 4 , 1
Lcd " SMK BINAWIYATA "
Wait 1

Cls
Cursor Off
Locate 1 , 1
Lcd " SMK BINAWIYATA - TEST LCD BASCOM AVR "
For Y = 1 To 46
    Shiftlcd Right
    Waitms 100
    Next

    Cls
  • Kesimpulan :

    • thanyk you siap dibuka

    mengendalikan nyala 7segment di port2

    Geplaas deur hendra_prasetyo / Etikette: / Comments: (0)

    MENGENDALIKAN NYALA 7SEGMENT DI PORT 2

    BioDaTAKu

    Nama hendra parasetyo
    Kelas XI TOI
    NO/Induk 15/8883
    Alamat balong,jenawi,karanganyar
    Tempat kranganyar
    Tanggal Lahir 05, september, 1995
    Jenis Kelamin Pria
    Hobi olahraga

    LAPORAN PRAKTEK 1

    MENGENDALIKAN NYALA 7SEGMENT DI PORT 2

    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 MENGENDALIKAN NYALA 7SEGMENT DI PORT 2

    2. Alat Dan Bahan :
      1. Alat :
        • Komputer Dengan Software Proteus.
        • Gambar Rencana Kerja.
        • Rencana Program.

      2. Bahan :
        • Ic AT89S51
        • 7Segment
        • Resistor 10K
        • Crystal
        • Kondensator 33 p

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

    4. 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.
    5. Gambar Kerja :
    6. Source Code : 
      $regfile = "reg51.dat"
$crystal = 12000000

Do

P0 = &B0010010
Waitms 250

P0 = &B1000001
Waitms 250

P0 = &B0001001
Waitms 250

P0 = &B0001000
Waitms 250

P0 = &B1001110
Waitms 250

P0 = &B0100001
Waitms 250

P0 = &B1111001
Waitms 250

Loop
    7. Kesimpulan :
    8. penting paham  

    penekanan push button di port 3 untuk mengendalikan led di port 0

    Geplaas deur hendra_prasetyo / Etikette: / Comments: (0)
    Menyalakan Lampu Led di P0 Dilengkapi Dengan Push Button=> HENDRA PARSEYO
    Nama hendra
    Kelas XI TOI
    NO/Induk 15/8883
    Alamat Balong,jenawi,karanganyar
    Tempat karanganyar
    Tanggal Lahir 05, september, 1995
    Jenis Kelamin Pria
    Hobi Internetan, Mencoba hal-hal baru,dll

    LAPORAN PRAKTEK

    MENYALAKAN LAMPU LED DI PORT 0 Dilengkapi Dengan Push button

    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 Dilengkapi Dengan Push Button.


  • Alat Dan Bahan :
    1. Alat :
      • Komputer Dengan Software Proteus.
      • Gambar Rencana Kerja.
      • Rencana Program.

    2. Bahan :
      • Ic AT89S51
      • LED
      • Resistor 10K
      • Resistor 100R
      • Kondensator 33 p
      • Button
      • Crystal
      • Resistor Pack 8

  • 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 :

    • siap dibuka 

    Menjalankan Kendali Motor DC start,stop,ol,dan reset

    Geplaas deur hendra_prasetyo / Etikette: / Comments: (0)
    Membuat kendali motor DC start,stop,ol,dan reset=> oleh Hendra prasetyo

    BioDaTAKu

    Nama hendra
    Kelas XI TOI
    NO/Induk 15/8883
    Alamat Balong,Jenawi,karanganyar
    Tempat karanagnyar
    Tanggal Lahir 05,september, 1995
    Jenis Kelamin Pria
    Laporan Membuat kendali motor DC start,stop,ol,dan reset

    LAPORAN PRAKTEK 1

    Menjalankan 1 motor dengan LCD dan Lampu Indikator

    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 1 motor dengan LCD dan Lampu Indikator





  • Alat Dan Bahan : 
    1. Alat :
      • Komputer Dengan Software Proteus.
      • Gambar Rencana Kerja.
      • Rencana Program.

    2. Bahan :
      • Ic AT89S51
      • 3 LED 
      •  
      • Resistor 1K
      • motor
      • relay
      • kondensator
      • AND
      • counter
      • lcd 16*2
      • button
      • resistor pack

  • 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

Config Lcdpin = Pin , Db4 = P0.4 , Db5 = P0.5 , Db6 = P0.6 , Db7 = P0.7 , E = P0.1 , Rs = P0.0

Cursor Off
P2 = 4
P3 = 0
P1 = 255

Locate 1 , 1
Lcd "PENGENDALI MOTOR DC"
Locate 2 , 1
Lcd "  DENGAN AT8951"
Wait 2
Locate 1 , 1
Lcd " TEKNIK OTOMASI "
Locate 2 , 1
Lcd " SMK BINAWIYATA"
Wait 3
Locate 1 , 1
Lcd "      OLEH         "
Locate 2 , 1
Lcd "  HENDRA  "
Wait 4
Do

If P1.0 = 0 And P2 = 4 Then
P2 = 1
P3 = 1

Locate 1 , 1
Lcd "  MOTOR SEDANG       "
Locate 2 , 1
Lcd "    BERJALAN     "

End If


If P1.1 = 0 And P2 = 1 Then
P2 = 4
P3 = 2

Locate 1 , 1
Lcd "  MOTOR SEDANG       "
Locate 2 , 1
Lcd "    BERHENTI    "
End If

If P1.2 = 0 And P3 = 1 Then
P2 = 2
P3 = 4

Locate 1 , 1
Lcd "  MOTOR SEDANG       "
Locate 2 , 1
Lcd "    OVERLAD    "
End If

If P1.3 = 0 And P3 = 4 Then
P2 = 4
P3 = 0

Locate 1 , 1
Lcd "  MOTOR SEDANG       "
Locate 2 , 1
Lcd "     READY     "
End If

Loop
    

    • 

  • Kesimpulan :
      


    • Apabila motor kerja,pada lcd menampilkan "motor sedang berjalan" dan lampu indikator bewarna "hijau".

      • 

    • Apabila tombol "stop" ditekan maka motor akan berhenti,dan lampu indikator bewarna "merah".

      • 

    • Apabila terjadi overload, maka motor tidak bi dijalankan,cara menjalankannya kembali yaitu dengan
      
menekan tombol "reset",dan setelah itu tekan tombol "start"

      • 

    

    • 

    

    
THANK YOU