C64S tape file Demo tape......&DEMO TAPE TESTCARD  HANGMAN 'KIRJOITUSNOPEUS `#LUKU3 Un/LUKU4 H:LUKU5  GLAUSEET RPLUKU7 "" TESTIOHJELMAC COPYRIGHT (C) ANDREW COLIN 1981_" TESTIOHJELMA"e(" MUSTA"2"<" VALKOINEN"FP" PUNAINEN"Zd" SINIVIHREA"x" PURPPURA";" VIHREA"A`" SININEN"f" KELTAINEN" F(8),N(26)J18:F(J):J CODES FOR COLOUR KEYS 144,5,28,159,156,30,31,158 TUNE PLAYERA("A")2 AA16J1 26 : N(J): JW J0 3 : 36874J,0 : Jf& 36878,15o0 V$: V$"#" 190D W$NP1:T0XC0lCT625mQ125:Qn800q 36876,0vY((W$,P,1))Y0 560X((V$,P,1))PP1TTY- 36876,N(XA)? Q0 5 :QP*X(88(1))`4Y(8(1))p> 38818X,YH 8098X,160RA$:A$""910\Q(A$)aJ18f QF(J)900p 36879,23Jz910CC1620 SCALE$ 0,131,138,145,151,157,162,167,172J 177,181,185,189,193,196,200,203t 206,209,211,214,216,218,220,222,224L CAN-CANV"CJJLJHHLMQTQQOOQGGQOHHLLJLJLJLJ","22222222222222422222222222222220"`"CJJLJHHLMQTQQOOQGGQOHHLLJLJHH","222222222222224222222222222440"Lj"LHECOJLMLJHLHECBCEGHCGC","444422222244444222222220"t"HCGCHCGCHHHHHHHHHHHHHHHHH","22222222211222222222222220"~"ACFECHHHJEFCCCFECAMLJHFEC","82222442222442222222222220""ACFECHHHJEFCCCFECAHCEAH","822224422224422222222440"@"ACFECHHHJEFCCCFECAMLJHFEC","82222442222442222222222220"x"ACFECHHHJEFCCCFECAHCEA","82222442222442222222280" "#" HIRSIPUU  Z13 220< P%(88),C%(24),B%(6,4)B#W(J124:C%(J):_2C$t<A$:B$:A$A$B$FJ188:P%(J):PJ16:K14:B%(J,K):K,Jd1200n""xX14:Y2:A1:B46:R(X$)1000P13:Q4"SANASSA ON";R;"KIRJAINTA"6J1R:7750J,42:38470J,2:J< ~"KAYTETYT"::"KIRJAIMET"::"UUSI ARVAUS?"T$("********",1,R)K0Z$:Z$""170Z(Z$)64Z1Z261708132,Z:38852,2 Z13 220%772522(Z1),Z:3844522(Z1),2:240N772722(Z14),Z:3844722(Z14),2X1300eL1300o1400yKK1K71100:170"500,T$X$600115006170P13:Q4:K1636876,245:36878,15XPB%(K,1):YQB%(K,2):AB%(K,3):BB%(K,4) 1600'K2J15R&776022J,66:3848022J,4d'8065J,32:Jq0P13:Q75K16:1100:9" ":ZZ15:("",ZY1,1)"SANA OLI "X$:ZY1ZY:ZX1100?ZX,ZZD"PAINA JOTAIN NAPPAINTA":36876,0%NA230:B12:630;XX14:Y2:A1:B46Eb1600XgK16:1100:wl"VOITIT JA OLET VAPAA "}mn"PAINA JOTAIN NAPPAINTA"qA200:B50v36878,1536874,AM110:36874,0M1BZ$:Z$""36874,0:36876,0:35M!640.F22YX;F22YXFJAB\L((A$,J,1))64u FP%(J)7680,C%(L) FP%(J)38400,((C$,L,1))$J.LXPB%(K,1):YQB%(K,2)VXPB%(K,1):YQB%(K,2)`AB%(K,3):BB%(K,4)j 1000tX(42(1))' J1X:X$:-S VERTAA ANNETTUA KIRJAINTA JA X$[L0fM1R~(Z$(X$,M,1)13602T$(T$,M1)Z$(T$,RM)<7750M,Z:38470M,5FL1PMZx36878,15yL2401881z36876,L{M15:M L36876,0:036878,15:L16MM254240((1)10)1]36876,M:Mj36876,0M0((1)100) 20:M,L@ POISTAA KUVIONJF22YXTJAB^L((A$,J,1))hFP%(J)7680,32rJ|160,95,223,93,113,85,73,34,45,74,75,78,77J103,101,100,88,81,80,79,122,76,121,64j"000000000000000072000060""AAAAAADBCABCABCABAAAAAAAAAAAAAAAAAAAAAAWWWWWWW""FEGDHDDIDJXKLMNRONRONQRQOMPLSLLTMMLNNUMOOV"#0,1,2,3,4,5,22,23,24,27,46,47,49,69,70,71,92,93,115,137,159,181,203,225,247y 269,291,313,335,357,378,379,380,400,401,402,422,423,424,327,328,329,330,331,3323330,1,2,22,23,24,44,45,46,66,67,68,0,2,21,23,25,43,45,47,65,66,67,68,69,88,89,900,-1,20,0,1,24,0,21,43,65,0,23,45,67p TIETOLUETTELOVz0,0,47,58,0,4,59,74,-1,5,75,77,3,5,78,80,0,9,81,84,2,9,85,88XKARTTA,MOPEDI,PALAPELI,KUNINGATAR,VIIVAIN,SADE,AKSIOOMA,KUORI,IKKUNAbKELLO,OIKEUS,TAHTI,JAKKARA,OKSA,TAIVAS,ORANSSI,SHOW,JUNA,PORSAS,VALAS,lMATTO,KAKKU,SAIRAALA,VIULU,TIEDOSTO,KASETTI,MUSIIKKI,KIRVESkvTIETOKONE,MAKASIINI,VALOKUVA,NAUHURI,RUOHO,LENTOKONE,MELUKIRJE,KAMELI,KOHTELIAS,SOPIMATON,AIKUINEN,PAHA,OJA"HEI.OHJELMA MITTAA ";("KIRJOITUSNOPEUTESI JA"X2"AUTTAA SINUA PARANTA-"jF"MAAN SITA."qZ:d"KUN HALUAT MITATA"n"KIRJOITUSNOPEUTESI,"x"PAINA 'R'.""MUUSSA TAPAUKSESSA""ANNA PARAS TULOKSESI."  A$: A$"" 180% A$"R" "R";: 900A (A$)49(A$)57180QRA10(A$)ZA$;mA$:A$""230 (A$)48 (A$)57 230A$;:RARA(A$)20003000500:"N(2000RA):600,Y(Z(X$))606RB1090(1Y)@RA(0.8RA0.2RB )EDD1(J2604""r"KOPIOI SEURAAVA":"LAUSE NIIN NOPEASTI":"KUIN PYSTYT.""ALUKSI VALILYONTI":R(X$):J1R23550(X$,J,22);JJ22:RR22:520%&(X$,J,R);" "+0l5" "X""b7878,160lR(X$)vA$:A$""630A$" "6307878,32ZTIA$;J2R:W7877JW,(W)128:T0A$:A$""7400TT1:TN710IQ245:1000:T0:710_A$(X$,J,1)760}Q210:K15:1000::710A$;:W,(W)128 JZTIZ: RA10:D5:260"KOPIOI KONEEN ANTAMAT":"LAUSEET NIIN NOPEASTI":"KUIN PYSTYT."#"MUSTA NELIO OSOITTAA">"SEURAAVAN KIRJAIMEN"Z"(TAI VALIL.) PAIKAN."z"ALUKSI VALILYONTI!":::"PAINA JOTAIN NAPPAINTA":"JA TESTI ALKAA."A$:A$""946800 D0 36878,1536876,QT110:T 36878,0$l VALITSE SANA*v8CA:Q245I C0 1950^ Y$:CC1:1930tC((BA1)(1))C01980Y$:CC1:Q230:1960X$X$" "Y$D0"TESTILAUSE";D6:" "  "NOPEUS:  ";RA;"") " "/? X$"":4000T (1)0.5 3060d 4200:4600n 3070x 4400 (1)0.253090 4800  (1)0.340305000:X$X$ (1)0.3406052005400:hA43:B50:1900:0A26:B35:1900:0 (1)0.64700:X$X$Q REN(1)0.355600]6000:\ (1)0.5X$X$" ""MONTA":4720f5800p(1)0.355600z6200: (1)0.7X$X$" ""HYVIN" 6400:A1:B10:1900:PA11:B17:1900:A18:B25:1900:4A75:B79:1900:JA58:B68:1900:`pA51:B57:1900:v8A69:B74:1900:A36:B42:1900:(# ANDREW,JOHN,JILL,SUSAN,XAVIER,VANESSA,BILL,PENNY,ZENA,JOE2#HULLU,PAKSU,AHNE,KOOKAS,SIISTI,LIKAINEN,VIISASO<#POIKA,NAINEN,PALVELIJA,KOULULAINEN,OPETTAJA,PROFESSORI,LAULAJA,KUNINGATARF#ITKI,NAUROI,KARKASI,KAATUI,KATSELI,PAKENI,KUORSASI,PUHUI,SEISAHTUI,VAPISIP#NOPEASTI,HITAASTI,MELUISASTI,KIVUTTOMASTI,OVELASTI,HUOLETTOMASTI,VAIVATTOMASTI(Z#HOTKI,NAPPASI,OSTI,VARASTI,MYI,HAKI,NOUTI,KEITTI_d#KANAA,ROMMIA,OLUTTA,MAITOA,LAMMASTA,PULLAA,KERMAAn#KAKSI,KOLME,4,5,6,7,8,10,13,18,20x#KAKKUA,PERUNAA,OMENAA,PIIRAKKAA,PIPARIA,TORTTUA#LIKAISTA,HOMEISTA,HUONOA,VANHAA,HIENOA "KONE TEKEE SINULLE":"MUUTAMIA KYSYMYKSIA."[:"KUN HALUAT UUDEN KYSY-";x("MYKSEN, PAINA JOTAIN "2"NAPPAINTA."3:" VASTAUKSESI JALKEEN"4:" PAINA AINA "5:"  RETURN NAPPAINTA"<::" ONNEA!"FJ112:Y$: PNZZ(N)*dJ1N:Z(N)0:3nSC0>xJ1NPZ(J)0 200WJu"VASTASIT 1.KERRALLA""OIKEIN";SC;"KYSYMYKSEEN.":"KYSYMYKSIA OLI";N:"OIKEIDEN VASTAUSTEN ""OSUUS";(100SCN0.5);"PROSENTTIA"D1(N(1))! Z(D)1200.C2Z(D)81200CT13VA$:A$""250`1000j1300t1600R1T1Z(D)0 SCSC1" R1 T1 Z(D)1:400, R1 3206T@Z(D)Z(D)1:120120"""",J021:7680J,160:38400J,C: UJ044022:7723J,160:38443J,C:}J2101:8164J,160:38884J,C:J440022:7702J,160:38422J,C:W1:(X$)120W1$P1:J2: K2.A$(X$,P,1):PP18A$"#" 1150BA$"%"JJW:K2:1070EL768022JK,(A$) 63:3840022JK,0:KK1OV1070U~[mJ112:X$:tNJ1DX$:Y$X$X$Y$:Y$ J"";(A$)P(A$): P01300*((A$,1))321330+A$(A$,1,P1).132162 (Y$,1)"%"1380><P2^F(Y$,P,1)"-"PP1:1350P(A$)((Y$,2,P1))(A$)((Y$,P1,(Y$))) 1500ZR0:dP1n(Y$,P,1)"#"1370xQP(Y$,Q,1)"%"QQ1:1410(Y$,P,QP)A$1500PQ1:1390:R1:%@?TS6(1R)(6(1))1P^J1S:Z$:ph"";Z$rT2 1750|"OIKEA VASTAUS ON":""; (Y$,1)"%"1710P1(Y$,P,1)"%"1750(Y$,P,1);:PP1:1690(Y$,2,(Y$)):1750A"PAINA NAPPAINTA":OX$"ABCD"WY$gX$Y$2050w"EI":2000"KYLLA" JOIKEIN,AIVAN,NIIN,HYVA,JUURI NIIN,OLET OIKEASSATEI,VAARIN,EI AIVAN,MIETIHAN VIELA,NO EI AIVAN,EI(#12C2#"JOS VIC MENEE%JUMIIN VOIT%AINA VAPAUTUA%%A)PAINAMALLA% RETURN"7#"%B)KATKAISEMALLA% VIRRAN%C)PAINAMALLA% RUN/STOP%#",B%#<#"MONTAKO MERKKIA%SOPII VICIN %RIVILLE?",%#,22%#F#"KUINKA MONTA%RIVIA MAHTUU VICIN%NAYTTOON?",%#,23%#HP#"TARVITSETKO%SHIFT -NAPPAINTA%SIIRTAESSASI KURSO-%RIA VASEMMALLE?",%#,KYLLA%K%#Z#"TARVITSETKO%SHIFT -NAPPAINTA%SIIRTAESSASI KURSO-%RIA OIKEALLE?","%#",EI%E%#d#"ONKO SHIFT-NAPPAIN%TARPEELLINEN SIIR-%RETTAESSA KURSORIA%YLOS","?%#",KYLLA%K%#?n#"ONKO SHIFT-NAPPAIN%TARPEELLINEN SIIR-%RETTAESSA KURSORIA%ALAS?",%#,EI%E%#x#"MITA TEKEE%CLR/HOME -NAPPAIN?%%A)TYHJAA NAYTON%B)SIIRTAA KURSORIN"}#"% VASEMPAAN YLAKUL-% MAAN%C)TUHOAA RIVIN%#",B%##"KUINKA TYHJENNAT%NAYTON?%%A)KATKAISET VIRRAN%B)PAINAT SHIFT JA% INST/DEL"5#"%C)SHIFT JA% CLR/HOME%#",C%##"KUN KIRJOITAT%MERKIN,SE SIJOIT-%TUU%%A)KURSORIN ALLE%B)VASEMMALLE%C)OIKEALLE"#"% PUOLELLE?%#","A%ALLE%#"#"MIKA KOODI ANTAA%PUNAISEN RAJAUKSEN%JA ORANSSIN TAUSTAN",%#,138%#B#"KUINKA SAAT%PUNAISEN KURSORIN?%%A)CTRL JA RED%B)CTRL JA 2%C)SHIFT JA RED"^#"%D)C= JA RED%#","A%#" "ANNA VAIKEUSASTE"Q :"(1 MIKALI YRITAT ":"ENSIMMAISTA KERTAA.)":DMe DM0 DM9 17 "ALUE ON 1-8.YRITA":"UUDELLEEN":DM:12S%(15),S$(15)BB120U$(34):D$(32)P1:D1"VAIKEUSASTE":" = ";DM=" KIRJOITA TARKASTI,":" MITA SEURAAVA PRINT-":" KOMENTO TUO ";r"NAYTTOON-"::" PAINA LOPUKSI";:" RETURN":J110:N%(J)0:N$(J)"":M(J)0:M$(J)"":MS$"":#Q$"+"U$" "U$"+"$A$"+"U$"&"U$"+"(P$"PRINT ":W$""2 (1)0.5 70<1000:AP$P$X$:W$W$(X)D$:X100X10020BB80^F2000:P$P$X$:W$W$Y$vP (1).5DDM130ZP$P$";"d(1).5120i1000nP$P$X$:W$W$(X):X100X10020s130x2000:P$P$X$:W$W$Y$E2011J110"N%(J)EN$(J)6M(J)E M$(J)?J,EI:P$SG$""mH$:A(1):H$""201(H$)13210(H$)20 206(G$)0201G$(G$,1,(G$)1):" ";:201H$;:G$G$H$:201 J(G$):(G$,1)D$G$(G$,1,J1):2107K(W$):(W$,1)D$W$(W$,1,K1):220FG$W$400QGG$""\L1J(G$,L,1)D$GG$GG$(G$,L,1) LWW$"""L1K,(W$,L,1)D$WW$WW$(W$,L,1)6L@GG$WW$ 600J:"VAARIN!"::"OIKEA VASTAUS ON"T:W$+Y DM0.25DMDM0.25K^:"PAINA JOTAIN NAPPAINTA"^hA$:A$""360gr900|:"OIKEIN!"DM9DMDM0.25350X:"OIKEIN,PAITSI":"VALILYONNIT.":"OIKEA VASTAUS ON"b:W$l350BB)"20 KYSYMYKSEN JALKEEN":"OLET NOSTANUT VAIKEUS-";A"ASTEEN ARVOON";DMtDM9"THIS IS AS HIGH AS YOU":"NEED GO"::"KAYTA UUTTA ARVOA,":"KUN SEURAAVAN KERRAN AJAT OHJELMAA"(1).7DDMDD1:1030 (1)0.7 DDM DD1:1030 1500:!1500:XX$X$:XXX+1500@(1)0.6 1070a$X$XX$"+"X$:XXXX:DD1:t.(1)0.510908X$XX$"-"X$:XXXX:BX$XX$"*"X$:XXXX:DD1:(1).5DDMDD1:1600(1).5DDMDD1:1600X(10(1))X$(X48):!@V1(10(1))4JV1(10(1))OTN%(V)0N$(V)""1610a^N%(V)01650scN%(V)D1610hX$(V64):XNS%(V):DD1:rN%(V)D|S%(P)V:S%(P1)XX:S$(P)XX$:PP21000PP2:VS%(P):XXS%(P1):XX$S$(P)NS%(V)X:N$(V)(V64)" = "X$2X$(V64):DD1:P(1).5DDMDD2:2030q(1)0.5 DDM DD2:2030}2500:2500:XX$X$:YY$Y$2500:(1)0.52060X$XX$Q$X$:Y$YY$" "Y$: X$XX$A$X$:Y$YY$"&"Y$: (1).5DDMDD2:2590. (1)0.5 DDMDD2:2590C Y$(26(1)65)[ X$(34)Y$(34):n V1(10(1))( M(V)0M$(V)"" 25902 M(V)02630< X$(V64)"$":Y$MS$(V):F M(V)D:S%(P)V:S$(P)XX$:S$(P1)YY$:PP2P 2000Z PP2:VS%(P):XX$S$(P):YY$S$(P1)>d MS$(V)Y$:M$(V)(V64)"$="X$Sn X$(V64)"$": "KONE TEKEE SINULLE":"MUUTAMIA KYSYMYKSIA."[:"KUN HALUAT UUDEN KYSY-";x("MYKSEN, PAINA JOTAIN "2"NAPPAINTA."3:"VASTAUKSESI JALKEEN"4:"PAINA AINA"5:"  RETURN NAPPAINTA"<::" ONNEA!"FJ112:Y$:PNZZ(N)&dJ1N:Z(N)0:/nSC0:xJ1NLZ(J)0 200SJfT$:T$""150"VASTASIT 1.KERRALLA""OIKEIN";SC;"KYSYMYKSEEN.":"KYSYMYKSIA OLI";N:"OIKEIDEN VASTAUSTEN ""OSUUS";(100SCN0.5);"PROSENTTIA" D1(N(1))0 Z(D)1200=C2Z(D)G1200RT13eA$:A$""250o1000y13001600R1T1Z(D)0 SCSC1" R1 T1 Z(D)1:400, R1 3206T@Z(D)Z(D)1:120120"""";J021:7680J,160:38400J,C: dJ044022:7723J,160:38443J,C:J2101:8164J,160:38884J,C:J440022:7702J,160:38422J,C:W2:(X$)100W1$P1:J2: K2.A$(X$,P,1):PP18A$"#" 1150#BA$"%"JJW:K2:1070TL768022JK,(A$) 63:3840022JK,0:KK1^V1070d~j|J112:X$:NJ1DX$:Y$X$X$Y$:Y$ J"";(A$)P(A$): P01300*((A$,1))321330#+A$(A$,1,P1)-.1321E2 (Y$,1)"%"1380M<P2mF(Y$,P,1)"-"PP1:1350P(A$)((Y$,2,P1))(A$)((Y$,P1,(Y$))) 1500ZR0:dP1n(Y$,P,1)"#"1370xQP(Y$,Q,1)"%"QQ1:1410(Y$,P,QP)A$1500#PQ1:1390.:R1:4@NTS6(1R)(6(1))1_^J1S:Z$:h"";Z$rT2 1750|"OIKEA VASTAUS ON":""; (Y$,1)"%"1710P1(Y$,P,1)"%"1750(Y$,P,1);:PP1:1690(Y$,2,(Y$)):1750P"PAINA NAPPAINTA":^X$"ABCD"fY$vX$Y$2050"EI":2000"KYLLA" JOIKEIN,AIVAN,NIIN,HYVA,JUURI NIIN,OLET OIKEASSATEI,VAARIN,EI AIVAN,MIETIHAN VIELA,NO EI AIVAN,EI (#9O2#"ONKO% X+1=X%LAILLINEN BASIC-%KOMENTO?","%A) KYLLA%B) EI%#"_7#"B%E%EI%#"<#"KUINKA NOPEA ON VIC%(KOMENTOA PER%SEKUNTI)?%%KARKEA ARVIO%RIITTAA","%#"A#"%50-150#"F#"MONTAKO KOMENTOA%VIC VOI SAMANAIKAI-%SESTI TALLENTAA?%"OK#"%A)NIIN MONTA KUIN% HALUAT%%B)10%%C)NIIN MONTA KUIN% MUISTIIN SOPII%#","C%#P#"KOMENNOT OVAT%MUISTISSA%%A)KIRJOITUS-% JARJESTYKSESSA%%B)RIVINUMEROIDEN% "U#"OSOITTAMASSA% JARJESTYKSESSA%%C) EI KUMMASSAKAAN%#","B%#"Z#"JOKAISEN RIVINUME-%RON ON PAATYTTAVA%NOLLAAN.%8_#"TOTTA VAI EI?%#","EI%E%#"d#"KUINKA HIDASTAT%OHJELMAN KULKUA?%%A)KIRJOITTAMALLA% HITAASTI R U N %%"i#"B)CTRL-NAPPAIMELLA%%C)VALILYONTINAPPAI-% MELLA%#","B%CTRL%#" n#"PUOLIPISTE PRINT-%KASKYN PERASSA%KERTOO KONEELLE:%%A)ALA ALOITA% UUTTA RIVIA%%as#"B)ALOITA UUSI RIVI%%C)SIIRRY SAMAN% RIVIN ALKUUN%#","A%#"x#"OHJELMAN SUORITUK-%SEN AIKANA MUUTTU-%JALLA VOI OLLA%%A)1 ARVO%%B)MONTA ARVOA"}#",% YKSI KERRALLAAN%%C)MONTA ARVOA % SAMANAIKAISESTI%#","B%#"F#"ONKO% LET G = G + 5%LAILLINEN BASIC-%KOMENTO?",%#,"KYLLA%TOSI%K%#" LAUSEET(LUKU 6)= COPYRIGHT (C) ANDREW COLIN 1981F N13SP(13,2)]2000f(100o-"".X$(X$,2,(X$)1)"."25000<::::::"SEURAAVAN LAUSEEN SAAT"F"PAINAMALLA JOTAKIN"H:"NAPPAINTA."KB0PX(1)ZA$:A$""80 0100!_409d LAUSEGENERAATTORICiX$""Vn (1)0.5300`x1100r(1)0.3700(1)0.5170A2:1000BA:1200:800A3:1000A4:1000800,12006(1)0.3700@(1)0.5370JA2:1000TBA:1100!^B0:800/rA3:1000=|A5:1000F800YA1:1000:900j (1)0.6 z*A6:1000:(1)0.5 A7:1000: ALIOHJELMA, JOKA VALITSEE SANAN LUETTELOSTA SATUNNAISMENETELMALLA. YP(A,1)((P(A,2)P(A,1)1)(1)):Z1Y:Y$:BB2X$X$" "Y$"A":B0:1030SX$X$" "Y$YuL MIESPUOLINEN SUBJEKTIQ(1)0.51120VA8:1000:`X$X$j (1)0.4A9:CB:1000:BCtA10:1000~ NAISPUOLINEN SUBJEKTI.(1)0.51220A11:1000:#X$X$D(1)0.4A12:CB:1000:BCUA13:1000:g TIEDON LUKUoX1zJ1NP(J,1)XX$X$"Z"XX1:2040 P(J,2)X1:XX1J* LAUSE X$ NAYTTOON SANOJA KATKAISEMATTA (X$)225020X$:0 (X$,23,1)"" 5050W(X$,1,22)5040X$(X$,(X$)23):a5000{(X$,22,1)" "5080(X$,1,21)X$(X$,23,(X$)22):5000P21(X$,P,1)" "PP1:5090(X$,1,P1) :X$(X$,P1,(X$)P)5000?(#LAULAA,HUUTAA,KIRKUU,HUOKAILEE,HIHITTAA,Zv2#SUUTELI,SYLEILI,TERVEHTI,IHAILI,TAPASI,ROHKAISI,Z<#PESI,PUKI YLLEEN,HEITTI POIS,SOVITTI,RIISUI,ZF#PAITANSA,KENKIAAN,TAKKIAAN,SAAPPAITAAN,PERUUKKIAAN,KELLOAAN,Z2P#PUSEROAAN,KENKIAAN,HATTUAAN,SILMALASEJAAN,SUKKIAAN,SAAPPAITAAN,ZvZ#PUISTOSSA,JOKA PAIVA,EILEN,VIIME VIIKOLLA,YLEISESSA SAUNASSA,Zd#KOKO AJAN,USEIN,KYLVYSSA,HILJAA,AANEKKAASTI,Zn#KALEVI SORSA,AJATOLLAH KHOMEINI,NICK NOLTE,KOJO,Zx# TYHMA,KARKEA,TUKEVA,PAKSU,TYPERA,KOMEA,UPEA,ZY#AUTONKULJETTAJA,PROFESSORI,LENTAJA,JALKAPALLOILIJA,KIRJAILIJA,Z#ANNELI SARI,JANE FONDA,ARMI AAVIKKO,VANESSA REDGRAVE,PRINSESSA ANNE,Z#UPEA,NATTI,RUMA,VAALEA,HEHKEA,Z#TYTTO,LAPPULIISA,BAARIMIKKO,RAHASTAJA,SIHTEERI,NEITI,Z "KONE TEKEE SINULLE":"MUUTAMIA KYSYMYKSIA."Y:"KUN HALUT UUDEN KYSY-"u("MYKSEN,PAINA JOTAIN "2"NAPPAINTA"3:"VASTAUKSESI JALKEEN"4:"PAINA AINA"5:"  RETURN -NAPPAINTA"<::" ONNEA!"FJ112:Y$:PNZZ(N)"dJ1N:Z(N)0:+nSC06xJ1NHZ(J)0 200OJl"VASTASIT 1.KERRLLA""OIKEIN";SC;"KYSYMYKSEEN.":"KYSYMYKSIA OLI";N;".":"OIKEIDEN VASTAUSTEN ""OSUUS";(100SCN0.5);"PROSENTTIA." D1(N(1)) Z(D)1200*C2Z(D)41200?T13RA$:A$""250\1000f1300p1600R1T1Z(D)0 SCSC1" R1 T1 Z(D)1:400, R1 3206T@Z(D)Z(D)1:120120""J021:7680J,160:38400J,C: HJ044022:7723J,160:38443J,C:pJ2101:8164J,160:38884J,C:J440022:7702J,160:38422J,C:W2:(X$)100W1$P1:J2: K2.A$(X$,P,1):PP18A$"#" 1150BA$"%"JJW:K2:1070GA$"\"A$(34)ML768022JK,(A$) 63:3840022JK,0:KK1WV1070]~cuJ112:X$:|NJ1DX$:Y$X$X$Y$:Y$ J"";P0:A$""G$:G$""1307R(G$).R20P0A$(A$,P1):PP1:" ";:1307p!(R64R91)(R47R58)(R32P0)PP1:A$A$G$:G$;:1307#R13P01307%((A$,1))32A$(A$,P1):PP1:1315'2 (Y$,1)"%"1380<P2F(Y$,P,1)"-"PP1:13501P(A$)((Y$,2,P1))(A$)((Y$,P1,(Y$))) 1500;ZR0:CdP1[n(Y$,P,1)"#"1370cxQP(Y$,Q,1)"%"QQ1:1410(Y$,P,QP)A$1500PQ1:1390:R1:@TS6(1R)(6(1))1^J1S:Z$:h"";Z$rT2 1750;|"OIKEA VASTAUS ON":"";R (Y$,1)"%"1710ZP1s(Y$,P,1)"%"1750(Y$,P,1);:PP1:1690(Y$,2,(Y$)):1750"PAINA NAPPAINTA":JOIKEIN,AIVAN,NIIN,HYVA,JUURI NIIN,OLET OIKEASSADTEI,VAARIN,EI AIVAN,MIETIHAN VIELA,NO EI AIVAN,EIL(#102#\TIIKERI\=\LEIJONA\%%TOTTA VAI EI?,%%#,EI%E%#<#5<7%%TOTTA VAI EI?,%%#,TOTTA%T%#F#7<=3%%TOTTA VAI EI?,%%#,EI%E%#P#"\HIIRI\=\HEVONEN\%%TOTTA VAI EI ?",%%#,EI%E%#=Z#"\UNICORN\<>7.3%%A)TOSI%B)EPATOSI%C)LAITON",%%#,LAITON%C%#d#"JOS X:LLA ON ARVO%73, X >= 73 ON%%A) TOSI%%B) EPATOSI",%%#,TOSI%A%T%#n#"JOS Y=37 JA Z=25% Y-3 < Z+5 ON%%A)TOSI%%B)EPATOSI",%%#,EPATOSI%B%E%# x#"\LAMP\>=\LAMPOON\%%TOTTA VAI EI?",%%#,EI%E%#b#"TUTKI OHJELMAA%%10 RS=5%20 PRINT RS,1/RS%30 RS=RS+2%40 IF RS<17THEN20%50 STOP"#"%%MONTAKO KERTAA SIL-%MUKKA SUORITETAAN?%%#",6%##"TUTKI OHJELMAA%%10 SJ$=\F\%20 PRINT SJ$%30 SJ$=\J\+SJ$+\K\%40 IFSJ$<\JJJ\%1#" THEN20%50 STOP%%MIKA ON VIIMEINEN%TULOSTUVA ARVO?%%#",JJFKK%#>'J1256J'J,(J)P$'