Bu sayfadaki yazılar
Sayfanın metni
Sayfa 11
GOoT0495 RETURN REM GRAFİK GÖSTERİM VERİLERİ"
PRİNTTABC10)"4)GOSTERİM" GRAFİK INPUTN DİMFLECN) DOSYA PRİNT PRİNT"EMENU İCİN HERHANGİ BİR TUSA BAS" GETKEYAS: GOT06SA ARASINDAKİ ZAMAN" OLARAK ) "3 INPUTD
DİSKETİNİ KOY VE BİR TÜUSA ICİN SPACE E BAS
FORAZ 1GETASI IFASE" *THENSOUNDİ ,10000,30:GETKEY A$1S0
REM CIZGI GRAFİK GRAPHICO,İ:COLORİ,2:SPRITEİ BASLIK (1-39 HARF)"
INPUTAS: İFLENCAS) >398THEN77S5 RENGİ TANE VERİ FORZ-1TOR:GOSUB885:PRİNT" YERİ #"Z"NİN ADİ <7 HARFE KADAR)?" ) ) ) NEXT #"Z-İ"NIİN DEĞERİ İFN<GORN> 15 FORZ #25TOCAK İĞ) *2SSTEP ,BETOZ , 132:NEXT FORZ 1325TEP *25,Z2:NEXT COLOR 1 sa TOR DRAM,
İCİN DOSYA ADI İFLENCC$) >16THENSTS. RETURN PRİNT"EL
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 10
RETURN REM OVAL GRAFİK 3 GRAPHİCO, TANE VERİ VAR PRINT"UANA BASLIK (0-39 HARF)": INPUTAS: İFLENCAS) GOSUBB85:PRİNT"VERİ #"Z"NİN ADI?" INPUTXSCZ GOSUB885:PRİNT"YERİ #"Z"NİN DEĞERİ?" GRAPHICI, GOSUBE4A:COLOR1,B CT) < DRAW, 160,30T0160,100:FORZ-İTOR DRAMI, ) 1 GETKEYVE 157) THENUSU-5:GOTO475 BO MOVSPR 1 ,U,1:60T0440 LERSPPOSCİ,1)-27 REM SAVE RUTİNİ IFV$z "5S" THENBSAVE TFVSECHRSE
BASLIK (1-39 HARF)" INPUTAS: İFLENCAS) TANE YERİ GOSUB875 #"Z"NİN ADI C1İ-5 HARF)?" ) İFLENCXSCZ ) )
NEXTEPRİNT #"Z"NİN RENGİ (1-16)7" INPUTCR CZ ) 3 NEXTEPRİNT #"Z"NİN DEĞERİ CZ) 2 İFPCZ)<LORPCZ) NEXT ,2:GOSUBESA FORZ , COLOR 1 )