Arkadaşlar 16F628 adaptörden direkt olarak açınca çalışmıyor,+ ucunu ayırıp birleştirince bir çalışıyor bir çalışmıyor,besleme ile ilgili tüm filtre işlemlerim tamam, mclr+ bağlı fakat bu problemi bir türlü gideremedim..Programdamı bir eksiklik var...Şimdiden teşekkürler..
@ DEVICE pic16F628 'işlemci 16F628
@ DEVICE pic16F628, WDT_ON 'Watch Dog timer açık
@ DEVICE pic16F628, PWRT_ON 'Power on timer açık
@ DEVICE pic16F628, PROTECT_OFF 'Kod Protek kapalı
@ DEVICE pic16F628, MCLR_OFF 'MCLR pini kullanılıyor.
@ DEVICE pic16F628, INTRC_OSC_NOCLKOUT 'Dahili osilatör kullanılacak
CMCON=7
OPTION_REG=%0000100
porta=0
trisa=%00000100
portb=0
trisb=%00000000
include "modedefs.bas"
out var porta.1
rx var porta.2
tx var porta.3
KAPICI var byte
A var byte
BINA var byte
C var byte
DAIRE var byte
E var byte
out=0
dongu:
serin rx,N1200,KAPICI,A,BINA,C,DAIRE,E
if KAPICI=$26 then
pause 500
out=1
serout tx,N1200,[$01,$55,$FE,$55,$FE,$F2]
pause 500
serout tx,N1200,[$01,$55,$FE,$CF,$FE,$F2]
pause 500
serout tx,N1200,[$01,$55,$FE,$9F,$FE,$F2]
pause 500
serout tx,N1200,[$01,A,BINA,C,DAIRE,E]
out=0
endif
goto dongu
end
Program hemen çalışmaya başladığı için kilitlenme yapıyor,dongu etiketinden önce 3sn gecikme verdim sorun çözüldü..Ayrıca cevaplar için teşekkürler..