1 REMARK: LUODESOFT CREATIONS PRESENTS: 2 REMARK: ** ILPON SEIKKAILUT 1/1988 **(null)
2 A=A+1:IFA=1THENLOAD"ILPOCONTROL",8,1
4 IFA=2THENLOAD"ILPODISPLAY",8,1
6 CLR:GOSUB42000
100 SYS51176:POKE53265,27:POKE53270,8:PRINT"[147]";:GOSUB302
110 PRINT"     [174][184][185][175][185][170] [176][165][177][170][163][163][162] [162][182][175][185] [175][162][162][175][175][185][170][177][170]"
111 PRINT"     & [161][162][178][181][177][162][174][162][162][170] [161][166][163][161][177][163][163][183] [161][184][185][182][177][167][176]"
112 PRINT"[185][174][176] 2.":GOSUB50000
120 PRINT"[147][212]ERVETULOA [201]LPON SEIKKAILUIHIN!"
121 PRINT"[200]ALUATKO, ETT[ KERRON, MIT[ VIIME JAK-  SOSSA TAPAHTUI??? (K/E):?"
122 GOSUB51000:IFA$="E"THEN200
130 PRINT"[147][214]IIME JAKSOSSA [201]LPO SAI TEHT[V[KSEEN OT-TAA SELV[[, KUINKA JA MIKSI"
131 PRINT"3 GEOLOGIA SAI SURMANSA."
132 PRINT"[217]KSI GEOLOGEISTA OLI SUOMALAINEN, YKSI  TAAS NORJALAINEN JA YKSI OLI"
133 PRINT"AMERIKKALAINEN.":GOSUB50000
134 PRINT"[147][211]UOMALAINEN TY\SKENTELI [207]UTOKUMMUN PAL- VELUKSESSA."
135 PRINT"[193]MERIKKALAINEN OLI [163][166][180][163][162][177][170] [174][185][163][176]-HANKKEENASIANTUNTIJA JA NORJALAINEN
136 [153]"OLI TAAS ER[[N NORJALAISEN KAIVOSYHTI\N PALVELUKSESSA."
137 [153]"(null)IRJEPOMMIMURHIEN SYY SELVISI TAVATESSA-SI VANHAN YLIOPISTOHEILASI"
138 [153]"(null)EW (null)ORKISSA HOTELLISSA: ^GETOR+*NEWFRETHEN OLI   KOKO MURHAKETJUN TAKANA!"
139 [153]"(null)KANDIUM - TUO KULTAAKIN ARVOKKAAMPI SO-TAVARUSTELUUN K[YTETT[V["
140 [153]"ALKUAINE OLI MURHAAJIEN T[HT[IMESS[!":[141]50000
141 [153]"LOAD(null)APASIT SAMASSA HOTELLISSA..."
142 [153]"...VALI MUTTA KATSO ITSE ASC(null)(null)(null)(null)RIGHT$(null) 5/87!"
143 [153]"MID$OS SINULLA EI SIT[ OLE, NIIN TILAA:"
144 [153]"ASCLOPPIKSEN IRTONUMERON HINTAHAN ON 39:-"
145 [153]"JA TILAUSOSOITE L\YTYY VAIKKAPA TOIMI-"
146 [153]"TUKSEN SIVULTA. MID$A NYT PELAAMAAN RIGHT$(null)(null)(null)ATN!":[141]50000
200 :
210 [153]"LOAD(null)IIME KERRAN POLTTAVIKSI KYSYMYKSIKSI"
211 [153]"J[I, KUKA ON T[M[ SALAPER[INEN (null)(null)(null)(null)"
212 [153]"(null)(null)(null)VAL(null), JA KUINKA H[N LIITTYY T[H[N"
213 [153]"KETJUUN. (null)AIKKI SELVI[[ T[SS[ JAKSOSSA.":[141]50000
220 [153]"LOAD(null)LET RIGHT$LSMANIN KANSSA KYLM[SS[ HUONEESSA"
221 [153]"ALASTI. (null)ALOT OVAT SAMMUNEET JA"
222 [153]"RIGHT$LSMANIN HERMOT ALKAVAT PETT[[."
223 [153]"(null)IT[ TEET?":[153]"1) LEFT$AKKAAT OVEA":[153]"2) (null)UTKIT ULOSP[[SYTEIT["
224 [153]"3) (null)AIVAT KORVAASI"
225 [141]51000:[139]A$[178]"2"[167]235
226 [139]A$[178]"1"[167]230
227 [139]A$[178]"3"[167][153]"LOAD(null)AIVAT KORVAASI. (null)E PIT[ISI PUHDISTAA.":[141]50000
228 [137]220
230 [153]"LOADLEFT$AKKAAT OVEA, MUTTA SIIT[ EI OLE MIT[[N HY\TY[.":[141]50000:[137]220
235 [153]"LOAD(null)UTKIT ULOSP[[SYTEIT[. (null)\YD[T LAATIKON"
236 [153]"TAKAA PIENEN KOLON, JOSTA PELTISEIN[ ON"
237 [153]"ILMEISESTI RUOSTUNUT. (null)OLOSTA N[KYY"
238 [153]"VALOA.":[141]50000
239 [153]"LOAD(null)RIT[TK\ LAAJENTAA AUKKOA? (null)YLL[ VAI EI?":[141]51000
240 [139]A$[179][177]"K"[167]220
250 [153]"ATNVAAT VAROVASTI PELTEJ[. "
251 [153]"(null)[ET, KUINKA VALO ULKOA VOIMISTUU KOKO  AJAN.":[141]50000
252 AV[178]AV[170]1:[139]AV[179]5[167]239
253 [153]"LOAD(null)OPULTA KOKO PELTISEIN[ R[M[HT[[ ALAS   JA P[[SET ULOS.":[141]50000
254 [153]"LOAD(null)TATKO RIGHT$LSMANIN MUKAAN, (null)/VAL?"
255 [141]51000:[139]A$[179][177]"E"[167]259
256 [153]"LOADRIGHT$LSMAN RAIVOSTUU JA NAPAUTTAA SINULTA   TAJUN KANKAALLE."
257 [153]"(null)UN HER[[T, ROISTOT OVAT TEILANNEET RIGHT$LS-MANIN VIEREESI JA NYT ONKIN"
258 [153]"^NEW+FRE+ COSFREPOS=POS^NEW. LEFT$(null)(null)(null)(null) (null)(null)(null)(null)!!.":[141]50000:[137]1000
259 [139]A$[179][177]"K"[167]254
260 [153]"LOAD(null)TAT RIGHT$LSMANIN MUKAAN. (null)AKENETTE SYR-"
261 [153]"J[ISI[ (null)EW (null)ORKIN KORTTELEITA. (null)[[SET-"
262 [153]"TEKIN IHMISTEN ILMOILLE. RIGHT$HMISET KUMMA"
263 [153]"KYLL[ TUIJOTTAVAT SINUA JA KUMPPANIASI.":[141]50000
264 [153]"LOAD(null)UMMASTELET, MISS[S SIT[ NYT TAAS ON"
265 [153]"VIKAA JA SAAT VASTAUKSEN KATSOMALLA"
266 [153]"ALASP[IN. (null)LIT JO TOTTUNUT ALASTOMUU-"
267 [153]"TEEN NIIN, ETT[ EP[HUOMIOSSA OLIT"
268 [153]"UNOHTANUT ETSI[ JOTAIN P[[LLESI.":[141]50000
270 [153]"LOAD(null)USTAMAIJA KORJAA TEID[T TALTEEN."
271 [153]"(null)OLIISIASEMALLA SELVIT[T KAIKEN JA"
272 [153]"L[HDETTE RIGHT$LSMANIN KANSSA PUETTUINA"
273 [153]"HOTELLIISI. (null)APAAT SGN>ABS>+ORN AULASSA."
274 [153]"LEFT$ELENA PYYT[[ SINUT HUONEESEENSA DRIN-"
275 [153]"KILLE. RIGHT$LSMAN SAA J[[D[ ULKOPUOLELLE.":[141]50000
276 [153]"LOADMID$UOTTE ^NEW+FRE+ TILAAMAASI SAMPPANJAA,"
277 [153]"JUURI OIKEAN LAATUISTA JA MAKUISTA.     (null)AIKKI TUNTUU OLEVAN HYVIN.
278 PRINT"...[214]AI ONKO SITTENK[[N??? [202]OKIN ON"
279 PRINT"HULLUSTI. [200]ELENALLA PITI OLLA VAIN"
280 PRINT"YKSI RAKASTAJA, [174][162][170][166]. [211][201][204][212][201] TOISESTA"
281 PRINT"HUONEESTA TULEE KOLME HYVINPUETTUA MIES-";
282 PRINT"T[ ASEET K[DESS[ OSOITTAEN SINUA.":GOSUB50000
283 PRINT"[147][205]IT[ TEET?":PRINT"1) [211]Y\KSYT [200]ELENAN LUOKSE."
284 PRINT"2) [207]TAT PISTOOLISI TAKIN TASKUSTA."
285 PRINT"3) [206]OSTAT K[DET KOHTI KATTOA.":GOSUB51000:IFA$="1"THEN290
286 IFA$="2"THEN296
287 IFA$="3"THEN300
288 GOTO283
290 PRINT"[147][211]Y\KSYESS[SI [200]ELENAN LUOKSE [200]ELENA"
291 PRINT"OTTAA TASKUSTAAN K[SIASEEN JA TAIKOO"
292 PRINT"PUNAISEN NAPIN OTSAASI. [203]UOLET SIIHEN"
293 PRINT"PAIKKAAN.":GOSUB50000:GOTO1000
296 PRINT"[147][207]LET OTTAMASSA JUURI ASETTA TASKUSTA,"
297 PRINT"KUN MUISTAT, ETTEI SIELL[ MIT[[N ASETTA"
298 PRINT"OLE OLLUTKAAN. [200]ASSU JUTTU. [205]IEHET"
299 PRINT"HOMMASIVAT SINUT ENKELIKUOROON.":GOSUB50000:GOTO1000
300 GOSUB302:GOTO310
302 POKE53280,0:POKE53281,0:POKE52340,0
303 FORL=0TO7:POKE53287+L,11:NEXT
304 POKE646,11:RETURN
310 PRINT"[147][206]OSTAT K[DET KOHTI KATTOA. [217]HT[KKI["
311 PRINT"TUNNET HUIMAUSTA. [202]OTAKIN AINETTA OLIKINSIIS SUJAUTETTTU JUOMAASI.."
312 PRINT"[212]UNNET, KUINKA TAJU HEIKKENEE JA LOPULTAKATOAA SAMOIN KUIN JALAT";
313 PRINT" ALTASI.":GOSUB50000
318 PRINT"[147][203]UN HER[[T, TOTEAT OLEVASI ARKUSSA.":SYS824
319 PRINT"[203]UUNTELET. [204]ENTOKONEEN [[NI. [202][193][193][200][193]."
320 PRINT"[210]UUMISARKKUTEMPPU, VANHA KIKKA MUILUTTAA";
321 PRINT"HENKIL\IT[ ILMATEITSE MAASTA.":PRINT"[203]UNPA TULLIVIRANOMAISET ";
322 PRINT"OLISIVAT TAJUN-":PRINT"NEET KURKISTAA SIS[LLE. [214]AAN EI...":GOSUB50000
323 PRINT"[147][212]UTKIT, SAISIKO ARKUN AUKI.":GOSUB50000
324 PRINT"[147][197]T SAA SIT[ AUKI.":GOSUB50000
325 PRINT"[147][204]UOVUTAT JA P[[T[T NUKAHTAA ODOTELLESSA-SI KOHTALOA.":GOSUB50000
330 PRINT"[147][193]IKA KULUU.":PI$="?PIC ? 3PIC*":YL=48:AL=98
331 VI$="[207]LET LENTOKONEESSA JOSSAIN KORKEALLA.":GOSUB20000
340 PRINT"[205]ATKA KEST[[...":SYS824
341 PRINT"[205][[R[NP[[ ON KUITENKIN TUNTEMATON."
342 PRINT"[208][[T[T TAAS NUKKUA.":GOSUB50000
343 SYS879:PRINT"...[205]ATKA KEST[[ KAUAN...":GOSUB50000:SYS1008
350 POKE52336,0:PRINT"[147][200]ER[[T SIIHEN, KUN JOKU AVAA ARKUN KANT-TA.":GOSUB50000
351 PRINT"[147][212]UNNET OLOSI EP[MIELLYTT[V[KSI, SILL["
352 PRINT"ET VOI MUUTA KUIN ODOTTAA MIT[ SEURAA-  VAKSI TAPAHTUU.":GOSUB50000
355 PRINT"[147][193]RKKUA AVATAAN.":PI$="?PIC ? BASA*":YL=192:AL=255
356 VI$="[207]LET MAHTAVASSA JALOKIVIN KORISTELLUSSA PALATSISSA.":GOSUB20000:SYS862
360 PRINT"[201]TSE [207]TTO [210]\SEL ISTUU UIMA-ALTAANSA REU-NALLA.":POKE53280,3
361 PRINT"[214]ARTIJAT NOSTAVAT SINUT ARKUSTA.":POKE52340,3
362 PRINT"[207]LET AIVAN TURTANA MATKASTA.":PRINT"[207]TTO [210]\SEL K[SKEE VARTIJOIDEN"
363 PRINT"VIED[ SINUT SELVI[M[[N MATKAN":PRINT"RASITUKSISTA."
364 PRINT"[208]ER[[N H[N HUUTAA '[180][177][178][178][176] [175][162][162][175][175][185][170][177][170] !!"
365 PRINT"[185][172][185][163][176][170] [174][162][170][184][182][163][176] [163][162][177][163][185][181][176]. [174][177][170] [163][176][161][162][176]":PRINT"[174][166][166][174][163][162][170] [174][162][170][184][163].'":GOSUB50000
366 SYS862
370 PRINT"[211]EURAAVANA AAMUNA HER[[T KOVALLA VUO-   TEELLA."
371 PRINT"[193]URINKO PAISTAA L[MMITT[V[STI HUONEESI  IKKUNOISTA. [214]AIN KALTERIT";
372 PRINT" OVAT TIELL[":PRINT"AAMUAURINGON KULLANKELTAISEN HOHTEEN"
373 PRINT"HUONEESI T[YTT[MISEKSI.":PRINT"[203]UULET OVEN AVAUTUVAN."
374 PRINT"[207]TTO [210]\SEL JA [200]ELENA SAAPUVAT KOLMEN"
375 PRINT"TEHOKKAASTI ASEISTETUN MIEHEN KANSSA    KOPPIISI.":GOSUB50000:SYS862
376 PRINT"[193]IOT NOUSTA YL\S, MUTTA VAHDIT KONEPIS- TOOLEINEEN SAAVAT SINUT";
377 PRINT" PYSYM[[N":PRINT"S[NGYSS[.. [212]AITAA OLLA ENSIMM[INEN KER- ";
378 PRINT"TA, KUN TUNNET OLOSI EP[MIELLYTT[V[KSI  JUURI [174][166][170][165][183][174][174][166]!!!"
379 GOSUB50000:SYS862
380 PRINT"[205]IT[ TEET?":PRINT"1) [203]YSYT, MIT[ [200]ELENA T[[LL[ TEKEE."
381 PRINT"2) [203]YSYT, MIT[ [210]\SEL TAHTOO SINUSTA."
382 PRINT"3) [203]YSYT, MITEN [210]\SEL LIITTYY N[IHIN TA-   PAHTUMIIN."
383 PRINT"4) [203]YSYT, MIKSI [200]ELENA ON [210]\SELIN PUO-     LELLA."
384 PRINT"5) [203]YSYT, MISS[ T[[LL[ ON VESSA."
385 GOSUB51000:IFA$="4"THEN391
386 IFA$="5"THEN393
387 IFA$="2"THEN396
388 IFA$="3"THEN401
389 IFA$<>"1"THEN385
390 GOTO420
391 SYS862:PRINT"'[210]AHAN JA VALLAN VUOKSI', SANOO [200]ELENA   JA AMPUU SINUT."
392 PRINT"[206]AISET, NIIST[ EI KUKAAN OTA SELV[[...":GOSUB50000:GOTO1000
393 SYS862:PRINT"[214]ARTIJAT OPASTAVAT SINUT VESSAAN. [207]N TO-DELLA IHANAA P[[ST[";
394 PRINT" VIHDOINKIN VESSAAN,":PRINT"SILL[ YHDESS[K[[N [201]LPOSSA [201]LPOA EI OLE"
395 PRINT"P[[STETTY VESSAAN ASIALLE!!!":GOSUB50000:SYS862:GOTO380
396 SYS862:PRINT"[212]AHDON TIETOJA [211]UOPOSTA JA KUINKA PALJONSE TIET[[ MINUSTA!"
397 PRINT"[211]AATKIN KOHTA VASTATA KUUTEEN TUSINAAN  KYSYMYKSEEN. [202]OLLET SUOSTU";
398 PRINT" YHTEISTY\H\N,";:PRINT"ANNAN [200]ELENAN TOIMIA KIRURGINA, SIN[    ";
399 PRINT"TIETYSTI PREPARAATTINA... [203]UULOSTAA HY- V[LT[, VAI???":GOSUB50000
400 SYS862:GOTO380
401 SYS862:PRINT"[207]TTO SANOO: '[206]O, VOINHAN SEN KERTOA,"
402 PRINT"KOSKA T[[LT[ ET EL[V[N[ POISTU. [207]LEN KE-HITT[M[SS[ UUTTA LASER-";
403 PRINT"TEKNOLOGIAN":PRINT"IHMETT[, ASETTA, JOKA SATELLIITTIA"
404 PRINT"APUNAK[YTT[EN PYSTYY TUHOAMAAN MINK[    TAHANSA ALUEEN HETKESS[."
405 GOSUB50000:SYS862:PRINT"";
406 PRINT"[205]UTTA ENH[N [167][162][170][166] NYT [170][162][162][170] [178][176][176][161][176] OLE,    RIITT[[, ETT[ KOKO MAAPALLO"
407 PRINT"ANTAUTUU MINULLE. [200]AA, VOIN KUVITELLA   JO, KUINKA KANSAT JUHLIVAT"
408 PRINT"[167][162][170][184][176]. [167][162][170][166] OLEN VIISAIN JA MAHTAVIN!!":GOSUB50000:SYS862
409 PRINT"[206]ORJAN KAIVOKSESSANI ON ASEENI VIIMEINENOSA, SATELLIITTI, KOHTA";
410 PRINT" VALMIS.":PRINT"...[202]A SITTEN SIN[ OLET HISTORIAA, YST[- V[NI!'":T=1
411 GOSUB50000:SYS862:GOTO380
420 SYS862:PRINT"'[205]Y [204]ADY, VASTAA SIN[!', HUUDAHTAA [210]\SELILOISESTI."
421 GOSUB50000:SYS862
422 PRINT"[200]ELENA ALOITTAA: '[210]AHAHAN T[SS[ RATKAI- SEE, IDIOOTTI! ...[206]IIN, ";
423 PRINT"JA LUONTAISEDUT...":PRINT"[211]AAN [207]TTO-MUSSUKALTA [203][193][201][203][197][206], MIT[ HALUAN";
424 PRINT"JA V[H[N ENEMM[NKIN... [207]LI MUUTEN MUKAVAY\ SIELL[ [206]YKISS[...'"
425 PRINT"[210]\SEL KESKEYTT[[. '[211]IIN[S KUULIT, POJU. T[[LL[ EI HINTA EST[";
426 PRINT" OSTAMISTA.'":GOSUB50000:SYS862
427 PRINT"[212]OTEAT, ETT[ HE YRITT[V[T OSTAA [174][162][170][184][163][161][162][170]RUOTUUNSA. [205]IT[ TEET??"
430 PRINT"1) [204]IITYT HEIHIN.":PRINT"2) [197][212] LIITY HEIHIN."
431 PRINT"3) [208]AKENET.":PRINT"4) [206]APPAAT [200]ELENAN PANTTIVANGIKSI."
432 PRINT"5) [203]ATSELET IKKUNASTA ULOS.":IFN=2THENPRINT"6) [211]Y\KSYT S[NKYSI ALLE."
433 GOSUB51000:SYS862:A=VAL(A$):ONAGOTO440,445,447,450
434 IFA$="5"THENN=N+1:ONNGOSUB460,462
435 IFN=2ANDA=6THEN470
436 IFN=3THEN2000
437 GOSUB50000:SYS862:PRINT"[205]IT[ TEET??":GOTO430
440 PRINT"[207]TTO ILAHTUU JA SANOO: '[206]OIN KUNNON     AGENTTI K[YTT[YTYY!!'"
441 GOSUB50000:SYS862:PRINT"[211]ITTEN ER[S VARTIJA KUISKAA [207]TOLLE JO-  TAIN..."
442 PRINT"'[207]LEMME TULLEET UUTEEN TULOKSEEN. [204]AH-   JOTTAVISSA OLEVAAN"
443 PRINT"AGENTTIIN EI VOI LUOTTAA', SANOO [207]TTO JAAMPUU SINUT."
444 GOSUB50000:GOTO1000
445 PRINT"'[197]MME HALUA PAKOTTAAKAAN SINUA, JA SIK- SIP[...', SANOO [207]TTO..."
446 GOSUB50000:SYS862:PRINT"...JA AMPUU SINUT.":GOSUB50000:GOTO1000
447 PRINT"[197]T EHDI MIHINK[[N, KUN KONEKIV[[RIT JA  SIN[ ULVAHTAVAT."
448 GOSUB50000:GOTO1000
450 PRINT"[206]APPAAT [200]ELENAN PANTTIVANGIKSI JA SANOT TAPPAVASI [200]ELENAN, JOLLEI"
451 PRINT"[207]TTO SUOSTU NEUVOTTELEMAAN KANSSASI.":GOSUB50000
452 PRINT"[200]ELENASTA HUOLIMATTA [207]TTO OTTAA ASEEN   TASKUSTAAN JA ANTAA SEN"
453 PRINT"SOITTAA SURULLISEN S[VELM[NS[.":GOSUB50000:GOTO1000
460 PRINT"[203]ATSOESSASI IKKUNASTA ULOS N[ET [162][182][174][167][176][170][162][170]HEILUTTELEVAN K[SI[[N."
461 RETURN
462 PRINT"[203]ATSOT UUDELLEEN. [201]LSMAN OSOITTAA K[SIL-L[NS[ ALASP[IN JA YRITT[["
463 PRINT"SANOA JOTAIN H[T[ISESTI. [202]OTAIN ON SIIS TAPAHTUMASSA.":H=1:RETURN
470 SYS862:PRINT"[200]YPP[[T S[NKYSI TAAKSE.":FORG=1TO500:NEXT
471 SYS824:FORG=1TO64:POKE53280,G:POKE52340,G:NEXT
472 SYS1008:POKE52336,0:POKE53280,0:POKE52340,0
480 PRINT"[147][200]AVAITSET OLEVASI [210]\SELIN LIS[KSI AINOA,JOKA HOKSASI SUOJAUTUA."
481 GOSUB50000:PRINT"[147][206]YT EI KUITENKAAN OLE AIKAA OTTAA [210]\SEL"
482 PRINT"SILL[ PALATSIN VARTIJAT KUULUVAT JO PYS-SYT PAUKUTEN LAUKKAAVAN"
483 PRINT"PITKIN TORNIN RAPPUSIA. [201]LSMANILLAKIN ONKIIRE.":GOSUB50000
484 PRINT"[147][211]Y\KSYTTE [201]LSMANIN KANSSA TUKKA VINOSSA R[NNI[ YH[ ALAS."
485 GOSUB50000:H=H+1:IFH<10THEN484
490 PRINT"[147][211]AAVUTTE ALAS. [211]Y\KSYTTE SALAMANNOPEASTIPALATSIN MUUREILLE."
491 PRINT"[201]LSMAN HUUTAA JOTAIN TURKIKSI JA SAMAN- TIEN VET[[ SINUT POIS";
492 PRINT" MUURIN LUOTA.":GOSUB50000:SYS824:FORL=1TO600:NEXT:SYS1008
493 PRINT"[147][203]UULUU KONEEN M\YRY[MIST[ JA SAMANTIEN  MUURI HAJOAA R[J[HDYKSEN";
494 PRINT" VOIMASTA.":GOSUB50000
495 PRINT"[147][206][ET PANSSARIN, JOKA ON AMPUNUT MUURIIN MIEHENMENT[V[N REI[N."
496 GOSUB50000:PRINT"[147][211]Y\KSYTTE REI[ST[ ULOS JA MENETTE PAI-  KALLA ODOTTAVAA";
497 PRINT"N AMERIKANRAUTAAN.":PRINT"[201]LSMAN TARTTUU RATTIIN.":PI$="?PIC ? 3PIC*"
498 YL=106:AL=178:VI$="[201]LSMAN KAAHAA AUTOLLA POIS MAISEMISTA.":GOSUB50000
499 PRINT"[147][205]AISEMAT VILIST[V[T.":GOSUB20000:FORL=53287TO53295:POKEL,7:NEXT
500 POKE53280,14:POKE52340,14
501 PRINT"[207]LETTE JO 30 KILOMETRIN P[[SS[ [210]\SELIN  PALATSISTA.";:GOSUB50000
510 PRINT"...[203]UNNES HUOMAATTE HELIKOPTERIN TAKANA-P[IN. [211]E ALKAA TULITTAA."
511 PRINT"[201]LSMAN KIIHDYTT[[ ROMUNSA VOIMAT [[RIM- MILLEEN.";
512 PRINT"                               "
513 PRINT"[212]UNNET, KUINKA HELIKOPTERI SAAVUTTAA    TEIT[ NOPEASTI.";
514 PRINT"                        "
515 PRINT"[203]UULET, KUINKA LUOTEJA ROPISEE TAKANAN- NE."
516 PRINT"[212]ILANNE N[YTT[[ PAHALTA!![145][145]":GOSUB50000
519 SYS824:FORL=1TO64:POKE52341,L:NEXT
520 SYS1008:FORL=1TO32:POKE52340,L:POKE53280,L:NEXT
521 POKE52336,0
522 PRINT"[147][204]OPULTA LUOTISADE OSUU AUTOONNE JA AUTO ALKAA HEITTELEHTI[."
523 GOSUB50000
524 PRINT"[147][201]LSMAN YRITT[[ PIT[[ AUTON TIELL[, MUTTATILANNE N[YTT[[ TOIVOT";
525 PRINT"TOMALTA.":GOSUB50000
526 PRINT"[147][200]YPP[[TTE AUTOSTA ULOS ER[[N HEIN[KASAN KOHDALLA JA AUTONNE JATKAA";
527 PRINT" MATKAANSA":PRINT"SAVIMAJAN, TURKKILAISEN TALON, SEIN[[N"
528 PRINT"R[J[HT[EN KAPPALEIKSI HELIKOPTERISTA"
529 PRINT"LENT[NEEN POMMIN [190][176][162][161][184][163][184][161][174][177][174][163][176] [176][174][162][176][176][170]..":GOSUB50000
539 PRINT"[147][208]Y\RRYT MATKAN RASITUKSIIN JA ENERGIAN  PUUTTEESEEN.":GOSUB50000
540 PRINT"[147][207]LET TAJUTON.":PI$="?PIC ? ISTANB*"
541 YL=32:AL=255:VI$="[177][172][177][174][174][166][174][162] [176][190][176][184][163][184][184] [184][170][177][182][167][162][177][170] [181][176] [174][177][162][161][161][176][162][182][184][181][177][170] [162][174][163][176][170][191][184][182]."
542 GOSUB41000:GOSUB20000:FORL=1TO10000:NEXT:POKE198,0
543 IFPEEK(52339)<>0THEN543
544 VI$="[208]AINA JOTAIN...":V=1:GOSUB20000
545 IFPEEK(198)>0THEN550
546 IFPEEK(52339)<>0THEN545
547 FORL=1TO5000:NEXT:GOTO544
549 PRINT"";:RETURN
550 POKE52338,178:GOSUB42000
551 GOSUB549:PRINT"[200]ER[[T SIIHEN, KUN ILTARUSKO PEITT[["
552 PRINT"[201]STANBULIN TAIVAAN.[145][145]":GOSUB50000
553 GOSUB549:PRINT"[197]NSIMM[INEN KYSYMYKSESI ONKIN 'KUINKA"
554 PRINT"L\YSIT MINUT??'    [145][145]":GOSUB50000
555 GOSUB549:PRINT"[201]LSMAN VASTAA, ETT[ H[N EP[ILI [200]ELE- "
556 PRINT"NAA JO ALUSSA.     [145][145]":GOSUB50000
557 GOSUB549:PRINT"...[211]EN J[LKEEN [201]LSMAN VAIN SEURASI, "
558 PRINT"MINNE SINUA VIETIIN.[145][145]":GOSUB50000
559 POKE52336,0
560 PRINT"[147][201]LSMAN SIVELEE KASVOJASI JOLLAIN ANTI-  SEPTISELLA AINEELLA."
561 PRINT"[203]YSELET TILANNETTA JA KERTAAT ASIOITA.  [201]LSMAN ON HYVIN KIINNOSTUNUT"
562 PRINT"KUULEMISTASI ASIOISTA.":GOSUB50000
563 IFT=1THEN570
564 PRINT"[147][201]K[V[ KYLL[ ET TIED[, MITEN JATKAA T[ST[ETEENP[IN, SILL[ AINOASTAAN"
565 PRINT"[210]\SEL TIESI, MISS[ HEID[N TUKIKOHTANSA  ON. [207]LISI PIT[NYT OLLA ";
566 PRINT"UTELIAAMPI":PRINT"TAVATESSASI [210]\SELIN.":GOSUB50000
567 PRINT"[147][208]OMOSI [211]UOMESSA EROTTAVAT SINUT TOIMES- SI.":GOSUB50000
568 PRINT"[147][210]\SEL SAA MAAILMAN HALLINTAAN JA MUUTEN-KIN ON MAAILMANLOPUN";
569 PRINT" MEININKI!":GOSUB50000:GOTO1000
570 PRINT"[147][203]UULLESSAAN, MIST[ ON KYSYMYS, [201]LSMAN   SOITTAA PARI PUHELUA JA "
571 PRINT"ILMOITTAA, ETT[ SAAT PASSISI JA MUUT    TAVARASI TAKAISIN."
572 PRINT"[206]E TULEVAT SUORAAN [213][211][193]STA ERIKOISKURII- RIPOSTINA [201]LSMANILLE."
573 GOSUB50000
580 PRINT"[147][211]ANOT TYYTYV[SI KUITENKIN VAIN HAMMAS-  HARJAAN, LOMPAKKOON JA";
581 PRINT" SINIVALKOISEEN":PRINT"SINET\ITYYN TASKUKOKOISEEN PAKETTIIN."
582 GOSUB50000
583 PRINT"[147][201]LSMAN KATSOO SINUA HYMYILLEN.":GOSUB50000
584 PRINT"[147]'[211]AITKO TAAS TUKKUTARJOUKSENA JOKA-AGEN-TIN-H[T[VARAPAKKAUKSEN???'"
585 PRINT"...KYSYY [201]LSMAN.":GOSUB50000
586 PRINT"[147][205]Y\NN[T JA SANOT, ETT[ [193][201][196][211]IN TAKIA NII-T[...":GOSUB50000
590 PRINT"[147][211]OVITTE TAPAAVANNE [208]OHJOIS-[206]ORJASSA     [193]LTAN KAUPUNGISSA."
591 GOSUB50000
600 PRINT"[147][205]IT[ TEET???":PRINT"1) [204][HDET SATAMAAN."
601 PRINT"2) [205]ENET JUNA-ASEMALLE.":PRINT"3) [203]ULJET LENTOKENT[LLE."
602 PRINT"4) [205]ATKAAT RAVINTOLAAN.":PRINT"5) [212]ALSIT ALKOHOLILIIKKEESEEN."
603 PRINT"6) [208]ATIKOIT [211]UOMEN SUURL[HETYST\\N.":PRINT"7) [212]ILAAT TAKSIN."
604 GOSUB51000:IFA$<"1"ORA$>"7"THEN604
605 A=VAL(A$):ONAGOTO609,612,609,614,630,636,642
609 PRINT"[147][208][[STY[SI M[[R[NP[[H[SI VARKAAT RY\ST[- V[T JA MUKILOIVAT ";
610 PRINT"SINUT PAHASTI.":PRINT"[197]T VOI JATKAA TUOSSA KUNNOSSA PELI[!!"
611 GOSUB50000:GOTO1000
612 PRINT"[147][212]OTEAT, ETT[ [197][212] HALUA L[HTE[ JUNALLA    N[HTY[SI NE.":GOSUB50000
613 GOTO600
614 PRINT"[147][211]AAVUT RAVINTOLAAN. [200]OVIMESTARI OSOITTAASINULLE P\YD[N JA KYSYY";
615 PRINT" TILAUSTASI.":GOSUB50000
616 PRINT"[147] --------- [212][184]R[203][197][183]'S A' LA [195][176]R[163][197] --------":PRINT"[198]ERYDHYE (1)"
617 PRINT" ---------------------------------------[151]"
618 PRINT"[212]ARJOILIJA KYSYY, MIT[ HALUAT TILATA.":PRINT"1) [198]ERYDHYE:T["
619 PRINT"2) [197]T MIT[[N.":PRINT"[212]ARJOILIJA KEHUU [198]ERYDHYE:T[."
620 GOSUB51000:IFA$="1"THEN624
621 IFA$<>"2"THEN620
622 PRINT"[147][208]OISTUT RAVINTOLASTA NOPEASTI.":GOSUB50000:GOTO600
624 PRINT"[147][203]YSYT MIT[ [198]ERYDHYE ON, JA TARJOILIJA   VASTAA SEN OLEVAN KANAKEIT";
625 PRINT"TOA":PRINT"TURKKILAISITTAIN.":GOSUB50000
626 PRINT"[147][211]Y\TY[SI ANNOKSESI OLET ERITT[IN KYLL[I-NEN. [205]AKSAT JA POISTUT."
627 R=1:GOSUB50000:GOTO600
630 PRINT"[147][197]T L\YD[ ALKOHOLILIIKETT[ N[ILT[ KULMIL-TA, MUTTA ER[[ST[ SUPERMAR-"
631 PRINT"KETISTA L\YD[T ALKOHOLIA ENEMM[N KUIN   KOTIPUOLEN [193]LKON SUUR";
632 PRINT"VARASTOSTA.":GOSUB50000
633 PRINT"[147][202]UOVUT KUITENKIN NIIN PAHASTI, ETT[ ET  VOI JATKAA PELI[."
634 PRINT"[207]MA VIKASI....":GOSUB50000:GOTO1000
636 PRINT"[147][211]AAVUTTUASI [211]UOMEN SUURL[HETYST\\N TA-  PAAT [205]OSKOLAN.":GOSUB50000
637 PRINT"[147]'[162][182][175][185]!!! [167][162][163][166] [174][162][170][166] [163][166][166][182][182][166] [163][177][177][163]???',     KYSYY POMOSI.":GOSUB50000
638 PRINT"[147][214]ASTAAT OLEVASI SUORITTAMASSA TEHT[V[[SIJA OLET JO PITK[LL[."
639 PRINT"[203]ERROT KAIKEN JA LAADIT [197]NSION KANSSA   [211]UUNNITELMA [161][162][161][161][176][190][162][162][163][185][174][177][170]."
640 PRINT"[212]EHT[V[[SI KUULUU MENN[ MAHDOLLISIMMAN  SUORAAN [193]LTAAN JA HOITAA"
641 PRINT"HOMMA KOTIIN!!!!":GOSUB50000:T=1:GOTO600
642 PRINT"[147][208][[T[T SIIS TILATA TAKSIN.":PRINT"[207]DOTETTUASI N. 1/2 TUNTIA,"
643 PRINT"KUULET JONKIN TRAKTORIN L[HESTYV[N.":GOSUB50000
644 PRINT"[147][197]I, EIH[N SE MIK[[N TRAKTORI OLE, VAAN  SINUN [163][176][161][174][162][174][162]...":GOSUB50000
645 PRINT"[147][212]URKKILAINEN TAKSI, TUO VANHA AMERIKKA- LAINEN FARMARIAUTO, OTTAA"
646 PRINT"SINUT KYYTIINS[.":PRINT"[193]HTAUDUTTUASI KANOJEN SEKAAN PYYD[T"
647 PRINT"TAKSIAJAJAA VIEM[[N SINUT L[HIMP[[N     [194]OSPORINSALMEN YLI MENEV[[N";
648 PRINT" LAIVAAN.":PRINT"'[181][177][177][174] [174][168][168][178]', SANOO KUSKI.":GOSUB50000
650 IFR=1THEN660
651 PRINT"[147][205]ATKALLA SINULLE TULEE KOVA N[LK[.":GOSUB50000
652 PRINT"[147][193]LATKIN KATSELLA SOPIVAA KANAA PAISTIKSISINULLE."
653 PRINT"[212]AKSINKULJETTAJA KATSELEE SINUA EP[LUU- LOISESTI.":GOSUB50000
654 PRINT"[147][207]TAT MEHEVIMM[N KANAN JA KER[[T PARI    JUURI MUNITTUA MUNAA ";
655 PRINT"TAKAPENKILT[.":GOSUB50000
656 PRINT"[147][212]AKSISUHARI SUUTTUU, ALKAA [HL[MS[HL[[- M[[N JA LOPULTA KALAUTTAA"
657 PRINT"KALLOOSI HIUKAN LIIANKIN KOVAA.":GOSUB50000
658 PRINT"[147][211]EURAUKSENA SIIT[ P[[SET TAIVAALLISEEN  AGENTTIYHDISTYKSEEN."
659 GOSUB50000:GOTO1000
660 PRINT"[147][211]AAVUTTE ER[[SEEN [214][193][210][211][201][206] H[M[R[[N SATA- MAKORTTELIIN.":GOSUB50000
661 PRINT"[147][211]UHARI AJAA SINUT PIENEN PURREN LUO JA  SANOO, ETT[ 'SERKKUNI"
662 PRINT"KULJETTAA TEID[T ERITT[IN HALVALLA SAL- MEN YLI.'":GOSUB50000
663 PRINT"[147][203]IIT[T JA SERKKUPOIKA MIEHIST\INEEN"
664 PRINT"(JOTKA N[YTT[V[T AIVAN MERIROSVOILTA)"
665 PRINT"IRROITTAVAT VENEEN SATAMASTA.":GOSUB43000:GOSUB50000
666 PRINT"[147]...[207]LETTE MENNEET JO HYV[N MATKAA SALMENYLI, KUN POLIISIVENE K[[N";
667 PRINT"TYY":PRINT"TEIT[ KOHTI JA PIST[[ MELKOISEN ULINAN  P[[LLE."
668 GOSUB44000:GOSUB50000
670 PRINT"[147][205]IEHIST\ H[T[[NTYY JA 'SERKKU' HUUTAA   JOTAIN TURKIKSI.":GOSUB50000
671 PRINT"[147][203][[NNYTTE KOHTI ETEL[[. [217]HDESS[ HETKESS[PIENEST[ PURRESTA ON TUL";
672 PRINT"LUT":PRINT"KANTOSIIPIALUS.":GOSUB40000:GOSUB50000
673 PRINT"[147][193]LUS L[HTEE KIIT[M[[N T[YSI[ KOHTI [214][LI-MERTA."
674 PRINT"[203]YSYT KAPTEENILTA, MIHIN OLEMME MATKALLAJA KAPTEENI (SERKKU) VASTAA,"
675 PRINT"ETT[ [210]HODOKSEN SAARELLE. [200]EID[N SALAKUL-JETTAJAPORUKKANSA OLESKELU"
676 PRINT"[212]URKISSA ON NYT LIIAN VAARALLISTA HEID[NHENGILLEEN...":GOSUB50000
679 PRINT"[147][205]ATKA KEST[[ KAUAN...":GOSUB50000
680 FORL=1TO10:PRINT"[147]...JA KEST[[...":GOSUB50000:NEXT
681 PRINT"[147]...[203]UNNES TULLAAN [210]HODOKSEN SAAREN L[-  HELLE. [211]EN HAVAITSET";
682 PRINT" LOKKIPARVISTA":PRINT"TAIVAALLA.":GOSUB50000
683 PRINT"[147][211]AAVUTTE [210]HODOKSEN SATAMAAN.":YL=32:AL=106
684 VI$="[170][166][177][163] [174][176][163][176][167][176][174][174][176] [174][176][163][185][181][176] [163][184][178][162][174][163][177][181][176], [161][183][167][167][177][170][162][166] [163][184][178][161][161][162][182][176][162][174][162][176], [181][176] [175][176][178][162] "
685 VI$=VI$+"[161][178][177][162][161][161][176][182][176][162][174][163][176]...":PI$="?PIC ? RHO*":GOSUB43000:GOSUB20000
686 FORL=0TO7:POKE53287+L,0:NEXT:SYS879:GOSUB45000
687 FORL=1TO14000:NEXT:VI$="[208]AINA JOTAIN...":V=1:GOSUB20000:GOSUB51000
690 PRINT"[159][197]IK\ OLEKIN HUONO KUVA???"
691 PRINT"[197]T SAA MIT[[N SELV[[ [210]HODOKSEN SATAMAS- TA, ETH[N???"
692 PRINT"[212]OIVOISITKO KUVASTA SELVEMM[N???":PRINT"[206][IHIN KYSYMYKSIIN VASTASIT";
693 PRINT" VARMASTI    [163][162][177][163][183][174][163][162]!!!!":GOSUB50000
694 POKE52336,0
695 PRINT"[147][152][211]EN TAKIA SAATKIN NYT ODOTTAA [198]LOPPIS   3/88:AA! [201]LPO JATKUU ENSI";
696 PRINT" NUMEROSSA!!":PRINT"[212]APAAMISIIN.":GOSUB50000:GOTO1004
999 REM(null)
1000 POKE52336,0
1001 PRINT"[147][163][166][167][166][170][160][174][177][162][161][161][176][162][182][184][170][160][182][166][175][162][161][166][183][167][162][170][177][170]"
1002 PRINT"[177][172][177][182][182][183][163][163][166][166][160][178][162][174][161][162][177][170][160][185][163][163][176][167][162][174][163][176]."
1003 PRINT"[174][162][170][166][160][185][163][162][163][160][181][176][160][167][177][170][177][163][162][163][160][175][177][182][162][170]..."
1004 PRINT"[185][170][170][177][161][174][162][160][174][162][170][184][182][182][176][160][185][170][160][167][176][180][172][185][182][182][162]- "
1005 PRINT"[174][184][184][174][160][175][177][182][176][163][176][160][175][177][182][162][160][184][184][172][177][182][182][177][177][170][160][160][160]"
1006 PRINT"[180][176][182][184][163][161][185].. [190][176][174][163][176][176][160][161][183][182][182][166][160][163][176][162][160][177][162]"
1007 GOSUB51000:IFA$<>"E"ANDA$<>"K"THEN1007
1008 IFA$="K"THENRUN6
1009 PRINT"[147][162][182][175][185][170][160][163][177][161][162][190][166][163]:[160][160][160][160][160][160][160][160]"
1010 PRINT"[163][185][170][162][160][182][184][185][172][177][160]([185][180][181][177][182][167][176] & [163][176][162][172][177])"
1011 PRINT"[174][176][167][175][174][176][160][174][176][167][162][182][176][160][160][160]([174][175][182][162][163]-[175][178][165].)":GOSUB45000:GOSUB50000
1012 GOSUB51000:SYS64738
2000 SYS824:FORL=1TO255:POKE53280,L:NEXT
2001 SYS1008:POKE52336,0
2002 PRINT"[147][212]ORNISSA R[J[HT[[ POMMI, JOKA TAPPAA    KAIKKI SIELL[ OLIJAT."
2003 PRINT"[211]E OLI MENOA SE...":GOSUB50000:GOTO1000
5000 GOTO50000
20000 REM * KUVANLATAUS *
20001 POKE52336,0:VI=1:IFVI$=""THENVI=0:GOTO20004
20002 VI$=VI$+"@"
20003 FORL=1TOLEN(VI$):POKE679+L,ASC(MID$(VI$,L,1)):NEXT:SYS896
20004 POKE52337,YL:POKE52338,AL
20005 IFV=1THENV=0:GOTO20008
20006 FORL=1TOLEN(PI$):POKE50151+L,ASC(MID$(PI$,L,1)):NEXT
20007 POKE50167,15:POKE648,4:SYS52224:SYS58784:SYS65412
20008 SYS51176:GOSUB302:SYS52352:POKE52336,1:POKE52339,VI:RETURN
30000 C$=CHR$(34):PRINT"S0:ILPO II":OPEN15,8,15,"S0:ILPO II":GOSUB30010
30001 PRINT"R0:ILPO II":PRINT#15,"R0:ILPO II=ILPO1/88":GOSUB30010
30002 PRINT"SAVE":SAVE"ILPO1/88",8,1:GOSUB30010:PRINT"V[197]":VERIFY"ILPO1/88",8,1
30003 GOSUB30010
30004 PRINT"[211]Y\T[ [198][205]2!!":GOSUB50000:GOSUB30010:PRINT"S0:ILPO1/88"
30005 PRINT#15,"S0:ILPO1/88":GOSUB30010:PRINT"SAVE":SAVE"ILPO1/88",8,1
30006 GOSUB30010:PRINT"VERIFY":VERIFY"ILPO1/88",8,1
30007 GOSUB30010:CLOSE15:END
30010 INPUT#15,A,B$,C,D:PRINTA;B$;C;D:RETURN
40000 REM * MOLY 1. *
40001 FORL=54272TO54296:POKEL,0:NEXT
40002 S=54272:POKES+14,5:POKES+18,16:POKES+3,1:POKES+24,143:POKES+6,240
40003 POKES+4,85:FR=1225
40004 FORT=1TO400:FQ=FR+PEEK(S+27)+3.5:HF=INT(FQ/256):LF=FQ-HF*256
40005 POKES,LF:POKES+1,HF:NEXT
40006 POKE54296,0:RETURN
41000 REM * MOLY 2. *
41001 FORL=54272TO54296:POKEL,0:NEXT
41002 S=54272:POKES+14,5:POKES+18,16:POKES+3,1:POKES+24,143:POKES+6,240
41003 POKES+4,85
41005 POKES,10:POKES+1,200
41006 RETURN
42000 REM * MOLYT POIS *
42001 FORL=54272TO54296:POKEL,0:NEXT:POKE54296,0:RETURN
43000 REM * MOLY 3. *
43001 FORL=54272TO54296:POKEL,0:NEXT
43002 S=54272:POKES+14,5:POKES+18,16:POKES+3,1:POKES+24,143:POKES+6,240
43003 POKES+4,85
43005 POKES,81:POKES+1,03
43006 RETURN
44000 REM * MOLY 4. *
44001 FORL=54272TO54296:POKEL,0:NEXT
44002 S=54272:POKES+1,100:POKES+5,219:POKES+15,28:POKES+24,15:POKES+4,85
44003 FORT=1TO5000:NEXT:POKES+4,18
44004 REMFORT=1TO1000:NEXT
44006 RETURN
45000 REM * MOLY 5. *
45001 FORL=54272TO54296:POKEL,0:NEXT
45002 S=54272:POKES+1,130:POKES+5,9:POKES+15,30:POKES+24,15
45003 FORT=1TO12:POKES+4,21
45004 FORT=1TO1000:NEXT:POKES+4,20
45005 FORT=1TO1000:NEXT
45006 RETURN
50000 REM * GET *
50001 V=PEEK(646):PRINT"[159][223][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][223]"
50002 PRINT"[221][156][192][192][192][192][192][158] [175][176][162][170][176] [181][185][163][176][162][170] [170][166][175][175][166][162][170][163][166].. [156][192][192][192][192][192][159][221]"
50003 PRINT"[223][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][223]":POKE646,V
50004 POKE198,0:WAIT198,1:POKE198,0:RETURN
51000 REM * GET+ANSWER *
51001 A$="":POKE198,0:WAIT198,1:GETA$:RETURN