jal dili ile havaya yazı yazalım

Başlatan aykut54, 18 Mayıs 2007, 18:23:19

aykut54

jal dili ile havada yazı yazan devre


http://rapidshare.com/files/32011303/Yaz__305_.rar.html
arkadaşlar picbasic ile elinde havada yazı yazan devre varsa paylaşırmı :(

ALLAH'a emanet olun

Analyzer

Selam,

Jal hiç bilmeyen biri olarak kodları açıp baktığımda çok basit bir yapı gördüm. Yapan arkadaş tüm harfleri tek tek kodlamış.  Mesela A harfi için :

procedure letter_a is  
port_b = 0b_01111111
delay_100us ( n )
port_b = 0b_10010000
delay_100us ( n )
port_b = 0b_10010000
delay_100us ( n )
port_b = 0b_01111111
delay_100us ( n )
port_b = 0b_00000000
delay_100us ( n )
end procedure

yazmış. Pseudo olarak yazılırsa : (Picbasic bilmiyorum maalesef)
Port b'ye sırasıyla ikili sistemde 01111111,10010000,10010000,01111111,00000000 yazdırmış. Her porta yazım öncesinde n (Global değişken olarak tanımlamış en üstte) milisaniye bekletmiş. Varsayılan olarak da 20 belirlemiş. (Eğer hızlı sallarsanız sayıyı düşürmeli, yavaş sallarsanız sayıyı yükseltmelisiniz)

Tüm harfleri prosedür olarak tanımlamış. (Halbuki ne gerek var bir tane prosedür tanımla, değerleri diziye at, oradan işlet be adam :D) Ana programda da, port a1'deki butona basınca bir döngüye girmesini sağlamış. Yazıyı harf harf yazdırmış. Ardından uitroepteken, vraagteken isimli iki prosedür işletmiş. Babelden baktığım kadarıyla uitroepteken = ünlem işareti, vraagteken = soru işareti. (Zaten Jal is Cool!?) dan da anlaşılabilir.
5 milisn daha bekleyip döngüyü tekrarlamış.

Aslında çok basit bir yapıya sahip. Kolayca tekrar yazılabilir. Yazarsan buraya bekliyoruz. Kesip doğraması benden, pişirmesi senden ;)

Analyzer
Üşeniyorum, öyleyse yarın!

arsima

arkadaşım bende jal kullanıyorum ama jal da leter gibi komutlara hiç rastlamadım birde bişe sorucam asm basic de oldugu gibi jal da da programı belirli bir başlıga gönlendirebiliyormuyuzz öle bi komut var mı acaba asm deki goto komutu gibi mesela