Bu sayfadaki yazılar
Sayfanın metni
Sayfa 88
SRS Professor
Evet yeni bir AMOS köşesi ve yine ben. Biz elimizden geldiğince size mükemmel bir dergi çıkarmak istiyoruz. Tabii böyle olunca da bazı aksaklıklar olağan olarak çıkıyor. Şimdi tek amacımız 64'ler Professional'ın da gittikçe güzelleşmesi... Hemen programların açıklamalarına geçelim. İlk programımız Hayrettin Yıldız'dan. Ben bir şey söylemeyeceğim; deneyin, sabredin ve görün. İkinci program benden ve basit bir program. YAZ procedure'üne verdiğiniz değerlere göre yazınızı ekranda patlatıyor. Bu program Flash komutu ile de yapılabilirdi. Üçüncü ve son programımız Ziya'dan. Verdiğiniz sayıyı istediğiniz sayı sistemine çeviriyor. Gördüğünüz gibi artık diğer arkadaşlardan da program geliyor ve ben tembelleşiyorum. Yeni programlarınızı ve mektuplarınızı bekliyorum. Mektup dedim de, bu ay size küskünüm. Çünkü çok az sayıda mektup geldi. Tabii beni hiçbir zaman yalnız bırakmayan Ziya'nın mektup yazıp yazmadığını tartışmıyoruz. Ziya her ay olduğu gibi bu ay da beni mektupsuz bırakmadı ama köşenin diğer abonelerinden hiç ses çıkmadı. Neyse, mektuplara geçmeden önce size anlatmam gereken önemli bir olay var. Bu ayın ortalarına doğru bana Hayrettin Yıldız diye bir arkadaştan mektup geldi. Hayrettin bana iki disket dolusu çok güzel AMOS programı göndermişti. Bu disketlerdeki programları dergide incelerken (daha doğrusu Murat'la oturup Hayrettin'in yaptığı Monopoly oyununu oynarken) Apo abi geldi ve bu disketleri gördü. Kısa bir konuşmadan sonra Hayrettin'in programlarının piyasaya sürülebilecek kadar kaliteli olduğuna karar verdik ve Apo abi Hayrettin'i arayarak dergiye çağırdı. Hayrettin'le oturup konuştuk ve programlardaki, grafiklerdeki bazı eksikleri tamamlayarak bir oyununu piyasaya sürmeye karar verdik. Şimdi Hayrettin hızla programı geliştiriyor. Bende ona destek vermek için grafikleri ve ses efektlerini yapmaya başladım (programlar onun olduğu için onları geliştirme işi de onun oldu). İlk çıkacak oyun Monopoly benzeri bir şey ama tam Monopoly diyemiyorum çünkü Hayrettin'le oyuna, gerçek Monopoly'de olmayan bazı şeyler kattık. Gelecek aylarda piyasaya sürülebilecek bu oyun size de örnek olsun.
Gördüğünüz gibi artık Türkiye'de her yazılım değerlendiriliyor. Grafik, ses efekti eksik diye üzülmeyin eğer AMOS'la ilgili iyi fikirleriniz varsa bana yollayın. Eğer fikir ve çalışmanız kaliteliyse mutlaka değerlendirilecektir (eğer oyununuz piyasaya sürülecek düzeye gelebilecek durumdaysa size elimden geldiği şekilde yardım etmeye hazırım. İsterseniz grafikleri elle çizer veya Scanner ile digitize edebilirim. Ses olarak sample efektler ekleyebilirim, yeter ki programınız güzel olsun). Artık sıra geldi mektuplara. Bu ay başta da belirttiğim gibi az sayıda mektup var. Sadece 2 tane. Böyle giderse köşe kapanacak herhalde. Gerçi Ziya inatla köşenin üç sayfa olması taraftarı ama. Neyse işte mektuplar. AYLIK GIDA 1) Çizgi Ötesindeki AMOS programını kim yapmış biliyor musun? (Zırt ve Pırt bozuluyor da!!) 2) Okula gidiyor musun? İngilizceyi nereden öğrendin? 3) AMOS'ta Printer'a grafik basılmaz mı? (Mesela bir resim veya Draw komutuyla çizilen çizgi...) 4) Yaptığım programları beğeniyor musun? ZİYA AŞKAR OMAY: Ziya ilk başta mektupların için sağ ol. İnşallah devam edersin. Bu arada, bundan sonra bana mektup için veya pul göndermene gerek yok. Her ay o kadar parayı bir yerden bulup buluştururum sen üzülme ama ille de para göndereceğim dersen bir şey diyemem. Sana her ay disketini geri göndereceğim ama her ay içine bir şey koyacağımı garanti edemem kusura bakma. Telif hakları yüzünden içine oyun, paket program çekemiyorum ama elime grafik, AMOS programı gibi şeyler geçerse veya ben yaparsam söz sana yollarım. 1) Zırt Pırt bozulduğuna bakılırsa iyi bilen biri yapmamış. Sen bir de Hayrettin'in yaptığına bak. O gün dergide onun yaptığı Çarkıfelek benzeri programla bayağı oynadık. Eğer bir aksilik çıkmazsa yakında o da piyasaya çıkabilir. 2) Aferin Ziya! Derin bir yarama parmak bastın. Şimdi gidiyorum da diyemem, gitmiyorum da. Arada bir bölgede dolaşmaktayım. Bu arada
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 89
PROGRAM 1 HAYRETTİN YILDIZ Hide : Screen Open 0, 320, 256, 4, Lowres Curs Off :Flash Off : Cls 0 Screen Open 1, 640, 256, 4, Hires Curs Off :Flash Off : Paper 0 :Cls Screen 0 : Screen To Front 1 : Screen 1 Palette 0, $F00,0, O : Wait 50 For Az1 To 5: Led Off : Wait 30: Led On: Walt 30 : Next Pen 1 : Print : Print Centre "Software Fallure. Press left mouse button to continue. " Print : Print Centre " Guru Meditation #00000025.000000000" Cls 3,0,0 To 640,3 : Cls 3,0,53 To 640,56 Cls 3,0,0 To 6,56 : Cls 3,634,0 To 640,56 Flash 3,"(F00,50)(000,50)" Repeat : Until Mouse Key Flash Off Wait 50 : Cls 0 Palette $AAA : Wait 50 Palette $CCC :Wait 50 Palette $FFF :Wait 50 Screen Close 1
PROGRAM 2 Screen Open 0, 320, 200, 4, 0 : Curs Off: Flash Off Paper 0 : Cls 0: Hide : Palette 0, 0, $Fo0, O YAZ|8, 11, "Based by Steven King's Novel", 6) YAZ|16, 11, "MISERY", 8) Procedure YAZIX, Y, A$, N) For I-1 To Len(a$) : Pen 1 : Print At(X, Next : Fade N, 0, $FFF :Wait 30 : Wait N*15 : Fade N Wait N*15 : Cls 0 End Proc
PROGRAM 3 ZİYA AŞKAR Cls 0 : Screen Open 0, 320, 256, 32, Lowres Curs Off : Cls 0 : Curs Pen 5 : Paper 0 Dim S(110), K(110), B(110) Locate 1,2 : Pen 2: Paper 6 Print "CİKMAK ICİN BOS BASIN..." Locate 1,4 DONGU: Pen 2 : Paper 0: İnput "RAKAM NEDİR > If Sz0 Then End
İngilizce bildiğimi nereden çıkarıyorsun anlamıyorum. Cık cık cık! Lisedeyken iki yıl İngilizce kursuna gitmiştim ama şimdi neredeyse her şeyi unuttum. 3) Hayır. Sadece programının listesi, directory listesi ve LPrint ile istediğin bir değişkeni printer'a basabilirsin. 4) Yok beğenmiyorum. Ne öyle saçma sapan şeyler. Bunlarla uğraşacağına daha yararlı şeylerle uğraş (mesela benim kafamda kaç tel saç kaldığı hakkında bir araştırma yap). Ziya bu da soru mu? Tabii ki beğeniyorum. Beğenmesem niye programlarını geliştirmek için öneriler vereyim. İşte benim programlarında gördüğüm eksikler. Şimdi grafik programını ikonlar kullanarak yapmalısın. Pull-Down menüler de olmalı ama bunlar D.Paint'te olduğu gibi ayrı ayrı başlıklar altında yapılmalı. Örneğin Resim menüsü başlığı altında resimleri silme, kaydetme gibi seçenekler olabilir. Ayrıca renkler ikonlar halinde olsa daha iyi olur. Programının gelişmiş halini bekliyorum. Daha çok tenkit edeceğim. Sos oyununa gelince. Arka planı güzelleştirmelisin. Ayrıca Kayahan'ın sample'ının oyunda ne aradığını anlayamadım. Buraya oyunla alakalı sample'lar ekleyebilirsin. Ayrıca yuvarlak ve kareleri bob olarak daha güzel yapabilirsin. Bir de oyunun başına bir başlangıç yazısı veya grafiği ekle. Futbol Menejerliği oyununun şimdilik fazla bir şeyi yok ama geliştirirsen çok güzel olabilir. Ağırlık vereceğin konular puan tablosu ve oyuncuların idmanları olsun. Maç kısımları şimdilik idare eder. Transfere ise en son başlarsın. KOCAMAN EKRAN 1) AMOS'ta 1024*1024'den daha büyük ekran açamıyorum? Bunu Copperlist yardımıyla yapabilir miyim? 2) AMOS'ta iki yatay ekranı aynı anda gösteremiyorum? 3) AMOS konusunda kaynak kitap nereden bulabilirim? FATİH ŞAHİN OMAY: Fatih, yaptığın programı beğendim ama üzerinde biraz daha uğraşılması gerek. Üzerinde çalıştıkça daha iyiye gittiğini göreceksin. Diğer oyun programlarını gönderirsen çok iyi olur. Disketini geri göndermemi istiyorsan onu bana belirt. 1) Şimdi Copperlist tamamen profesyonel bir olay ve bunu ancak çok iyi makine dili biliyorsan AMOS'taki bu konuyla ilgili komutlar yardımıyla yapabilirsin. Gelelim 1024*1024'den büyük ekran açamama olayına. Şimdi senin oyunun gibi Shoot'em Up'larda ekran genellikle Tile denilen 8*8, 16*16 veya 32*32 küçük karelerin birleşmesinden oluşur. Bu olayı oyununda kullanabilmen için ilk önce D.Paint'te birleştireceğin kareleri tek tek çizmelisin. Sonra AMOS'un Map Definer'ından bu küçük kareleri birleştirerek istediğin büyüklükte ekran oluşturabilirsin. 2) Bu zaten AMOS'ta imkansız. Benim bildiğim kadarıyla Amiga'nın hardware'i de buna izin vermiyor ama Cracker'lar böyle şeylerde yapmış olabilirler. Onların Amiga'da yapamayacakları şey yok gibi. 3) Türkçe olarak AMOS'un
İnput "KACLIK SISTEME CEVİRECEKSİN >";X Pen 2: Paper 6 : S(1)-S For T-1 To 100 S(T41)-S(T)/X : K(T41)-S(T)-S(T41)*X Next T For Yz1 To 100 If S(101-Y)>0 Then S$-S$4St$(K(102-Y)) Next Y Print S$ S$z"" : Goto DONGU
Orijinalinin Türkçe'ye çevrilmiş kitabını bazı bilgisayarcılarda bulabilirsin ama biraz parana kıyıp AMOS'un orijinalini alırsan bence çok iyi edersin. Bu ay bana telefon eden bir arkadaş fonksiyonlarla ilgili bir soru sordu. Ben telefonda cevabını bu köşede yazabileceğimi söyledim ama o gürültüde soruyu yarım yamalak duydum. Onun için bana mektup yazar bir daha sorarsa cevaplamaya çalışırım. İnsanın doyumsuz olması çok kötü bir huy. Kendimden biliyorum, her gün evde sıkıntıdan patlamak berbat bir şey. Belki çoğunuz benim yerimde olup sıkılmamaya razı ama ben de sizin yerinizde olup sıkılmamaya razıyım. Ne bilgisayarda yazı yazmak, ne oyun oynamak, ne televizyon seyretmek, ne de müzik dinlemek bu sıkıntımı gideremezken bir tek şey beni bu dertten kurtarabiliyor. O şey sizin mektuplarınız. Nasıl vampirler kansız, insanlar gıdasız olamıyorlarsa, ben de mektupsuz olamıyorum (peki şimdi ben neyim?). Unutmayın 230 sayfa yazsanız da, yarım sayfayı geçmeyecek şekilde yazsanız da benim gözümde mektup mektuptur. Ayrıca bana yazmanız için ille de bir sebep olmasına da gerek yok. Sizden tek istediğim, herhangi bir boş vaktinizde, herhangi bir cisimle, herhangi bir şeye, herhangi bir şey yazmanız ve herhangi bir şekilde bana yollamanız. MURAD OMAY PK 205 BEŞİKTAŞ/İSTANBUL