pıc 16f84 ile ilgili ödev sorusu

thsn

Üye
Katılım
29 Eyl 2006
Mesajlar
115
Puanları
1
Yaş
39
arkadaşlar elimde PIC 16F84 ilgili iki tane ödev var yardimci olursaniz çok sevinirim,acil olarak lazım

1)PORTA2 veya PORTA3'e bağlı butonlardan herhangi birine basılınca PORTB4'e bağlı led i yakan programı yazınız

2)PORTA2'ye bağlı butona basıldığında PORTB deki bütün yükleri lojik sıfır yapan,butondan elimizi çektiğimizde tüm yükleri lojik 1 yapan programı tasarlayınız.yükler PORTB'ye bağlanmıştır.

assembly ile programlanacak
 
Arkadaşım, 16f84'ü çok iyi hatırlayamıyorum fakat algoritmasını söylediğimde belki kendin yazabilirsin.
1-) ilk önce port a yı giriş port b yi çıkış olarak kuracaksın. daha sonra btfsc ya da btfss komutlarından hangisiydi tam olarak hatırlayamıyorum port a 'nın 2. ve 3. bitlerini kontrol ettireceksin ona göre port b nin 4. bitini yakacaksın. komutları çok iyi hatırlayamıyorum fakat senin elindeki kodlarda olması lazım.

2-) Yine port a2 giriş port b çıkış olarak kurulacak. daha sonra port a 2 yi kontrol ettirip ona göre port b ye FF yada 00 yollayacaksın.
 
TrisA=255
Trisb=0
PORTB=0
BASLA:
IF porta.2=1 or porta.3=1 THEN GOTO T1
goto basla
T1:
HIGH portb.4
goto basla
end
 
TrisA=255
Trisb=0
PORTB=0
BASLA:
IF porta.2=1 THEN goto T1
portb=%00000000
end if
GOTO basla
T1
portb=%11111111
goto basla
end
 
kodlar picbasic kodları picbasic te derleyebilirsiniz butonlar başlangış durumu "0" butona basıldıgında "1" olarak ayarlanmıştır.
 
ödev1 in cevabı:
TRISA=%11111111
TRISB=%00000000

BUT1 VAR PORTA.2
BUT2 VAR PORTA.3
LED VAR PORTB.4

LED=0

BASLA:
IF BUT1=0 OR BUT2=0 THEN
LED=1
ELSE
LED=0
ENDIF
GOTO BASLA
END

ÖDEV2'nin cevabı:
TRISA=%11111111
TRISB=%00000000

BUT1 VAR PORTA.2

PORTB=1

BASLA:
IF BUT1=0 THEN
PORTB.0=0
PORTB.1=0
PORTB.2=0
PORTB.3=0
PORTB.4=0
PORTB.5=0
PORTB.6=0
PORTB.7=0
ELSE
PORTB.0=1
PORTB.1=1
PORTB.2=1
PORTB.3=1
PORTB.4=1
PORTB.5=1
PORTB.6=1
PORTB.7=1
ENDIF
GOTO BASLA
END
 

Forum istatistikleri

Konular
127,957
Mesajlar
913,907
Kullanıcılar
449,606
Son üye
rasit.

Yeni konular

Geri
Üst