16F84 buton

Aşağı Git Tüm Forumlar Donanım / Hardware Elektronik ve Mekanik Elektronik 16F84 buton

Bu konudaki kullanıcılar: 1 misafir, 1 mobil kullanıcı

0
Cevap 787
Tıklama 0
Öne Çıkarma

1. sayfa

16F84 buton

Cevap Yaz

hakan1453

19 yıl (638 mesaj)

Yüzbaşı

Konu Sahibi

merhaba arkadaşlar

benim sorun şu port A da bulunan 4 buton var.bu butonlara hangisine bastığımda o buton (RA0 ,..,RA4) ait komutlar çağrılarak portB'deki ledler (8 led) yanacak.böyle bir devre yapmaya çalışıyorum..kodlarıda aşağıda verdim.bu kodlar kara şimşek devresi..devreye enerji verildiğinde ledler direk yanıyor. yani hiçbir butona basmıyorum...

LIST P=16F84
INCLUDE "P16F84A.INC"
__CONFIG _CP_OFF &_WDT_OFF &_XT_OSC &_PWRTE_ON
ORG 0X00
SAYAC1 EQU H'0C'
SAYAC2 EQU H'0D'
SAYAC3 EQU H'0E'
CLRF PORTA
MOVLW h'00001111'
MOVWF TRISA
BSF STATUS,RP0
CLRF TRISB
BCF STATUS,5
CLRF PORTB
BAS BTFSS PORTA,0
GOTO BAS
MOVLW B'00000001'
MOVWF PORTB
CALL GECIKME
MOVLW B'00000010'
MOVWF PORTB
CALL GECIKME
MOVLW B'00000100'
MOVWF PORTB
CALL GECIKME
MOVLW B'00001000'
MOVWF PORTB
CALL GECIKME
MOVLW B'00010000'
MOVWF PORTB
CALL GECIKME
MOVLW B'00100000'
MOVWF PORTB
CALL GECIKME
MOVLW B'01000000'
MOVWF PORTB
CALL GECIKME
MOVLW B'10000000'
MOVWF PORTB
CALL GECIKME
MOVLW B'01000000'
MOVWF PORTB
CALL GECIKME
MOVLW B'00100000'
MOVWF PORTB
CALL GECIKME
MOVLW B'00010000'
MOVWF PORTB
CALL GECIKME
MOVLW B'00001000'
MOVWF PORTB
CALL GECIKME
MOVLW B'00000100'
MOVWF PORTB
CALL GECIKME
MOVLW B'00000010'
MOVWF PORTB
CALL GECIKME
GOTO BAS
GECIKME
MOVLW D'1'
MOVWF SAYAC1
DON1
MOVLW D'100'
MOVWF SAYAC2
DON2
MOVLW D'150'
MOVWF SAYAC3
DON3

DECFSZ SAYAC3,F
GOTO DON3
DECFSZ SAYAC2,F
GOTO DON2
DECFSZ SAYAC1,F
GOTO DON1
RETURN
END

Cevap Yaz

1. sayfa

Tüm Forumlar Donanım / Hardware Elektronik ve Mekanik Elektronik 16F84 buton