1 Ocak 1991 Tarihli Commodore Gazetesi Sayfa 12

1 Ocak 1991 tarihli Commodore Gazetesi Sayfa 12
Metin içeriği (otomatik olarak oluşturulmuştur)

SEKTÖR AYARI-$0023 Commodore 64 ile 1571 disk sürücü kullananlar,ı 1571'in kayıt sırasında kullandığı sektör aralığı sebebiy- le kaydettikleri program ya da dosyaları yüklerken, 1541 kullanıcılarına göre, daha yavaş yüklerler. Bunun çözü- mü nedir? Çok mu zordur? Çözümünü size Abur Cubur sunuyor. Hem de yazımı çok basit, kullanımı da kolay bir programla. Sektör Ayarı'nı yazıp SA VE ettikten sonra programı çalıştırın, normalde 1541 disk sürücülerinde on olan sektör aralığı programdaki son CHRS$'nin paran- tezleri arasında belirtilmiştir. Bunu isteğinize göre değiş- tirebilirsiniz. Bilgisayarınızı açtığınızda bu programı yük- leyip çalıştırmak yeterlidir, fakat resetler ya da kapatıp açarsanız işlemi tekrarlamanız gerekir. FRUGKkAlN AD ( db/l1 SEkRTUR AY be/ 1b/Lokklük YARI-ABUR CUBUR. s2U9> VUULU kkll VU o,1b1RRINTWE1S,"M- u'"HRiııu 20 ÜUFEH 15; CHR#CO)CHKS L LICHRS LO YULU ıb «icz> ULVUJU th SUH 11 SEKTUKR ARALluINl Lak, n subaz SPRITE EDİTÖRÜ-$0024 Seslerinizi şimdiden duyar gibiyim, ““Yine mi sprite edi- törü?”'. Evet yine, ama bu sefer hem çok basit hem de çok kısa bir program. Yazmak sadece birkaç dakikanızı alacak. Kullanımı ise şöyle: Programı yazıp SAVE ettikten sonra RUN ile çalıştı- rın, ekrana çıkan noktaların üzerine sprite'a geçmesini istediğiniz şekil **'larla çizin ve tekrar ekranın altındaki boş kısma gelerek “RUN 100' komutunu girin. Çizimi- niz sprite'a geçecek ve ekranda görünecektir. “bir de bun- ların datalarını alabilsek”” diyorsanız, o zaman “RUN 200” komutunu girin ve tek tek DATA'ların başına istediği- niz satır numaralarını yazarak RETURN'”e basın. FPROOSRAM ADNI 3 SPRİTE ENİTÜURİ! GONUN REM a SPRİTE ELİTORU w4 | <ORA : HOOÜ FRİNT USCLR>Ü ( 'PÜKE ASO,1İ Ca VODZO FOR -4 TO ZİTFOR Os1 TO .aırmur " ıııur 1FRİNT iWEXT 55. VANA0 CARtPOKE Vizli.nıFOKE Veatli gCN a d FH&F Vaa. :HSıîUiE V»*5. 200 YoBL) OHS0 FUR 2uaz.LirEl UF VULTOD GzüÜsSÜ B:FUR MA TÜ 201:FAR X#1 TÜ Za Si OOL10 FaFFEK(1OZASİAT AO $ Dezlra OOLLO ÇCe€-1t1F Psa2 THEN 050142 OĞLRAO HF €-0 THEN CsB:16- GçîıPOVE R3146 0-0 <Zay> OUVJAD HEXT WeNEXT YrEND 00700 FRİNT "<ELR><2DOWN)" t eRKzO:FOR Te0 T 3 RJIIF ks0 THEN PRINT "CESPACE DAT <155> ÇARRLO FRINT P!hHTi(STRllIOOOoFFF! VA T0 - <050) GOZ FO L—Pı! IF Ks*B THEN K-0:1PRİNT “<LEFT> <ioz2> OUZAO NEXT tePOKE 53248421,0t1END <229) 3D ŞEHİR-$0025 Karakterle çizilmiş üç boyutlu şehir resmini oturup çiz- mek istemiyorsanız 3D Şehir programı tam size göre de- mektir. Programı yazıp SAVE ettikten sonra artık onu kendi oyun programlarınızda da kullanabilirsiniz. 12 FROĞRAM ADNİ * 3D SEHİR 00001 FükE FAlBO, tPDKkE S3z0i,.:PRİINT CHR x(i A7)IFUR Ge#9 TO 23 STEP atFÜUR Xe. TO <L0a> oD00OOZ A-ıRN[ı(lıız“ <230> O0OODA POKE 793.ırPÜKE 782.X*5 <118> OCUCA D (RNDCLİSAYAI <192> 00005 POKE 78B1,615YS 65520:FPÖİKE Gaf, r "’RVHI]N BASASCE 8)<RV€HFF1£"1FUVF <OAZI ODONDE FÜR C=1 TO DrıPOKE 781.G-ÜrSYS 65520 OOCOUT PRİHT “RUSON>RASALSCRRA) “1PNFE Raf, l GÖNOR FODKF 7A1,6G-CıPOVE 7A2.Xw5rPOKE 7BA e2S1S bbbaeUtTERİMT "<RVSUN UU KBK OH GOCOOG VEXT #HEXYT eFRİNT “"<HOME'"İVAİT 1üS İZLİ YAZI-$0026 Eminim ki çoğunuz programlarınızın başına güzel bir açılış efekti koymak istersiniz. Hoşunuza gideceğini dü- şündüğüm bu program işinizi oldukça iyi görecek ve ha- fızanızı pek kullanmayacaktır. Daha fazla renk için prog- ramı biraz incelemelisiniz. Programın başında kullanılı- şını görebilirsiniz; kaymasını istediğiniz yazıyı A$'e yer- leştirin, S değerine yazının kaymaya başlayacağı yeri, E değerine ise duracaği yeri verin. PROGRAM ADI * İZLİ YAZI OBOLO PDkKE 532B60.,021PDKE 53281,0tPRİNT "<C LR><CTRL-2>"1006”<CTRL-2><C0C-8><C5> CRA><CTRL-1)>"1DAR”.HOMEYCZALOWN>" <OBO> 00020 A$«-"COMMODORE DERGİSİ"1Su241Es11G0S UB 60000 <221)> 00030 AII"ABUR CUBUR BOLUMU" :8e2a1Es31GOS < 088> 00080 END <Ouz> 50997 t <vz86)> S5Sa99A REM wu ız RUTIİNIİ ** <067> 5999 <0Z8B> 60000 FDR X«5 TO E STEP -1:1FOR Y*0 TO 5- KORCXCS-AYWLB-A-X) <Tâa> 60010. PRINT LEFT*(D$, XoY)TABlZO LENCAB)/2 YMİD$LCS. YALL ) <HÜHE)"1NEXT Yi X <Ü00B> 60020 FOR Cez TO SıFUR Yed HOLSSC - eziwr 60030 PRİNİ Lkb181lı$,BıY)TABLZO-LENCDAS)/Z2 YOLŞCCA,CaY, DIAS“CHUME> " INEXT Y O <Üdas> oUUsSU RETURN <ısı>

Bu sayıdan diğer sayfalar: