Bu sayfadaki yazılar
Sayfanın metni
Sayfa 21
İşte sizlere Commodore 64'ün ses yeteneklerinin tümünü birarada kullanan bir müzik programı. Tamamen makine dili ile yazılmış ve interrupt tekniği kullanılmıştır. Yani müzik çalarken program yazabilir veya kendi programlarınızı çalıştırabilirsiniz. Müziği başlatmak için yükledikten sonra SYS 8192 yazmanız yeterlidir.
Eğer bu profesyonel müzik programını kendi programlarınızın bir parçası haline getirmek istiyorsanız şu işlemleri yapınız. Ancak önce aşağıdaki satırı yazın. Return'e bastığınızda 6144 sayısından küçük bir sayı çıkıyorsa aşağıdaki işlemleri uygulayabilirsiniz. Aksi taktirde sayı 6144'ten büyük veya eşit çıkıyorsa programınız uzunluğundan dolayı müzik programının makine dili rutinlerini bozuyor demektir. Ya programınızı kısaltma yoluna gidin ya da vazgeçin.
— Kendi programınızın son halini yükleyin
— Müzik programını yükleyin
— Save edin.
Artık programınız ve müzik programı birleşmiştir. Ancak bu işlemlerden sonra programınız üzerinde hiçbir değişiklik yapılamaz. programınızda en ufak bir değişiklik olursa bilgisayar kilitlenecektir.
Program interrupt yapısı nedeniyle Simon's basic programı ile birlikte çalışmamaktadır. Bu nedenle Simon's basic'te yazdığınız programlar için yukarıdaki işlemleri uygulamayınız. İyi çalışmalar...
PRINT 256 * PEEK(46)+ PEEK(45)
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 20
PRİNT > LERİGHTİ<CTRL-2 POKE GEPOKE 555360L.6 IF Pi-Bİ THEN GÖTÜ 3028 1F P2sBl THEN 3168 GOTO 1208 PRİNT "HOME DOLU 1.. G“1 TO G PRİNT 1GOTO REM PRİNT CHRSC142) İNPUT *<HOME >< -2 )SUTUN cs IF THEN 2818 İNPUT *<HOME >< IF LENCAS)aA2 THEN 2058 1F THEN Pi-Pista IF THEN PRİNT “(HOME PRİNT POKE 55536*Y.7IFOR Gel TO IF PisBİ THEN 3200 IF THEN 3300 GOTO 2008 REM HANGİ OYUNCU KAZANDI PRİNT *<CURDOYUNU SEN KAZANDIN" GOSUB 35081GOTO 98 REM C-64 KAZANDI PRİNT C-64 KAZANDI" GOSUB 35081GOTO 88 REM PRİNT 1.OYUNCU KAZANDI"
GOSUB 350816G0TG <9 REM PRİNT 2.0YUNCU KAZANDI" 35001GOTO 38 FOR ZASI TO 12001NEXT ZALRETURM REM PRİNT PRİNT *C3DOMN>" FOR KASI TO 16 PRİNT >" HA PRİNT CHRSCİ 4)1POKE 53281.11POKE 53260.7 PRİNT 5S PRİNT PRİNT (SSPACE YBU OYUN DA BILGISAYAR RANDOM OLARAK" PRİNT SUTUN SECER VE Sİ ZDEN YİNE RASTGELE" PRİNT *<RVSONDBİR SATIR GİRMENİZİ B * PRİNT İLE SATIRIN KESİS TIGI YERDE Kİ *
PRİNT *<RVSONDSİZİN HANENİZE 1 PUAN EKLENİR. C9SPACE PRİNT *(RVSON><ESPACE YOYUNU BILGİSA
YARA KARSI OYNAYABI-* PRİNT *<RVSONDLECEGİNİZ GİBİ BİR AR KADASINIZ İLE BİR * PRİNT *<RVSONDLİKTEDE OYNAYABILIRSI NIZ. CL4SPACE >" PRİNT *<RVSON)C3SSPACE PRİNT )* PRİNT BIR TUSA GET THEN 4175 GOTO 108