hadeszonta
Üye
- Katılım
- 20 Nis 2009
- Mesajlar
- 24
- Puanları
- 1
- Yaş
- 38
İyi Çalışmalar.
Ben Pic işine yeni adım atmayı düşünüyorum.
bir tane programlayıcı aldım bir tanede 16f877a.
Proteus da çalıştırdığım bir devreyi gerçekte çalıştıramıyorum.
butona basıldığında yanan led.
ancak picin hangi ayağına bağlarsam bağlıyım sürekli yanıyor.ben saniye aralıklarıyla yansın istiyorum ve proteusta istediğim gibi saniye aralıklarıyla yanıyor.ancak gerçek devrede sürekli yanıyor.sorun nerde olabilir?
Device=16F877A
TRISA=%00000001
TRISB=%00000000
Dim BUTON As PORTA.0
Dim LEDLER As PORTB
DEFINE OSC 1
PORTB_PULLUPS = 1
ADCON1=7
ANAPROG:
If BUTON=1 Then
LEDLER=%11111111
DelayMs 1000
LEDLER=%00000000
DelayMs 1000
Else
LEDLER=%00000000
EndIf
GoTo ANAPROG
End
Ben Pic işine yeni adım atmayı düşünüyorum.
bir tane programlayıcı aldım bir tanede 16f877a.
Proteus da çalıştırdığım bir devreyi gerçekte çalıştıramıyorum.
butona basıldığında yanan led.
ancak picin hangi ayağına bağlarsam bağlıyım sürekli yanıyor.ben saniye aralıklarıyla yansın istiyorum ve proteusta istediğim gibi saniye aralıklarıyla yanıyor.ancak gerçek devrede sürekli yanıyor.sorun nerde olabilir?
Device=16F877A
TRISA=%00000001
TRISB=%00000000
Dim BUTON As PORTA.0
Dim LEDLER As PORTB
DEFINE OSC 1
PORTB_PULLUPS = 1
ADCON1=7
ANAPROG:
If BUTON=1 Then
LEDLER=%11111111
DelayMs 1000
LEDLER=%00000000
DelayMs 1000
Else
LEDLER=%00000000
EndIf
GoTo ANAPROG
End