ahmet5454
Üye
- Katılım
- 15 Mar 2009
- Mesajlar
- 62
- Puanları
- 1
- Yaş
- 44
Selam arkadaslar pic programlamada cok yeniyim.Microcode studio ile yazmis oldugum yildiz ucgen devresi kodlarini paylasiyorum.Acaba dogru yapmismiyim elimde deneme kartim var.Kartta calisiyor fakat sizlerinde fikrini almak istiyorum yardimci olacak arkadaslara simdiden tesekkur ederim
TRISA=%00000011
TRISB=%00000000
PORTA=0
PORTB=0
IF PORTA.0 = 1 THEN
PORTB.O = 1
PORTB.1 = 1
PAUSE 2000
PORTB.1 = 0
PORTB.2 = 1
ENDIF
IF PORTA.1 = 1 THEN
PORTB.0 = 0
PORTB.1 = 0
PORTB.2 = 0
ENDIF
END
TRISA=%00000011
TRISB=%00000000
PORTA=0
PORTB=0
IF PORTA.0 = 1 THEN
PORTB.O = 1
PORTB.1 = 1
PAUSE 2000
PORTB.1 = 0
PORTB.2 = 1
ENDIF
IF PORTA.1 = 1 THEN
PORTB.0 = 0
PORTB.1 = 0
PORTB.2 = 0
ENDIF
END