TONGKAT CERDAS SEBAGAI ALAT BANTU TUNA NETRA BERBASIS MIKROKONTROLER AT89S51

pada tanggal

 TONGKAT CERDAS SEBAGAI ALAT BANTU TUNA NETRA BERBASIS MIKROKONTROLER AT89S51 


NAMA ANGGOTA KELOMPOK 1 

KELAS : EK2C

1. Alviandi Prasetyo Aji (3.32.20.2.01)

2. Astri Suryandari (3.32.20.2.04)

3. Deni Ramadhani (3.32.20.2.06)

4. Ladifa Dwi Adani (3.32.20.2.14)

5. Vito Adhi Fernanda (3.32.20.2.25)

 

 LATAR BELAKANG

    Tuna netra adalah suatu kondisi tidak berfungsinya indera penglihatan pada seseorang secara sebagian (low vision) atau secara keseluruhan (totally blind).
    Sampai saat ini masih banyak penyandang tuna netra yang menggunakan tongkat konvensional sebagai alat bantu melakukan aktivitas sehari-hari.
    Maka dari itu kami membuat sebuah alat yaitu tongkat cerdas sebagai alat bantu penyandang tuna netra berbasis sensor ultrasonik dan mikrokontroler AT89S51. 

KOMPONEN MASUKAN & LUARAN

1. Sensor Ultrasonik HC-SR04 (Komponen Masukan)
2. Buzzer
3. Power Bank 5 volt 2 Ampere
4. IC AT89951

PRESENTASI https://docs.google.com/presentation/d/1uMjcWq-3SOOswks--LBsrpYye7byi_Y0/edit?usp=drivesdk&ouid=115395447931661580117&rtpof=true&sd=true











                                           




PERAKITAN PROGRAM

ORG 00H    ; memulai
CLR P2.0 ; Menginisiasi pengiriman trigger
SETB P2.1 ; menerima echo
MOV TMOD, #00100000B ; mengatur waktu 1 sebagai mode 2 dan timer akan mengulang dengan sendirinya
MAIN:MOV TL1,#197 ; Memuat nilai awal untuk mulai menghitung
MOV TH1.#197 ; memuat nilai unntuk mengulang
MOV A,#00000000B ; membersihkan akumulator sebelum digunakan harus 0
SETB P2.0 ; memulai pulsa trigger
ACALL DELAY1 ; memberi 10uS lebar untuk pulsa trigger
CLR P2.0 ; mengakhiri pulsa trigger
HERE:JNB P2.1HERE ; mengulang sampai echo menerima
BACK:SETB TRI ; memulai untuk mengatur waktu 1
HERE1:JNB TF1.HERE1 ; mengulang disini sampai timer menghitung melebihi 58
CLR TRI ; menghentikan pengatur waktu
CLR TF1 ; menghapus tanda pengatur waktu 1
INC A ; menambah A untuk setiap timer 1 yang berlebihan
JB P2.1.BACK ; melompat ke belakang jika echo masih tersedia
MENUNDA1 : MOV R1,#2      :10uS
menunda
LABEL1 : DJNZ R1,LABEL1
   RET
MENUNDA2 : MOV R2,A
LABEL2 : ACALL DELAY
         ACALL DELAY
         ACALL DELAY
         ACALL DELAY
      ACALL DELAY
     ACALL DELAY
     ACALL DELAY
   DJNZ R2,LABEL2
   RET
MENUNDA : MOV R3,#250
          MOV R4,#250
MENGULANG1 : DJNZ R3,LOOP1
MENGULANG2 : DJNZ R4,LOOP2
   RET

MENUNDA3 : MOV R5,#300
LABEL3 : ACALL DELAYC
     ACALL DELAYC
     ACALL DELAYC
     ACALL DELAYC
    DJNZ R5,LABEL3
    RET
MENUNDAC : MOV R6,#250
       MOV R7,#250
MENGULANG3: DJNZ R6,LOOP3
MENGULANG4: DJNZ R7,LOOP4
    RET

VIDEO  

https://youtu.be/Yq8vCcyzglo


Komentar

Posting Komentar