1 DIM P(4),P1(4):POKE53281,0:POKE53280,11:V$=" " 3 GOSUB 131 5 GETA$:IFA$=""THEN5 7 P(0)=1065:P(1)=1393:P(2)=1713:P(3)=1845:P(4)=1240:GOSUB67:FORI=1TO4:P1(I)=P(I) 9 POKEP(I),81:POKEP(I)+54272,6:NEXT:POKEP(0),42:POKEP(0)+54272,7:P1(0)=P(0):NN=0 11 FORI=1TO4:A=INT(4*RND(1)):IFA=0THENP1(I)=P1(I)-40 13 IFA=1THENP1(I)=P1(I)+40 15 IFA=2THENP1(I)=P1(I)-1 17 IFA=3THENP1(I)=P1(I)+1 19 IFPEEK(P1(I))<>32THENP1(I)=P(I):GOTO23 21 POKEP(I),32:POKEP1(I),81:POKEP1(I)+54272,6:P(I)=P1(I) 23 NEXT:NN=NN+1:IFNN>100THEN45 25 A=15-(PEEK(56320)AND15):IFA=1THENP1(0)=P1(0)-40 27 IFA=2THENP1(0)=P1(0)+40 29 IFA=4THENP1(0)=P1(0)-1 31 IFA=8THENP1(0)=P1(0)+1 33 IFPEEK(P1(0))<>32THENP1(0)=P(0):GOTO37 35 POKEP(0),32:POKEP1(0),42:POKEP1(0)+54272,7:P(0)=P1(0) 37 B=-40:C=B:GOSUB47:B=-1:C=B:GOSUB47:B=40:C=B:GOSUB47:B=1:C=B:GOSUB47:GOTO11 39 PRINT"[159]HYVA SELVISIT!! VOIT LUKEA KUULLUSTELUN" 41 GETA$:IFA$=""THEN41 43 GOTO117 45 PRINT"[159]ETANA!!! NYT MENI AIVAN LIIKAA AIKAA!!":FORI=0TO2000:NEXT:GOTO63 47 IFPEEK(P(0)+B)<>32THEN51 49 B=B+C:GOTO47 51 IFPEEK(P(0)+B)=81THEN57 53 IFPEEK(P(0)+B)=43THEN39 55 RETURN 57 FORI=P(0)+B-CTOP(0)STEP-C:POKEI,46:POKEI+54272,15:POKE53280,1:POKE53280,11 59 NEXT 61 PRINT"[159]MOKASIT!! POLIISI PAASI AMPUMAAN SINUT!":FORI=0TO2000:NEXT 63 GETA$:IFA$=""THEN63 65 GOTO3 67 PRINT"[147][149][176][192][192][192][192][174][176][192][192][192][192][178][192][192][192][192][192][192][192][178][192][192][192][192][192][178][192][192][192][192][178][192][192][192][192][192][192][192][192][174]"CHR$(142); 69 PRINT"[221] [221][221] [221]"V$"[221] [221] [221]"V$" [221]"; 71 PRINT"[173][178][192][174] [221][173][192][192][174] [221] [221] [176][192][174] [176][174] [221] [192][192][192][189] [176][178][192][178][192][174] [221]"; 73 PRINT"[176][189] [221] [173][192][192][174][221] [221] [221] [221] [176][174] [221][221]"V$" [173][189] [173][192][189] [221]"; 75 PRINT"[221] [221] [221][221] [192][192][179] [173][192][189] [173][189] [221][221] [173][178][178][192][192][192]"V$" [221]"; 77 PRINT"[171][192] [176][174] [173][189] [221]"V$" [221][221] [173][189] [176][192][192][192][192][192][192][179]"; 79 PRINT"[221] [176][192][189][221] [221] [192][178][192][192][192] [192][179][171][192] [176][192] [221] [221]"; 81 PRINT"[221] [192][177][192][192][189] [176][192][192][189] [221] [221] [173][189] [176][174] [221] [171][192][192][192][192][174] [221]"; 83 PRINT"[221]"V$"[221] [171][192] [176][192][174] [192][177][189] [176][177][178][192][192][192][189] [221]"; 85 PRINT"[221] [176][174] [176][174] [221] [176][179] [221] [221] [221] [176][174] [192][192][189] [221] [221]"; 87 PRINT"[173][192][189][221] [221][173][192][174] [221] [221][173][192] [221] [221] [221][221] [176][192][174] [221] [176][178][192] [221]"; 89 PRINT"[176][192][192][189] [173][192][192][189] [221] [221] [173][192][192][192][177][189] [173][174][173][174] [176][192][178][189] [221][221] [221]"; 91 PRINT"[221]"V$" [173][192][179] [221] [221]"V$" [173][192][189] [173][192][189] [221][221] [176][189]"; 93 PRINT"[221] [176][174] [176][192][192][174] [221] [171][192][192][192][192][192][192][192][174]"V$" [176][189][221] [221] "; 95 PRINT"[221] [173][179] [173][192][192][177][192][192] [171][192][174] [171][192][192][192][192][192][192][192][219][192][192][192][192][192][174] [221] [173][192][179] [221] "; 97 PRINT"[221] [221]"V$" [173][174][221] [221]"V$"[221] [221] [221] [221] [173][174]"; 99 PRINT"[221] [176][177][192][192][174] [176][192][174] [221][221] [173][192] [192][178][192][192] [221] [176][192][174] [221] [221] [221]"; 101 PRINT"[221] [221] [221] [221] [171][192] [173][189] [221] [221] [221][154]+[149][221] [171][192][192][192][189] [176][174] [221]"; 103 PRINT"[221] [221] [221] [173][192][189] [221] [176][192][174] [171][192][192] [221] [221] [221] [173][189] [221]"; 105 PRINT"[221] [221]"V$"[192][192][192] [173][178][189] [221] [173][192][192][192][189] [192][178][192] [221]"; 107 PRINT"[171][192][192] [221] [176][174] [176][174] [221] [221] [176][192][174]"V$" [221] [176][174] [221]"; 109 PRINT"[221] [221] [221][221] [173][189] [176][192][192][174] [221] [176][179] [173][192][189] [176][174] [176][174] [176][179] [176][219][189] [221]"; 111 PRINT"[221] [192][192][189] [221][221] [173][192][192][189] [173][189] [221][221] [221][221] [173][189] [173][189] [221]"; 113 PRINT"[221] [221][173][192][192][174] [221] [176][192][192][192][189][221] [221][221]"V$"[176][189]"; 115 PRINT"[173][192][192][192][192][192][189] [173][192][192][192][192][192][192][177][192][192][192][192][189] [173][192][189][173][192][192][192][192][192][192][192][189]":RETURN 117 NS$=" [151] [206]APPAIMELLA SEURAAVA SIVU ":A=1 119 ON A GOSUB163,189,211,233,261,291,323 121 GETA$:IFA$=""THEN121 123 IF A$="-"THENA=A-1:IFA=>1GOTO119 125 IFA<1THEN117 127 A=A+1:IFA<8THEN119 129 GOTO361 131 PRINT"[147][154][176][192][178][192][178][192][178][192][178][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][178][192][178][192][178][192][178][192][174]"CHR$(14); 133 PRINT"}[176][189][176][189][176][189][176][189] crakerin[160]kuullustelu[154] [173][174][173][174][173][174][173][174]}"; 135 PRINT"[173][177][192][177][192][177][192][177][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][177][192][177][192][177][192][177][189]"; 137 PRINT" [159]eNNEN KUIN VOIT ISKEA RASVAISET SORME-"; 139 PRINT"SI KUULLUSTELUPOYTAKIRJAAN SINUN ON SEL-"; 141 PRINT"VITTAVA ARKISTOHUONEESEEN, SOKKELOISEN"; 143 PRINT"TOIMISTORAKENNUKSEN LAPI." 145 PRINT" [212]OIMISTOSSA LIIKKUU MYOS 4[154] POLIISIA"; 147 PRINT"[159]SATTUMANVARAISESTI JA TYPERASTI, KUTEN"; 149 PRINT"OIKEAT[154] POLIISITKIN[159]. [202]OS JOUDUT NAKOETAI-"; 151 PRINT"SYYDELLE[154] POLIISISTA[159], SE AMPUU SINUT, KU-TEN ..." 153 PRINT" [193]RKISTO ON SINISELLA PLUSSALLA ([154]+[159]) VA-RUSTETTU HUONE." 155 PRINT" [201]TSE OLET KELTAINEN TAHTI ([158]*[159]) JA OH-"; 157 PRINT"JAAT ITSEASI JOYSTICKILLA." 159 PRINT" [211]TICKI KANNATTAA TUNKEA PORTTIIN 2." 161 PRINT" [151] [208]AINA JOTAIN NAPPAINTA ":RETURN 163 PRINT"[147] [155] [207]LET NYT ARKISTOLLA JA HYLLYSTA LOYTYY"CHR$(14); 165 PRINT"CRAKERIN KUULLUSTELU. vALITETTAVASTI JO-"; 167 PRINT"KU ON KAYTTANYT ENSIMMAISET SIVUT VESSA-"; 169 PRINT"PAPERINA JA ET TIEDA KUKA ON KUULLUSTEL-"; 171 PRINT"TAVA CRAKKERI JA ETTA KUULLUSTELU ON TA-"; 173 PRINT"PAHTUNUT TAMMIKUUN PUOLIVALISSA." 175 PRINT" [155][193]LAT SIIS LUKEA KUULLUSTELUA.[151]":FORI=0TO39:PRINT"-";:NEXT 177 PRINT"[154][208]OLIISI: [211]ITA ON TULLUT CRAKKAILTUA,VAI?"; 179 PRINT"[129][195]RAKKERI: [206]O KYL MA NYT JOTAIN." 181 PRINT"[154][208]: [205]ILLOIN TAMA RIKOLLINEN TOIMINTA AL-KOI? [205]IKA OLI ENSIMMAINEN?" 183 PRINT"[129][195]: [197]N MUISTA ENAA KUNNOLLA. [211]IITA ON PA-"; 185 PRINT"RI KOLME VUOTTA. sE OLI vicILLA JOTAIN"; 187 PRINT"ENSIMMAISIA.":PRINTNS$:RETURN 189 PRINT"[147][154][208]: [205]IKA SE [214][201][195] ON? [208]UHU KUUSNELOSESTA,"; 191 PRINT"ALAKA YRITA JOHTAA MEITA HARHAAN!" 193 PRINT"[129][195]: [206]O VAIKEA MUISTAA. [202]OTAIN HELPPOJA NEOLI KUMMINKIN." 195 PRINT"[154][208]: [205]ISTA OHJELMAT HANKITAAN? [193]SIANTUNTI-"; 197 PRINT"JA LAUSUNNOSSA SANOTAAN, ETTA TARVITAANALKUPERAISKAPPALEKIN." 199 PRINT"[129][195]: [203]YLLA SITA AINA JOLTAIN KAVERILTALOYTYY." 201 PRINT"[154][208]: [212]AIDAT VALEHDELLA, ETTEI VAIN VARAS-TETTAISI LIIKKEISTA?" 203 PRINT"[129][195]: [197]I NYT SELLASTA. [202]OSKUS OSTETAAN JA"; 205 PRINT"SITTEN, EI TOI HYVA, JA PALAUTETAAN." 207 PRINT"[154][208]: [211]INA TAIDAT KUULUA JOHONKIN RIKOLLIS-"; 209 PRINT"KOPLAAN?":PRINTNS$:RETURN 211 PRINT"[147][129][195]: [202]OO, TAVALLAAN.":PRINT"[154][208]: [205]IKA ON TUNNUS?" 213 PRINT"[129][195]: [197]N MA TIEDA VIITTIIKS SITA SANOA." 215 PRINT"[154][208]: [197]T VAI SANO!! [203]YLLA MEILLA ON KEINOT!" 217 PRINT"[155](KUULLUSTELTAVAA PAMPUTETAAN)" 219 PRINT"[154][208]: [208]AALLIKKO KASKI JATKAA KUULLUSTELUA,"; 221 PRINT"JUURI KUN OLI KIVAA! [200]MMMR. [205]ITA KAIKKEAOLET CRAKKAILLUT? [208]ALJONKIN?" 223 PRINT"[129][195]: [203]YL NYT LAHELLA SATAA, KASETTEJA E-"; 225 PRINT"NEMMAN JA DISKETTEJA JONKIN VERRAN." 227 PRINT"[154][208]: [202]A MIKA OLI TYON ALLA JUURI ENNEN PI-"; 229 PRINT"DATYSTA? TAI MIKA ON VIIMEISIN?" 231 PRINT"[129][195]: [214]IIMEISIN ON [194]LADE [210]UNNER.":PRINTNS$:RETURN 233 PRINT"[147][154][208]: [205]IKAAN EI MUKA OLLUT TYON ALLA?" 235 PRINT"[129][195]: [197]I NE YLEENSA KESTA KAUAA. [211]E ON MEL-"; 237 PRINT"KEEN TUNTI, KUN EI NE VIITTI PALJOO SUO-"; 239 PRINT"JAA NIITA. [214]IIME VIIKOLLA MA DUUNASINTON YHDEN DISKIN." 241 PRINT"[154][208]: [203]AYTATKO JOTAIN APUOHJELMIA TOIMIN-NASSASI?" 243 PRINT"[129][195]: [202]OO, KYLLA MA KAYTAN. [212]OTA.... EKAKS"; 245 PRINT"PITAA OTTAA SEMMOSELLA KASET TO DISK OH-"; 247 PRINT"JELMALLA SE BOOTTI JA SIT SEN JALKEEN"; 249 PRINT"LAHTEE TSIIKAA MITA SE TEKEE. sIT MA"; 251 PRINT"KAYTAN OMAA KONEKIELIMONITORIA." 253 PRINT"[154][208]: [202]ATKA TUNNUSTAMISTA, KUN KERRAN VAUH-TIIN PAASIT." 255 PRINT"[129][195]: [197]KA SIIRRETAAN.... [206]IIKU... [206]O JOS SE"; 257 PRINT"ON DISKETTI GAME NIIN SITTEN LAHETAAN"; 259 PRINT"TSIIGAA MITA SE TEKEE, KUN TIEDETAAN ...":PRINTNS$:RETURN 261 PRINT"[147][129][195]: ... MIKA PITAA LADATA NIIN SIT PYSTY-"; 263 PRINT"TAAN LAHTEE SEURAA MITA SE TEKEE JA SIT"; 265 PRINT"POISTAA SIELTA SE SUOJAUS TAI KIERTAA"; 267 PRINT"JOTENKIN TAI TEHDA OHJELMA, JOKA KOPIO"; 269 PRINT"SEN DISKETIN. mUT JOS SE ON JOKU KASETTI"; 271 PRINT"NIIN SIITA PITAA TEHDA LEVYVERSIO." 273 PRINT"[154][208]: [197]TKO TEE MITAAN KASETILLE, KAIKKI LE-VYLLE, VAI?" 275 PRINT"[129][195]: [197]I KASETILTA KASETILLE OIKEESTAAN KO-"; 277 PRINT"PIOIMISTA, KUN VOI OTTAA AUDIO-KOPION."; 279 PRINT"sE ON NOPEIN JA HELPOIN TAPA, MUT EI NE"; 281 PRINT"OO AINA HELPPOA KOPSATA KASETILTA DIS-KILLE." 283 PRINT"[154][208]: [203]UN JOKU OHJELMA ON CRAKATTU, NIINMITEN SITA LEVITETAAN?" 285 PRINT"[129][195]: [205]A ANNAN SEN JOLLEKIN KAVERILLE, JOKA"; 287 PRINT"ANTAA ETEENPAIN JA SE ANTAA ETEENPAIN JA"; 289 PRINT"ETEENPAIN.":PRINTNS$:RETURN 291 PRINT"[147][154][208]: [214]AI NIIN, ETTEI VAIN OLISI OLEMASSA'LEVITYS MAFIAA'?" 293 PRINT"[129][195]: [197]I, SE OIS VAHAN RIKOLLISTA, VARMAAN." 295 PRINT"[154]p: sINA OLET VARMASTI EPAONNISTUNUT JOS-"; 297 PRINT"SAIN? TAI AINAKIN OLLUT VAIKEUKSIA." 299 PRINT"[129][195]: [217]LEENSA [196]ATASOFTIT ON ERITTAIN VAI-"; 301 PRINT"KEITA. sILLOIN KUN TULI bRUCE lEE NIIN"; 303 PRINT"SITA MA EN OSANNUT TEHDA MUTTA PUOLVUOT-"; 305 PRINT"TA MYOHEMMIN TULI dATASOFTILTA YKS TOI-"; 307 PRINT"NEN KASETTI JOSSA OLI SAMA SUOJAUS, NIIN"; 309 PRINT"SIT MA SAIN SEN TEHTYA JA MUISTIN, ETTA"; 311 PRINT"SAMALLA TAVALLA SE [194]RUCEKIN OLIS MENNYT." 313 PRINT"[154]p: sINAHAN TEET OMIA OHJELMIA. eIKO OLE"; 315 PRINT"IKAVAA JOS JOKU CRAKKAILEE NIITA?" 317 PRINT"[129][195]: [203]YSYMYS ON SIITA, ETTA MA EN OO LAIT-"; 319 PRINT"TANUT NIITA SILLATAVALLA MYYNTIIN, ENKA"; 321 PRINT"MA OO TEHNYT NIIHIN SUOJAUKSIA NIIN ...":PRINTNS$:RETURN 323 PRINT"[147][129][195]: .... SE ON VAHAN SILLEEN TALLEEN. [211]E"; 325 PRINT"ON IHAN SAMA MULLE ET CRAKKAAKS TAI KOP-"; 327 PRINT"SAAKS JOKU NIITA KOSKA TAVALLAAN NE TUO"; 329 PRINT"MAINETTA ENEMMANKIN, KUN RUPEE TEKEE"; 331 PRINT"MYOHEMMIN HYVII OHJELMII NIIN JENGI TIE-"; 333 PRINT"TAA ETTA SE SAATTAA OLLA HYVAA SOFTAA JA"; 335 PRINT"OSTAA. [211]IT NIIHIN VOI TEHDA SELLAISET"; 337 PRINT"SUOJAUKSET ET SIT NIITA EI PURA ITSEKAAN" 339 PRINT"[154][208]: [207]NKO SELLAINENKIN MAHDOLLISTA?" 341 PRINT"[129][195]: [206]O KYL NYT OMAT SUOJAUKSET AINA PUR-"; 343 PRINT"KAA MUT KYL SA PYSYT TEKEE NIIN VAIKEEKS"; 345 PRINT"ET SE ON ERITTAIN HANKALAA." 347 PRINT"[154][208]: [200]ALUAISIT VARMAAN ANTAA ALOITTELEVIL-"; 349 PRINT"LE CRAKKAREILLE NEUVOJA JA VIHJEITA?" 351 PRINT"[129][195]: [203]ANNATTAA MIELELLAAN ALOITTAA HEL-"; 353 PRINT"POISTA, JOS SELLAISTA SATTUU LOYTAA JA"; 355 PRINT"KONEKIELTA ON PAKKO OSATA[151] [129] JA KANNATTAA"; 357 PRINT"TUTKIA MUITTEN OHJELMIA, NIIN OPPII KO-"; 359 PRINT"NEKIELTA JOS EI ENNEN SITA OSAA.":PRINTNS$:RETURN 361 PRINT"[147] [152][206]YT ON KAYNYT NIIN, ETTA ROTAT OVAT"; 363 PRINT"SYONEET LOPUT KUULLUSTELUSTA, JOTEN SESIITA." 365 PRINT" [206]YT VOIT TEHDA ESIM. SEURAAVAA:" 367 PRINT"  1 [146] [153]LUKEA KUULLUSTELUN UUDESTAAN" 369 PRINT"  2 [146] [153]PALATA SISALLYLUETTELOON" 371 PRINT"  3 [146] [153]SAMMUTTAA TIETOKONEEN" 373 PRINT" [152][212]EE VALINTASI!" 375 GETA$:IFA$<"1"ORA$>"3"THEN375 377 IFA$="1"THENA=INT(3*RND(1))+1:ONAGOTO117,3,117 379 IFA$="3"THENPRINT"[147] [206]O, SAMMUTA KONEESI [206][217][212]!":SYS64738 381 POKE203,51