12F675 basit led sorusu

Başlatan erkan614, 28 Nisan 2020, 14:35:21

erkan614

İyi günler
kodda neyi yanlış yaptımda girişi bir türlü algılayamıyorum?
isisde led sürekli yanık
'****************************************************************
DEFINE OSC 4
define OSCCAL_1K 1
GPIO=0
TRISIO=%00000110
INTCON=0
OPTION_REG=0
'****************************************************************
#CONFIG
      __config _INTRC_OSC_NOCLKOUT & _WDT_ON & _MCLRE_OFF  & _CP_ON
#ENDCONFIG

TUS VAR GPIO.1
LED VAR GPIO.0

BASLA:
	IF TUS=0 THEN
	       IF LED=1 THEN
                        LOW LED
	                   pause 1 
	       ELSE
                          HIGH LED
                       pause 1 
                      ENDIF
                ENDIF
	GOTO BASLA
END

erkan614

CMCON=7
ADCON0=%10000000
ANSEL = 0

registerleri yüzündenmiş
çözdüm

power20

Ark söndürme  için 1ms yetiyor mu

mg1980

#3
PAUSE 1000 yapıp dener misiniz ?
Not: Çözdüğünüzü geç farkettim .

erkan614