SPRITE EDİTÖRÜ-$0024
Seslerinizi şimdiden duyar gibiyim, “Yine mi sprite editö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 şekli *'larla çizin ve tekrar ekranın altındaki boş kısma gelerek “RUN 100” komutunu girin. Çiziminiz sprite'a geçecek ve ekranda görünecektir. “Bir de bunların datalarını alabilsek” diyorsanız, o zaman “RUN” komutunu girin ve tek tek DATA'ların başına istediğiniz satır numaralarını yazarak RETURN'e basın.
SPRITE
FRUĞRAN ANI
REN wa SPRİTE ELİ TORİ >
PRİNT 'PÜKE A50,12A
FOR Tet TO ZLTFOR Ozi TO
3PRİNT :HEXT
Vezi.nıFOKE Vent, i
dı POKE V*5. 200
POLE
TO Z20:FOR Xs1 TÜ Za
NE
00110 « bile
Psa2 THEN
DF THEN
HEXT YrEND
00700 FRİNT "<CLR><2DÖOWN>" T
0D 53:1F ks0 THEN PRİNT DAT
AVI <155>
FRİNT
TT
THEN "<LERT>
" <ı102>
NEXT tPOKE 532a8421,0tEND <229)
<050)>
DOZA3O