Bu sayfadaki yazılar
Sayfanın metni
Sayfa 13
Tolga Kale
Az kullanılan komutların bazılarını kurcalayalım.
Birileri, şimdiye kadar hazırlanan bütün yazılımların yüzde 90'ının, hazırlandığı dilin sadece yüzde 10'undan yararlanılarak hazırlandığını iddia ediyor. Eminim ki bu rakam abartılmış, ancak doğruluk payı da var. Her dilin kendine özgü ve temelini oluşturan birkaç komutu vardır ve bunlar da program için önemlidirler. Mesela BASIC'te en çok kullanılan komutlar LET,
IF-THEN ve herhalde GOTO'dur. Bunlardan başka her dilin “az bilinen” komutları da vardır ve bu komutlar bir süre sonra unutulup giderler. Bu ay sizlere bu komutları yeniden hatırlatmaya çalışacağım. Eğer yakın zamanlarda Programcının El Kitabı'nı karıştırmadıysanız herhalde bu komutlar size yabancı gelecektir. Belki bu komutlar günlük programlama için gerekli değiller ancak dara düştüğünüzde size yardımcı olacaklardır. Eminim ki pek çoğunuz biz bu komutları zaten biliyoruz diyeceksiniz. Harika! Ne kadar çok komut bilirseniz o kadar iyi programlar yapabilirsiniz. Bu yazının da amacı sizin RAM'ınızı genişletmek. Eğer bu dili yeni öğreniyorsanız bu komutları bir yerlerde saklayın, ilerde ihtiyacınız olabilir.
Seyrek Ama Önemli
Komutlar listesine bakarken pek çok BASIC 2.0 (C-64) komutunun BASIC 7.0'da (C-128) olduğunu fark ettim. Bu gerçekten ilginç çünkü BASIC 2.0 gerçekten de “dokunsan yıkılacak” bir versiyon.
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 12
A Y Sonuç 00 00 0 00 01 1 00 FF +255 01 00 +256 7F FE +32767 80 00 +32768 FF FF +65535
5. İşaretli üç bayt sayı - $BC4F: Her ne kadar bu kadar yüksek değerli sayılar pek kullanılmasa da ROM'da bulunan tüm tam sayı-kesirli sayı çevrimlerini ele almak için bu rutine de değineceğim: LDA #Düşük LDX #Orta LDY #Yüksek STY $62 STX $63 STA $64
Böylece aşağıdaki çevrim tablosunu elde ederiz:
S6) SES v0 00 00 v0 00 00 FE
SAT 109) 09)
6. İşaretsiz dört bayt sayı - $BC4F: Son olarak da işaretsiz dört baytlık sayıları inceleyeceğiz. Bu çevrimi yapmak için de aynı rutini kullanıyoruz ve baytları $62-$65 arasına yerleştiriyoruz. Tek fark olarak bu sefer hep Carry (elde) = 1 yani pozitif sayılar gönderiyoruz:
SEC LDA «800 LDX JSR $BC4F
Bu sayede 0 ile 2^32-1 = 4,294,967,295 arasındaki tüm tam sayılarla işlem yapılabilir: Dikkat ettiyseniz maksimum kesinlikten fazla bir kesinlik istediğimiz için 0 ile $80000000 arasında bir fark göremiyoruz. “Yukarıdaki rutinleri ezberlemeniz gerek?” diye bir şey söylemiyorum. Neler yapılabildiğini bilin ve ihtiyacınız olursa burada olduğu gibi kullanın. Özellikle son ikisine ihtiyacınız olacağını hiç sanmıyorum. Ama dört rutini sıkça kullanabilirsiniz. Kullanacağınız registerleri karıştırmamaya kesin özen gösterin. Çünkü rutinlerde bir standart yok. Kimi zaman A yüksek değerlikli baytı almış, kimi zaman Y. Bu tür hataları farketmek de çok çok zor olduğu için rutinleri kullanırken registerlere hangi değerleri verdiğinize mutlaka özen gösterin. Bu sayıda yine pek yer bırakmadım. Ama isterseniz bir de kesirli sayılardan tam sayılara geçişe göz atalım ve “Bu aylık da bu kadar?” diyelim: 0 00 00 FF 00 7F 7F FF +2,147,483,647 (2.1474836E+09) 80 00 00 00 -2,147,483,648 (-2.1474836E+09)
Kesirli Sayılardan Tam Sayılara Geçiş Bu ters çevrim diğerine göre oldukça kolay, çünkü tek bir rutini öğrenmeniz gerekli. Sonuç işaretli bir dört bayt sayıdır ve $62-$65'te tutulur. Eğer çevrilecek sayı FAC'daysa (yani şu komutla tam sayıya çevrim yapılır: JSR $BC9B
00
Sadece 2^31'den küçük sayılar hatasız çevrilebilir, bu yüzden üssün değerinin $A0'dan küçük olup olmadığını kontrol etmeyi sakın unutmayın. Çevrimin sonucu $62 (MSB, işaret bitini de içerir) ile $65 arasında yer alır. İsterseniz bir iki örnek üzerinde uğraşalım:
FAC'da $0A (-10) bulunsun:
Üs M1 M2 M3 M4 İşaret 84 A0 00 00 00 00 JSR sonrasında şunu elde ederiz: $0061 84 00 00 00 CA 00
Eğer FAC'da tüm sayı tutulmuyorsa, kesirli kısım INT fonksiyonunda olduğu gibi atılacaktır. 321.25'te bu işlemi bir deneyelim isterseniz:
Üs M1 M2 M3 M4 İşaret 89 A0 A0 00 00 00
Sonuçta şunu görürüz: $0062 89 00 00 01 41 00
Daha açıkçası $41 4 $0100 = 321. Eğer eksi kesirli sayılar kullanırsanız bir küçük tam sayıya yuvarlanır: INT (-0.5) = -1:
Üs M1 M2 M3 M4 İşaret $0061 80 80 00 00 00 FE
Sonuç olarak:
$0061 89 FF FF FF FF FE yani -1 elde ederiz. Daha ilerde yorumcusunun sınır değeri kontrol eden rutinleriyle de tanışacağız (0..255 ya da -32768..32767 gibi). Şimdilik temel çevrim rutinlerinin tamamından biraz bahsettik. Bu ay bir de kısa programımız var. Dergimizin sürekli takipçileri, Atölye yazısında bahsettiğimiz ondalıkçı adlı rutini hatırlarlar. İki baytlık bir sayıyı (işaretsiz tabii ki) ASCII kodlarına çevirebiliyordu bu rutin. Ama oldukça da uğraştırıcıydı. Şimdi size ROM kullansaydık ne kadar rahat edeceğimizi göstereceğim:
Gördünüz mü ne kadar kolay oldu? Sadece sayıyı kesirli formata çevirdik, $BDDD'ye sıçradık ve sonucu ekrana yazdık. Bu işi daha kolay halledebilecek olan varsa beri gelsin... Bu aylık da bu kadar, gelecek ayın yazısında rutinlerinin arasına iyice dalacağız. Şimdilik hoşçakalın.