Picbasic ders2

Katılım
10 Ocak 2008
Mesajlar
7
Puanları
1
Yaş
39
PIC BASICPRO DERS2
Arkadaşlar giriş çıkış atamalarını yaptıktan sonra artık uygulamalı bir program yazalım.
Ama pıc programa nereden başlayıp nerde biteceğine göstermemiz gerekir.
Yani biz ne dersek onu yapacak.
TRISA=255 ‘DESİMAL OLARAK GİRİŞ ATAMASI YAPTIK
TRISB=%00000000 ‘HEXSADESİMAL ÇIKIŞ ATAMASI YAPTIK.
PORTB=0 ‘portb uçlarını temizle Eğer bunu yapmazsanız istemediğiniz uçlarda da
Çıkış görebilirsiniz. Önemli
BASLA: ‘ŞİMDİ bir döngü oluşturuyor. Yani PIC’e diyoruz ki komutları işlemeye buradan başla
PORTB.0=1’ 0.biti yak
PORTB.1=0
PAUSE 100 ‘saniyenin 10/1 kadar bekle
PORTB.0=0’ 0.biti söndür
PORTB.1=1
PAUSE 100
GOTO BASLA ‘DÖNGÜYÜ SONSUZ YAP YANİ BASLA İLE GOTO ARASINDA DÖNGÜYÜ SONLANDIRMA
END ‘bu komuttan sonra nokta koymayın

Pause komut bizim programa gecikme koymamızı sağlar.
1000 1 sn eşittir.
7sn kadar gecikmeyi pause komutu ile konulabilir.
Programdaki pauseler silinirse ledler direk olarak yandığını görebilirsiniz.

Bu programda ise sayıları desimal olarak girdim.
İki programı karşılaştırınız. Devreler çalışıyor.
TRISA=255 'DESİMAL OLARAK GİRİŞ ATAMASI YAPTIK
TRISB=%00000000 'HEXSADESİMAL ÇIKIŞ ATAMASI YAPTIK.
PORTB=0 'portb uçlarını temizle Eğer bunu yapmazsanız istemediğiniz uçlarda da
'Çıkış görebilirsiniz. Önemli
BASLA: 'ŞİMDİ bir döngü oluşturuyor. Yani PIC'e diyoruz ki komutları işlemeye buradan başla
PORTB=1
PAUSE 100
PORTB=2
PAUSE 100
PORTB=4
PAUSE 100
PORTB=8
PAUSE 100
GOTO BASLA 'DÖNGÜYÜ SONSUZ YAP YANİ BASLA İLE GOTO ARASINDA DÖNGÜYÜ SONLANDIRMA
END
Dersleri elimde geldiği kadar kolay alıyorum
Sayı sistemleri önemli dijital elektronik kitabında veya matematik kitaplarının taban aritmetiği konusundan yararlanabilirsiniz.
Gelecek ders buton kontrollerini anlatmayı düşünüyorum
Kolay gelsin
Hiç bir şey zor biz küçük parçalara bölmeyi bilelim.
 

Ekli dosyalar

  • PIC-BASICPRO-DERS2.rar
    3.2 KB · Görüntüleme: 1

Forum istatistikleri

Konular
128,104
Mesajlar
915,001
Kullanıcılar
449,804
Son üye
Ali001992

Yeni konular

Geri
Üst