LAMPU LALU LINTAS PENYEBRANGAN JALAN RAYA BERBASIS MIKROKONTROLER AT89S51
Kelompok A3
1.
Andian Sidiq P (3.32.20.0.05)
2.
Dhika Ardiyasa (3.32.20.0.09)
3.
Eka Fitria S A (3.32.20.0.10)
4.
Octavia Rejika W (3.32.20.0.21)
Sistem
transportasi pada masa sekarang ini perlu ditunjang dengan sistem keamanan dan
kenyamanan yang baik bagi pengguna jalan. Dalam bidang lalu lintas, system
pengendalian lampu lalu lintas yang sudah ada sekarang ini mengatur kendaraan
yang melewati ruas-ruas jalan. Untuk para penyebrang jalan, terkadang kurang
diperhatikan. Oleh karena itu, pengembangan yang perlu dilakukan untuk sistem
ini yaitu dengan pengendali pengaturan lampu lalu lintas untuk pejalan kaki
yang menyebrang. Dalam tugas ini akan membuat alat lampu penyebrangan pada
jalan berbasis mikrokontroller AT89S51 sebagai pengendali utama.
Masukan : Tombol tekan
Keluaran : LED
POWER POINT (download PPT)
PROGRAM
ORG 0H
AWAL:
MOV P0,#0FEH ;led merah lampu penyebrangan NYALA
MOV P1,#0FEH ;led hijau lampu lalu lintas NYALA
JNB P1.3,TEKAN
JNB P1.4,TEKAN
SJMP AWAL
TEKAN:
MOV P1,#0FFH ;HIJAU1 MATI
CLR P1.1 ;KUNING1 NYALA
ACALL TUNDA1 ;memanggil tunda1
CPL P1.1 ;KUNING1 MATI
CLR P1.2 ;MERAH1 NYALA
MOV P0,#0FDH ;HIJAU0 NYALA
ACALL TUNDA2 ;memanggil tunda2
ACALL KEDIP ;memanggil kedip
MOV P0,#0FEH ;led merah lampu penyebrangan NYALA
CPL P1.2 ;MERAH1 MATI
CLR P1.1 ;KUNING1 NYALA
ACALL TUNDA1 ;memanggil tunda1
ACALL TAHAN ;memanggil tahan
RET
TUNDA0: ;250ms
MOV TMOD,#10H ;isi TMOD dengan nilai 10H
SETB TR1 ;Aktifkan timer
MOV R1,#5 ;isi R1 dengan 5
D1:
MOV TH1,#03CH ;isi TH1 dengan 03CH
MOV TL1,#0B0H ;isi TL1 dengan 0B0H
D2:
JNB TF1,D2
CLR TF1
DJNZ R1,D1
RET
TUNDA1: ;3s
MOV TMOD,#10H ;isi TMOD dengan nilai 10H
SETB TR1 ;Aktifkan timer
MOV R1,#60 ;isi R1 dengan 60
D3:
MOV TH1,#03CH ;isi TH1 dengan 03CH
MOV TL1,#0B0H ;isi TL1 dengan 0B0H
D4:
JNB TF1,D4
CLR TF1
DJNZ R1,D3
RET
TUNDA2: ;10s
MOV TMOD,#10H ;isi TMOD dengan nilai 10H
SETB TR1 ;Aktifkan timer
MOV R1,#200 ;isi R1 dengan 200
D5:
MOV TH1,#03CH ;isi TH1 dengan 03CH
MOV TL1,#0B0H ;isi TL1 dengan 0B0H
D6:
JNB TF1,D6
CLR TF1
DJNZ R1,D5
RET
KEDIP:
CLR P0.1 ;Lampu Hijau0 menyala
ACALL TUNDA0 ;memanggil Tunda0
CPL P0.1 ;lampu Hijau0 Mati
ACALL TUNDA0 ;Memanggil tunda0
CPL P0.1
ACALL TUNDA0
CPL P0.1
ACALL TUNDA0
CPL P0.1
ACALL TUNDA0
CPL P0.1
ACALL TUNDA0
CPL P0.1
ACALL TUNDA0
CPL P0.1
ACALL TUNDA0
RET
TAHAN:
MOV P0,#0FEH ;MERAH0 NYALA
MOV P1,#0FEH ;HIJAU1 NYALA
ACALL TUNDA2
RET
END
Komentar
Posting Komentar