1 REMARK: RESTAUROINTI BY TONI LUODE, 2 REMARK: COPYRIGHT BY PROTOCOL PROD.OY 8 IFA>0THEN100 9 SYS64789:SYS65409:SYS64931:POKE53280,0:POKE53281,0:POKE198,0 10 PRINT"[147][158][190][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][188]"; 11 PRINT"[170][146] [198]LOPPY [205]AGAZINE, [208][204] 1, 02631 [197][211][208][207][207] [180]"; 12 PRINT"[187][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][172]" 13 PRINT"[212]URBOLATAUS EI TOIMI VALTTAMATTA" 14 PRINT"128[196]:SSA EIKA 1570/1571:SSA. [212]URBO" 15 PRINT"TOIMII LAHINNA 1541:SSA JA 1540:SSA.[145][145][145][145][145][145]" 16 PRINT"[200]ALUATKO TURBOLATAUKSEN, [203]YLLA VAI [197]I? ";:OPEN1,0 18 GET#1,CBM$:IFCBM$=""ORCBM$<>"K"ANDCBM$<>"E"THENPOKE204,.:GOTO18 19 POKE204,1:CLOSE1:CBM=1:IFCBM$="E"THENCBM=0 20 PRINT"[147][214]ALIKON KAIKKIEN OSIEN LATAUDUTTUA" 21 PRINT"PAINA [210][197][212][213][210][206]IA PAASTAKSESI KANSIKUVASTA" 22 PRINT"VALIKKOON." 23 PRINT"[202]A NYT IHAN ETUKATEEN KAIKILLE OIKEIN" 24 PRINT"MUKAVAA [202]OULUA JA ILOISTA UUTTAVUOTTA" 25 PRINT"TOIVOO TOIMITUS!!!" 100 A=A+1:ONAGOTO110,120,130,170 110 LOAD"FMTURBO",8,1 120 IFCBM=1THENSYS52704 122 LOAD"GRAPH.DISPLAY",8,1 130 POKE49875,CBM:SYS50560:F$="ALATEKSTI,S":N$="!":GOSUB141:SYS50096 140 F$="DDKANSI":N$="[212][197][210][214][197][212][213][204][207][193] [198][204][207][208][208][217] [205][193][199][193][218][201][206][197][197][206] !!":SYS49952 141 IFLEN(F$)>16THENF$=LEFT$(F$,16) 142 POKE49882,LEN(F$):POKE49883,LEN(N$) 144 FORI=1TOLEN(F$):POKE49903+I,ASC(MID$(F$,I,1)):NEXT:IFN$="!"THENRETURN 145 IFF$="MX"THENRETURN 146 IFLEN(N$)>32THENN$=LEFT$(N$,32) 148 FORI=1TOLEN(N$):POKE51471+I,ASC(MID$(N$,I,1)):NEXT 150 TYPE=0:IFTYPE=0THEN C1=10:C2=0:POKE49872,C1:POKE49873,C2 155 REM: COLOR 1&2 (C1&C2) TULEVAT MAHD. NEWSROOM-LATAUSKUVAAN. ARVOT 0-15 156 REM: TYPE: 0=NEWSROOM, 1=KOALA, 2=DOODLEKUVA. 160 POKE49874,TYPE:SYS49776 165 LOAD"TEXT.DISPLAY",8,1 170 A$=CHR$(34) 180 PRINT"[144][147]LOAD"A$"MX"A$",8" 190 POKE198,1:POKE631,131:END