$ 007 ======================16G (P) 01/87 COMMODORE WELT ==j ============================( (C) BY H. MUEHLBACHER ==2 WAGING/SEE ==< ==F BASIC V3.5 ==P C16/116 PLUS4 ==<Z ============================fd55,255:56,58:: SPEICHER BEGRENZENqn 2970x1,"P065298,196:P065299,208"(13): ZEICHENSATZ NORMAL162,0,189,0,208,157,0,60,189,0209,157,0,61,189,0,210,157,0,62189,0,211,157,0,63,202,208,229,966A832861:B:A,B:T832:65298,192:65299,60j 0,1:4,1:HH100 65286,(65286) 239 ZA15360520 16160 A: A999 590 ZAI,A:ZA 0,0,0,0,192,255,127,1 7,31,63,127,255,255,127,0 14,1,0,0,3,252,240,192@ 0,255,231,195,153,153,195,0c 0,224,24,255,225,192,192,192 222,222,222,222,222,192,255,0" 0,0,0,0,192,96,48,24, 254,255,231,195,153,153,195,06 0,192,248,254,254,255,255,0@ 255,129,129,129,129,129,129,2554J 255,128,128,128,128,128,128,255NT 255,1,1,1,1,1,1,255t^ 255,129,129,189,189,189,129,129h 133,133,129,129,129,129,129,255r 0,0,0,0,0,0,0,0| 170,85,170,85,170,85,170,85 0,60,36,255,255,255,255,0 60,66,153,145,145,153,66,604 0,128,128,229,165,231,1,6Q 1,3,7,15,27,59,127,255w 255,255,219,219,219,219,255,255 128,192,224,240,216,220,254,255 96,48,56,60,54,51,96,192 6,12,28,60,108,204,6,3 0,0,0,0,66,66,102,153 24,36,36,24,24,36,66,1291 16,0,0,16,16,40,68,131N 0,0,24,20,34,34,66,132h 0,0,0,0,25,38,36,24 24,36,36,32,112,32,32,32 16,16,56,16,16,16,40,68 170,85,170,85,170,85,170,85& 0,0,0,0,0,0,0,00 0,0,0,0,0,0,0,0 : 0,0,0,0,0,0,0,0/D 999,999,999,999,999,999,999,999mN1,2,1:65286,(65286)16::14)C4$C4$C4$" "X14)" "b14)" "l14)" "v14)" "18)G1$C4$C4$C4$""18)""19)CY$C4$C4$" ">16)LB$C4$C4$""YM$YN$YO$AA$YQ$G1$TTI$"000000":750ZbA$w A$ " " 830X,Y8:1,X,Y:2,X1,Y X0596,75,704,60,1019,20,596,60,704,20,770,45,739,15,704,15,739,15,770,30;1019,20,704,45,739,30,770,30,785,30,770,30,739,30,770,30,739,60,704,20V1019,3,704,60,1019,60 810,75,864,60,1019,20,810,60,864,20,897,45,881,15,864,15,881,15,897,301019,20,864,45,881,30,897,30,904,30,897,30,881,30,897,30,881,60,864,20  1019,3,864,60,1019,60*0,14680V>J1700:J2714:J3800:J4810:J5900:J6908:PZ100:MU62aH 2450vR HAUPTROUTINE\ 8:S3913f1040pS3123 2780z (1)1 960 (1)3 940 (1)5 990 (1)7 1020 880(S4)32(S45)32 1060=SS1:S1,32:S39,32:1040j(S40)32(S4)32(S37)321060(S39)32(S38)321060SS40:S80,32:S81,32:S82,32:S83,32:S84,32: 1040(S80)32(S81)32(S82)321060(S83)32(S84)321060XSS40:S37,32:S38,32:S39,32:S40,32:S4,32:1040y(S1)32(S39)321060SS1:S4,32:S45,32:1040S,65:S40,66:S1,67:S41,68:S2,69:S42,70S3,71:S43,72:S44,73:2,2,2:880$ (S45)80SS7:11405. (S38)96SS120:1710M8 (S45)97 2210eB (S45)98 2290}L (S38)99 2360V (S1)80SS7:1140` (S82)96SS160: 1710j880tCL$C4$C4$C4$C3$C3$C3$"SIE SIND IN EIN ZAHLENCODESCHLOSS"7~C4$C3$C3$C3$"GERATEN VERSUCHEN SIE ES SO SCHNELL"eC4$C3$C3$C3$"ALS MOEGLICH ZU KNACKEN!!!"X1((1)9):X2((1)9):X3((1)9) 1660 (1)51230 (1)11260 (1)127 13701190Z1Z11Z19Z10 1290Z1Z11 Z10Z19+ 1290<  Z1X11310N1,J1,2:1320Z1,J2,2j(1660:1190|2 (1)51370< (1)11400F (1)127 1520P1330ZZ2Z21dZ29Z20n 1430xZ2Z21Z20Z29 1430  Z2X21450 1,J3,2:1460) 1,J4,23 1660= 1330O  (1)51520a  (1)11550w  (1)127 1630 1480 Z3Z31 Z39Z30  1580 Z3Z31 Z30Z39 " 1580 , Z3X31600 61,J5,2:1610 @1,J6,2!J1660!T1480-!^Z1X1Z2X2Z3X3 16508!h 2870J!r:2450:1040u!|HE$(QD$,12)(QR$,14)YE$""!HE$(QD$,12)(QR$,14)YE$""!(QR$,14)""Z1;Z2;Z3""!(QR$,14)YE$""!!VZ0!F10:VZVZ1<"CL$C4$C4$C4$C3$C3$C3$"UM WEITERZUKOMMEN MUESSEN SIE EINEN"j"C4$C3$C3$C3$"BESTIMMTEN CODE ERRATEN!!!""C4$C3$C3$C3$OE$RN$"SPACE"RF$"A$"A$" " 1790" 1760"C4$C3$C3$C3$RE$"JETZT BITTE CODEWORT EINGEBEN!""C$#C$(74)1830#F1F11##&15)C4$C4$G2$C$,#0C$?#:C$(65)1870K#DF1F11W#N16)C$`#XC$s#bC$(77)1910#lF1F11#v17)C$#C$#C$(69)1950#F1F11#18)C$#C$#C$(83)1990#F1F11#19)C$#C$$C$(66)2030$F1F11'$20)C$0$C$C$C$(79)2070O$ F1F11[$21)C$d$ C$w$*C$(78)2110$4F1F11$>22)C$$HC$$RC$(68)2150$\F1F11$f23)C$$p F10 2200%zG2$C4$C4$C3$C3$"SIE HABEN"F1"FEHLER IN IHREM CODEWORT"0% WZ1 9000:: VZ31720:%2870J%2440:1040\%:0,8,4:1,1%1,2,10,"SIE HABEN EINEN SCHLUESSEL GEFUNDEN!"%1,6,12,"WOLLEN SIE IHN MITNEHMEN? J/N"%A$%A$"J" G111:2280%A$"N" G10 :2280%2240&SS1:2440:1040(&:0,5,4:1,12\&1,2,10,"SIE HABEN EIN GROSSES PAKET GEFUNDEN!"& 1,6,12,"WOLLEN SIE ES MITNEHMEN? J/N"& A$& A$"J" G2 0:2280&$ A$"N" G211:2280&. 2320&8 :0,4,4:1,1'B 1,2,10,"SIE HABEN EINE KLEINE DOSE GEFUNDEN!">'L 1,4,12,"WOLLEN SIE DIESE MITNEHMEN? J/N"F'V A$_'` A$"J" G311:2430x'j A$"N" G30 :2430't 2390'~ 2440:1040' ' 65286,(65286) 239' 0,1:4,1:1,12,4( CL$RE$C3$""(QR$,7)""(QR$,7)""G1$G( RE$""(QR$,5)""(QR$,5)""G1$( OE$RN$" "RF$(QR$,5)RN$CY$" "RF$(QR$,5)RN$YE$" "G1$( RN$OE$" "WH$""OE$" "WH$""OE$" "BR$""OE$" "WH$""OE$" "RF$;!) (QR$,5)RN$CY$" "BR$RF$""CY$RN$" "BR$RF$""CY$RN$" "RF$;m) (QR$,5)RN$YE$" "WH$""YE$" "WH$""YE$" "BR$""YE$" "WH$""YE$" "G1$) RN$OE$" "BR$""OE$" "RF$(QR$,5)RN$CY$" "BR$RF$""CY$RN$" "BR$;) RF$""CY$RN$" "RF$(QR$,5)RN$YE$" "BR$""YE$" "G1$!* WH$"":"":"":"":"":""O* " "RE$""(QR$,9)""* " "RE$""(QR$,7)""* " "G2$RN$" "RF$(QR$,7)RN$OE$" "+ " "G2$RN$" "WH$""BR$""G2$" "WH$""G2$" "WH$""G2$" "BR$""WH$""G2$" ";[+( RF$(QR$,7)RN$OE$" "WH$""OE$" "WH$""OE$" "BR$""OE$" "WH$""OE$" "+2 " "G2$RN$" "BR$""G2$" "BR$""G2$" "RF$C3$;+< (QR$,6)RN$OE$" "BR$""OE$" "G1$+F WH$"":"":"":"":"":"":"":"" ,P 65286,(65286)16 ,Z 3085,81:2061,1148,d SC37674007 40S,n SC,80:(SC1024),33:k,x SC37453868 41x, SC,79:, 3991,97:3097,99:3711,98, SC36493653 2, SC,96:(SC1024),33:, SC33193459 40, SC,80:(SC1024),33:- SC33413461 40/- SC,80:(SC1024),33:5- T- G111G211G311 2870- PU$CL$(QR$,8)C4$C4$C4$"SIE HABEN ES GESCHAFFT!!!"- (QR$,8)"*************************"- G2$C4$C4$(QR$,8)"SIE HABEN IHRE MISSION IN". OE$C4$C4$(QR$,13)TI$(QL$,6)" "C3$C3$" MINUTEN"W. RE$C4$(QR$,11)TI$(QL$,6)" "C3$C3$C3$"SEKUNDEN". BL$C4$C4$(QR$,8)"ERFOLGREICH DURCHGEFUEHRT!"." YE$C4$C4$(QR$,8)FL$" 007"CY$" GRATULIERT!"., 680.6 :: F141 1:H07/@ 3,910,1:0,F,H:4,F,H::/J 1,88/T 1,4,6," LEIDER NICHT GESCHAFFT !"h/^ 1,4,13,"SOLLTEN SIE DEN MUT HABEN ES NOCH"/h 1,4,15,"EINMAL ZU VERSUCHEN DRUECKEN SIE"/r 1,18,20,RN$"SPACE"RF$/| A$/ A$" " / 2940/ NACHSPANN ===============0 * FARBCODES/STEUERCODES *00 WH$(005):AA$(016)J0 C4$(017):RN$(018)d0 HE$(019):RE$(028)~0 C3$(029):BL$(031)0 OE$(129):FL$(130)0 RF$(146):CL$(147)0 BR$(149):G1$(151)0 G2$(152):LB$(154)1 PU$(156):C1$(157)1 YE$(158):CY$(159):1 *** ZEICHENSATZ/GRAPHIK *T1 YM$(219):YN$(220)n1& YO$(221):YQ$(223)}10 AA$(255)1: ********* ZEICHENFOLGEN *1D Q1 401N QD$QD$C4$:QR$QR$C3$1X QL$QL$C1$1b Q1l 2v 007 ===================16&2 012277 BYTES MEMORY ==F2 008819 BYTES PROGRAM ==f2 000000 BYTES VARIABLES ==2 000000 BYTES ARRAYS ==2 000000 BYTES STRINGS ==2 000000 BYTES FRE(0) ==2 =========================