Ana içeriğe git

Konu: Pıc basic komut (153 Kez okunmuş)

Pıc basic komut
Üstadların herkese iyi geceler.yine yardımınıza ihtiyacım var.önceki konularda yardımcı olduğunuz için hepinize ayrı ayrı tesekkur ederim.konumuza gelelim.16 f 628 a ile led animasyon devresi yaptım.istediğim gibide oldu.port b nin 5 bacağını çıkış olarak kullandım.5 adet led bağladım ancak 5 ledi ayni anda yakip söndürmeyi beceremedim.bu konuda yardımcı olursanız sevinirim.sadece komutlari paylaşma şansınız varmı.birde pike şifre koymak istiyorum bu konudada yardımcı olursanız sevinirim.herkese teşekkürler.

  • Furkan41
  • [*][*][*][*]
Ynt: Pıc basic komut
Yanıt #1
Pice şifre koyamazsın ama okunmaya karşı koruyabilirsin sigorta ayarlarını yaparken _CP_ON yazman yeterli olacaktır konuya gelirsek,  pek detaylı anlatmamışsın şöyleki 5 ledi bir transistör eşliğinde sürülüyor ve transistör portb nin 5.bitinden tetikleniyor ise ki böyle düşündüm bir program yazayım


 
Kod: [Seç]
TRISB=0
TRISA=%11111111
PORTB=0
PORTA=0
CMCON = 7
PAUSE  50

BASLA:
PORTB.5 = 1
PAUSE 500
PORTB.5 = 0
PAUSE 500
PORTB.5 = 1
PAUSE 100
PORTB.5 = 0
PAUSE 100
PORTB.5 = 1
PAUSE 100
PORTB.5 = 0
GOTO BASLA
END

  • Furkan41
  • [*][*][*][*]
Ynt: Pıc basic komut
Yanıt #2
anlamı olsun diyede satırdaki kodların görevlerini yazayım dedim.
 
Kod: [Seç]
TRISB=0 // PORTB 'NİN TÜM BİTLERİNİ CIKIŞ OLARAK AYARLADIM.
TRISA=%11111111  // PORTA 'NIN TÜM BİTLERİNİ GİRİŞ OLARAK AYARLADIM.
PORTB=0  //PORTB' NİN TÜM BİTLERİNİ RESETLEDİM PORTBNİN İCİNİ TEMİZLEDİM
PORTA=0 //PORTA'NIN TÜM BİTLERİNİ RESETLEDİM PORTA NIN İCİNİ TEMİZLEDİM
CMCON = 7 // 16F268A nın komparatörleri kapatıldı
PAUSE  50 // 50 ms bekle

BASLA:  // ANA PROGRAM BAŞLANGICI
PORTB.5 = 1 // B PORTUNUN 5.BİTİNİ LOJİK 1 YAP
PAUSE 500  // 500 MİLİ SANİYE BEKLE
PORTB.5 = 0  // B PORTUNUN 5. BİTİNİ LOJİK 0 YAP
PAUSE 500  // 500 MİLİ SANİYE BEKLE
PORTB.5 = 1
PAUSE 100
PORTB.5 = 0
PAUSE 100
PORTB.5 = 1
PAUSE 100
PORTB.5 = 0
GOTO BASLA // BASLA ETİKETİNE GİT.
END // PROGRAM SONU.

Ynt: Pıc basic komut
Yanıt #3
Kardeşim saol yine  döktürmüşsun.allah razi olsun.Ben konuyu tam anlatamadım herhalde.şimdi b portumuzun 5 pinini kullanacam örnek.port b 1 port b 2 diye gidecek. her pine bir adet led  baglayacam.bu beş pine bağlı ledler aynı anda yanıp sönecek.

  • Furkan41
  • [*][*][*][*]
Ynt: Pıc basic komut
Yanıt #4
BASLA ETİKETİ İLE GOTO BASLA KOMUTU ARASINDAKİ KOD SATIRLARINI SİLİP BUNU YAPIŞTIRISAN İSTEDİĞİN ŞEKİLDE CALIŞACAKTIR DEVREN
Kod: [Seç]
PORTB.0 = 1
PORTB.1 = 1
PORTB.2 = 1
PORTB.3 = 1
PORTB.4 = 1
PAUSE 500
PORTB.0 = 0
PORTB.1 = 0
PORTB.2 = 0
PORTB.3 = 0
PORTB.4 = 0

Ynt: Pıc basic komut
Yanıt #5
Tesekkur ederim kardesim saol.enkısa surede deneyecem.cok saol

  • Furkan41
  • [*][*][*][*]
Ynt: Pıc basic komut
Yanıt #6
Deneyip soncucu yazarsan sevinirim , Ayrıca ledlerin yanıp sönme süreleri 500 mili saniye cok hızlı gelirse veya yavaş kendin o komut satırında "PAUSE" nin karşısındaki değeri değiştirerek istediğin gibi ayarlayabilirsin ayrıca sigorta ayarlarını yapmadan kodun hex dosyasını pice yüklersen calışmayacaktır işletim sistemini bilmiyorum 32 bit ve 64 bite göre sigorta ayarları değişiyor eğer sigorta ayarlarını yaptıysan sıkıntı yok fakat yapmadıysan işletim sisteminin kac bit olduğunu söylersen gerekli sigorta ayarlarını buraya yazarım nettede bulabilirsin bulamazsan ben burdan yazarım

  • veli dayı
  • [*][*][*]
Ynt: Pıc basic komut
Yanıt #7
portb=%00011111
pause 500
portb=%00000000
pause 500

dersek furkanın yazdığı kodları kısaltmış oluruz.

Ynt: Pıc basic komut
Yanıt #8
Furkan kardeşime de veli dayiyada yardımcı olan herkese tesekkur ederim saolun.10 numara oldu
  • Son Düzenleme: 16 Haziran 2017, 00:49:52 - eylül tuana

  • Furkan41
  • [*][*][*][*]
Ynt: Pıc basic komut
Yanıt #9
portb=%00011111
pause 500
portb=%00000000
pause 500

dersek furkanın yazdığı kodları kısaltmış oluruz.
evet hocam doğru söylüyorsunuz fakat ben arkadaşın daha iyi kavrayabilmesi icin tek tek portları aktif ettim eğer arkadaş hexadesimal sayı sistemini bilmiyor ise o komut satırlarından birşey anlayamaz her neyse teşşekür ediyorum veli dayıya :D güzel yerden yakalıyor Eylül tuna nedemek biz teşşekkür ederiz.