Sayfa 13

PRİNT LK E L E PRINT BIR TUSA BASIN yu POKE PRİNT <RYSOM> ME N Ü<CZSPACE>İ <RWSOFF><4 DOLN> " PRİNT YARISMA " PRİNT "<DOLN><AnrRIGHT> BILGI<3SPACE>" GET A$:IF ASC>"I" 1138 ON VALCAS) PRİNT ME N <RYSOFF><3DOLN>” PRİNT 1 PRINT "<2RIİIGHT><CE7)>( 8 )<42SPACESUL KE<ASPACE >-- >BASKENT" PRINT 3 >-- PRİNT 4 BIRIMI" PRINT 5 SKENT PRINT > A MENÜYE DONUS" GET A$:IF HEN 2faf ON YVALCKAS) GOTÜ GOT0A

PÖKE 198,0 PRINT MENU'YE Dü NMEK İCİN 1 )"GPOKE 198,8 GET A$:IF THEN 3031

PRINT : LOY >" INFUT. IF "DOGRU" INPUT ACE >: RuU* INPUT "<DOJN> Bİ RIMI:":PBi AF THEN RU" PRINT PRINT :PRİN£ THEN PRİNT ,"- "BELA :PRİNT 2<2SPACE > THEN PRİNT

REM PRİNT * BİRİM 1 MENU'YE DON MEK ICİN << F 1 198,8 GET A$z"" THEN 3328 IF ASCCAS)-133 THEN 1100 POKE 198,0 PRİNT : USLCA)"< YANLIS" INPUT "PARA BIRIMI : A) THEN S$-"DOGRU"

PRİNT YANLIS” T HEN PRİNT ,"- "PSlA) POKE 198,1:POKE TO 3380 REM * BASKENT --2> ULKE *

PRİNT 4 BASKENT<2SPACE PRİNT MENU'YE DON MEK ICIN ( F 1 198,0 GET A$z"" THEN. 3628 IF THEN 1188 POKE 198,0 PRİNT ”<CLR><3DOWN> BASKENT : <2DOLMN>" 1 YANLIS”

INPUT "ÜLKE THEN S$-”"DOGRU" PRINT "<2DOLMN>"S$; S$-"YANLIS" T

PRİNT ME N ÜCESPACE>3 <RYSOFF PRINT 1