Sayfa 19

PROGRAM ÂDI FONKSİYON

292040 Bağ5a gaasa gaiaa

CÜ;1i1:POKE PRİNT "<CLR> PRİNT , " PRİNT ) "FONKSİYON BA * PRİNT "RUN" PRİNT 64 POKE 631,1İ9:FOR 1-632 TÜ 1,13 NEXT #PÜKE 198,6:END

PROGRAM ADI : FONKSİYON 64

POKE DEF DEF DEF 1:0Y5 8 XN> 280: © KES YES YO-YU)/ 163 PRİNT CIZIMI VE İNCELENMESİ PRİNT 64 VE PRİNTER-PLÜTTER VC-1520<20SPACE >VEYA EKRAN FOR 150 TO 39:PRİNT #PRİNT #PRİNT ONKSİYON OLARAK

00019 283:PRİNT THEN 23 ES) SABIR LUTFEN !!":GÜSUB 3098: LORD 00023 PRİNT DEĞİSTİRİLECEK MI 7":PRİN T TABC57)"E/H ©0025 GET E$:1F E$z"H" THEN 53 ©0027 IF E$<)"E" THEN 25 00629 PRİNT "LUTFEN FONKSİYON VERİN VE YA DEĞİSTİRİN 08031 FOR TO 39:PRİNT PRİNT 90033 PRINT "EĞER KISMINDA x VARSA, TUM BOLEN<2SPACE>K ISMININ PARANTEZ İCİNDE "; 00335 :FOR 1-8 TO 33:PRİNT "öğ" ; OO037 X-5:Y-16:GÜSUB "FS; 00033 PRİNT TAB(E43)“VERİS BICIMİ NORMAL BASİC UB F$ DAKIKA LUTFE PRİNT ÖME 002043 PRİNT "SDEFFNF YO"<L 02047 PRİNT "174 200493 PRİNT 00051 ÜR 15632 TO :POKE 198, ICİN KULLANILAN DEĞİSKENLER : " 00055 PRİNT TABX 120) <ESPACE DEKO X-DEGER 1 )<CT >Y-DEGER > BO959 Ke TAB Y-DEĞER İ<ESPACE><CTRL-E 280061 PRİNT DEGİSTİRİLECEK MI RINT ©0063 GET E$:1F THEN 91