Amiga Dünyası sayı 4, sayfa 63

Bu sayfadaki yazılar

Sayfanın metni

Sayfa 63

Fakat aşağıdaki program yardımıyla istediğiniz grafiği yükleyebilirsiniz. Bu altrutin, bir ekran ve bunun üzerine de bir pencere açmaktadır. Yüklenen grafik de bu pencerede gözükecektir. Disketten yüklenecek resmin Deluxe-Paint gibi IFF-ILBM kaydeden bir resim programıyla hazırlanmış olması gereklidir.

INPUT "RESİM DOSYASI ÎSMÎ : ";Name$ MENU OFF:MOUSEOFF OPEN Name$ FOR INPUT AS 1 Form$=INPUT$(4,l) Length=CVL(INPUT$(4,l)) IF INPUT$(4,1)<>"ILBM" THEN BEEP

PRINT "Hata var !!! Dosya IFF değil." END ENDIF

Oku: IF EOF(l) THEN GOTO SON Chunk$=INPUT$(4<l) Ungth=CVL(INPUT$(4<l)) IF INT(Length/l)<>(Length/2) THEN Length=Length+l IFChunk$="BMHD" THEN BMHD IFChunk$="CMAP" THEN CMAP IFChunk$="BODY" THEN BODY Dummy$=INPUT$(Length,l) GOTO Oku

BMHD: xd=CVI(INPUT$(2,l)) yd=CVI(INPUT$(2,l)) Dummy$=INPUT$(4,l) Planes=ASC(INPUT$(1,1) Dummy$=INPÜT$(11,1) IFxd=320THENTip=l IFxd=640THENTIp=2 IF yd>200 THEN Tip=Tlp+2 SCREEN l,xd,yd,Planes,Tip VVINDOVV 2,Name$„0,1 Ad=PEEKL<WINDOW(8)+4>+S FORx=0TOPIanes=I

EbAd(x)=PEEKL(Ad+4*x) NEXTx Dummy$=:INPUT$(Ungth«20,l ) GOTO Oku

CMAP: FOR x=l TO Length/3

r=ASC(INPUT$(l,l) AND 240)/16 g=ASC(INPUT$(I,l) AND 240)/16 b=ASC(INPUT$(l,l) AND 240)/16 PALETTE (x-1),r/16,g/16,b/16 NEXTx IF INT(Length/3)<>(Length/3) THEN Dummy$=INPUT$(l,l) GOTO Oku

BODY: Satırbyte:xd/8 FORyl=0 TO yd-l FORb=0 TO PIanes-l

FOR xl=0 TO Satırbyte/4-1 POKEL EbAd(b)+4*xl+satırbyte*yl,CVL(INPUT$(4,1))

NEXTxl NEXT b NEXTyl GOTO Oku

Son MENU ON : MOUSE ON END

* E-MOTION oyununda ilerleyemeyenler için ufak bir hile: Einstein'in olduğu ekranda klavye yardımıyla 'MOONUNIT' kelimesini girin. Artık oyunun istediğiniz yerinde aşağıdaki tuşları kullanarak ilerleyebilirsiniz:

* Çoğunuz BASIC dilini kullanarak çeşitli programlar yazarsınız. Bu programlarda ekranların arkasında güzel resimler bulunmasını özellikle bu dilde oyun yazanlar istemiştir. Fakat gelin bunu Amiga'ya anlatın. İşletim sisteminin ve Library'lerin karmaşıklığı sayesinde hemen Amiga'dan nefret edebilirsiniz.

(F1) - Bir kademe ileri (F2) - Bir kademe geri (F3) - On kademe ileri (F4) - On kademe geri * GALAXY FORCE II oyunu bir hayli zor bir oyun. Artık kademeleri geçebilmek için çaba sarf etmenize gerek yok. Oyunun ana ekranında "DONKEY" sözcüğünü yazın. Artık herhangi bir bölümdeyken (F3) tuşuna basarsanız içinde bulunduğunuz kademeyi doğrudan geçebilirsiniz.

* NINJA SPIRIT oyununda ninjanız yer düşünce aşağıdaki yazıyı girerseniz 0 ile 9 tuşları arasındaki tuşların her biriyle başka bir kademeye geçebilirsiniz. "NO HUNS AT HAMPDEN AND NO SKOL AT IBROX"

* IVANHOE oyunu grafik açısından oldukça güzel bir oyun. Fakat oyunun oynanabilirliği biraz zorlayıcı tipten olduğundan oyunu pause edin, "ZOBINETTE" sözcüğünü yazarak [RETURN] tuşuna basın ve oyuna geri dönün. Artık her [,] tuşuna basışınızda bir ekstra hakkınız, her [N] tuşuna basışınızda ise bir sonraki bölüme geçme hakkınız olacaktır.

• Federation Quest ya da gerçek adıyla BSS Jane Seymour oyununda ana ekranda aşağıdakilerden birini yazarsanız istediğiniz kademeden başlayabilirsiniz.

Kademe 1 ... BSS Kademe 2 ... JANE Kademe 3 ... SEYMOUR Kademe 4 ... BY Kademe 5 ... DOCTOR Kademe 6 ... DINOSAUR Kademe 7 ... AND Kademe 8 ... GREMLIN Kademe 9 ... GRAEME Kademe 10 ... ROB

Buradan bu oyunu da hemen hemen her oyun gibi bazı cracker'ların yazdığını anlayabilirsiniz. Onlar olmasa herhalde Amiga bu kadar gelişemezdi.

Klavyeyle gezinmek için ← ve → tuşları.