I),42  T1100: T (32768I),224+  T1100: T3  SH P$:P$"N"220P :k  LAENGEN &BREITENGRAD| K$K1$:1030 K$K2$ K$"A" K 1 K$"B" K 2 K$"C" K 3 $K$"D" K 4 .K$"E" K 5 8K$"F ANY KEY TO CONTINUE I110:D(XI1)02835 J1D(XI1) R6(1(2)29)40(1(2)20) (SR)272800 SR,(B$(XI1))192  & 4 59409,60>" A$""R, A$:A$""2860`6 59468,14@ " O YOU WANT TO SURVEY ANOT80K3$"3" I3120 K3$"4" I3160!K3$"5" I32006"K3$"6" I3240K,K3$"7" I3280`1K3$"8" I3320s6K4$"1" I40@K4$"2" I41JK4$"3" I42TK4$"4" I43^K4$"5" I44hK4$"6" I45rK4$"7 OESTLICHE LAENGE________LX((3D)E.5)15(2A)2="BE51.3541667:LE7.5666667N,BX1BX180_-LX1LX180p.BE1BE180/LE1LE180@KM1(LX1LE1)(BX1)(BE1)((BX1)(BE1))JKM2((1KM12)KM1)TKM3KM2111.199"5"C57K3$"6"C68K3$"7"C7#9K3$"8"C84:K3$"9"C9E;K3$"0"C0V<K4$"1"D1g=K4$"2"D2x>K4$"3"D3?K4$"4"D4@K4$"5"D5AK4$"6"D6BK4$"7"D7CK4$"8"D8DK4$"9"D9EK4" K 6BK$"G" K 7LK$"H" K 8)VK$"I" K 9<`K$"J" K 10OjK$"K" K 11btK$"L" K 12u~K$"M" K 13K$"N" K 14K$"O" K 15K$"P" K 16K$"Q" K 17K$"R" K 18K$"S" K 1921 5);"";15);"";25);"";35);""  "  " F " w "  "PRESS uHERJ "SQUARE?T "(NSWERY OR N)^ A$""h A$:A$""2920r A$"Y"A$"N"2910| A$"Y"2190" I46|K4$"8" I47 K4$"9" I48'K4$"0" I49:I3I340IK3$"8"K4$"0" I3280:I49wI15000I25000I35000I45000A1500:II1I2I3I4UKMKM3180I15000:I25000:I35000:I45000.K1$"D" I10BK1$"E" I110VK1$"F" I120jK1$"G" I130}K2$"M" I20K2$"L" I2320K2$"K" I2640K3$"0" I30K3$"1" I340K3$"2" I3$"0"D10:CC1 xK5$"A" E2:F1"yK5$"B" E1:F18zK5$"C" E2:F2N{K5$"E" E2:F3d|K5$"F" E3:F3z}K5$"G" E3:F2K5$"H" E3:F1K5$"I" E2:F2 NOERDLICHE BREITE_______BX(3CF.5)24B40K$"T" K 20 K$"U" K 21 K$"V" K 223K$"W" K 23FK$"X" K 24YK$"Y" K 25lK$"Z" K 26{O11320BK:1330(AK:O1:10202K3$"1"C13K3$"2"C24K3$"3"C35K3$"4"C46K3$ ## ##### ":X$(Y)"## ### ##":3X$(Y)" # ## ##### ":b" THIS PROGRAM PRINTS POSTERS OF 1 TO 4""LINES,ANY LENGTH,ALL ASCII CHARACTERS."S142E"NUMBER OF ROWS (1-4)";ES142E"MESSAGE . . zZ 420,430,170,440,450:{Z 250,250,250,250,250:,|Z 496,494,270,494,496:J}Z 130,130,130,130,130:h~Z 130,152,156,140,250:Z 250,140,156,152,130: Z 250,180,130,180,250:jZ 260,180,134,230,230:.kZ 130,140,204,202,180:LlZ 130,280,280,280,280:jmZ 130,320,330,320,130:nZ 130,320,330,340,130:oZ 150,180,180,180,150:pZ 130,220,220,220,292:qZ 150,180,1 " ...QTH-KENNER-BERECHNUNG...(C*********************^#*** ***y(*** COPPYRIGHT BY ***-*** WERNER HAEMEL ***2*** BRAUHAUSSTR.16 **7*** 5800 HAGEN 5 ***<*** ***A*******************Z 160,170,170,170,160:YZ 352,170,170,170,150:0ZZ 250,250,202,250,250:N[Z 250,215,202,250,250:l\Z 140,204,202,180,250:]Z 204,204,204,204,204:^Z 250,180,202,204,140:_Z 492,230,430,220,292:`Z 154,172,1744$"10"  K1$: K1$;:K1$""160= K2$: K2$;:K2$""170Z K3$: K3$;:K3$""180w K4$: K4$;:K4$""190 K5$: K5$;:K5$""2001000"DIE GEGENSTATION MIT DEM QTH-KENNER "" >> "K1$;K2$;K3$;K4$; 250,232,230,250,250:HZ 250,156,202,180,250:2IZ 250,180,202,156,250:PJZ 552,330,154,330,552:nKZ 140,140,154,140,140:LZ 250,193,194,250,250:MZ 140,140,140,140,140:NZ 250,250,280,280,250:OZ 192,340,330,3 ϣ A@" ΣqJ"M HANNO. ͧT" * ̤^" *OSNABR. BERLINh" 0$V55856,857,858,859,860,861,862,863:820C%V63864,865,866,867,868,869,870,871:820r&V71872,873,874,875,876,877,878,879:820'V79880,881,882,883,884,885,886,887:820(V87888,889,890,891,892,893,894,89541,X$(Y)(S$,S);: Σ * ? "̥ <> m "KASSEL> DRESDEN "̤̤WEIMAR* "<>ϣ "KOLN ե . ."X1E:"ROW";X;: A$(X):X:D"WIDTH (1)=SINGLE; (2)=DOUBLE";WhQ1:Q15:Q21:W2Q15.5:Q2.5X15:(A$(X))R1R1(A$(X)) XX11R1:ZQQ1Q2E47901,(S$,6(3E)11);YE11̤̤̤" X4000) bA1500680U l"ϣ"~ v"QTH LIEGT AUSSERHALB DER KARTE!" "̤" T18000:T N$:N$"N"220 10  S125 (3276880,432,133:rZ 130,220,220,220,462:sZ 352,170,170,170,360:<tZ 230,230,130,230,230:ZuZ 134,280,280,280,134:xvZ 390,410,400,410,390:wZ 130,340,330,340,130:xZ 190,210,330,210,190:yZ 315,322,300,322,315:**FK"1d"***************************Sn"** **ux"** QTH-KENNER-BERECHNUNG **"** **"***************************"GEBEN SIE EINEN QTH-KENNER EIN !":"? ";K3$"10":K,172,222:aZ 132,220,220,220,132: bZ 130,170,170,170,160:>cZ 150,180,180,180,200:\dZ 130,180,180,200,152:zeZ 130,170,170,170,180:fZ 130,220,220,220,230:gZ 150,180,180,700,360:hZ 130,140,140,140,130:iK5$;" <<"4"IST ";(KM);"KM VON HIER (DL58B) ENTFERNTt PRINT"DER ANTENNENWINKEL BETRAEGT:":PRINT"";AW;" GRAD" PRINT"LX=";LX*180/,"BX=";BX*180/T15000:T,"ϣDϣEϣFУϣG6" 20,630:PZ 152,200,180,200,152:"QZ 480,490,130,280,280:@RZ 490,420,430,520,530:^SZ 200,170,170,550,560:|TZ 290,140,140,130,140:UZ 570,170,170,170,580:VZ 150,170,170,170,360:WZ 630,640,650,660,390:X ) r" W |"ϣΣϣϣϣϣ "ϣ .. " GOTINGEN "L HAGEN * LEIPZIG  " *  Y61,"": Z:1,"": X1:1:1:$@Z 250,250,250,250,250:BAZ 250,250,350,250,250:`BZ 250,630,250,630,250:~CZ 203,150,203,150,203:DZ 352,170,130,170,360:EZ 195,732,731,733,196:FZ 402,735,736,737,192:GZ % " ʥ PLAUN ΣU "KL͠*Π "̤͠Π "ΠFRANKF. ϣ͠Π "<> Ϡ "̤(A$(Y),X1,1)""V32:799V((A$(Y),X1,1))X(V8)3801,802,803,804,805,806,807,808:"ILLEGAL VALUE":!V31832,833,834,835,836,837,838,839:820"V39840,841,842,843,844,845,846,847:820#V47848,849,850,851,852,853,854,855:82 12,133,12,0 D220,12,70,12,143,12,0/ N210,12,80,12,133,12,0J X210,12,70,12,143,12,0e b200,12,80,12,133,12,0 l190,12,90,12,123,12,0 v180,22,90,12,113,12,0 170,12,10,12,90,12,103,12,0 160,12,20,12,90,12,93,12,0 150,12,30,  POSTER" JEFF JESSEE; 812 COLDWATER DR.Y CASSELBERRY, FL. 32707_ NOTE THAT THIS PROGRAM IS VERY INNEFFICIENT SPACEWISE, BUT WAS CODED THIS WAY TO SAVE RUN TIME. YOU CAM CHANGE THE CHARACTERS IN LINES 130-7 12,220,12,70,12,50,12,10,12,0150,12,10,12,30,12,40,12,290,12,50,12,40,12,10,12,0]50,22,30,12,10,12,370,12,20,12,40,22,0q60,42,440,52,0z999 # ":#X$(Y)" ############ ":@X$(Y)" ########## ":]X$(Y)" ######## ":zX$(Y)" ###### ":X$(Y)" ##### ##### ":X$(Y)"## ## ##":X$(Y)" ## ## ## ":X$(Y)" ## # # ## ": X$(Y)"140,12,50,12,30,12,40,22,50,12,0 160,22,60,12,40,22,50,12,0:240,12,40,22,50,12,0T240,12,40,22,50,12,0n240,12,40,22,50,12,0$240,12,40,22,50,12,0.240,12,40,22,50,12,08220,12,60,22,60,12,0B200,12,80,22,90,12,0L18X$(Y)" ## ## ":-X$(Y)" ## ## ":JX$(Y)" ### ### ":gX$(Y)" # ":X$(Y)" ## ##":X$(Y)" ## ##### ":X$(Y)" ##":X$(Y)" ## ":X$(Y)" ###### ##",40,22,50,12,20,12,160,12,30,12,0860,12,30,12,130,12,40,22,50,22,180,12,30,12,0k60,12,30,12,130,12,40,22,50,12,190,12,30,12,050,12,30,12,140,12,40,22,50,12,190,12,30,12,050,12,30,12,140,12,40,22,50,12,180,12,30,12,050,12,30,12#### ": BX$(Y)" #### ":7 JX$(Y)" #### ":T TX$(Y)" #### ":q ^X$(Y)"## ##########": `X$(Y)" ## ###### ": hX$(Y)" ###### ## ": rX$(Y)" ## ##": |X$(Y)"## ########": X$(Y)" ,60,22,60,12,0 120,12,30,12,60,12,50,22,60,12,0B*120,12,30,12,60,12,50,22,60,12,0h4120,12,30,12,60,12,50,22,60,12,0>120,12,30,12,60,12,50,22,60,12,0H120,12,30,12,60,12,50,22,50,12,0R120,12,30,12,60,12,50,22,50,12,0\120,12$(Y)"###### ######":$ X$(Y)"###### ##### ":A X$(Y)"## ## ":^ X$(Y)"## ## ":{ X$(Y)" ## ": X$(Y)" ## ": X$(Y)" ## ": X$(Y)"## ## ## ": X$(Y)"## ### ":12,90,12,83,22,0(140,12,30,22,90,12,10,12,53,12,10,12,0T130,12,30,12,20,12,80,22,20,32,30,12,0z120,12,30,12,30,12,80,22,80,12,0120,12,30,12,30,12,80,22,70,12,0120,12,30,12,40,12,70,22,70,12,0120,12,30,12,40,12,70,22,70,12 737 BUT DARKER CHARACTERS MAY BE HARD ON THE PRINT HEAD.cdA$(5),X$(5):S$" ":X16:S$S$S$:Xln1,4ux740X$(Y)"##############":X$(Y)"############# ":X$(Y)"## ########## ":X$(Y)" #############":X$(Y)" # ##":X$(Y)" #### ##":.X$(Y)"## ## ##":KX$(Y)" ## ## ##":hX$(Y)" ########### ":X$(Y)" # #### # ":X$(Y)" #### # #":X$(Y)"# # #### ":X$(Y)"## ###":X$(Y)"#### ##":(X$(Y)"### ###":EX$(Y)"### ":bX$(Y)"# ":X$(Y)" ## ":X$(Y)"### # ":X$(Y)" # ###":X$(Y)" ## ## ":X$(Y)" ## ## ":0,12,100,22,120,12,0V160,12,120,22,150,12,0*`140,12,140,22,170,12,0Fj120,12,160,22,190,12,0ht100,12,180,12,30,12,190,12,0~80,12,170,12,80,12,190,12,070,12,20,12,40,12,60,12,160,12,80,12,60,12,10,12,060,12,10,12,40,12,50,: X$(Y)" ":2 X$(Y)" ## ##":O X$(Y)" ############":l X$(Y)"## ": "X$(Y)" ########": $X$(Y)" ###### ": ,X$(Y)"######## ": ;X$(Y)" ####": @X$(Y)" ,130,22,40,22,50,12,170,12,30,12,0=60,12,30,12,110,12,10,12,40,22,50,12,150,12,30,12,0u80,12,30,12,80,12,20,12,40,22,50,12,140,12,30,12,0100,12,30,12,40,12,30,22,40,22,50,12,140,12,10,12,0120,12,20,42,30,12,10,12,40,22,50,12,0 ######": X$(Y)"##### ":< X$(Y)" #### ":Y X$(Y)" ##### ":v X$(Y)"#### ##": X$(Y)"## ## ##": X$(Y)" ## ##": X$(Y)"## ## ##": X$(Y)"## ####": X,30,12,60,12,50,22,50,12,0-f120,12,20,12,70,12,50,22,50,12,40,142,0`p110,12,30,12,80,12,40,22,50,12,20,22,140,12,0z100,12,30,12,90,12,40,22,50,22,60,102,30,12,090,12,30,12,100,12,40,22,50,12,40,32,110,12,30,12,070,12,40,12,110,12 &X$(Y)" ## ## ## ":) (X$(Y)" ## ## ## ":F 0X$(Y)" #### #### ":c :X$(Y)" ## ########": DX$(Y)" ###### ##": lX$(Y)" ###### ## ": vX$(Y)" ###": X$(Y)"#### ##": X$(Y)" #### ,0120,12,30,12,40,12,70,22,70,12,08120,12,30,12,40,12,70,22,70,12,0^120,12,30,12,40,12,70,22,70,12,0120,12,30,12,50,12,60,22,60,12,0120,12,30,12,50,12,60,22,60,12,0 120,12,30,12,50,12,60,22,60,12,0120,12,30,12,50,12  PAARDENRACE(142)( "".; 20:70QN18:37)"":m"":N174:"";:("":N174:"";:2"":N174:"";:<"":N174:"";:=32842,231:32922,231:33002,231#", 3 = "P3$", 4 = "P4$".":E N EEFT GEWONNEN" L ""F P"NOG EENS PROBEREN ? JA OF NEE ";N ZE$_ dE$"JA" 10h n"" x"DAN STOPPEN WE , BEDANKT VOOR HET MEESPELEN" }  N1560:"*";:N "" (14)  "DAT IS NU JAMMER  PINK PANTHER  A$(3)ZA$(0)" "|A$(1)"#####################"A$(2)"*********************"A$(3)"+++++++++++++++++++++" 1,4 A:A01," ":7A9991: B(A10"WIE HEEFT PAARD NR 3"; P3$1 "WIE HEEFT PAARD NR 4";: P4$G ::""O S5v " WACHT"S"SECONDEN" TTI (TIT)601208 SS1 S41219 S01220 " WACHT"S"SECONDEN" 1206 P100,41,32,50,61,10,83,90,63,0EZ120,21,10,12,70,41,10,93,40,122,0bd140,12,150,51,100,122,0n130,12,170,31,140,142,0x120,12,330,12,20,22,90,22,0120,12,320,12,50,102,0120,12,310,12,110,12,40,12,0120,12,250,12,40,12,11" "D)" " " "D)" / 4 "3 " "D)" /\ /\"A DQ 530G V X51000\ f 2000n 80 (7)"'T PAARD VAN "P1$" HEEFT GEWONNEN":1360 (7)"'T PAARD VAN "P2$" HEEFT G,32,70,42,230,12,0&260,12,150,12,220,12,0;250,12,100,82,0V250,12,100,12,63,12,0p240,12,90,12,93,12,0240,12,80,12,103,12,0240,12,80,12,103,12,0"230,22,80,12,113,12,0,230,12,50,12,30,12,113,12,0 6230,12,50,12,34202,231:34282,231:34362,231)YA1(3(1))9ZA12AA2Bd""KfG11ThG22]jG33flG44{n" "A)" "x" "A)" / 1 "" "A)" /\ /\"X5200AQ 500B1(3(1))B12BB2" "B)" 133,22,0# 200,12,40,12,20,12,40,12,133,22,0J 190,12,40,12,30,12,40,12,133,22,0w 190,12,40,12,30,12,40,12,133,12,10,12,0 180,12,40,12,40,12,40,12,133,12,10,12,0 180,12,40,12,40,12,40,12,133,12,20,12,0 170,12,40,12,50,12,40,12,13:33082,231:33162,231O>33242,231:33322,231:33402,231:33482,231:33562,231?33642,231:33722,231:33802,231:33882,231:33962,231@34042,231:34122,231:34202,231:34282,231:34362,231B33005,134:33245,137:33485,142:33725,137:339652,40,12,50,12,133,12,10,12,03 160,12,60,12,30,12,50,12,133,22,0Z 170,12,60,12,20,12,50,12,133,12,0{ 180,12,60,22,50,12,143,12,0 190,12,50,12,60,12,133,12,0 &200,12,40,12,60,12,133,12,0 0210,12,20,12,60,12,143,12,0 :220,22,70,, U HEEFT VERLOREN""NOG EEN KEER? JA OF NEE";)1370EABACADVG1:2100aBABCBDVG2:2100}CACBCDVG3:2100DADBDCVG4:21004" PAARD NR "V" LOOPT OP KOP"f" 1 = "P1$", 2 = "P2$):CAB10:1,(A$(C),B);:7( 370,71,07360,101,0X150,41,110,21,40,41,10,51,0~(120,81,70,61,30,41,10,31,10,51,02110,31,10,51,50,81,42,61,10,71,0<100,41,42,11,10,12,10,12,10,81,120,81,0F100,41,42,11,12,30,61,10,53,110,53,0(TIT)601216 SS1 20:SS2:K "  S T A R T "S 80c P1G11350t P1G11500 P1G21350 #P1G21500 (P1G31350 -P1G31500 2P1G41350 7P1G41500 F:"JA !!!! U H0,22,30,12,09130,12,230,12,10,12,30,12,90,22,20,22,10,12,0_140,42,80,52,60,62,80,22,50,22,0170,102,40,12,40,12,60,72,80,12,10,12,0310,12,40,12,100,12,90,12,30,12,0310,12,40,12,110,82,60,12,0310,12,40,12,250,42,0 270EWONNEN":1360L (7)"'T PAARD VAN "P3$" HEEFT GEWONNEN":1360 (7)"'T PAARD VAN "P4$" HEEFT GEWONNEN":1360 X5 "WIE HEEFT PAARD NR 1"; P1$ "WIE HEEFT PAARD NR 2"; P2$  0,12,113,12,0$ @220,12,50,12,40,12,123,12,0E J220,12,50,12,40,12,123,12,0f T220,12,40,12,50,12,133,12,0 ^210,12,50,22,40,12,133,12,0 h210,12,40,12,10,12,40,12,133,12,0 r210,12,40,12,10,12,40,12,133,12,0 |200,12,40,12,20,12,40,12, "" "B)" / 2 "+" "B)" /\ /\"9X5300GBQ 510XC1(3(1))hC12CC2n,6" "C)" "@" "C)" / 3 "J" "C)" /\ /\"OX5400^CQ 520hD1(3(1))rD12DD2  3,12,20,12,0+ 160,12,40,12,60,12,40,12,133,12,30,12,0X 160,12,40,12,60,12,40,12,133,12,30,12,0 150,12,40,12,70,12,40,12,133,12,30,12,0 150,12,40,12,70,12,40,12,133,12,30,12,0 140,12,60,12,50,12,50,12,133,12,20,12,0 150,12,60,1,147C34205,136EFQ68,GX5100gP32842,231:32922,231:33002,231:33082,231:33162,231Q33242,231:33322,231:33402,231:33482,231:33562,231R33642,231:33722,231:33802,231:33882,231:33962,231S34042,231:34122,231:3 ),K(16),5),L(4),5),M(4)"pK(17),K(18),K(19),K(20),5),L(5),5),M(5)QzK(21),K(22),K(23),K(24),5),L(6),5),M(6)K(25),K(26),K(27),K(28),5),L(7),5),M(7)K(29),K(30),K(31),K(32),5),L(8),5),M(8)K(33),K(34),K(35),K(36),5),L(9),5 ,K(27),K(28),5),L(7),5),M(7)" K(29),K(30),K(31),K(32),5),L(8),5),M(8)@" K(33),K(34),K(35),K(36),5),L(9),5),M(9)q" K(37),K(38),K(39),K(40),5),L(10),5),M(10)" K(41),K(42),K(43),K(44),5),L(11),5),M(11)" K(45),K(46),K(47),K(48),5 7),K(18),K(19),K(20),5),L(5),5),M(5)3K(21),K(22),K(23),K(24),5),L(6),5),M(6)b K(25),K(26),K(27),K(28),5),L(7),5),M(7)"K(29),K(30),K(31),K(32),5),L(8),5),M(8)$K(33),K(34),K(35),K(36),5),L(9),5),M(9)&K(37),K(38),K(39),K(40 45),K(46),K(47),K(48),5),L(12),5),M(12)" K(49),K(50),K(51),K(52),5),L(13),5),M(13)X K(53),K(54),K(55),K(56),5),L(14),5),M(14):115b 3000 K(57)B(1):K(58)B(2):K(59)B(3):K(60)B(4):L(15)G:M(15)P K(1),K(2),K(3),K(4),5),L(1),),M(4)K(17),K(18),K(19),K(20),5),L(5),5),M(5)FK(21),K(22),K(23),K(24),5),L(6),5),M(6)uK(25),K(26),K(27),K(28),5),L(7),5),M(7)K(29),K(30),K(31),K(32),5),L(8),5),M(8)K(33),K(34),K(35),K(36),5),L(9),5),M(9):11530(2),K(3),K(4),5),L(1),5),M(1)~ K(5),K(6),K(7),K(8),5),L(2),5),M(2)D K(9),K(10),K(11),K(12),5),L(3),5),M(3)s K(13),K(14),K(15),K(16),5),L(4),5),M(4) K(17),K(18),K(19),K(20),5),L(5),5),M(5) K(21),K(22),K(23),K(24),5),L(6),K(12),5),L(3),5),M(3),:K(13),K(14),K(15),K(16),5),L(4),5),M(4)[DK(17),K(18),K(19),K(20),5),L(5),5),M(5)NK(21),K(22),K(23),K(24),5),L(6),5),M(6)XK(25),K(26),K(27),K(28),5),L(7),5),M(7)ZK(29),K(30),K(31),K(32),5),L(8),5),18),K(19),K(20),5),L(5),5),M(5) B K(21),K(22),K(23),K(24),5),L(6),5),M(6)OL K(25),K(26),K(27),K(28),5),L(7),5),M(7)~N K(29),K(30),K(31),K(32),5),L(8),5),M(8)P K(33),K(34),K(35),K(36),5),L(9),5),M(9)R K(37),K(38),K(39),K(40),5)PK(1),K(2),K(3),K(4),5),L(1),5),M(1)BK(5),K(6),K(7),K(8),5),L(2),5),M(2)pK(9),K(10),K(11),K(12),5),L(3),5),M(3)K(13),K(14),K(15),K(16),5),L(4),5),M(4)K(17),K(18),K(19),K(20),5),L(5),5),M(5)K(21),K(22),K(23),K(K(29),K(30),K(31),K(32),5),L(8),5),M(8)-K(33),K(34),K(35),K(36),5),L(9),5),M(9)^K(37),K(38),K(39),K(40),5),L(10),5),M(10)K(41),K(42),K(43),K(44),5),L(11),5),M(11)K(45),K(46),K(47),K(48),5),L(12),5),M(12):1153000),M(9)K(37),K(38),K(39),K(40),5),L(10),5),M(10)EK(41),K(42),K(43),K(44),5),L(11),5),M(11):115O3000K(45)B(1):K(46)B(2):K(47)B(3):K(48)B(4):L(12)G:M(12)PK(1),K(2),K(3),K(4),5),L(1),5),M(1)K(5),K(6),K(7),K(8),5),L(12),5),M(12)# K(49),K(50),K(51),K(52),5),L(13),5),M(13)5#" K(53),K(54),K(55),K(56),5),L(14),5),M(14)k#$ K(57),K(58),K(59),K(60),5),L(15),5),M(15):115# ""45)"GETALLEN GOED - PLAATSEN GOED":Ϫ),5),L(10),5),M(10):11543000@>K(41)B(1):K(42)B(2):K(43)B(3):K(44)B(4):L(11)G:M(11)PkHK(1),K(2),K(3),K(4),5),L(1),5),M(1)RK(5),K(6),K(7),K(8),5),L(2),5),M(2)\K(9),K(10),K(11),K(12),5),L(3),5),M(3)fK(13),K(14),K(155),M(1) K(5),K(6),K(7),K(8),5),L(2),5),M(2)&! K(9),K(10),K(11),K(12),5),L(3),5),M(3)U! K(13),K(14),K(15),K(16),5),L(4),5),M(4)! K(17),K(18),K(19),K(20),5),L(5),5),M(5)! K(21),K(22),K(23),K(24),5),L(6),5),M(6)! K(25),K(26)00"K(37)B(1):K(38)B(2):K(39)B(3):K(40)B(4):L(10)G:M(10)PMK(1),K(2),K(3),K(4),5),L(1),5),M(1)xK(5),K(6),K(7),K(8),5),L(2),5),M(2)K(9),K(10),K(11),K(12),5),L(3),5),M(3)K(13),K(14),K(15),K(16),5),L(4),5),M(4) K(15),M(6) K(25),K(26),K(27),K(28),5),L(7),5),M(7)/ K(29),K(30),K(31),K(32),5),L(8),5),M(8)^ K(33),K(34),K(35),K(36),5),L(9),5),M(9) K(37),K(38),K(39),K(40),5),L(10),5),M(10) K(41),K(42),K(43),K(44),5),L(11),5),M(11) K(M(8):115l30005vK(33)B(1):K(34)B(2):K(35)B(3):K(36)B(4):L(9)G:M(9)P`K(1),K(2),K(3),K(4),5),L(1),5),M(1)K(5),K(6),K(7),K(8),5),L(2),5),M(2)K(9),K(10),K(11),K(12),5),L(3),5),M(3)K(13),K(14),K(15),K(16),5),L(4),5,L(10),5),M(10)T K(41),K(42),K(43),K(44),5),L(11),5),M(11)@V K(45),K(46),K(47),K(48),5),L(12),5),M(12)vX K(49),K(50),K(51),K(52),5),L(13),5),M(13):115` 3000j K(53)B(1):K(54)B(2):K(55)B(3):K(56)B(4):L(14)G:M(14)Pt K(1),K24),5),L(6),5),M(6)1K(25),K(26),K(27),K(28),5),L(7),5),M(7):115;3000yK(29)B(1):K(30)B(2):K(31)B(3):K(32)B(4):L(8)G:M(8)PK(1),K(2),K(3),K(4),5),L(1),5),M(1)&K(5),K(6),K(7),K(8),5),L(2),5),M(2)0K(9),K(10),K(11), K(49)B(1):K(50)B(2):K(51)B(3):K(52)B(4):L(13)G:M(13)P: K(1),K(2),K(3),K(4),5),L(1),5),M(1)e K(5),K(6),K(7),K(8),5),L(2),5),M(2)$ K(9),K(10),K(11),K(12),5),L(3),5),M(3). K(13),K(14),K(15),K(16),5),L(4),5),M(4)8 K(17),K( ),L(2),5),M(2)K(9),K(10),K(11),K(12),5),L(3),5),M(3)BK(13),K(14),K(15),K(16),5),L(4),5),M(4)qK(17),K(18),K(19),K(20),5),L(5),5),M(5)K(21),K(22),K(23),K(24),5),L(6),5),M(6)K(25),K(26),K(27),K(28),5),L(7),5),M(7) KNAPP)WD20D10"(MIT KLAREM ABSTAND)"CXD20"(EINE GANZ KLARE ENTSCHEIDUNG)"MY:95}Z:"HIER IST DIE ENTGUELTIGE REIHENFOLGE :"[:"PUNKTE","NAME"\J1L0:CZ(J):V(C),L$(C):]^_I140:"";:I:`I120: MAEDCHEN GEBEN" H:J2L0IL$(J):M(J,I)GJJ::M(1,I)10:I:I1F0:C0:J1L0wKCCM(J,I):J:J1L0:M(J,I)M(J,I)C:J:ILJ1L0:V(J)0:I1F0:V(J)V(J)M(J,I)F(I)MI:J:I110:Z(I)I::CL01:J1L0NI1C:N1Z(I):N2Z K(50):L(50):M(50)%(14)d " ************** Ҡ *************"l:"PROBEER 4 VERSCHILLENDE GETALLEN TE RADEN TUSSEN 0 EN 10"#T02N14:A(N)((1)91):NFR13PSR14ZA(R)A(S)50 TTE AN, WIE DIE"( ;"MAEDCHEN BEI DER BETRACHTUNG DER"N <"EINZELNEN FAKTOREN ABSCHNEIDEN"{ =:"LASSEN SIE UNS DAVON AUSGEHEN, DASS" >L$(1)" JEWEILS EINEN WERT VON 10 HAT. SIE" ?"GEBEN DANN DEN EINZELNEN MAEDCHEN WERTE" @"GROESSER ODERA(N)B(M)GG1M*A(N)B(N)PP11"N?,P4500I;1000" GERADEN IN"T"BEURTEN"::T6550T10560T13570"Ӓ"!&" ĠĠƠӠVON DIESEN FAKTOREN"# +I1F0:4)I;F$(I):IP ,"IST DENN FUER SIE DER WICHTIGSTE";:F2 -::"OK - GEHEN WIR MAL VON EINER BEDEUTUNGS-SKALA AUS,"; ."DIE VON 0 BIS 10 REICHT." /F$(F2);" ALS WICHTIGSTER FAKTOR" 0"ERHAELT DEN WERT 10.":"130 A(1);A(2);A(3);A(4)>*"HET WAS TOCH ZO MAKKELIJK":M T11100\ T21200k T31300z T41400 T51500 T61600 T71700  T81800 T91900 T102000 T112100 T1222000) MUESSEN SIE SICH DENN ENTSCHEIDEN";:L0T:"BITTE GEBEN SIE JETZT ALLE";L0;"MAEDCHEN""(REIHENFOLGE SPIELT KEINE ROLLE) EIN" :I1L0:"NUMMER";I;"BITTE":L$(I)::I:!"":96":" OK, DAS WAEREN ALSO":#I1L0:3)I;"-";L$1),K(2),K(3),K(4),5),L(1),5),M(1)G K(5),K(6),K(7),K(8),5),L(2),5),M(2):115Q 3000 K(9)B(1):K(10)B(2):K(11)B(3):K(12)B(4):L(3)G:M(3)P (K(1),K(2),K(3),K(4),5),L(1),5),M(1) 2K(5),K(6),K(7),K(8),5),L(2),5),M(2) <K(9),K(1(14),K(15),K(16),5),L(4),5),M(4):115! 3000_ K(17)B(1):K(18)B(2):K(19)B(3):K(20)B(4):L(5)G:M(5)P K(1),K(2),K(3),K(4),5),L(1),5),M(1) K(5),K(6),K(7),K(8),5),L(2),5),M(2) K(9),K(10),K(11),K(12),5),L(3),5),M(3) K(13)"()";:I:a(I1):V(N1)V(N2)80OZ(I1)N1:Z(I)N2CPI:J:C1Z(1):C2Z(2):C100V(C1):J1L0gQV(J)CV(J)::::DV(C1)V(C2)tR""::S17)"IHRE":: 2)"IDEALPARTNERIN ";O$T16)"HEISST"::15)L$(C1)UVD10"(ALLERDINGS ZIEMLICH dS nR7s T0" VOLGENDE CIJFERS S.V.P."BxM14LB(M)]B(M)1700vB(M)9B(M)50700B(M)50800MR13SR14B(R)B(S)600SRTT1G0P0N14M14 KLEINER ALS 10, JE NACH-"/ A"DEM WIE SIE IN BEZUG AUF ";L$(1)B B"ABSCHNEIDEN"N CI1F0x D:"BETRACHTEN WIR EINMAL NUR ";F$(I) E"UND GEHEN WIR DAVON AUS, DASS ";L$(1) F"DEN WERT 10 ERREICHT, WELCHE WERTE" G"WUERDEN SIE DEN ANDERENԠˠ?" +;0" Ғ"A5s:" ǒ"y?X"IK ZEI 4 VERSCHILLENDE GETALLEN"b" PROBEER HET NOG EENS"l120"HET GETAL MOET TUSSEN 0 EN 10 LIGGEN 1"WELCHEN WERT (DEZIMALWERTE SIND OK)"K 2"WUERDEN SIE DANN DEN ANDEREN FAKTOREN"\ 3"ZUORDNEN?"j 4:I1F0w 5IF255 6F$(I):F(I) 7:F(F2)10:C0:I1F0:CCF(I): 8I1F0:F(I)F(I)C:I 9"" :" GEBEN SIE MIR JETZT BI $ T132300 ) T142400% . T1525004 8 T15540> L3000x VK(1)B(1):K(2)B(2):K(3)B(3):K(4)B(4):L(1)G:M(1)P `K(1),K(2),K(3),K(4),5),L(1),5),M(1):115 3000 K(5)B(1):K(6)B(2):K(7)B(3):K(8)B(4):L(2)G:M(2)P K((I):I:@ $:"WIEVIEL FAKTOREN(MAX=10) SIND EIGENTLICHWICHTIG BEI DER "t %"ENTSCHEIDUNG FUER IHRE"::4)"PARTNERIN ";O$| &F0 '"" ("BITTE GEBEN SIE MIR DIESE FAKTOREN AN": )I1F0::"FAKTOR";I;"BITTE":F$(I):I *"":"WELCHER  0),K(11),K(12),5),L(3),5),M(3):115! x3000_ K(13)B(1):K(14)B(2):K(15)B(3):K(16)B(4):L(4)G:M(4)P K(1),K(2),K(3),K(4),5),L(1),5),M(1) K(5),K(6),K(7),K(8),5),L(2),5),M(2) K(9),K(10),K(11),K(12),5),L(3),5),M(3) K(13),K,K(14),K(15),K(16),5),L(4),5),M(4)F K(17),K(18),K(19),K(20),5),L(5),5),M(5):115P @3000 JK(21)B(1):K(22)B(2):K(23)B(3):K(24)B(4):L(6)G:M(6)P TK(1),K(2),K(3),K(4),5),L(1),5),M(1) ^K(5),K(6),K(7),K(8),5),L(2),5),M(2)hK(9),K(10),K(11),K(12),5),L(3),5),M(3)ArK(13),K(14),K(15),K(16),5),L(4),5),M(4)p|K(17),K(18),K(19),K(20),5),L(5),5),M(5)K(21),K(22),K(23),K(24),5),L(6),5),M(6):1153000K(25)B(1):K(26)B(2):K(27)B(3):K(28)B(4):L(7)G:M(7) \ ( )"#"UMLAUTE SIND MOEGLICH:":FU$"FUER ZEICHEN"^" "FU$;" AE --> \"" "FU$;" OE --> ("" "FU$;" UE --> )""TEXT (NICHT MEHR ALS 255 ZEICHEN)"RT$RT$""410CY1 "," "," "," ""","","","",""Q""," "," "," ",""""," "," "," ",""" "," "," "," "," """," "," "," ","  " "," "," ",""AV" ",""," "," "," "t`" "," "," "," "," "j" ",""," "," "," "t""," "," "," "," "~" " "," ",""," "," "4(""," "," "," ",""d2" "," "," "," "," "<" "," ",""," "," "F" "," "," "," "," "P" ","" "," "," "," "," "Q" "," "," "," "," "" "," "," "," "," "" "," "," "," "," "" "," "," "," "," "" ",""," "BILDSCHIRM - 1""DRUCKER - 2";R$:R$""14402(R$)1(R$)21440WCY(R$):" ->";CY`5,4iLI$"ZEICHEN : BUCHSTABE - 1"" - 2";R$:R$""1510(R$)1(R$)21520 "," ",""," "," "< p" "," "," "," "," "V z" ","",""," "," "x " "," "," "," "," " " "," ",""," "," " ""," "," "," "," " " "," "," "," "," 7T1$"FUER'S LEBEN":T2$"FUER DIE NAEHERE ZUKUNFT"zT3$"FUER'S KOMMENDE WOCHENENDE":T4$"FUER DIE NAECHSTE NACHT""":95:4)"M A E D C H E N - T E S T"::95F$(10),L$(10),F(10),M(10,10),V(10),Z(10):Y$"Y":" KEINE ENTSCHF:5,AS$;:AS CY2CB26,(18) W, CY19 CY25A REG ` " "," "," "," "," " " "," "," "," "," " " "," "," "," "," " " ",""," ",""," " *" "," ","ZENTRIEREN SIE SICH ";> "VOLL UND GANZ AUFDAS DANACH.......":_ "BEREIT";B$:(B$,1)"N"94 ""::::::8)"!!! H A L T !!!"::"ICH HAETTE NOCH EINE (REIN STATISTISCHE) FRAGE :":6)"TREFFEN SIE DIESE ENTSCHEIDUNG":2)"" CY25A1(RT$)-T$(RT$,A,1)9Q(T$)TQ222Q255Q96:490mQ32Q95Q32:490v560CY2T$CY1TY1DF::TYCY2TY1DF:5:TYACY1""&2600ER$QQ$(Q):620:ER$QW "" "," "," "," "," "M""," "," "," "," "" "," "," "," "," " " "," ",""," "," "" ","","",""," " "," "," "," "," "K" "," "," "," "," "y""," "," "," ",""" "," ",""," "," "" ",""," ",""," """," ," "," "," "$Z""," "," "," ","Od" "," "," ",""," "n" "," ",""," "," "x" "," "," "," "," "" ",""," ",""," " "," "," " " "," "," "," "," "E$" "," "," "," "," "p." "," "," "," "," "8" "," "," "," "," "B" "," "," "," "," " L"",9CB(R$):" ->";CB CY2CB26,4,6" " "," ","",""," "L " "," "," "," "," " " "," "," "," "," " " "," "," ",""," " " "," "," "," "," "" EIDUNGSPROBLEME MEHR FUER"C"VIELBESCHAEFTIGTE JUNGGESELLEN !!":q" GEBEN SIE MIR BITTE AN, WAS SIE UEBER""DIE DAMEN WISSEN. ICH HELFE IHNEN" "DANN BEI DIESER DELIKATEN ENTSCHEIDUNG": " UEBERLASSEN SIE MIR DIESES PROBLEM, UNDKON"," "," "9 4" "," "," "," "," "d >" "," "," "," ","" H" "," "," "," "," " R" "," "," "," "," " \" "," ",""," "," " f" "1-";T1$:2)"2-";T2$:2)"3-";T3$-2)"4-";T4$4E@E123LE224XE325dE426sO$T1$:27O$T2$:27O$T3$:27O$T4$:27"":96:" UNTER WIEVIEL DIESER HIMMLISCHEN GE-"""SCHOEPFE (MIN=2-MAX=1$(Q):620 DER$QE$(Q):620' NER$QR$(Q):620; XER$QT$(Q):620A bU lRE1(DF1)BSn vCY2:"":5,TA);~ W1(ER$) AS$(ER$,W,1) AS$" "690 CB2AS$"" CB1AS$T$ CY1AS1DF:AS$;:AS CY2AS1D ( ) ";&P I140:I+'Z " ˝";:I12000:I:158,0j'd "NOCH EIN SPIEL (J/N) ?";:Y0:SH,55'n A$:A$"J"SO,60:I120:I:100'x A$"N"SO,50:I120:I:SO,0:2 N MIT TIE ":2530% (P)KW(P)B" KOLLISION MIT BASIS ":2530)% " KOLLISION MIT PLANET "_% SH,15:U6112:SO,60:I3276932791:I,(I)128% I:SO,0:I3276932791:I,(I)128:I,U6% ""% U61500< ."/D " . Фϣ . ";:  ""L 18)"ݑ"#V I1060:SO,70I:I:SO,0:"";19);E#` "GRATULIEREN";:I160:SO,I:I:SO,0v#j "WIR":19);:I11903:SO,190I:I:SO,0#t "ALSO DEM";:Y12:I170:SO,70I:I:SO,0:Y#~ "RETTER":19) " Ҥ ". " . ţ Ҥ . "5. " "d. " ". " ". " ˠ" 33972,34:33973,34:33983,34:33984,34$!" Ƞ ٥=ˠנ̥"L!" Ƞ ٥נ"t!" Ǡ ̤̺"!" ȧΥ"!"   ٧ ȣ " ţ . ",r "   . "0,| " "_, " . ", " . ", " . >I:SO,0:I3335433366:I,(I)128:I,U6:2560HI1200:I:SH,15:R" Ҥ":" "`\" ק":" ^ "f" = ":" "p" Σ ":" Υɧ Ҥ"z"  ̤    "* ".ϣ̤ ) ̤ "6* "ͣ  ͥ . "e* "Ч̤. ̤ "*" "ϣ.  . "*, "..d ****************7n * H. HERMES *Rx * 02191/77580 *m * REMSCHEID * ****************I140:LI$LI$(192):QQ$(100),QW$(100),QE$(100),QR$(100),QT$(100)A3296QQ$(A),QW$(A),700' 2050:2670' 59467,0:SH,0:SO,0:158,0:( ((1)38))"."1( ".  ."`( "    "( "  ) . "( "  . ϣ:U6:33674X160Y2,(33674X160Y2)128& U611000:U6:U67:2890:I12000:I3& "";^& " ( ) ";w&( I140:I:59490,30&2 "  ";&< I1500:I&F " EHE (7-77):";DF " DF7DF77280),LI$C6"BREITSCHRIFT - 1"_@"SCHMALSCHRIFT - 2";tJBS$:BS$""330TTA((80DF)2)^BS(BS$):" ->";BShDF(DF7)rLI$|1420LI$"BITTE NICHT VERWENDEN , : # I14:X30I5:J1192:SO,XJ:J:J1192$ SO,X19J:J,I:SO,0:"DER";D$ I1100:SO,100I:I:"GALAXIS ";:I13`$ T3050:SO,T:T:"!";$ T120:SO,50T:T,I:SO,0$ I13000:I:2660$ (P)FP,L:1650:" KOLLISIO .". " ݣϣϣ " / " . ͣΣ "O/& " "~/0 " "/: " Ҥ !"   "" " () () ϣ ȣ ϣ"<" " "L" I1555:In"$ "";18)""". 18)" ""8 18)" ""B 18)"  ", " Ƥ ."- " . ɣˣ "J- " "y- " "- ". "- ȧ Σ[] " " ˺ "0 " ͣţΥ ϣ"X " X ϣ" " ݧϥ" " ## ٠ ## ٥=ɠ" " ٠ ٥= "*6 I17:((1)38))".":I+@ " COPYRIGHT BY FRANK CORDES ":H+J U67". DIE MACHT WAR MIT DARTH VADER ":2910t+T ". MOEGE DIE MACHT MIT DIR SEIN "+^ ". . "+h "  QE$(A),QR$(A),QT$(A)A@"  LAUFSCHRIFT a" HOEHE 7-77""BITTE NICHT VERWENDEN : , \ ( )"24);:" ' SPACE '"AS$:AS$""250LI$CY2CB26,(24) 5:6 :"TEXTHO "( " ϣ Ч . ") ".  ͣ "K) "  . "z) ".   D E R . ") ". ") " 23:"";:: PRINT"":ENDP,D:G(X,Y)01300B I0G(X,Y)1:I(X,Y,I),KW:I:1320UF(X,Y)01320vI0F(X,Y)1:H(X,Y,I),B:I(A(X,Y)013902I1A(X,Y):H32930((1)21)80((1)21)<(H81)L(H80)L(H79)LI (X,Y)0:33674X160Y2,160U0K0710WK0:Z0:O0:""24)"ENERGIE= ":24)""24)"":24)"TORPEDOS="24)"":24)" (.1A100)1880DF(I,J)1((1)3):BABA1:V0F(I,J)1>NH(I,J,V)32930((1)21)80((1)21):VRXJ,I:BA01920nbX((1)7):Y((1)7)lF(X,Y)1((1)3):BABA1:V0F(X,Y)1vH(X,Y,V)32930((1)21)80((1)21):V:E10: 0:2100EE40A3:110Z01090,ZZV:(Z)L10807ZV,L^(Z)F(1).1A100SH,55:1140~$ZPO0:Z,D:QZ:Z0:1000.SH,15:1120:Z0:7108SH,55:SO,60:Z,V1:ZV,L:SO,0:720BT0710LZPV:(Z)L1050 ,E8:Q81,E9:SO,0:"";(142):2710:A(6,6),B(6,6):V142NI06:J06:A(I,J)((1)4):B(I,J)((1)7):J,IML66:RM72:LU74:MU70:RU75:O0:Z0:K0:M151:N152:RO73:U0:LO85H0:MO67:SO,55:I120:I:SO,0" WELCHER SCH G1:(1).6G79((1)3)80D \(D(U7)G)LD(U7)D(U7)G:D(U7),F:D(U7)G,Lg fD(U7)GPD(U7),L:P,F:1640p p110 zU71((1)(G(X,Y)5)):D(U7)0110 U6((1)G(X,Y)) G81((1)3)80((1)3) (I(X,Y,U6)G)L110 710 ^P,L:PPV:(P)V1O0:QZ:Z0:Q,D:1000'hQP:SH,15:1650:2500^rE1(Q81):E2(Q80):E3(Q79):E4(Q1):E5(Q)|E6(Q1):E7(Q79):E8(Q80):E9(Q81)Q81,108:Q80,247:Q79,123:Q1,244:Q,160Q1,234:Q79,124: U(PV)R(PV)64710 1630: PPV:P,D:PV,L:EE1(3A6)G Z0730m TIO300A10O0:1120:Z,L:Z0 EE(TIC)(100A4)(SM1):CTI:E0E0:1530:2080 1530:E(X,Y)0I150:I:110 K0980 (1).83U70E(X,Y (I),F:I:U15IU115:D(I)0:I'I06:J06:J(I,J)0J,I:1510H33674I160J2,J(I,J):J,It33674X160Y2,(33674X160Y2)1281530:1540:1550:110E$((E)):"";:39(E$));(E):T$((T)):"";:39(T$) 21)80((1)21):VE(I,J)G(I,J)((1)5)G(I,J):WWE(I,J)$J,I:W01940XX((1)7):Y((1)7):G(X,Y)0F(X,Y)02000P32849((1)23)80((1)23):J(6,6):I06J06:E(I,J)0J(I,J)F:2040F(I,J)0J(I,J)B:204 I1:IF(H1)L(H)L(H1)LII1:IBP(H79)L(H80)L(H81)LII1:IvZH81,LO:H80,MO:H79,RO:H1,ML:H,L:H1,RMdH79,LU:H80,MU:H81,RU:InB(X,Y)01430xI1B(X,Y):H32849((1)22)80((1)22) "'24)"SCHIRM:":24)""L24)"":24)""oI16:24)""24)"ݫ":I24)""""I1 E20:E302890:B90:T20:KW35:S$"AUS ":R93:L32:S0:I(6,6,2)TE40:E50:E60:E70:E80:D81:E90:E999:U70:G0:U60:F8|I06:J06:(1)(.1A100)1990F(I,J)01990G(I,J)1((1)3):V0G(I,J)1I(I,J,V)32930((1) VSH,15:SO,50:Z,V1:TT1:SO,0:1540:OTI:710H`E1(Z):I14:Z,86:SO,20:Z,V1:SO,30njZ,91:SO,40:I:SO,0:Z,E1:O0:tI1G(X,Y)5:D(I)ZI~D(I)0:IG(X,Y)5:I:QZ:Z0:Q,L:1650:E(X,Y)E(X,Y)1WW1:UU1:O0:E(X,Y)0J WIERIGKEITSGRAD (1-9) ?";#A$:(A$)0SO,40(A$):I120:I:SO,0:182032050:1800`A(A$):"":10)"SCHWIERIGKEITSGRAD"A&" "0D(15),E(6,6),F(6,6),G(6,6):H(6,6,2):I06:J06:(1) D(U7)I(X,Y,U6)G:D(U7),F:UU1:1102 (1).87A70QP:1000i GP81((1)3)80((1)3):G32849G34631110z (G)93110 KG:110 KP(K)F (K)KWK0:QP:1000 QK:K0:SH,7:1650:110 SH,90:1650:SM0P,L:165 Q80,239:Q81,126:SO,60&Q81,46:Q80,37:Q79,46:Q1,37:Q,37:Q1,37LQ79,39:Q80,37:Q81,39:SO,80Q80,114:Q79,59:Q1,45:Q,28:Q1,46:Q80,33SO,120Q81,E1:Q80,E2:Q79,E3:Q1,E4:Q,E5:Q1,E6Q79,E7:Q80 )U890 U0I130:I:110% (1)U18940[ I0A4:U71((1)(G(X,Y)5)):D(U7)0I:110u IA4:I:D(U7)P840 *D(U7)21PG81((1)3):860 4G1:(1).6G81((1)3)80 >860 HD(U7)21PG79((1)3):860 R );T:"";35);S$:!SM0SM1:S$"AN":1550:710?"SM0:S$"AUS ":1550:710p,(P81)B(P80)B(P79)B(P1)B16106(P1)B(P79)B(P80)B(P81)B1610@710JW02120TT20:E999:CTI:1530:1540:0J,I:CTI:1190YY1:Y21 Y0:X0X1:"?";:(X0:"? ";:a SH,15:U6120:SO,60:I3287432886:I,(I)128:I*SO,0:I3287432886:I,(I)128:I,U6:25704SH,15:U6120:SO,60:I3335433366:I,(I)128 (H80)L(H81)L(H)L(H1)LII1:I9H,LO:H1,RO:H80,LU:H81,RU:ILE(X,Y)01490aU((1)E(X,Y))U0I115:D(I)0:I:1490I1U:D(I)32849((1)23)80((1)23)(D(I))L(D(I)1)MLII1:ID ]^no `]d٠ 8]]^^L@00P`0@0p@`ꅾno `] ^I Ol`澦LRF`LM_PL ` `  2`L`abcda ab  $$$$$ ` `abc`abc`S`L5:م` `Lɰ0L(ɱ1L(ɲ2L(ɳ3L(ɴ4L(ɵ5L(ɶ6L(ɷ7L(ɸ8L(ɹ9L(L ` h5`:` 5 F`a80b8`閅` 6d:59467,16:SH59466:SH,55:SO59464:SO,0:1750KnA$:A$" "1560^x(M)2231580v(M)180V1:220(M)182V1:270(M)184V80:320(M)178V80:370(M)183V81:420(M)185V79:490(M)177   600  '' -    '' -    Z'' -   Kpmp'' -   0  9 -         = * 5 * :  3$$$$$$$$$$ x`Ʊư`  @(N)11020J(PV)L700GT(PV)64X0XX1:PP1760:1190Z^(PV)64710dh1630ur(N)11020|(PV)L700(PV)64X6XX1:PP1760:1190(PV)647101630(N)11020(PV)L700!(PV `noK` `Ƭ`Ґ 8H`  `L  &` & ` & `KJ ÍH`K` Y `QRr`P膺`.`TŻSźP 5 iXi` `ab acabaadȱaeaiabibad nLpL}L L_ L `[a\`8``aa#`lL{L_ d 4ȩ d` d dȊ 4`mpdȩdȩnd`mdȩdȩ}d`dae h 4Lp 4`hihhd` " lLLmnp }ɮLgLbdeddh`m`ȩ`ȩ}```i0 bc dbc bc `KʎJcHbddKPd2d`y Ljy㥀ƀLTƁLT``Lr L L jiLZZZ`Zbcb`GGGLnLwx` La`M`L L egihihdie "fdgeL~FL xpp``mGGGLG GwxG`GGLhe8NQNOO  gfhi  %giL8逑hif۩y (PV)RY6YY1:PP102:1190A(PV)64X0XX1:PP1761:1190g(PV)RO(PV)R(PV)64710q&16300(N)11020:(PV)L700D(PV)LUX6Y0YY1:XX1:PP1738:1190N(PV)RY0YY1:PP102:1190 X(P `שyPb P`a  A  `iP`aiab` !          >  !$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$y P `bcd`5 L`5 L mdf aab`a``bL\(``'KJ襷Hed K`ꅄ`  ` [``KJH済K P` ( K``Ź`UV UWX WYUVWXLB ]^ Ȣ ` V79:560 (M)179V81:6304I125:I:710E(N)11020W(PV)L700|(PV)RY0YY1:PP22:1190(PV)R7101630(N)11020(PV)L700"(PV)RY6YY1:PP22:1190,(PV)R71061630 膳`DADDADA DDADAAADDAA A qL q PꩶHI oLL%OST_$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$U$$$r$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ )LOX0Y0YY1:XX1:PP1782:1190F(PV)RY0YY1:PP58:1190n(PV)64X0XX1:PP1759:1190(PV)LO(PV)R(PV)647101630(N)11020(PV)L700(PV)ROX0Y6YY1:XX1:PP1738:1190 ceaabib`н`$$$$$$$$$$$$$$$$LbL_- - - - - - 鮮 -     m} - 25  Ln - 20  삮} - 15  n - 10  $ m} - 5   Ʉ1800    1   6`$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ `a``ALf L GGGLLrL L \Lno ( `jj`  `[ [``B ```B `Ƭ`ꥊ`KF`KJH` "`IɂHHIL J ,L] Dw 2`^KJH腼 gIgeи `NPNN`K` h``Ls K`  D`逅gŅ`ťf`L LBLLLLc ȐL L ǩǩȥǍyȍzة` k`kH8k `mL V)64X6XX1:PP1761:1190: b(PV)LU(PV)R(PV)64710D l1630U v(N)11020g (PV)L700 (PV)RUX6Y6YY1:XX1:PP1782:1190 (PV)RY6YY1:PP58:1190 (PV)64X6XX1:PP1759:1190 (PV)R eg8f(fg 08f(fggf(M)LB ;LKm*8ʵ8demwww Yldhfegi qie fdge  LFL f m LK(6DdieimxxxLLl f GEBEN"'n"IHRE ROHRERHOEHUNG IN GRAD EIN."Is:"V I E L G L U E C K ! !"px:"GEBEN SIE IHRE EINSTUFUNG EIN"}"(1 - EXPERTE BIS 10 - NEULING)";:K1"":"GEBEN SIE EINE ZUFAELLIGE ZAHL EIN";:K:K(K)A(K)::K0:N((1)8)3 WEITE VON 10 KM HAT. EINE ZU-"K7"FAELLIGE ZAHL VON ZIELEN WIRD VON EINEM"w<"BEOBACHTER GEMELDET, EBENSO DIE ENT-"A"FERNUNG ZU JEDEM ZIEL. IHRE AUFGABE"F"IST ES, JEDES ZIEL MIT MOEGLICHST WENIG"K"SCHUESSEN ZU ZERSTOEREN. EIN TREFFER  59468,12:(142):1021oLL%OST_   eHHeIILy P . `y P `y P &`y P  `Xy P ` RFL _L _L RFL eF _L _L RF ``````````````````````````````````````````````````````````````````````GM  襆O``Mݙ 襆ݙQ`L# VF6փ&vƄfV׀'wǁgWG7ׅ'wdž jk L:` 9`A&DR[\ \m8Nl[OmLNɖOɇ`  NO NO NO `NɷOɇ`  NO NO NO ` -=d `a `QbRcd0ecݧ-4 e`dL0 dddd)`b8Nb`Oa ꊢ``YLB ZZZXUZZ`aPe`beac cɇ ?`YZLB bɼ 4b BbZbcLB  b[\Lc L^ bLa dcɇ bDL df fbL] dɠP 5 sL  De  X((99225(2A))9.8)! T(630(A))9.8@ H((99225((A)2))19.6)J EXDV T1(T)k T21T1.01:T2q *~ 4Q0830 9Q880,920,950 >A3D9.877E5 HA3A(A3)28.64789 RA2A3((1)K1):Q1 f pA4A2((A3A2))( jka`j`jjiPjj  jB`qL4`L~[\` @\a8`P`aa  )`L[\BYjaɀ `ɴO `jɮ L L PL `ɠ cfL ꘁ```[a\L `U WXL aVUVYL ꊑ`` "SEKUNDEN" "GROESSTE HOEHE:",H1,"METER"? "SCHUSSWEITE:",X1,"METER"a &"LETZTE ROHRERH.:",A1,"GRAD"~ 0"KORREKTUR:",E1,"METER" :300 D"":::" *** ZIEL ZERSTOERT ***":: bKK1 lN1 v:"KEINE WEITEREN FEINDPOSITIONEN GEMEL  s Ȧt Ȧu eݢ ]^ +`]M^Inon`o`L~Lt c]]^ `L]ɈL LG)$GxxxwLLGwڰإxGL @G`aLeM`eaa  N11N:Q0:D((1)5000)5000@,:"ENTFERNUNG ZUM ZIEL:";D;"METER"X6"ROHRERHOEHUNG";A1l@A10A190380T:"DIE ROHRERHOEHUNG MUSS ZWISCHEN 0 UND"Y"90 GRAD BETRAGEN. DER FEIND BEKOMMT"^"EINEN FREISCHUSS AUF SIE!"r460 |A ,",P"DER WENIGER ALS 25 METER VOM ZIEL ENT-"[U"FERNT IST, ZERSTOERT ES. DAS FEINDLICHE"Z"ZIEL ERWIDERT ABER DAS FEUER, SEIEN SIE"_"ALSO VORSICHTIG."d:"IHRE LEISTUNGSFAEHIGKEIT WIRD, WENN SIE"i"NOCH LEBEN, AM ENDE MITGETEILT. L x _L RFL _L eF _L RFL _L _L RFL e _L RFL x _L RFL _LF _L eL```` L? ;LT SQTR  LQSLLRL`` ljȩjȑjȑjȩߑjlXjkmlpjpl,mۥHdIelmde jeddeeemeddeeelʩ#FDGxPeHHeIIMUVWXY[\]^w  UZ  ( NO ``@) ` ebeb e``bݧ8bbʥcceL {ꩀa`SbTcLq[ q[ q`r r v0studsdƃ`L t ƃ`L `uƃL dddddddddddd  P_`NO L m NNȑNȑNN `0eP  `Y`FxjL H L jjji8jj 8jj``a`iQ`aia ` `[\`B`YUVUW`a`jjLc ```YU VUjL W(1)1) zA4(A2.1)A2A4 910 " Q25 DX2A2A2.5> 940D L Q3_ DX2A2A2.1m A2A2.05s  ` aL `mLF  `P  l-P R M  B H R   lУm7L ) L L L eSSeTT m` veSSeTTeL ꊑ]`*  DET."$ :"SIE ZERSTOERTEN";K;"FEINDPOSITIONEN"> "MIT";R;"SCHUESSEN."N P(KR)100w :"TREFFERQUOTE:";(P10.5)10;"%" P25:"GUT GESCHOSSEN!"  :"IHRE POSITION IST ZERSTOERT WORDEN!" I11000:::"ZU SCHADE!"  ` `8[P[L\ [GdedH dȑdȑd`LVGw)%MML[MOQL[ML[M`Ɇ ߐLLGwxG` fNȑNȑNO `fL| fL|`L꩝c  2b b bc 2bc b 2bc A157.296:RR1:740:(E)255805 (E)D25(E)D25700M X1X:T4T:H1H:E1Et :"DER FEIND ERWIDERT DAS FEUER!"} 820 AA257.296:740 X2X E(E):E25700 :"VERFEHLT UM:",E,"METER" "FLUGZEIT:",,(100T4.5)100, 2 4: M%(J)M%(I) IJ5g J:"DER GEWINNER: ";N$(P(I));" MIT $";M%(I);".WlX$;E$:X$"NOCHMAL? ";:60000vv(IN$,1)"N"""::100"":X$"DU HAST: $ "M%(4):V$(RK$,V%(I),1):V%(I)9V$"10"(""V$ # "":*****KALENDERDRUCK*****D***** H.HERMES JAN.81******P4:4,4m("DRUCKER EINSCHALTEN."}2"JAHR";JZ$<JZ(JZ$)1FS37JZ(JZ4)(JZ100)(JZ400)PS((S7(S7))7.5)1ZS1S6dT(126),M(12)n31,28, :13)"TOPF: $"Q:I14:W%(I)0:5I14:J14:JI1710GB(I)01720nV%(I)V%(J)B(J)0W%(I)W%(I)1uJ|IX$"GEWINNER: ";:NW0:I14W%(I)31790NWNW1:NW1" UND ";N$(P(I));:W""::59468,12:100  Ġ͠ EڠJ" T . D GL" EڠӠ StN" (Š RETURN), -P" (̠ $ 25), -R" (ȠEŠ '0').T"NȠ A$(2)" ***** * * * **** * * *******"vA$(3)" ***** * * * *** ** * ***** "A$(4)" * * * * * * ******* * * "A$(5)"****** * * ****** ** * ***** "0A$( ;Z$;Z13IN$(IN$,2):CR$;:'Z20ZL1IN$(IN$,ZL1):"";:60010ZZ141Z$(20(ZL1)):Z2ZL:Z$;:Z:60000e60010059468,14:"":" INDIAN POKER ":"D ԠΠ3 S (D<" (I)((JZ$,I,1)):II15:4:BJ06:4,15);:I03:4," ";j4,(A$(JD(I1)),J71,7);:I:4:J "* JANUAR **","* FEBRUAR *","** MAERZ **","** APRIL **"" "*** MAI ***","** JUNI ***","** JULI ***","* AUGUST **"$ , " SEPTEMB (P)0:2500. B(P)1.8BB(P)B:2500#B B(P)BM%(P)B(P)BM%(P)> B(P)M%(P)B(P)M%(P)S X$E$X$N$(P(P));{ B(P)BB0" ERHOEHT AUF ";B(P): B(P)0" STEIGT AUS!": OB0B(P)OB" HAELT MIT.": " SETZT $";B(P):`IN  rI13:J13:4,B$(I); |J34000 4," ";:J: 4:IW J02:MOMO1:D0:VJ7c WT17 DM(MO)SWT1:J:470 DD1:T(WTSV)D WTS7S0:VV21:420 WT Z1 I13:4," ";:J17 T(Z)04," " ",4)"  ";)("",S%(I),1);"  ";(" "V$,3)/^4BM%(P)B(P)B3K(P)B(P)B(P)B:2500o>B(P)0:2500F10:F20:F30:I14:IP2250V%(I)L1(P(P))F11V%(I)L2(P(P))F21V%(I)L3(P(P))F3 31,30,31,30,31,31,30,31,30,310xI112:M(I):INJJZ1:(J4)J40150~(J100)J1000(J400)J4000M(2)29A$(0)" ***** * ** ** ** ** * ***** "A$(1)" ** * * * * * * * ******"8 (QNW)" $"W:J(QNW)'I14:W%(I)3M%(I)M%(I)J:QQJ9&:1260:1580X0FO0:P14:M%(P)01860`::DP4X$;E$:X$"DU BIST DRAUSSEN!!":1260:1890NX$;E$:X$;N$(P(P));" IST DRAUSSEN!!":1260:X$;E$X1260bI1: J ." *** GESCHUETZFUEHRER ***"^ "BRAUCHEN SIE EINE BESCHREIBUNG (J/N)"pC$:C$""20A(X)(X(XX1))C$"N""":115#""(:"SIE SIND DER KOMMANDEUR EINES":"ARTILLERIEGESCHUETZES, DAS EINE2"REICH  E !V"ԠҠΠK (ΠҠGX"Π!). A ԠcZ"ŠK.\"DӠS̠, Π S G Ҡ.^30)"<RETURN>";bZ$:Z$""62050 6)" * * * ****** * ** * ***** "nA$(7)"******** * * * * * * "A$(8)" ***** * ** * ***** * ** * ***** "A$(9)" ***** * ** * ****** * * * " I14:JD Ԡ PET). J S -">"ԠŠŠK, O@", (Ҡ mB"!) ŠΠ.D"JҠԠ$ 200 S, AF" R Π $ 10 ΠH"T, ER ","* OKTOBER *"," NOVEMBER *"," DEZEMBER *"f 6B$(1)" * *":B$(2)" SO MO DI MI DO FR SA" @B$(3)" ********************" :4:4 JK14:4:4:4:4 TI13:M$:4," *****";M$;"****"; ^I34:370 h4," ";:I $" ":ZTTI:ZC2:ZD$(20) jZ$:Z$""60070:tZTTI(" ",ZC,1);"";:ZC3ZC:ZTTI15Dy1160O~60010Z(Z$):ZL(IN$):(Z127)32" ";:60110FL(Z127)64(Z127)91Z$((Z128)255)ZL25460010IN$IN$Z$:Z$;ZD$";:510 4,((T(Z)),2);" "; ZZ1+ Z126550? J:I34:480R 4," ";:Iw &I1126:T(I)0:I:K:4,,(12); 0I15:4: : F31IF11B(P)0:FO1:2330!F10FO1K(P)3:23109F21K(P).5:2310PF33K(P)2:2310[K(P)1{ KK(P):B(P)(2K(5(1))) B(P)M%(P)B(P)M%(P) B(P)BLIMITB(P)BLIMIT B02500$ B(P)B3BM%(P)B  276 INDIAN POKER)Z62000AdR(I)((TI)I)1^nWAD200:ANTE10:LIMIT25kxT(TI)N$(7),K(3),M%(4),W%(4),B(4),S%(4),V%(4)EYE33125D$"":D2$D$"":X$D2$"""E$" :P(3)P(1)P(3)P(2)400C"":I13:PLP(I):D$11I4);:1025:IjD2$" ";:I116:"";::""" ";:I117:" ";::""" EINS ";:I116:" ";::"""";:I119:" ";::"""";:I119:"";::""" :I24?S%(I)R(4):V%(I)R(13)IDJ1I1:S%(I)S%(J)V%(I)V%(J)575SNJ:IuXI13:""11I3);:2000:IPB1:F0:B0:CL0FBFB1:FB4FBFB4PFBPP1:P4PP4OBB(P):OB0900 P41270:850 M%( T3 PERFORM TEST BT4 CHECK DISKBT5 NEW TEST 8050 T6 DUP TEST 8050 T7 FLOP.RAMTEST DEINE KARTE"24)"";:I4:2000:1260; 1260:D2$""E$x D2$""24)"     " "";:I16:E$" "::X$E$ 1670:1260:530 PL1030,1050,1070,1090,1110,1130" "==== = REG.BEISPIEL.SCHACH 80}=A UNIVERS. WEDGE=D1 SEQUENTIAL >D2 SEQ BASIC 4 >D3 REL. ACCESS >D4 80 COL DEMO?D5 8024 DEMO "Σ ߒ [ ݼ ] ˱ ";x 8"( - )  Σ ": B"Σ ݥ ߒ( ݼ ) "; L" ͤΣ 7WURM 7STARFORCEAUTORENNEN DT8TIC TAC TOE8COPY DISK VB KALAHA!9ENTERPRISE+TRIFF DEN BALL 1 "˒ͤ .  . ":5~E(1).04\E1E11:E14E11zER(8):E1EG251:1240E2EG254:1240E3EG236:1240E4EG173:1240EG252EEYE11E1:E,EG:E2,EG: 1GRAPHQUADRAT2POSTER 2PINKPANTHER POST3X-RATED1MAEDCHEN TESTPSYCHOMAENNER-TEST  ",P(4),L1(7),L2(7),L3(7)E6I17:N$(I),L1(I),L2(I),L3(I):@JACK,14,10,9,EDNA,14,9,8,BURT,14,9,7,KIRK,13,8,5,LUCY,14,8,4,FRED,13,8,4BDU,0,0,0^RK$"23456789BDKA"rP(4)7:P(1)R(6)|P(2)R(6):P(2)P(1)380P(3)R(6) ""D2$7)N$(P(1))7)N$(P(2))7)N$(P(3))7FB((TI)31)T I14:M%(I)WAD::1580X$E$:"STARTEINSATZ $"ANTE:1260:X$E$P14:M%(P)ANTE1860!P&I14:B(I)1:QQANTE:M%(I)M%(I)ANTE::15800S%(1)R(4):V%(1)R(13) P)0B(P)0:2500:850" OB02200:850, 2100D RB(P)BB0CLCL1U \B(P)BCL1g aB(P)0FF1v fOB0OB0 pB(P)0QQB(P)OB:M%(P)M%(P)B(P)OB uBB(P)BB(P) z1580:1260 FCL4760 X$E$:PB0" D2$" "FB(4)M%(4)E$:"SOVIEL HAST DU NICHT!":1260:1270(K,X$"DU HAST: $ "M%(4)d6D2$;""E$;"@"HAT"6)"$"M%(1)17)"$"M%(2)29)"$"M%(3)J"";E$;"TJ13^B(J)0PB011J4)"$"B(J);hJr = =< ȼ > (-)";X " ѩ ": "@@@@@@@ @@@ @( )* V *"; $" ͤؤ":6 . ?D6 8027 DEMO@D7 SCREEN DEMO@H1 COPY DISK 2.0 @H2 UNIT TO UNITAH3 CHANGE 8050AH4 COPY2040-8050 A T1 8032 BURN IN T2 LOGIC DIAG   ":V V"Σ   ߒ  ¼  "; `" ˒ͤ.......ק...": j"='= ( ݸ ) ׼  ";/t :DIAET PLAN 1ANLEITUNG RAUMSC RAUMSCHLACHT WURFBALL;MAUERN GALAXIS<ROULETTEHELP Z190:1160::#X$E$:"DEIN EINSATZ? ";:60000:B(4)(IN$)P IN$""B01270gIN$""B(4)B:B;uB(4)0}"2B(4)BE$:"DER EINSATZ IST"B:1260:1270<B(4)BLIMIT:E$:"ERHOE LIMIT $"LIMIT:1260:1270  HARD COPYFROG [80]5LOVE5BIO-2POLIZEI6TOWER OF HANOIBOMBER[80] FLIPPER xi}iY1Y(W11):Y2Y(W21):X1H(W1):X2H(W2):XN0:Y10:Z11<iOS395XXXE:US395XXXADiS$UiC8725000fiC6924000iHWY2Y1:HW0HW1E30iX3X1((X2X1)HWY1)iX3OSX3US27900iC8725100iC6924100 Z"BEI X="W(N(I))"";:VS0"Y="W(W(I))""! ZJ3230706ZW$:W$""23060BZJJ1:H]N]j]XMX1:H.1XX:H0H.1u]26000]Y1(YOYU)(2H)]XMX2]26000]Y2(YOYU)(2H)^$^XMX3:26000:Y(YOYU)(2H)  SPIEL 999PZ$(1)"          "Z$(0)"        "(Z$(2)" ߒ     " 2Z$(3)" ߒ      ~JC53N N)*NS$;:GZV(YG):KZV(YK):AZV(XA):EZV(XE)Z\N""B$""L$"XA"AZ"XE"EZ"YK"KZ"YG"GZ`fNfRRA281:AY1E38:AN0:A90:I180RYV(I)0AN1&RYV(I)0A9I0RAYYV(I)YV(I)0AYYV(I):A2I:R:A2A21:HAST DU DICH WIRKLICH RICHTIG ANGE- STRENGT ?"mAK$(6)"MAN KANN HIER AUCH BESSERE PUNKTZAHLEN ERREICHEN!"BK$(5)"WELTMEISTER BIST DU DAMIT NICHT GEWORDEN"CK$(4)"GAR NICHT MAL SCHLECHT!!"DK$(3)"DAS IST JA SCHON FAST GUT!"EK$(2)"CYCY1 lCC55CXCX1:CYCY1vCC52CXCX1-CCX79CX79>CCY47CY47MCCX0CX0\CCY0CY0C1,CX:2,CY:994:1,CX:2,CY:972:C1C:17100E(0)01,CX:2,CY:955OFPFZFZ10:Z2Z0xFZ1W2CX:Z2:C53F "@ZZ$(7)"        "dZ$(8)"        "eW$(1)"  "fW$(2)"   "gW$(3)"  " 9I02:N(I)1.01E9:W(I)1.01E9::VN0GBC17I35:N(I)1.01E9:W(I)1.01E9::VE0yBC29I68:N(I)1.01E9:W(I)1.01E9::VW0BC4218000CC78Z2VS0:VVN:V$"":27000:VNV1CC69Z2VS3:VVE:V$"'":27000:VEV1CC" " " " "* " ϣ"< " "N " "` " "r " " " " " ̤" SU0:Z07:W1((1)6) "";W$(W);:""; I24:S$((SU),I,1NKTE!!":450 @"DU HAST";SU;"PUNKTE!"U JFK4:SP0:I24:SPSPFK(9(((SU),I,1))):FKFK2:I} T"DAS MACHT";SP;" STRAFPUNKTE" ^SP30450 hK(SP2.8):K$(K) "NOCH EIN SPIEL?? (J/N)" A$:A$""460 A$"N" A$"Ji(Y)1E827110iXX3:300004iS$"Y"V$"=0 BEI X= "W(X3);:V$"""Y= "W(Y);?i27970[iXNX3:XX3:C7830000viY0Y1Y:X1X3:27140iY2Y:X2X3jZ1Z11:Z11527900j27040lS$"KEINE NULLSTELLE BEI Y"V$"";:VV1:aaaXMX1:H.1XX:H0H.1a26000&aY1(YU2YMYO)H20aXMX2;a26000SaY2(YU2YMYO)H2Ya} bXMX3:26000:Y(YU2YMYO)H2eeeXUXMH:XOXMHeXXM:30000:YMY:XXU:30000:YUY:XXO:30000:YOYwi  "P<Z$(4)"         "=K$(10)"DAS IST ABER EIN AUSSERST MIESES ERGEB- NIS">K$(9)"DU MUSST NOCH VIEL UEBEN!!"?K$(8)"NA, VIELLEICHT KLAPPT ES BEIM NAECHSTEN MAL BESSER!".@K$(7)"A90A2A91kRUU""S1$"ICH ZEICHNE DIE":SQ$EVI180:YZ(I1)Y(I)::A2A8:ANA7KYQYYYJ1hYIVSVS2{YS$""J".";YVS0"Y=0 ";YVS3"Y'=0 ";YVS6"Y''=0 ";YN(I)1.01E9"LEER":23070PRIMA GEMACHT (GLUECK GEHABT!)"VFZ$(5)"      "GK$(1)"GLUECKWUNSCH! AUSGESPROCHEN GUT."HK$(0)"DAMIT BIST DU WIRKLICH WELTMEISTER!! ICHGRATULIERE!!"PZ$(6)"     Z0W1CX:Z1$FW1W2S$"GLEICHES WERTEPAAR":Z0:18999DGS$"W"Z""H(CX)"/"Y(CX1)J7JP8JfBJS$""B$""L$"";yLJCC(CY7947)VJ(0)0"X="H(CX):19070`J"X="H(CX);jJB$"B""YV="YV(CX1):19070tJ"Y="Y(CX1)hW$(4)"   "? iW$(5)"  "e jW$(6)"   " nZ$(9)"       " sZ$(10)"     " x"" " 87Z2VS6:VVW:V$"''":27000:VWV1%CC57C48CC1:C1,CX:2,CY:955NCC53J020:l&C(0)01,CX:2,CY:9720CC49CXCX1:CYCY1:CC50CYCY1DCC51CXCX1:CYCY1NCC54CXCX1XCC57CXCX1:CYCY1bCC56 ):S$""S10:260 S(S$)( "";Z$(S);:IY "";Z;". WURF "m A:A1A3280 "SUSU(W(10(3A)).1):SU999300 $Z &320 ,"DU MACHTEST EINEN FEHLER!!" 6"ES SIND NUN BEREITS";SU;" PU"120 460$q27990BmV2"!SP.":27990LmN(VSV)X3:W(VSV)YVmC53:Z0#_m.0uY(X)>:uL1Y(Y)Dyx ECHNUNG VON Y=0)}iY1Y(W11):Y2Y(W21):X1H(W1):X2H(W2):XN0:Y10:Z116iOS395XXXE:US395XXXA>iS$OiC8725000`iC6924000|iHWY2Y1:HW0HW1E30iX3X1((X2X1)HWY1)iX3OSX3US27900iC8725100iC6 (YOYU)(2H)^$^XMX3:26000:Y(YOYU)(2H) aUa BERECHNUNG DER WENDEPUNKTEqaXMX1:H.1XX:H0H.1|a26000aY1(YU2YMYO)H2aXMX2a26000aY2(YU2YMYO)H2a b Z*dY(81),YZ(80),YV(80),N(8),W(8)XnH(I)IXXXA:V(I)(I10000.5)10000}xW(I)(I10000000.5)10000000SQ$"MIT B BERECHNETE FUNKTION"S1$"":S3$"":L$"N"S$" " ::A2A8:ANA7Y2Y ANGABE DER NULLSTELLEN,EXTREMWERTE UND WENDEPUNKTE:YJ1IYIVSVS2\YS$""J".";qYVS0"Y=0 ";YVS6"Y'=0 ";YVS12"Y''=0 ";YN(I)1.01E9"LEER":23070Z"BEI X=" F C ";t'G$:G$""10100'F(G(G$);P(GE0:M010350[Z(G77L0L1:L$"L":10999{d(G77L1L0:L$"N":10999n(G66GE2:B$"B"s(G69GE1x(G68GE4:B$"D"(G73GE5:B$"I"(G70M0GE7:B$"B"(G86GE3(RENZEN UND DES KLEINSTEN UND GROESSTEN Y-WERTES6*NS$;:GZV(YG):KZV(YK):AZV(XA):EZV(XE)g\N""B$""L$"XA"AZ"XE"EZ"YK"KZ"YG"GZmfNR BERECHNUNG DER LAGE DES ACHSENKREUZES (Y-ACHSE) BEI DIFF UND INTRA281:AY1E38:AN0:A9 k+L1I011125/p+30000:Y(I)Y:L1I1Y(0)Y(1);u+II1:Az+n+A180:A281:AX80:AY1E38:AN0:AM0:A90+I180:YZ(I1)Y(I)+H(I1)0AM1+AXH(I)AXH(I):A1I+H(A1)0AX80+Y(I)0AN1+Y(I)0A9I:AM1:AN'PF EINGABE DER WERTEPAARE9ZFZ10:Z2Z0QxFZ1W2CX:Z2:C53dFZ0W1CX:Z1FW1W2S$"GLEICHES WERTEPAAR":Z0:18999GS$"W"Z""H(CX)"/"Y(CX1)7J8J ))1E7YV(I)YV(I1) /YZ(I1)YV(I)( /:21000. 24 2` 2""S1$"ICH INTEGRIERE DIE":SQ$:YS0l ,3I180 63YI(Y(I1)4Y(I)Y(I1))XX3 @3YSYSYI:YV(I)YS J3YZ(I1)YS T3:21000 6 6 6"ZEILE 30000-30009 :" 63:ITB,TY: ;" . >N >YY0:YN0:YKYZ(0):YGYZ(0)Z >I079q >YZ(I)YGYGYZ(I) >YZ(I)YKYKYZ(I) > >YY(YGYK)47:YY016200 >I079:YZ(I)(YZ(I)YK)YY.5::16999 H?I079:YZ(I)YZ(924100i(Y)1E827110iXX3:30000. iS$"Y"V$"=0 BEI X= "W(X3);:V$"""Y= "W(Y);9 i27970U iXNX3:XX3:C7830000p iY0Y1Y:X1X3:27140 iY2Y:X2X3 jZ1Z11:Z11527900 j27040 lS$"KEINE NULLSTELLE BEI Y"V$XMX3:26000:Y(YU2YMYO)H2e=e BERECHNUNG DER HILFSGROESSEN FUER WENDEPUNKTE UND EXTREMWERTEQeXUXMH:XOXMHeXXM:30000:YMY:XXU:30000:YUY:XXO:30000:YOYwixi METHODE ZUR EINGRENZUNG DER NULLSTELLEN (BER$I08:W(I)1.01E9:N(I)1.01E9:-""3>10000oLGE1999,11000,14000,12000,13000,17000,22000VM0G6710001600015000x1000""S1$:''""S$""B$" "L$"  B E V ";$'M0"M";:10100.'"D IW(N(I))"";:VS0"Y="W(W(I))"" ZJ323070ZW$:W$""23060$ZJJ1:*]v] BERECHNUNG DER EXTREMWERTE]XMX1:H.1XX:H0H.1]26000]Y1(YOYU)(2H)]XMX2]26000]Y2G67GE6$(M0GE3GE0B$"":10100/(109995*;*Q+MM1:C0:""S1$d+"XA,XE";XA,XEv +XX(XEXA)79*+XX0"NEGATIVES INTERVALL":110304+""S1$S3$"BERECHNUNG DER WERTE":I0\+XXAXXXEXX.1XXXXf+I81111300:I1160RYV(I)0AN1&RYV(I)0A9I&0RAYYV(I)YV(I)0AYYV(I):A2IB:R:A2A21:A90A2A91HkRU ZEICHNEN DER GRUNDFUNKTIONU""S1$"ICH ZEICHNE DIE":SQ$VI1160:YZ(I1)Y(I)1 +AYY(I)Y(I)0AYY(I):A2I, ,Y(A2)0AY802 $,L .,A2A21:A90A2A91\ 8,A8A2:A7ANb .h . .""S1$"ICH DIFFERENZIERE DIE":SQ$ :/YV(0)W((Y(2)Y(0))(2XX)) D/I180 l/YV(I)(Y(I1)Y(I1))(2XX) v/(YV(I)YV(I1 EINGABE DER WERTEBJS$""B$""L$"";/LJCC(CY7947)_VJ IFPEEK(0)=0THENPRINT"X="FNH(CX):GOTO19070r`J"X="H(CX);jJB$"B""YV="YV(CX1):19070tJ"Y="Y(CX1)~JC53N N ANGABE DER INTERVALLG 000030009 : :"":A4(YZ(A2))8 :A42(A42)TY100:15040B :TY64b :A12(A12)TZ101:15060l :TZ93~ :A324(A42) `;J125 j;AM0A18015240 t;TAJ40(A12)32768:TA,TZ ;TBJ4032768 ;A3JA280AN0I039I)YK: gB hB rBCX0:CY0:C0:S$F |B1,CX:2,CY:994:(0)01,CX:2,CY:972[ BC$:C$""17115g BC(C$) BC67G$"C":17900 BC4620000 BC4819000 BC45VS0:23000 BC61VS3:23000 BC43VS6:23000BC1"";:VV1:27990 BmV2"!SP.":27990 !LmN(VSV)X3:W(VSV)Y!VmC53:Z0!_mi!0u FUNKTIONt!1uY(X)!:uL1Y(Y)!y0 O PET-PLOT-LADER20,7B,6C,62,7E,61,7F,FC,7C,FF,E1,FE,E2,EC,FB,A0,A5,01,30,0C,C9,5010,08,A5,02,30,04,C9,32,30,03,A9,00,60,A9,87,85,58,A9,80,85,57,A5$01,AA,F0,14,CA,F0,16,18,A5, 52 INTEGRIEREN DER FUNKTIONa2""S1$"ICH INTEGRIERE DIE":SQ$:YS0n,3I116063YI((Y(I1)4Y(I)Y(I1))XX3)2@3YSYSYI:YV(I)YSJ3YZ(I1)YST3:2100066  Z(I1)Y(I) +H(I1)0AM1* +AXH(I)AXH(I):A1I? +H(A1)0AX160P +Y(I)0AN1k +Y(I)0A9I:AM1:AN1 +AYY(I)Y(I)0AYY(I):A2I ,Y(A2)0AY160 $, .,A2A21:A90A2A91 8,A8A2:A7AN .".  TZ101:15060:TZ93:A324(A42)`;J1253j;AM0A116015240Tt;TAJ80(A12)32768:TA,TZf;TBJ8032768;A3JA2160AN0I079:ITB,TY:; > NORMIERUNG DGE0B$"":10100 (10999 *a * BERECHNUNG DER GRUNDFUNKTIONw +MM1:C0:""S1$ +"XA,XE";XA,XE +XX(XEXA)159 *+XX0"NEGATIVES INTERVALL":11030 4+""S1$S3$"BERECHNUNG DER WERTE":I WAHL DER ANWENDUNGSMOEGLICHKEITEN;rBCX0:CY0:C0:S$j|B1,CX:2,CY:994:(0)01,CX:2,CY:972BC$:C$""17115BC(C$)BC67G$"C":17900BC4620000BC4819000BC45VS0:23000B0,13000,17000,22000 VM0G671000' 160002 15000< x1000J ""S1$: ' WAHL DER AUSFUERUNGSART '""S$""B$" "L$"  B E V "; $'M0"M";:10100 .'"D I F C "; t'G$:G$"1:60200 "FROGGY NEEDS BUGS TO LIVE. YOU CONTROL="HIS TONGUE > SHORT MEDIUM LONGn"AND HEIGHT > HIGH 7 8 9"WITH THE MIDDLE 4 5 6"NUMBER PAD. LOW 1 2 3F48:A,I:TZ VEREINBARUNGSTEIL|dY(161),YZ(160),YV(160),N(17),W(17)nH(I)IXXXA:V(I)(I10000.5)10000xW(I)(I10000000.5)10000000SQ$"MIT B BERECHNETE FUNKTION" CC69Z2VS6:VVE:V$"'":27000:VEV19CC87Z2VS12:VVW:V$"''":27000:VWV1MCC57C48CC1bC1,CX:2,CY:955vCC53J020:&C(0)01,CX:2,CY:9720CC49CXCX1:CYCY1:CC50CYCY1DCC51CXCX1:CYCY157,69,01,85,57,A5,58,69,00,85,58,CA,4Ck68,03,A9,01,4C,85,03,A9,02,85,59,A5,02,AA,F0,18,CA,F0,11,38,A5,57E9,50,85,57,A5,58,E9,00,85,58,CA,4C,8A,03,06,59,06,59,A0,0F,AD,40E8,29,20,D0,F9,A1,57,D9,3A,03,F0,04,88,10,F8,C8,A9,FF,60,20,4A,03@ VERAENDERN DER FUNKTION76"ZEILE 30000-30009 :"H63000030009: ZEICHNEN DER FUNKTION UND DES ACHSENKREUZES:"":A4(YZ(A2)):A42(A42)TY100:15040:TY64:A12(A12) DIFFERENZIEREN DER FUNKTIONL.""S1$"ICH DIFFERENZIERE DIE":SQ$m:/YV(0)W((Y(2)Y(0))(2XX))zD/I1160l/YV(I)(Y(I1)Y(I1))(2XX)v/(YV(I)YV(I1))1E7YV(I)YV(I1)/YZ(I1)YV(I)/:210002ER Y-WERTE AUF DIE BILDSCHRIRMGROESSE)>YY0:YN0:YKYZ(0):YGYZ(0)6>I0159M>YZ(I)YGYGYZ(I)d>YZ(I)YKYKYZ(I)j>>YY(YGYK)47:YY016200>I0159:YZ(I)(YZ(I)YK)YY.5::16999H?I0159:YZ(I)YZ(I)YK:gB%hB 0 \+XXAXXXEXX.1XXXX f+I161111302 k+L1I011125W p+30000:Y(I)Y:L1I1Y(0)Y(1)c u+II1: z+ ACHSENKREUZ +A1160:A2161:AX160:AY1E38:AN0:AM0:A90 +I1160:Y C61VS3:23000BC43VS6:230009BC19I05:N(I)1.01E9:W(I)1.01E9::VN0lBC17I611:N(I)1.01E9:W(I)1.01E9::VE0BC29I1217:N(I)1.01E9:W(I)1.01E9::VW0BC4218000CC78Z2VS0:VVN:V$"":27000:VNV1"10100 F(G(G$) P(GE0:M010350; Z(G77L0L1:L$"L":10999[ d(G77L1L0:L$"N":10999q n(G66GE2:B$"B" s(G69GE1 x(G68GE4:B$"D" (G73GE5:B$"I" (G70M0GE7:B$"B" (G86GE3 (G67GE6 (M0GE3"THE LONGER HE HAS TO REACH, THE MORE("ENERGY HE USES. HIGHER SKILL LEVELSP"MAKE THE BUG FASTER AND THE FROGn"EXPENDS ENERGY FASTER.y602002S1$"":S3$"":L$"N"OS$" "wI017:W(I)1.01E9:N(I)1.01E9:"" HAUPTPROGRAMM10000 LGE1999,11000,14000,1200NCC54CXCX1XCC57CXCX1:CYCY1bCC56CYCY12lCC55CXCX1:CYCY1DvCC52CXCX1WCCX159CX159hCCY47CY47wCCX0CX0CCY0CY0C1,CX:2,CY:994:1,CX:2,CY:972:C1C:17100E(0)01,CX:2,CY:955OFF0,21,A5,59,49,FF,85,59,98,25,59,4C,D4,03,20,5D,03,F0,10,98,05,59A8,AD,40,E8,29,20,D0,F9,B9,3A,03,81,57,60,20,4A,03,F0,03,98,25,59 85,00,60 :A826 1004 I$:F(I$): F57 FF7 I(F48)16:F((I$,1)):F57FF7 II :59468,12 :"> FROG! COPYRIGHT (C) 1980 BOB CARRU 957 E WASHINGTONp EL CAJON CALIF 92020v: CURSOR #19 APR 80 BOX 550, GOLETA, CA. 93017 LINES 61000-65000 (C) 1980 CURSOR MAGAZINE: AS OF 28 APR 80 В""  ""  "+" ('ߒB"ߒ":W""5)"k"  (Qߒ""  ' Ւ""  ) "" "" "$" , )ߒ "."  (  Q,7:Q,0:8002 N.5379MM80:KK79:LL80:II1:Q,9:Q,0:800V MM80:KK1:LL81:II1:JJ1w MCCMDDC1C17C9:MEE *M,F:LCCLDDJ1J17J9:LEE 4L,F:KCCKDDI1I17I9:KEE 6MLMKLK750 8L,F:K,F:M,F: O80PP1:AA,160:AA80,160:AA80,160:AA1,160GAA1,160:AA80,32:AA80,32:AA1,32qAA1,32:AA,32:G33996:OO40:EE.3Z2001005:Q,Z::Q,0:Z150250.2:Q,Z::Q,0:K,32:L,32:M,32""37)" ""YOU CAUGQ,0:690 v840:B$;:A1X:"ɝ";:Q,A4E BA:AA33580A:(AA)F1160:AXm :X1B:" ";::" ":Q,0:690 840:1000:C$;:A1X:"ɝ";:Q,A4 BA:AA33260A:(AA)F1160:AX :X1B:" ";::" ":Q,0:840 AAKREE FROG.":1360<P10" A TADPOLE.":1360;F" YOU OUGHT TO EAT VEGETABLES!PPD$:D$""1360nZ"PLAY AGAIN? ";:60000n(IN$,1)"N"1500x59458,(59458)223:59464,0:59466,0:59467,0:D0:"DO YOU WANT THREE BUGS?  " ,  "Σ Ϊ. "('A "O 9)""f OO(YE):O0O0t H11420 Q,6:Q,0:OO1E15 ""(O)1" CALORIES ";29)P;" BUGS":O01230 I40T240: D$:D1D$""1740 D,F:500"PLEASE ENTER SKILL LEVEL (0 THRU 9) ";$&Q,0:60000;0T(IN$):E(T2)4D:140{DZ15:59466,15:X20120:Q,X::X50130:Q,X:NX200100.5:Q,X:::Q,0:1360X`IN$" ":ZTTI:ZC2:ZD$(20)jZ$:Z$""60  "33)"   "033)"   "U""19)"  "t"֣"11)""18)"  """Ͳϣ"17)" ," ݥ ";R$6" ";R$@" ";R$+J":"";:60010Z141Z$(20(ZL1)):Z2ZL:Z$;:Z:60000%600105(PN060250@-60500[2"PRESS RETURN TO ";xOO.3:Q,7:Q,0:G,32:S(1):S.5GG2VGG1:S.25GG78tG33240D1G33998:500GFF1810GEE1800GG82:G,F:Q,6:Q,0:500GG80:G,F:Q,8:Q,0:500GG81:G$""M,32:750 D$"Q"1230) Y(D$):Y1520C &Y1Y4Y7X6:580^ 0Y2Y5Y8X12:580t :Y3Y6Y9X18 DY6660 NY3630 XA$;:A1X:"ɝ";:Q,A4 bBA:AA33900A:(AA)F1160:AX l:X1B:" ";::" ": 070tZTTI(" ",ZC,1);"";:ZC3ZC:ZTTI15~60010JZ(Z$):ZL(IN$):(Z127)32" ";:60110zFL(Z127)64(Z127)91Z$((Z128)255)ZL25460010IN$IN$Z$:Z$;Z13IN$(IN$,2)::Z20ZL1IN$(IN$,ZL1)LEVEL"T"";:34727,102OTH133355,F:33430,F:33519,Fl^" "h" "r" "|" "" ""  (Qߒ ""  ' "  ) 1980 PAGE";PNi60500n"":100 TI110:"";:I:G0"";9);"CURSOR #";NM$;" ";PG$p:" COPYRIGHT (C) 1980 BY BOB CARR{D60500N"BACK TO NATURE"WANT DIRECTIONS? ";:60000(IN$,1)"Y"60300LP:X1,101*Z120:XX80:X1,101:X,103:EZ14:XX80:X,103:A$"":B$""C$"":""35)"33)"  ":R$"33)" A l002AFROG [80]FRUIT+FUNKTION 8032FUNKTIONS-PLOTG1 GOLDENE 7&8G1 SPIEL 999 HELLSEHER HINTERHALT HORSE INDIAN POKERKALAH! KALENDER KANONE 80  KOMPONIST DT KRIEGKRIEG 8000 KRIEG DER STERNE-KUBUS LAUFSCHRIFTM1 ORGEL 1 MAEDCHEN TESTMAENNER-TESTMASTER MINT MONDLAND.2 80  MONDLANDUNG 80 ORIONPAARDEN PINKPANTHER POST POLIZEIPOSTER!PSYCHOQTH-KENNER-KARTE"QUADRAT   (142)F"HOEVEEL GELD WILT U SPENDEREN ";M:TM4:21:25x"  * LUCKY SEVENS * "16)"TEGOED :"T" """59)"  * LUCKY SEVENS * ": ""35)"TEGOED :"T" ":""&""40)" LA OPNIEUW EEN GETAL AAN ";Gb!" ":"":224,3:42r#G0G930~*T020,TT1:224,0:23:224,5210000:603A(1)((1)91):4A(2)((1)91):5A(3)((1)91):6A(4)( A(2)6553A(2)7563&A(2)85737A(2)9583HA(3)1505YA(3)2515jA(3)3525{A(3)4535A(3)5545A(3)6555A(3)7565A(3)8575A(3)9585A(4)1507A(4)2517  :J1$A1$:O A2$" ":B2$"  ":C2$"  ":D2$B2$:E2$B2$ F2$B2$:G2$B2$:H2$B2$:I2$"  ":J2$A2$: A3$" ":B3$"  ":C3$"  ":D3$B3$:E3$B3$ F3$B3$:G3$B3$:H3E1$C1$:F1$B1$:G1$"  ":H1$G1$:I1$B1$:J1$A1$:w A2$" ":B2$"  ":C2$"  ":D2$C2$ E2$C2$:F2$B2$:G2$"  ":H2$G2$:I2$B2$:J2$A2$: A3$" ":B3$"  ":C3$" $"  ":C1$"  ":D1$C1$^ E1$C1$:F1$"  ":G1$C1$:H1$C1$:I1$B1$:J1$A1$: A2$" ":B2$"  ":C2$"  ":D2$C2$ E2$C2$:F2$"  ":G2$C2$:H2$C2$:I2$B2$:J2$A2$::H4$C4$:I4$B4$:J4$A4$:HA1$" ":B1$"   ":C1$B1$:D1$B1$:E1$B1$F1$"  ":G1$"  ":H1$G1$:I1$G1$:J1$A1$:A2$" ":B2$"   ":C2$B2$:D2$B2$:E2$B2$F2$" 4$B4$:E4$B4$:F4$"  ":G4$"  ":H4$G4$:I4$G4$:J4$A4$:A1$" ":B1$"  ":C1$"  ":D1$C1$E1$B1$:F1$"  ":G1$F1$:H1$F1$:I1$B1$:J1$A1$ :A2$" "$:,#A4$" ":B4$"  ":C4$"  ":D4$C4$o$E4$B4$:F4$"  ":G4$F4$:H4$F4$:I4$B4$:J4$A4$:'A1$" ":B1$"  ":C1$"  ":D1$C1$(E1$B1$:F1$"   ":G1B3$:F3$"   ":G3$F3$:H3$F3$:I3$B3$:J3$A3$:b-A4$" ":B4$"  ":C4$"  ":D4$C4$.E4$B4$:F4$"   ":G4$F4$:H4$F4$:I4$B4$:J4$A4$:1A1$" ":B1$"  ":C1$""UA1$" ":A2$A1$:A3$A1$:A4$A1$2000:2010:2020:2030:"":224,3:1300"SLA EEN GETAL AAN ";G" ":224,5:35 "":224,3:"S(1)91):<A(1)1501'AA(1)25118FA(1)3521IKA(1)4531ZPA(1)5541kUA(1)6551|ZA(1)7561_A(1)8571dA(1)9581iA(2)1503nA(2)2513sA(2)3523xA(2)4533}A(2)5543A(4)3527 A(4)4537% A(4)55476 A(4)6557G A(4)7567X A(4)8577i A(4)9587r 600 A1$" ":B1$"  ":C1$"  ":D1$B1$:E1$B1$ F1$B1$:G1$B1$:H1$B1$:I1$"  "$B3$:I3$"  ":J3$A3$:g A4$" ":B4$"  ":C4$"  ":D4$B4$:E4$B4$ F4$B4$:G4$B4$:H4$B4$:I4$"  ":J4$A4$: A1$" ":B1$"  ":C1$"  ":D1$C1$.   ":D3$C3$F E3$C3$:F3$B3$:G3$"  ":H3$G3$:I3$B3$:J3$A3$: A4$" ":B4$"  ":C4$"  ":D4$C4$ E4$C4$:F4$B4$:G4$"  ":H4$G4$:I4$B4$:J4$A4$: A1$" ":B13 A3$" ":B3$"  ":C3$"  ":D3$C3$vE3$C3$:F3$"  ":G3$C3$:H3$C3$:I3$B3$:J3$A3$:A4$" ":B4$"  ":C4$"  ":D4$C4$E4$C4$:F4$"  ":G4$C4$  ":G2$"  ":H2$G2$:I2$G2$:J2$A2$:dA3$" ":B3$"   ":C3$B3$:D3$B3$:E3$B3$F3$"  ":G3$"  ":H3$G3$:I3$G3$:J3$A3$:A4$" ":B4$"   ":C4$B4$:D:B2$"  ":C2$"  ":D2$C2$W E2$B2$:F2$"  ":G2$F2$:H2$F2$:I2$B2$:J2$A2$:!A3$" ":B3$"  ":C3$"  ":D3$C3$"E3$B3$:F3$"  ":G3$F3$:H3$F3$:I3$B3$:J3$A3 $F1$:H1$F1$:I1$B1$:J1$A1$:F)A2$" ":B2$"  ":C2$"  ":D2$C2$*E2$B2$:F2$"   ":G2$F2$:H2$F2$:I2$B2$:J2$A2$:+A3$" ":B3$"  ":C3$"  ":D3$C3$,E3$  ":D1$C1$32E1$C1$:F1$"  ":G1$C1$:H1$C1$:I1$C1$:J1$A1$:|3A2$" ":B2$"  ":C2$"  ":D2$C2$4E2$C2$:F2$"  ":G2$C2$:H2$C2$:I2$C2$:J2$A2$:5A3$" ":B ";A1$" ":B1$"  ":C1$"   ":D1$C1$X<E1$B1$:F1$C1$:G1$C1$:H1$C1$:I1$B1$:J1$A1$:=A2$" ":B2$"  ":C2$"   ":D2$C2$>E2$B2$:F2$C2$:G2$C2$:H2$C2$:I2$B2$:J2$ J4$A4$:&EA1$" ":B1$"  ":C1$"   ":D1$C1$iFE1$B1$:F1$"  ":G1$F1$:H1$F1$:I1$B1$:J1$A1$:GA2$" ":B2$"  ":C2$"   ":D2$C2$HE2$B2$:F2$"  4$LE4$B4$:F4$"  ":G4$F4$:H4$F4$:I4$B4$:J4$A4$:3X"":224,5:226,5:"";A1$<YB1$EZC1$N[D1$W\E1$`]F1$i^G1$r_H1${`I1$aJ1$:I1500::226,25b"";A2$cB2$dC2$eD2$fE2$gI4$J4$:I1100::226,0700:W06449"":224,3 :1500:"U HEEFT "W" VRIJE SPELEN GEWONNEN "NI11500::""uTTW:224,0:23:224,5:9000:650V11V21V31V419000:6501200:" (1)3A(2)3A(3)3A(4)3W20:!A(1)4A(2)4A(3)4A(4)4W20:7!A(1)5A(2)5A(3)5A(4)5W20:_!A(1)6A(2)6A(3)6A(4)6W20:!A(1)8A(2)8A(3)8A(4)8W20:!A(1)9A(2)9A(3)9A(4)9W20:!A(1)7A(2)7A9A(2)9A(3)9W10:"A(4)7A(2)7A(3)7W15:#A(4)1A(2)1A(3)1W10:;#A(4)2A(2)2A(3)2W10:\#A(4)3A(2)3A(3)3W10:}#A(4)4A(2)4A(3)4W10:#A(4)5A(2)5A(3)5W10:#A(4)6A(2)6A(3)6W10:1290:"  NR 1: ";V1%1290:"  NR 2: ";V2V%1290:"  NR 3: ";V3`%1290%"":226,65:" NR 4: ";V4%226,0% " 10 "&2""63)" *-5-5-5-*=10 "#'7" "l'<"  *-7-7-7-*=15 2-2-2-2=20 6-6-6-6=20 *-2-2-2-*=10 "'F""63)" *-6-6-6-*=10 "'K"  *-4-4-4-*=10 "(n""63)" *-9-9-9-*=10"("":225,15()B0)W51525$)W5W1016004)W101700>)(7)H)BB1V)B31525\)f)@(7)p)JBB1~)TB51600)^)(7))BB1)B81700))lV13$"  ":C3$"  ":D3$C3$K6E3$C3$:F3$"  ":G3$C3$:H3$C3$:I3$C3$:J3$A3$:7A4$" ":B4$"  ":C4$"  ":D4$C4$8E4$C4$:F4$"  ":G4$C4$:H4$C4$:I4$C4$:J4$A4$:A2$:$?A3$" ":B3$"  ":C3$"   ":D3$C3$Z@E3$B3$:F3$C3$:G3$C3$:H3$C3$:I3$B3$:J3$A3$:AA4$" ":B4$"  ":C4$"   ":D4$C4$BE4$B4$:F4$C4$:G4$C4$:H4$C4$:I4$B4$: ":G2$F2$:H2$F2$:I2$B2$:J2$A2$:BIA3$" ":B3$"  ":C3$"   ":D3$C3$JE3$B3$:F3$"  ":G3$F3$:H3$F3$:I3$B3$:J3$A3$:KA4$" ":B4$"  ":C4$"   ":D4$CF2$hG2$iH2$jI2$kJ2$:I1500::226,45l"";A3$mB3$'nC3$0oD3$9pE3$BqF3$KrG3$TsH3$]tI3$yuJ3$:I1500::226,65v"";A4$wB4$xC4$yD4$zE4${F4$|G4$}H4$~ " ""40)" "& T020G I1 500::224,5:1900:32o A(1)7A(2)7A(3)7A(4)7W40: A(1)1A(2)1A(3)1A(4)1W20: A(1)2A(2)2A(3)2A(4)2W20: A(3)7W15:!A(1)1A(2)1A(3)1W10:"A(1)2A(2)2A(3)2W10:3"A(1)3A(2)3A(3)3W10:T"A(1)4A(2)4A(3)4W10:u"A(1)5A(2)5A(3)5W10:"A(1)6A(2)6A(3)6W10:"A(1)8A(2)8A(3)8W10:"A(1)#A(4)8A(2)8A(3)8W10:$A(4)9A(2)9A(3)9W10:$A(2)7A(3)7W6:3$A(1)7A(2)7W4:L$A(3)7A(4)7W4:^$A(1)7W2:p$A(4)7W2:~$*W0: $"":224,3:"VASTHOUDEN - JA=1, NEE=0";Q1$Q10$ "& ""40)" ":@&""v&""40)""&("  7-7-7-7=40 1-1-1-1=20 5-5-5-5=20 *-1-1-1-*= "(P"  7-7-*-*-7-7= 4 3-3-3-3=20 8-8-8-8=20 *-3-3-3-*=10 "6(Z""63)" *-8-8-8-*=10 "}(_" "(d"  7-*-*-*-7= 2 4-4-4-4=20 9-9-9-9=20  02000)vV202010)V302020)V402030)*"":224,5:226,5:"";A1$*A1$$*A1$-*A1$6*A1$?*A1$H*A1$Q*A1$Z*A1$l*A1$:226,0:*226,25:224,5:"";A2$*A2$*A2$*A2$*A2$* A4$+A4$+A4$:226,0:+(#V10:V20:V30:V40:,'V11V21V3111000,'V21V31V41110106,$'V11V21V4111020P,.'V11V31V4111030e,8'V11V2111040z,B'V11V3111050,L'V11V4111060,V'V21V3111070,`'V21H:54:-f+51:53:54:-p+51:52:54:-z+51:52:53:M3 & ***** GLUECKSPIELAUTOMAT *****C GOLDENE 7 & 8Im( (C) COPYRIGHT 26. JUNI 19792 FRIEDHELM KUECH &< SOFTWARE-CLUB 2001F 5000 KOELN 90Zd" 7 & 8"n"N ANDEREN GESTOPPT WERDEN."C"AZU BITTE IRGENDEINE ASTE AUSSER"s"'' DRUECKEN! IN PIEL KOSTET.20 ""REIMAL'7' ODER '8' ERGIBT"" 10 "" ""MIT ERHOEHTER EWINNAUSZ"HALT!! OHNE GELD SPIELE ICH NICHT MIT. IHR EINSATZ (MIN. .2 DM)";HQH.2"":1000ZL""c""W1$"":WC$"":T1$"":T2$""xT3$"":WD$"":WH$"", TW$" l  ***** TITELBILD ***** 44 ""3)T1$;27)T1$X 3)T3$;12)T3$;27)T3$;36)T3$| ` 3)T3$;12)T3$;27)T3$;36)T3$ 3)T3$;12)T3$;27)T3$;36)T3$ ( 3)T3$12)T3$""15)T1$" "27)T3$36)T3$ 3)T3$12)T3$""15)T3$2436)T3$/ 3)T3$12)T3$""15)T3$24)T3$""27)T3$36)T3$b H 3)T3$;12)T3$""15)T2$" "27)T3$;36)T3$ 3)T3$;12)T3$;27)T3$;36)T3$ 3)T3$;12)T3$;27)T3$;36)T3$ t3)T3$;12)T3$;27)T3$;36)T3$ 3)T3$;12)T3$;27)T3$;369 9700B1A:B2B18:B17B215B1!|AB21WZ$;:9700:DB2AIX06300f "START";spI1400A$:A$"""":X1:41008" ";d ***** RECHTE WALZE *****,WD$;WC WM$;:N1600: "STOP";04!N1300:A$:A(1)19.49A!A$""8800H!Na`"" ";k(#9700t#B3A#19800: ** AUSWERTUNG **"$N02500:T$1200$% ***** AUSWERTUNG RND-ZAHLEN **%%A5A2$*A2$*A2$*A2$*A2$:226,0:*226,45:224,5:"";A3$+A3$+A3$+A3$"+A3$++A3$4+A3$=+A3$F+A3$X+A3$:226,0:t+226,65:224,5:"";A4$}+A4$+A4$+A4$+A4$+A4$+A4$+V4111080,j'V31V4111090,t'V1111100,~'V2111110,'V3111120-'V4111130$-*51:52:53:54:.-*54:8-+51:B- +53:L-+52:Z- +53:54:h-*+52:54:v-4+52:53:->+51:54:-H+51:53:-R+51:52:-\+52:5315000:A0: H&A814200:A5: &A1215800:A8:8'A1316600:A10:Pt'A1518200:A11:j'A16.817400:A12:<(A17.311000:A13:(A17.811800:A14:)A18.912600:A16:h)A19.513400:A18:)0* ****"'x59468,14f" IESES PIEL SIMULIERT EINEN LUECKS- SPIELAUTOMATEN.""INN DES PIELS IST ES, 3 GLEICHE""ETRAEGE AUF DEN 3 ALZEN ZU ERZIELEN.""AZU KANN DIE LINKE ALZEGESTARTET,""DIE BEIDEAHLUNG: JEDES"6"YMBOL MIT EINEM ODER MEHREREN TERNEN"b"AUF DER MITTLEREN ALZE ERGIBT EINEN"~"EWINN VON2,00 .""IND IE FERTIG? ANN DRUECKEN IE JETZT AUF DIE''-ASTE!A$:A$" "27059468,12:""<":TX$""X @TY$"":TZ$"":X0 WR$"":WZ$"":WW$"":WM$"":WF$"" WE$"":AN$"":WB$"":WA$"")T3$""27)T3$36)T3$B 3)T3$12)T3$" "15)T3$24)T3$""27)T3$36)T3$v T 3)T3$;12)T3$;15)T3$;24)T3$;27)T3$;36)T3$ 3)T2$;15)T3$;24)T3$;27)T2$  3)T1$;15)T3$;24)T3$;27)T1$ 3)T3$12)T3$" "15)T3$24)T3$""27)T3$)T3$ <3)T2$;27)T2$& ""13)"GOLDENE 7 & 8"/ AN$@ hW1$;:19000Q WZ$;:19000f 0WM$;WB$;:19000{ WB$;WF$;:19000 WZ$;:19000 \  ***** LINKE WALZE ***** $ N14000: "";AN$;AN$;W1$; PA(1)17.7 $;N1600:"STOP";4XN1300:A$:A(1)17.79EA$""7300K d" ";nL9700B4A:B5B48:B47B515B4AB5xWZ$;:9700B5A@ ***** MITTLERE WALZE ***** l WH$;  :"GUTEN TAG"@:"ICH WERDE JETZT EINE PROBE MEINER"j"HELLSEHERISCHEN FAEHIGKEITEN GEBEN"(:"BITTE DENKEN SIE SICH EINE"2"POSITIVE ZAHL!"<I15000:IF:"MULTIPLIZIEREN SIE DIESE ZAHL NUN MIT 9!"PI110000:I%Z110"ODER";ZI9:I):"JAHRE ALT"B:"AUF WIEDERSEHEN"HTZ$(Z)`L(Z$)hZ0sK1LZZ((Z$,K,1))K  ** BILDER *********"";WR$;+\+" ";WR$;@+" ";WR$;U$," ";WR$;j," ";WR$;," ";WR$;P-"";WR$;-."";WR$;|." ";WR$;." ";WR$;D/" "  ";WR$; 4"    ߒ";WR$;$ 5"  ";WR$;;5"  APPLE ";WR$;R5"  ";WR$;iL6"  ";WR$;~6" ";WR$;7x7" ";WR$;7" DM ";WR$;@8" ";WR$;8" 0,60 ";WR ";WR$;>" DM ";WR$;>" ";WR$;.>" 0,80 ";WR$;EH?" ";WR$;\?" ";WR$;s@" ";WR$;yt@@" ";WR$;|GG2" COMPUTER = SPIELER 1 ! "qGG2"COMPUTERSPIELSTAERKE (1,2,3)?":740"":T(A$)TE1490430:490S12:I16:P(S,I)6::P(S,7)0:: P(2,7),PU$(2,7) "GESETZTE STELLU "" LO$""D AN$""{ PU$(1,7)"":PU$(1,6)PU$(1,7)"" I511:PU$(1,I)PU$(1,I1)"": PU$(2,1)PU$(1,7)"":I26:PU$(2,I)PU$(2,I1)"":$ &PUJ);"ɝ˝":7 lJ16:PU$(2,J);"ɝ˝": vGR$"":PU$(1,7)GR$"ݝ" PU$(2,7)GR$"ݝݝ" I16:PU$(1,I)""I: I16:PU$(2,I)""I: 3PU$(0,K)SP$(L)""((K),1)::8770:" SPIELER " ;SS" : "p " AUS WELCHER SCHALE WIRD GEZOGEN ?":740:N(A$)*N1N67904P(SS,N)0790>850:E1940H790RSSS:1010:1080:E1\O1870^1100:E009PIELER"Q" GEWINNT! "(""ME10:"NOCH EIN SPIEL ? ":740z""LE$LE$LE$:AN$""LE$:LE$:LE$:LE$430:670P0:O0:E0:ZP(S,N):P(S,N)0:IN:1180:IN1:N61040P(S,I)P(S,I)1:1190:ZZ1:MZ1:GSI4MZ:GS14FBPMZLG:(F)160200DF,160:120""10)"SIE HABEN " A "ZUEGE GESCHAFT":ABBA10)"BESTES ERGEBNIS"B""""10)"NEUES SPIEL ?""A$:A$""290,A$"J"A0:606"ACH IHREM ZUG AN IRGENDEINE SEITEU |"NEBEN IHREN STEIN ,UND VERSUCHT SIE DAMIT EINZUSPERREN. "SIE KOENNEN MIT DEN TASTEN 2/4/8/6 IHREN STEIN ZIEHEN. ""10)"BITTE TASTE DRUECKEN !" A$:A$""410 "": I1255 :`P(S,I)1AjP9P(S,I)P(3S,7I):P(S,7)P(S,7)P9:P(S,I)0:1160:P(3S,7I)0:I1I[tPPP9:I7:1190:II1y~S3S:I7I:1190:S3S:K06:BL$"**":K2((K2))BL$" "KK050::PU$(S,I)BL$:PU$(3S,7I)BL$:: SCHALE. DIESE WIRD GELEERT,"H"DIE KUGELN WERDEN AUF DIE IM GEGENUHR-"t"ZEIGERSINN FOLGENDEN SCHALEN EINZELN""VERTEILT. DABEI WIRD DIE GEGNERISCHE""KALAH-GRUBE UEBERSPRUNGEN, DIE EIGENE""NICHT." " FAELLT DIE LETZTE ZU VER"""ALLES KLAR ?":740(,(30726)0340@6"MOMENT BITTE!"]@I3072031314:X:I,X:zJI3133931624:X:I,X:T183,128:184,2^ P(2,7),PU$(2,7)h"SPIELART:":"SPIELER - COMPUTER (1) ODER"r"SPIELER - SPIELERNG:":"SPIELER 1 (6...1):";Y P(1,6),P(1,5),P(1,4),P(1,3),P(1,2),P(1,1):"SPIELER 2 (1...6):"; P(2,1),P(2,2),P(2,3),P(2,4),P(2,5),P(2,6):"GRUBE 1:";P(1,7) I12:J17:SSSSP(I,J):::P(2,7)72SS:TE1:360 LE$" $(2,7)PU$(2,6)"":PU$(0,1)PU$(1,4)""B 0PU$(0,2)PU$(2,3)"" :SP$(1)"":SP$(2)"" D"":K115:"";: NK136:"";:::K116:"";: XK135:"";: bJ16:PU$(1,2923,48T% I12:PU$(0,I)SP$(1)""((I),1):F S12:I17:1190:::""q "WER BEGINNT (1,2) ?":740:SS(A$) SS1SS2690 ""LE$ GG21210 790 158,0 A$:A$""750  K12:L1:SSKL2 10`S3S:1100:S3S:E00O1:bE1:6fS3S:1100:S3S:E00Op1100:E00O0:910YzE1:eSS3SSk"SPIELENDE! ";:Q2:P(1,7)P(2,7)Q1P(1,7)P(2,7)" UNENTSCHIEDEN! ":970" S Z01120II1:I61020<P(S,7)P(S,7)1:PP1:ZZ1:I7:1190:I1:Z0O1:sP(3S,I)P(3S,I)1:S3S:1190:S3S:ZZ1:Z0$II1:I61050.I1:10208P(S,7)36E1BLE00:SU0:K16:SUSUP(3S,K)::SU0E01V "15)"DANKE FUERS MITSPIELEN !":+@ ANLEITUNGkJ"SIE MUESSEN BEI DIESEM SPIEL VERHINDERN DASS IHR STEINT"EINGESCHLOSSEN WIRD."^"STOSSEN SIE AN DEN RAND ODER DIE DUNKLEN STEINEh"HABEN SIE VERLOREN. r"DER COMPUTER SETZT N PU$(S,I)""((Z),2):LM400:1500:""1P(S,I)0PU$(S,I)""" ":UPU$(S,I)""((P(S,I)),2):t GG<>2:COMPUTER - SPIELER1520:SS11290SS2:770:"IHR ZUG ?":740:N(A$)A$"A"940N1N61230P(2 PP(1,K1)12P(1,K1)0KK1:1325UK1K11:K1K1360(WNK:13808ZKK1:1325SdLM50:1500:VV1:1450jnVV0:665,T:30720xJ16:P1(J)(710J)72::GG01510PF73K16:P1(K)PFNK:PFP1(K):H0:P2(H)K:1440P1 P1(L);::I112:I217:640(I11)7I2,P(I1,I2):::V234,234,234,169,0,133,0,32,47,123,162,0,142,143,2,160,6169,0,153,198,2,136,208,248,232,142,144,2,162,72,142,1462,142,159,2,174,143,2,208,6,173,144,2,141,145,2,172144,2 ,146,2,165,1,240,33,174,143,J2,173,144,2,157,209,2,232,238,143,2,173,146,2,157,159aT2,169,1,141,144,2,134,0,32,47,123,76,48,120,234^173,153,2,201,1,208,21,174,145,2,189,198,2,205,146,2h176,6,173,146,2,157,198,2,76,181,122,234,174,143,2,3,0,32,59,123,174,147,2,189,229,2,24,10541,141,148,2,76,223,120,234,172,148,2,185,135,2,208,6s238,148,2,208,186,234,173,148,2,133,185,32,108,123,32,205122,32,108,123,165,2,24,109,149,2,141,149,2,165,1,24042,173,148,2,174,147,2,157,23,155,2,201,7,208,41,173,154,2,208,3,76,512122,206,154,2,174,154,2,189,13,3,141,156,2,32,68,122l32,59,123,174,154,2,189,249,2,24,105,1,141,155,2,208209,234,174,155,2,189,128,2,208,6,238,155,2,76,141,121173,155,2,133,185,32,205,122,1,2,173,143 N2,32,68,122,32,59,123,238,155,2,174,154,2,189,13,3HX141,156,2,76,141,121,234,234,173,146,2,24,109,157,2,56b237,149,2,141,146,2,76,117,122,173,143,2,24,109,154,2l109,147,2,105,2,133,0,96v173,146,2,56,237149,2,141,1,2,133,0,32,59,123 !172,143,2,185,159,2,141,146,2,76,37,120,234F!169,128,133,183,169,2,133,184,169,0,133,1,133,2,164,185!177,183,170,169,0,145,183,200,192,14,208,4,160,0,240,247!177,183,24,105,1,145,183,202,208,237,192,7,240,41,176,43,101,123,169,183,141,103,123,169,125,133,180,133,182,169,00;# 133,179,133,181,166,0,240,13,24,105,14,133,181,144,2,230x#182,202,76,83,123,160,14,177,181,145,183,136,208,249,96# 162,7,173,142,2,133,178,160,13,185,128,2,200,153,128,2,136#*13CL20480:CMCL500' T11:K215B A$(30),A%(31),Z%(10)H0,251,C,237,C#,224,D,211,D#,199,E,188,F,177,F#,167,G,157,G#,149,A,140( B,132,H,124,C1,117,C1#,111,D1,104,D1#,99,E1,93,F1,88,F1#,83,G1,782G1#,73,A1,69,B1,64,H1,61,C2,57,Z,1,N)01230850:E19401520:O11230" COMPUTERZUGW WW0:""LO$LE$LE$""LE$"COMPUTER SPIELT ..."~1520:S1:770:P(1,6)1N6:1380P(1,5)2P(1,6)13N5:1380(K4-K013902P(1,K)7KKK1:13257K16(K)PFHH1:P2(H)K:H0NP2((((H)2)(H1)))>LP$"":WW0II1WW:LP$LP$"":X""LO$LP$;""N" "rV0:S1:850:E19401520:O01210WWWW1:""LO$LP$",...":1300LL0LM::AN$LE$:AN$;:L16:,192,7,208,40,173,143,2,208,2,96,234,206,143,2A"174,143,2,134,0,32,59,123,174,143,2,189,159,2,141,146|,2,189,209,2,141,144,2,238,144,2,76,37,120,234,172,14462,185,128,2,208,6,238,144,2,76,37,120,132,185,32,205@122,165,2,24,109,146,2,141232r134,0,32,47,123,162,0,142,147,2,142,149,2,142,179,2M|232,142,148,2,169,144,141,150,2,173,146,2,141,152,2,173148,2,201,7,208,50,173,147,2,208,3,76,164,122,206,1472,174,147,2,189,179,2,141,149,2,173,143,2,24,109,1472,105,1,1329,2,238,147,2,232,173,149"2,157,179,2,169,1,141,148,2,173,143,2,24,109,147,2L105,1,133,0,32,47,123,76,223,120,234173,153,2,201,2,208,3,76,107,122,162,0,142,154,2,142156,2,142,157,2,142,13,3,232,142,155,2,32,68,122,3247,123,1765,2,24,109,156,2,141,156%&2,165,1,240,43,234,234,234,234,234,234,234,234,234,234,174`0154,2,173,155,2,157,249,2,238,154,2,232,173,156,2,157:13,3,169,1,141,155,2,32,68,122,32,47,123,76,141,121D173,157,2,205,156,2,176,6,173,156,2,141,15746,2,205,150,2,176,6,174,146,2,142,150,2* 173,143,2,24,109,147,2,105,1,133,0,32,59,123,238,148c 2,173,152,2,141,146,2,174,147,2,189,179,2,141,149,2 76,223,120,234,174,145,2,189,198,2,205,150,2,176,6,173 150,2,157,198,2,238,144,2,173,143"177,183,201,1,208,32,169,0,145,183,132,178,230,2,238,135<"2,169,14,56,229,178,170,189,128,2,240,10,238,135,2,230u"2,222,128,2,208,246,96,169,1,133,1,230,2,96,255,255"255,255,169,183,141,101,123,169,181,141,103,123,208,10,169,181"14176,208,245,165,178,141,129,2,202,208,230,96#"" ,RTN,2,R,3,* LEER *,0,STOP,4,***9<I030:A$(I),A%(I):BA370VFKCL:K1CL:280qP"MELODIE-EINGABE"Z""(KCL)2;".TON";:" ";R$:R$""R$"Z"dR$"/*"K1K12:370n290:R$"*""*** FEHLER ***":90xKK1K1K 370B"SPRUNGADRESSE ";T$:(T$)0(T$)999"":250pT(T$):R(R250):TTR250:RR252:190vICLCM:I,0::"I030:R$A$(I)310,:R$"SBR"R$"*":6RA%(I):@I030:RA%(I)R$A$(I):T$(T):34 D"1140 Z$"SAVE"1270% Z$"MODE"13208 Z$"ADD"1380I Z$"NEW"70x Z$"EN""*** ENDEDES PROGRAMMS ***": 370 Z%0:KCL:59467,16:59464,0:59466,K2 R(K):T(K1):R0R4630 R3550 Z$:Z$(13)630  10):(Z$,1)(32)Z$(Z$,2,10)9 (Z$,1)"-"X10:X2((Z$)):710_ (Z$,1)"-"X2999:X1(Z$):710 I1(Z$):(Z$,I,1)"-"700 :X1(Z$):X2X1:710 X1((Z$,I)):X2((Z$,(Z$)I)) X1X12CL:X2X22CL J0:"" REITER = '1' *" RZ$:Z$"1"850 \370# f""G p"TON ";Z$:Z$""370b zZ$"+"Z$((KCL)2) Z$"-"Z$((KCL4)2) (Z$)0(Z$)999870 K(Z$)2CL:R(K):T(K1):320 ""(KCL)2".",R$,T$ S1:90:S0:X11I,X1:I1,X2$S1:90:S0:K1K12:370Y"ZU LOESCHENDER TON ";Z$:Z$""370u$Z(Z$):Z0Z9991050.KZ2CL:IKK12:X1(I2):X2(I3)8I,X1:I1,X2::K1K12BICLK12:X1(I):X12521130 LR(KCL:2,Z$:"* "Z$" GEFUNDEN *"Z$R$1200&2:1140H"* ICH LADE >>> "Z$" <<< *"R2,Z$Z(Z$)3:M$(Z$,3,Z):T1(M$):"SPEED:"T1;2,Z$Z(Z$)3:M$(Z$,3,Z):K1(M$):" LAST NOTE:"K1;2,Z$Z(Z$)3:M$(Z$$"1"12801273FD$LW$":"Z$",S,W"1,8,2,FD$41,Z$;(13):KCL\1,T1;(13):1,K1;(13):1,K2;(13)s X1(K):X101310X2(K1):1,X1;(13):1,X2;(13):KK2:12901,"/*,/*":1:370("NAECHSTE FREIE TON-NUMMER   59468,12:(142):1021oLL%OST_   eHHeIILy P . `y P `y P &`y P  `Xy P ` RFL _L _L RFL eF _L _L RFL x _L RFL _L eF _L RFL _L _L RFL e _L RFL x _L RFL _LF _L eL```` L? ;LT SQTR  LQSLLRL`` R$"SBR"250*R$"R"K,R:K1,0:370AR$"RTN"T0:190YR$"STOP"T0:190" LAENGE ";T$:T$""T$"2"T(T$)K,R:K1,T:KK2S1K750090"*** SPEICHER IST VOLL ***":RTITIT3002300J:R$"SSBR":T$((R252)250T):ATR$"R"R$"* REPEAT *":T$""V^R$"STOP"T$""\hr"FUNKTION ";Z$:Z$""370|Z$"RUN"500(Z$,4)"LIST"640Z$"KORR"870Z$"INS"950Z$"DEL"1050Z$"LOA500 &R2580 0Z%06200 :KZ%(Z%):Z%Z%1:620? DR252610T NZ%Z%1:Z%(Z%)Kv XK(R252)250T:KK2CL:510 b59464,R:I110TT1: lKK2:510 v59467,0:59466,0:59464,0:370 (Z$)4X10:X2999:710 Z$(Z$,5,(X1):T(X11):320 R0,"* ENDE *":8404 (X1CL)2".",R$W R$"RTN"R$"STOP""",,T$t X1X12:JJ1:X1X2840 J20730 "* WEITER = '1',ENDE = '9' *" Z$:Z$""800 *Z$"9"370 4Z$"1"800 >720 H"* W880 "EINFUEGEN VOR ";Z$:Z$""370;Z(Z$):Z0Z999950eKZ2CL:IK1K2:X1(I):X2(I1){I2,X1:I3,X2:ICLK12:X1(I):X12521030R((X1252)250(I1))2CL:RK1030X2(I1)1:X2249X20:X1(X1252)250(I1))2CL:RK11300VX2(I1)1:X20X2249:X1X11B`I,X1:I1,X2Mj:370Vt280nv"MUSIKSTUECK ";R$ww""x"LAUFWERK ";LW$yLW$"0"1150zLW$"1"1150{1144~FD$LW$":"R$",S,R"2,8,2,FD$ ,3,Z):K2(M$):" TUNE:"K2 2,Z$ "/*"(Z$,2)1250DZ(Z$)3:M$(Z$,3,Z):ZN(M$)ZK,ZN:KK1:12202:K1K"** CHECKSUM ERROR ** ":840370"MUSIKSTUECK ";Z$"""LAUFWERK ";LW$LW$"0"1280LW="(K15500)22"GESCHWINDIGKEIT ="T1:"KLANGFARBE ="K2T<"NEUE GESCHWINDIGKEIT ";Z$:Z$""1360aFT1(Z$)P"NEUE KLANGFARBE ";Z$:Z$""370ZK2(Z$):370dKCL75002:X1(K):X1090n:370  ``````````````````````````````````````````````````````````````````````GM  襆O``Mݙ 襆ݙQ`L# VF6փ&vƄfV׀'wǁgWG7ׅ'wdž jk L:` 9`A&DR[\ \m8Nl[OmLNɖOɇ`  NO NO NO `NɷOɇ`  NO NO NO ` -=d `a `QbRcd0ecݧ-4 e`dL0 dddd)`b8Nb`Oa ꊢ``YLB ZZZXUZZ`aPe`beac cɇ ?`YZLB bɼ 4b BbZbcLB  b[\Lc L^ bLa dcɇ bDL df fbL] dɠP 5 sL  De jka`j`jjiPjj  jB`qL4`L~[\` @\a8`P`aa  )`L[\BYjaɀ `ɴO `jɮ L L PL `ɠ cfL ꘁ```[a\L `U WXL aVUVYL ꊑ``  s Ȧt Ȧu eݢ ]^ +`]M^Inon`o`L~Lt c]]^ `L]ɈL LG)$GxxxwLLGwڰإxGL @G`aLeM`eaa bc dbc bc `KʎJcHbddKPd2d`y Ljy㥀ƀLTƁLT``Lr L L jiLZZZ`Zbcb`GGGLnLwx` La`M`L L`noK` `Ƭ`Ґ 8H`  `L  &` & ` & `KJ ÍH`K` Y `QRr`P膺`.`TŻSźP 5 iXi` `ab acabaadȱaeaiabibad  600  '' -    '' -    Z'' -   Kpmp'' -   0  9 -         = * 5 * :  3$$$$$$$$$$ x`Ʊư` $$$$$ ` `abc`abc`S`L5:م` `Lɰ0L(ɱ1L(ɲ2L(ɳ3L(ɴ4L(ɵ5L(ɶ6L(ɷ7L(ɸ8L(ɹ9L(L ` h5`:` 5 F`a80b8`閅`aab`a``bL\(``'KJ襷Hed K`ꅄ`  ` [``KJH済K P` ( K``Ź`UV UWX WYUVWXLB ]^ Ȣ ` ljȩjȑjȑjȩߑjlXjkmlpjpl,mۥHdIelmde jeddeeemeddeeelʩ#FDGxPeHHeIIMUVWXY[\]^w  UZ  ( NO ``@) ` ebeb e``bݧ8bbʥcceL {ꩀa`SbTcLq[ q[ q`r r v0studsdƃ`L t ƃ`L `uƃL dddddddddddd P_`NO L m NNȑNȑNN `0eP  `Y`FxjL H L jjji8jj 8jj``a`iQ`aia ` `[\`B`YUVUW`a`jjLc ```YU VUjL W` aL `mLF  `P  l-P R M  B H R   lУm7L ) L L L eSSeTT m` veSSeTTeL ꊑ]`* ` `8[P[L\ [GdedH dȑdȑd`LVGw)%MML[MOQL[ML[M`Ɇ ߐLLGwxG` fNȑNȑNO `fL| fL|`L꩝c  2b b bc 2bc b 2bc `a``ALf L GGGLLrL L \Lno ( `jj`  `[ [``B ```B `Ƭ`ꥊ`KF`KJH` "`IɂHHIL J ,L] Dw 2`^KJH腼ceaabib`н`$$$$$$$$$$$$$$$$LbL_- - - - - - 鮮 -     m} - 25  Ln - 20  삮} - 15  n - 10  $ m} - 5   Ʉ1800    1   膳`DADDADA DDADAAADDAA A qL q PꩶHI oLL%OST_$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$U$$$r$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ ]^no `]d٠ 8]]^^L@00P`0@0p@`ꅾno `] ^I Ol`澦LRF`LM_PL ` `  2`L`abcda ab  eg8f(fg 08f(fggf(M)LB ;LKm*8ʵ8demwww Yldhfegi qie fdge  LFL f m LK(6DdieimxxxLLl f gIgeи `NPNN`K` h``Ls K`  D`逅gŅ`ťf`L LBLLLLc ȐL L ǩǩȥǍyȍzة` k`kH8k `mL6`$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ (142):224,0AZ$(6,5),T1(8,3),T2(2,3),N$(8),S(8),C(8)jA16:B15:Z$(A,B)((A),1):B,AA08:B03:T1(A,B):B,AA02:B03:T2(A,B)::1,2,1,2,3,0,3,0,4,5,4,5,1,4,1,4,3,0,3,0,2,5,2,51,4,4,5,3,0,3,0,2,5,1,2--";7" < EEN SPEL VOOR LOGICA-FANS >"i8"WENST U INSTRUCTIES ? ";:50009Q$"J"Q$"N"56:Q$"N"180;""<"WE VERTREKKEN VANUIT EEN KUBUS, PER VLAKVERDEELD IN 3 HORIZONTALE ";2A"EN 3 VERTIK 6"E$" 6 = ZIJVLAK"H_"1 RECHTS 5 LINKS"qd""E$" "A$A$i"ELKE HORIZONTALE EN VERTIKALE STROOK KAN EEN KWARTDRAAI ";n"MAKEN ONAFHANKELIJK VAN DE ANDERE STROKEN IN DAT VLAK."< sEN BEGONNEN IS "220) 5000 ""a "IN DE NORMALE LOGISCHE VORM ZIET DE KUBUS ER ALS VOLGT UIT:"k 6000 "DE LETTERS A TOT I STELLEN DE 9 MOGELIJKE DRAAIASSEN VOOR." "DOOR EEN NEGATIEVE DRAAIZIN OP TE GEVEN KAN MEN TEGEN DE RICH S "0 " -------------------------------"^ "AANTAL SPELERS ? (MAXIMAAL 9) "; 5000:(Q$)49(Q$)57190 ""(Q$):N(Q$)1 "":A0N "NAAM SPELER"A1" ";:N$(A) R1:V1:TV1! "   M A G I S C H E K U B U S "] " -------------------------------"t "SPELRONDE "R "DE KUBUS WORDT IN DEZE RONDE "V" MAAL VERDRAAID" A1500: NNON AO8:C(A)O: A1V:F`שyPb P`a  A  `iP`aiab` !          >  !$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$y P `bcd`5 L`5 L mdfegihihdie "fdgeL~FL xpp``mGGGLG GwxG`GGLhe8NQNOO  gfhi  %giL8逑hif۩ynLpL}L L_ L `[a\`8``aa#`lL{L_ d 4ȩ d` d dȊ 4`mpdȩdȩnd`mdȩdȩ}d`dae h 4Lp 4`hihhd` " lLLmnp }ɮLgLbdeddh`m`ȩ`ȩ}```i00:S1((TI)8)B1(TI)100:""(TI).5F2,,701026q@"  M A G I S C H E K U B U S "A" -------------------------------"E" "N$(NN)" SPEELT"FP0:F0J6000^"#1,3,4,6,1,2,4,5,3,2,6,5N(A$(163):B$(164):C$(165):D$(167):E$(192))F$(238):G$(240):H$(223):I$(233):J$(250)2"  M A G I S C H E K U B U S "3" -----------------------------KALESTROKEN. 5 VAN DE NEGEN ALDUS ONTSTANE VIERKANTEN ";jF"DRAGEN HET NUMMER VAN HET VLAKWAARTOE ZE BEHOREN"P" "B$;B$" 1 = VOORVLAK "E$" 4 = ACHTERVLAK"U" 2 2 = BOVENVLAK 4 5 = ONDERVLAK"Z""E$"3 3=ZIJVLA"DOOR OP EEN WILLEKEURIGE WIJZE STROKEN TE VERDRAAIEN VERBREEKT MEN"; x" HET LOGISCHE PATROON VAN DE KUBUS.":"DIT SPEL IS ER DAN OOK "; }"OM VIA HET WELDOORDACHT VERDRAAIEN VAN DE STROKEN WEER DELOGISCHE"; " NUMMERING TE KRIJGEN, WAARMEE MTING ";B "VAN DE PIJLEN IN DRAAIEN. KUN JE ER NIET MEER UITKOMEN, DAN KUN "; "JE HET SPEL VERLATEN VIA DE -*- TOETS, WAARDOOR MEN ECHTER WEL "; "STRAFPUNTEN KRIJGT "; 5000 "  M A G I S C H E K U B U  "C>"D$"  "D$;Z$(3,4);I$;8);D$;I$" "Z$(5,1)""I$" ";*I$;Z$(5,2)""k" "D$;Z$(1,4)"  "Z$(1,5);D$" ^"7);D$;Z$(6,4)" "I$;Z$(5,3)""I$" "I$" "A$;A$;A$;A$;A$;A$;" ^I"7);D$""Z$(5,4)""I$" "I$;Z$(5,5)"" bC(S1)C(S1)1lF2C(S1)C(S1)F qS2(S13)vB2F1%C01:T1(S1,C)07090WX$Z$(T2(S2,0),T1(S1,C))Z$(T2(S2,0),T1(S1,C))Z$(T2(S2,1),T1(S1,C2))Z$(T2(S2,1),T1(S1,C2))Z$(T2(S2,2),T1(S1,C))Z$(T2(S2,2),T1(S1, / PROGRAMMAUTOR MANFRED SCHENK TRIER 1978x "MIT HILFE DIESES PROGRAMMS KOENNEN NOTEN ( 2 OKTAVEN) UEBER" "DIE OBEREN DREI REIHEN DER TASTATUR GE- SPIELT WERDEN":"DIE DAUER DES TONES LAESST SICH DURCH DIE ZIFFERNTASTATUR WAEH LEN MIT VIBRATO":6$" WIE MOECHTEST DU SPIELEN?"A&50000L'158,0^(G$:G$""402"WEITERHIN BESTEHT DIE MOEGLICHKEIT,DEN GERADE GESPIELTEN TON ALS"4"GRUNDTON ZU ERHALTEN ODER JEDEN TON EIN-ZELN ZU SPIELEN": 6" 0 =AANTAL POGINGEN: "P0h"GELIEVE KEUZE ROTATIE IN TE TYPEN ";:r5000JwQ$"*"800i|Q$"-"F2"";:F0:370Q$"-""- ";:F2:370(Q$)65(Q$)73370""Q$7000:6000:PP1"AANTAL POGINGEN: "PF1 -------------------------------""SCORETABEL"1A153:"-";::n " NAAM SPELER SCORE WAARDERING "A153:"-";::AON!""A1"."N$(A);29)""S(A);35)" ";&S(A)TV"ZEER GOED";:600+S(A)TVVA16:B15Z$(A,B)((A),1)B,A 250+ ""Q$c!PV"JE BENT ZEKER DE LEUKSTE THUIS ? ":825"P2V"NOEM JIJ DAT PROBEREN ? IK NIET ! ":825#P3V"-*- NOG NIET GEACCEPTEERD ! SORRY! ":825%P4""(191)"";:5005""(191);:5005#p""22)"I D E F"Kq6);:X16:B$;:X:9)"HV V V V"u" "Z$(2,1)""I$" "I$;Z$(2,2)""C$;7)"GV "B$;B$;B$;B$;B$;B$z" "I$" "I$;Z$(2,3)""I$" "Z$(3,2);C$;7)"V "C$;Z$(4,1);{3,3);I$;C$;6);D$;Z$(6,1);I$;"  "C$;" "D$"  "I$""Z$(3,5);C$;6);D$""I$""Z$(6,3);I$;C$;uZ$(4,4)" "Z$(4,5);C$" "D$" "Z$(1,3)"  "I$" "7);D$" "I$""Z$(6,5);B$;B$;" "B$;B$;C$" *"P158,0ZD$:D$""90_"":2000cG$"0"1000  A16:B15Z$(A,B)((A),1)F0B,A-F1360,470f"LOGISCHE VORM KUBUS BEREIKT "(7)xS(NN)S(NN)PNN:A13000:"  M A G I S C H E K U B U S "" 2TV"GOED";:6000S(A)5TV"VOLDOENDE";:600<:S(A)10TV"SLECHT";:600KD"GEZAKT";XX52)""^btlA153:"-";::v"NOG EEN RONDJE ? ":5000:Q$"J"Q$"N"640Q$"J"700VV2RR1TVV"-*- WERKT PAS NA POGING "(4V1)" ! ":825M)"SORRY DAT JE ER NIET BENT UITGEKOMEN "y*"JE KRIJGT NOG EENS "P" STRAFPUNTEN "/PP244809A13000::360TTIQ$:Q$"" TIT60TTITIT30" "Z$(4,2);C$4" "Z$(2,4)""I$" "I$;Z$(2,5)" "I$""C$;8)""I$""Z$(6,2);NC$;"  "C$" "D$;A$;A$;" ";A$;""Z$(3,1);I$;" "C$;7)" "I$" ";" "Z$(4,3)" "C$" "D$;Z$(1,1)"  "Z$(1,2);D$;""I$""Z$( 00Z::59464,0:2100 (  TONERZEUGUNG. 9 10000M 4Q$:Q$""2100_ Q$" "20000} Q$"!"A251:B$"H0":99  Q$(34)A237:B$"C":99  Q$"#"A224:B$"C#":99  Q$"$"A211:B$"D":99 $ Q$"%"A199:B$"D#":9 B$"C1":99 Q$"R"A111:B$"C1#":99: Q$"T"A104:B$"D1":99X Q$"Y"A99:B$"D1#":99u Q$"U"A93:B$"E1":99 Q$"I"A88:B$"F1":99 Q$"O"A83:B$"F1#":99 Q$"P"A78:B$"G1":99 Q$"^"A73:B$"G1#":99 Q$"8"G$"8" : : Q$"*"64721$ :* :4 p2100X '59467,16:59466,156:: TON AN N59464,0:59467,0:59466,0:: TON AUS PÙ::"BEMERKUNG: "; ZÙ"EINE AENDERUNG IST WAEHREND DES SPIELS JEDERZEIT MOEGLICH":$ 7T1$"FUER'S LEBEN":T2$"FUER DIE NAEHERE ZUKUNFT"zT3$"FUER'S KOMMENDE WOCHENENDE":T4$"FUER DIE NAECHSTE NACHT""":95:4)" M A E N N E R - T E S T"::95F$(10),L$(10),F(10),M(10,10),V(10),Z(10):Y$"Y":" KEINE ENTSNDKONZENTRIEREN SIE SICH ";C "VOLL UND GANZ AUFDAS DANACH.......":d "BEREIT";B$:(B$,1)"N"94 ""::::::8)"!!! H A L T !!!"::"ICH HAETTE NOCH EINE (REIN STATISTISCHE) FRAGE :":6)"TREFFEN SIE DIESE ENTSCHEIDUNG":!MAX=10) MUESSEN SIE SICH DENN ENTSCHEIDEN";:L0X:"BITTE GEBEN SIE JETZT ALLE";L0;"MAENNER""(REIHENFOLGE SPIELT KEINE ROLLE) EIN" :I1L0:"NUMMER";I;"BITTE":L$(I)::I:!"":96":" OK, DAS WAEREN ALSO": #I1L0:3)I;"-ER VON DIESEN FAKTOREN"& +I1F0:4)I;F$(I):IS ,"IST DENN FUER SIE DER WICHTIGSTE";:F2 -::"OK - GEHEN WIR MAL VON EINER BEDEUTUNGS-SKALA AUS,"; ."DIE VON 0 BIS 10 REICHT." /F$(F2);" ALS WICHTIGSTER FAKTOR" 0"ERHAELT DEN WERT 10 BITTE AN, WIE DIE"* ;"MAENNER BEI DER BETRACHTUNG DER"P <"EINZELNEN FAKTOREN ABSCHNEIDEN"} =:"LASSEN SIE UNS DAVON AUSGEHEN, DASS" >L$(1)" JEWEILS EINEN WERT VON 10 HAT. SIE" ?"GEBEN DANN DEN EINZELNEN MAENNERN WERTE" @"GROESSER OD N MAENNERN GEBEN" H:J2L0IL$(J):M(J,I)HJJ::M(1,I)10:I:I1F0:C0:J1L0xKCCM(J,I):J:J1L0:M(J,I)M(J,I)C:J:ILJ1L0:V(J)0:I1F0:V(J)V(J)M(J,I)F(I)MI:J:I110:Z(I)I::CL01:J1L0NI1C:N1Z(I):N2 Z(I1):V(N1)V(N2)80OZ(I1)N1:Z(I)N2DPI:J:C1Z(1):C2Z(2):C100V(C1):J1L0hQV(J)CV(J)::::DV(C1)V(C2)uR""::S17)"IHR":: 2)"IDEALPARTNER ";O$T16)"HEISST"::15)L$(C1)UVD10"(ALLERDINGS ZIEMLICH KN9 . Q$"'"A188:B$"E":99/ 8 Q$"&"A177:B$"F":99M B Q$"\"A167:B$"F#":99j L Q$"("A157:B$"G":99 V Q$")"A149:B$"G#":99 ` Q$"_"A140:B$"A":99 j Q$"Q"A132:B$"B":99 t Q$"W"A124:B$"H":99 ~ Q$"E"A117:Q$"A"A69:B$"A1":99% Q$"S"A65:B$"B1":99B Q$"D"A61:B$"H1":99_ Q$"F"A57:B$"C2":99o Q$"1"Z1 Q$"2"Z2 Q$"3"Z3 Q$"4"Z4  Q$"5"Z5  Q$"6"Z6 Q$"9"D$"9" Q$"0"D$"0":G$"0"APP)WD20D10"(MIT KLAREM ABSTAND)"AXD20"(EINE GANZ KLARE ENTSCHEIDUNG)"KY:95{Z:"HIER IST DIE ENTGUELTIGE REIHENFOLGE :"[:"PUNKTE","NAME"\J1L0:CZ(J):V(C),L$(C):]^_I140:"";:I:`I120:"(CHEIDUNGSPROBLEME MEHR FUER"G"VIELBESCHAEFTIGTE JUNGGESELLINEN !!":u" GEBEN SIE MIR BITTE AN, WAS SIE UEBER""DIE HERREN WISSEN. ICH HELFE IHNEN" "DANN BEI DIESER DELIKATEN ENTSCHEIDUNG": " UEBERLASSEN SIE MIR DIESES PROBLEM, U2)"1-";T1$:2)"2-";T2$:2)"3-";T3$22)"4-";T4$9EEE123QE224]E325iE426xO$T1$:27O$T2$:27O$T3$:27O$T4$:27"":96:" UNTER WIEVIEL DIESER HIMMLISCHEN GE-"'"SCHOEPFE (MIN=2-";L$(I):I:D $:"WIEVIEL FAKTOREN(MAX=10) SIND EIGENTLICHWICHTIG BEI DER "w %"ENTSCHEIDUNG FUER IHREN"::4)"PARTNER ";O$ &F0 '"" ("BITTE GEBEN SIE MIR DIESE FAKTOREN AN": )I1F0::"FAKTOR";I;"BITTE":F$(I):I *"":"WELCH.":! 1"WELCHEN WERT (DEZIMALWERTE SIND OK)"N 2"WUERDEN SIE DANN DEN ANDEREN FAKTOREN"_ 3"ZUORDNEN?"m 4:I1F0z 5IF255 6F$(I):F(I) 7:F(F2)10:C0:I1F0:CCF(I): 8I1F0:F(I)F(I)C:I 9"" :" GEBEN SIE MIR JETZTER KLEINER ALS 10, JE NACH-"0 A"DEM WIE ER IN BEZUG AUF ";L$(1)C B"ABSCHNEIDEN"O CI1F0y D:"BETRACHTEN WIR EINMAL NUR ";F$(I) E"UND GEHEN WIR DAVON AUS, DASS ";L$(1) F"DEN WERT 10 ERREICHT, WELCHE WERTE" G"WUERDEN SIE DEN ANDERE  MONDLANDUNG 2"";)40003I4I5=8000F ""S TH0:T0`X025000t(V0200:F1:S1~F1000P60000ZATTI:AGTIdRR$:((RR$)0RR$"0")((RR$)0)R(RR$)n(TIAT)30ATTI:130x110TTR "8);TH"T2000:F09000:100007^T1200R0:140@h100PA$""bA$(0)" "sA$(1)" "A$(2)" ߒ "A$(3)"  "A$(4)"USAߒ"$A$(5)"ߒ".A$(6)A$(0)8""19);BI06LA$(I)  5000$"  MONDLANDUNG "C" ============="K:u"DIESES SPIEL SIMULIERT DIE LANDUNG""EINER MONDFAEHRE AUF DEM MOND.""ES WIRD DIE FALLGESCHWINDIGKEIT (M/S),""DIE HOEHE (M),DER SPRITINHALT DE )";:I:aRSTANDEN ? "; Q 40000H R" ";:I1200::" ";:I1200::U$:U$""4178V ^U$"J"7i _U$"N" 4200 `:"(J/N) ";: 4176 h"":4000 @"" EI1114 ^39(1));"." I1  (#H4.5:H$(1)"":H$(2)"":H$(3)"":HN, DIE LANDUNG WAR EINWANDFREI" 8':30000f N"        "o *N"" 4N"DAS WAR EINE BRUCHLANDUNG !": a40000 0u"WOLLEN SIE NOCH MAL SPIELEN ?"; 1u" ";:I1200::" ";:I1200:IA)30060020," ":R02{RUDOLF SCHINEIS SPITZWEGSTR.42 858 BAYREUTH TEL 092168877 "";4000I4I5)80002 ""? TH0:T0LX025000`(V0200:F1:S1jF1000uP60000ZATTI:AGTIdRR$:((RR$)0RR$"0")((RR$)0)R(RR$)n(TIAT)30ATTI:130x110TTRTHTH1A5.4(1 ":2000:F09000:10000*^T1200R0:1403h100CA$""UA$(0)" "fA$(1)" "zA$(2)" ߒ "A$(3)"  "A$(4)"USAߒ"$A$(5)"ߒ".A$(6)A$(0)8""40);BI06LA$(I)A$;V` "  SPEED HOEHE "-j"  SPRIT ZEIT "3tE40);:R0tI1R:"Σ";::IR10:" ";:"";:I110:" ";:: 5000"  M O N D L A N D U N G " THTH1A5.4(10.2R)0XV00.5A:X0X0X>X00230RXXX0:F0:X00dDV0V02XAqD0270DD:S1V0(D)S(X)S1"V00"";,"";((V0),2,5)"";6((X0)A$(0),7)@""J"";1200T" A$;V[" "7`"SPEED HOEHE":1160Uj"SPRIT ZEIT ":1160[ttI12:""13)"":"":19);:R0I1R:"Σ";::IR10:" ";:"";:I110:" ";::S TANKS"! "UND DIE ZEIT (S) ANGEZEIGT."P :"SIE KOENNEN DURCH DRUECKEN DER TASTEN"w "0 - 9 DEN BREMSSCHUB EINGEBEN."}  "GEBEN SIE ZUVIEL SCHUB, DANN STEIGT DIE" "FAEHRE WIEDER (ANGEZEIGT DURCH SCHUB)" J P"HABEN SIE VE ======================:I"DIESES SPIEL SIMULIERT DIE LANDUNG ";o"EINER MONDFAEHRE AUF DEM MOND."u"ES WIRD DIE FALLGESCHWINDIGKEIT (M/S),";"DIE HOEHE (M),DER SPRITINHALT DES TANKS"UND DIE ZEIT (S) ANGE$(4)"":H$(5)"":H$(6)"". 2#H$(7)"":H$(8)" "P <#"":I140q F#N((1)7)1:(NH)29030 P#HN:H$(H);:I: '""19); 'I110:J05:A$(J)A$;::" ";: $'V015020000 .':"GRATULATIO:G$:G$""30001 :uG$"J"7# DuG$"N" 30030D Eu"":ZI13000::"START",8^ Nu:"(J/N) ";: 30000x @AA$:AA$"" 40000~ J `"" jATI t"DIE MONDLANDUNG BEGINNT IN"5((TIA)60)" SEKUNDEN " ~(TZEIGT.". :"SIE KOENNEN DURCH DRUECKEN DER TASTEN ";\ "  0 - 9 DEN BREMSSCHUB EINGEBEN."b  "GEBEN SIE ZUVIEL SCHUB, DANN STEIGT DIE MONDFAEHRE WIEDER . "DIES WIRD DURCH DEN GESCHWINDIGKEITSWERT  REVERS DARGESTELLT. P"0.2R)XV00.5A:X0X0X*X00230>XXX0:F0:X00PDV0V02XA]D0270kDD:S1~V0(D)S(X)S1"V00"";,"";((V0),2,5)"";6((X0)A$(0),7)@""J"";1200T" "10);THT" ":H$(3)"":H$(4)"":H$(5)"":H$(6)""; 2#H$(7)"":H$(8)" "] <#"":I179~ F#N((1)7)1:(NH)29030 P#HN:H$(H);:I: '""40); 'I110:J05:A$(J)A$;::" ";: $'V015020000) .':"  632 ORION 4245"":I120::W A%(15):B32768:Z40:V32968Q20:M2:M116:M27:M310:V241:59467,16:59466,15:59464,0 N33457:H(11):230:392 14:24M)"ͤ M)""  ON AUFGEBEN ODER NOCH MAL SPIELEN ? ";O 1u" ";:I1200::" ";:I1200::G$:G$""30001] :uG$"J"7r DuG$"N" 30030} Eu"": Nu:"(J/N) ";: 30000 @AA$:AA$"" 40000 J `"" jATIt"DIE MONDLA 00" 4TI606528:%:60:82K<::::::::::::::::f>I115:X((1)1001)@(XB)32A%(I)X:II1BII1::TI$"000000"DI115FA%(I)B,32:A%(I)A%(I)ZHA%(I)B33768A%(I)A%(I)1010J(A%(I)B50:28 144 :" K5K51:K560288. NM,N2? TI$"000000"N TI 5188Y N1NMs K215:I113:K2K21 59464,K2 N1,32:N1N1N3 (N1)32204 N1,81:59464,0: N1,32:140 : (N1)77(N1)99(N33728:B99jI139 lX((1)41)=nX1B99B78B99:120ZpX3B99B78B77:120yrX2B100B77B100:120tX4B100B77B78:120v108xPP1:P,Bz:|:~M95 408(151)55U1: 146(151)44 144 :K H32800:H (1)H10:H (2)H14:H (3)H18:H (4)H22:H (5)H26:H (6)H30~ H (7)H34:H (8)H38:H (9)H40:H (10)H60: X((1)111) X10 274 X8H (11)39:246 X4H (11)40 X4 H (11)41 H(X)38 "". I13:M)" ":W "";:MMU:M1M1U:M2M2U:M3M3U_ 14r I1 3:"" TI$"000000" TI 15168 J13:M)" ": "";:MMU:M1M1U:M2M2U:M3M3U 14: HABEN SIE VERSTANDEN ? "; Q 40000U R"* ";:I1200::" ";:I1200::U$:U$""4178c ^U$"J"7v _U$"N" 4200 `:"(J/N) ";: 4176 h"":4000 @"" EI1120 ^79(1));"*" I1  (#H4.5:H$(1)"":H$(2)" 711((1)39):L33487:L20! K118;(KLM)32L2L21AQL213288W] :v""":""$K120:990:TI$"000000"&TI6294(*10)"GOOD BYE",TI$"000000".TI3003020"" MEINE HOCHACHTUNG ! DIE LANDUNG WAR EINWANDFREI"4 8'30000~ N"        " *N"" 4N" SCHWACHES BILD ! ! DAS WAR EINE BRUCHLANDUNG MEIN FREUND." a40000 0u"WOLLEN SIE SCHM1)"" M2)""&,:<28:38:56LM3)""[M3)""i M3)"v"M3)"|$&"";:50(M3)" ";:"":50*M3)" ";:"":50,M3)" ";:"":50.M3)" ":5002TI$"0000NDUNG BEGINNT IN"5((TIA)60)" SEKUNDEN "3~(TIA)30060020e" ":R0kRUDOLF SCHINEIS SPITZWEGSTR.42 858 BAYREUTH TEL 092168877)32A%(I)A%(I)40:74!LZ 880 3NA%(I)B,46:CPZZ40: 68IR:\T 102:86:124pVJ1 Q:"";:|XK114ZTI$"000000"\TI1592^" "`14:""b::50:28:d124f:hP1)126 386 (N1)42212 218) N5N51:K110Q H(K)N1H(K)32717((0)39):218W ] :i I110 N1,35:N11,35:N11,35:N140,35:N140,35 N1,32:N11,32:N11,32:N140,32:N140,32 59464,10:59464,50:59464,0:U1: 146' (151)80N33457:N278:N339:180O (151)75N33456:N277:N341:180w (151)56N33488:N278:N339:180 (151)52N33505:N277:N341:180 236 320 124 : M9M91 M95140 MU2MU18144  ,32:H(X)H(X)H(11)(H(X))32262258(I110HH(X),42:H(X),170:H(X),32d:H(X)32711((1)39)qH(X),42w(H(X))99(H(X))77(H(X))78268(H(X))100H(X),100:270 252 H(X)H(11),42H(X)32 :59468,12' AS OF FEB 26 80-d:IM$""{E(22),EN(22),M1$(6),M2$(6),LC,LF,LR,LL,LB,D132904,1,33024,2,33030,4,33039,5,33042,4,33094,1,33098,233110,2,33157,5,33162,5,33165,1,33291,4,33298,4,33300,6,33308,3 : 2"ABGESCHOSSENE METEORE= ";N5*4"ABGESCHOSSENE FROGS= ";N6F6"PUNKTE= ";N520N650}8158,0::"DRUECKEN SIE >1< FUER EIN NEUES SPIEL.":J$:J$"1"<J$""314>59467,0:@:BVVV2D(V287)77(V287)78(V287) 1$(I),M2$(I):B"340:TI$"000000":1140:" SUCHEN ":BB0:V0:C0,LC33418:D1(4(1)1):O1219:P33011:33011,81:O264:D1:Y1916320:1150:590:310@TI$T$JM$""31)(TI$,3,2)":"(TI$,2):T$TI$:T" Z\V32750((1)40):V241 ^`:*bX((1)21):V5V419dX1V441HfX2V440ZhK225:K1 6kjTI$"000000"lV5,32:59464,K2:K2K21n(V5V4)32376pV5V5V4:V5,126rTI0370t59464,0:vV5,32:334  H   "S" H  ""  B   "" A B B  P  ""   A A " 128,145,1,200,208,247,230,2,169! 132,197,2,208,239,96,234,999HVV2,32:V40V2,32:V41V2,32:N:qJ150:"";:"END OF MOVING"59464,20:59464,25:59464,30:59464,0"";:"END OF MOVING""";:" "   "9 "  A   "k "ђ" "   " "  B  FUNK : " " J$:J$""438  ND1710,720,730,7401 X(LF)209(LL)160(LR)160980:F b(LF)87980:p l(LF)209((LR)81(LL)81)980: v(LF)81980: N(3(1))1:T10:OLLC N3N1 N750,820,900 T10NN1:650 V0(1).81050! V11V10:1300 1 LFLC80:LRLC1:LLLC1:LBLC80:Y LFLC1:LRLC80:LLLC80:LBLC1: LFLC80:LRLC1:LLLC1:LBLC80: LFLC1:LRLC80:LLLC80:LBLC1: PL(LF):PLYPL64PL91PL93770  PL209 N :33319,5,33322,4,33428,1,33537,2,33543,4,33574,1,33510,2TI122:E(I),EN(I):" SCHNELL ","STRASSE! "," BANK "," RAUB "," CASINO ","UEBERFALL"" MIT BLAU"," LICHT "," RAUB "," IM PARK ","BRANDST. ","IM HOTEL " I16:M 99(V287)100328F330HV239:VV41:*J(V41)32338ILV33288V33448V241352RN406qPV,77:V40,99:V41,126:R406:K110TV239V39,32:V79,32:V80,32VV,43:V40,43:V41,43XV,32:V40,32:V41,32 POLIZEI "I^" ђ"h"    "r"ђ"|"  A   ""  x:zK110|V5V4,43:V5V4,171:V5V4,32A~59464,20:59464,150:59464,80:59464,0L:334R:qN6N61:V32750((1)40)z220:A990I:I999 A,I:AA1:396 160,0,132,1,169,128,133,2,177,1 73, + "  R  "a "   K  " "  S C   " " HH  " "  H M9M91128:$:"";"GESCHOSSEN WIRD MIT ! W _ P "M: "GEHEN UND REPARIEREN MIT R L"i:"SIE HABEN 60 SCHUSS:"BEI ZU GROSSEM SCHADEN UND BEI LEEREN":"LASERN WERDEN SIE ZERSTOERT!!"::17)">SPACE<"   "; " A B H  "o &"   " 0"ђ ZEIT " :" : " DI3468834726:I,160::!A$"N""":1460! 1PL:V0800 LF,170:LC,O1# O1N1:LCLF:T11:)*R4PL(LL):PLYPL64PL91PL93840X>fHPL209yRN1PL:V0870\LL,170:LC,O1fO1N1:LCLL:T11pD1D11:D11D14zPL(LR):PLYPL64PL91PL93920!  "":&dS%(38),R%(38),N%(38)BnN138:N212:N3118:KE0UxI1168:Q$:X1N1:S%(X),L:R%(X)S%(X):N%(X)S%(X)L1:"HI,I AM PET TELL ME YOUR PROBLEM!":I$I$" "I$" "L1(I$)(I$,L,1)"'"I$(I$,L1)! I122$LCE(I):.59467,16:59466,85%8M$9BCC1:35)""C_V29)" ":29)" "ZI215:I1114:59464,I116:I1,I2`""29)M1$(EN(I))j29)M2$(EN(I)):1330:tM$"";:~D9D!:I138:Q$:1(I$)(F$)L10C$" ":420RC$" "(I$,(I$)(F$)L2)gX1N22:S$,R$vL1(C$)L(S$)(C$)510(C$,L,(S$))S$510C$(C$,L1)R$(C$,(C$)L(S$)2):LL(R$):540L(R$)(C$)540!N2(P9):P9,81P,O2:O2N2:PP9DPDLCPDDLCP3DLCP4DLCV0V1:V11dV111140:"DIE JAGD "j 59467,16:59466,2:R212R10025580:59464,R::I1500:(R25510080:59464,R::I1500::2!I1(F$):(F$,I,1)"*"AIT3XA0F$:P$I$:170fl(F$,A1);C$;:(F$)A0(F$,(F$)A):630lq{vP$I$:170"CAN YOU","CAN I","YOU ARE","YOURE","I DONT","I FEEL","WHY DONT YOU" $"WHY CANT I","ARE YOU","I CANT","I AM","IM !0:X1T::1140:"DAS ENDE!"M$""=29)" OK. ":29)"GESCHAFFT":1340j""29)" NEUES ":29)" SPIEL ? ";yZTTI:ZC2A$:A$""1470TIZT(" ?",ZC,1);"";:ZC3ZC:ZTTI151462A$"J"A$CR$290! " YOU "8 G" I "," YOUR "," MY "," IVE "," YOUVE "," IM "," YOUR "\ L"DONT YOU BELIEVE THAT I CAN*" <"PERHAPS YOU WOULD LIKE TO BE ABLE TO*","YOU WANT ME TO BE ABLE TO*" P"PERHAPS YOU DONT WANT TO*","DO YOU WANT TO BE ABLE TO"+ Z"WHAT MAK! ES YOU THINK I AM*","DOES IT PLEASE YOU TO BELEAVE I AM*"r n"PERHAPS YOU WOULD LIKE TO BE*","DO YOU SOMETIMES WISH YOU WERE*" "DONT YOU REALLY*","WHY DONT YOU*","DO YOU WISH TO BE ABLE TO" "DOES THAT TROUBLE YOU?","TELL ME MORE ABOUT SUCH FE"ELINGS") "DO YOU OFTEN FEEL*","DO YOU ENJOY FEELING*"n "DO YOU REALLY BELIEVE I DON'T*","PERHAPS IN GOOD TIME I WILL*" "DO YOU WANT ME TO*","DO YOU THINK YOU SHOULD BE ABLE TO*" "WHY CAN'T YOU*","WHY ARE YOU INTERESTED IN WHETHER OR NOT!PL209N1PL:V0950!LR,170:LC,O16O1N1:LCLR:T11MD1D11:D14D11SyN1(LB):N1209N181N1871420V01010LB,170:LC,O1O1N1:LCLB:T11D1D12:D14D1D14D1710,720,730,740!(I$,(I$)L):210LFI$P$"PLEASE DONT REPEAT YOURSELF":170P:S0e,K1N1:S03406K$:A%(K$):B%(I$)@I1B%A%:(I$,I,A%)K$AI1:330AIBA0JA0SK:TA:F$K$TKmS0KS:LT:400rKN1:570!:A$,A$""D80(A$"2")1(A$"4")80(A$"8")1(A$"6"):D8D<A$""DD8dA$" "V1BB7O287:DD9:BBBB1rA$"5"P9PD:(P9)Y(P9)64(P9)91(P9)931240(P9)871240D9DDD9:1200(P9)209!(C$,L,(R$))R$540= L1C$S$(C$,(C$)L(R$)1):540gC$(C$,L1)S$(C$,(C$)L(R$)2)pL,X+(C$,2,1)" "C$(C$,(C$)1)::I150:Q$:?DX1R%(K):F$:NR%(K)R%(K)1:R%(K)N%(K) R%(K)S%(K)SA0:!59467,0:59466,0:59464,0:"<59467,16:P159464:59466,15:T3?FP1,255:X1100::1410ZPP1,Y:X1100::1410wZP1,152:X1100::1410dP1,128:X1200::1410nP1,152:X1100::T0:1410xP1,128:X1400::1330:59464,!","YOU ","I WANT","WHAT" %"HOW"f ."WHO","WHERE","WHEN","WHY","NAME","CAUSE","SORRY","DREAM","HELLO","HI " 8"MAYBE"," NO","YOUR","ALWAYS","THINK","ALIKE","YES","FRIEND","COMPUTER" B"PET","MONEY","NOKEYFOUND"," ARE "," AM "," WERE "," WAS "," ARE YOU THINKING OF?","REALLY,ALWAYS?"A>"DO YOU REALLY THINK SO?","BUT YOU ARE NOT SURE YOU*"R"DO YOU DOUBT YOU*","IN WHAT WAY?","WHAT RESEMBLANCE DO YOU SEE?"p"WHAT DOES THE SIMILARITY SUGGEST TO YOU?"z"WHAT OTHER CONNECTIONS DO YOU S"  ` ***FOR TEACHER'S AMENDMENTS RUN 1440W"0.4 .RATENSIS: EADOWESCUE","",5"0.5 .TOLONIFERA: REEPINGENT","",5"0.4 .RATENSIS: EADOWOXTAIL" I AM*"= "WOULD YOU PREFER IF I WERE NOT*","PERHAPS IN YOUR FANTASIE I AM*" "HOW DO YOU KNOW YOU CAN'T*","HAVE YOU TRIED?","PERHAPS YOU CAN NOW*" 6"DID YOU COME TO ME BECAUSE YOU ARE*","HOW LONG HAVE YOU BEEN*" J"DO YOU BELIEVE IT IS NOR" HAVE]ANY FRIENDS?","DO YOU IMPOSE ON YOUR FRIENDS?"["PERHAPS YOUR LOVE FOR FRIENDS WORRIES YOU.","DO COMPUTERS WOORY YOU?" "ARE YOU TALKING ABOUT ME IN PARTICULAR?" "ARE YOU FRIGHTENED BY MACHINES?","WHY DO YOU MENTION COMPUTERS?"$ "WH"FTEN ALSO WANT*"4"WHY DO YOU ASK?","DOES THAT QUESTION INTEREST YOU?"v"WHAT ANSWER WOULD PLEASE YOU THE MOST?","WHAT DO YOU THINK""ARE SUCH QUESTIONS IN YOUR MIND OFTEN?""WHAT IS THAT YOU RELLY WANT TO KNOW?","HAVE YOU ASKED ANYONE "."%` "IM NOT SURE I UNDERSTAND YOU FULLY.","COME ELUCIDATE YOUR THOUGHTS!"dt "CAN YOU ELABORATE ON THAT?","THAT IS QUITE INTERESTING." "WHY DO YOU HAVE PROBLEMS WITH MONEY?" "DO YOU THINK MONEY IS EVERITHING?" "ARE YOU SURE THAT MONE"OES THAT REASON EXPLAIN ANYTHINK ELSE?"P:"WHAT OTHER REASON MIGHT THERE BE?","PLEASE DON'T APOLOGIZE!"N"APOLOGIES ARE NOT NECESSARY.","WHAT ARE YOUR FEELINGS BY APOLOGIZING?"b"DON'T BE SO DEFENSIVE!","WHAT DOES THAT DREAM SUGGEST TO YOU?"#\55,4,59,4,63,1,63,1,64,5,69,5,74,2+ 76,4,80,3,83,7,90,3,93,6,99,7,116,3,113,3,106,7""YOU AREN'T SURE?","DON'T YOU KNOW?"F"WHY NO*","DON'T SAY NO ITS ALWAYS SO NEGATIVE","WHY NOT?""ARE YOU SURE?","WHY NO?","WHY ARE YOU CONCERNED ABOUT MY*" "WHAT ABOUT YOUR OWN*","CAN'T YOU THINK OF A SPECIFIC EXAMPLE?" "WHEN?","WHAT #S: HITELOVER","",1.7L"0.2 .ONOPSEA: WEETCNTDRCHID","",.001V"20 .OBUR: OMMONAK","",.07L`" 8 .UBESCENS: ROWNIRCH","",.01sj"10 .QUIFOLIUM: OLLY","",.4t" 0.3 .NIFLORA: OODEDICK","",3~" 0.4 "EE?","ARE THERE REALLY CONNECTIONS?"B"HOW?","YOU SEEM QUITE POSITIVE.","ARE YOU SURE?","I SEE.""I UNDERSTAND.","WHY DO YOU BRING UP THE TOPIC OF FRIENDS?""DO YOUR FRIENDS WORRY YOU?","DO YOUR FRIENDS PICK ON YOU?""ARE YOU SURE YOU " ","",2"0.4 .RDORATA: CNTDERNALRASS","",3"0.1 .RATENSE: OMMONOWHEAT","",.2>$"0.4 .ILLEFOLIUM: ARROW","",.4l."0.5 .CRIS: EADOWUTTERCUP","",.958"0.2 .UPULINA: LACKEDICK","",.5B"0.6 .EPEN"MAL TO BE*","DO YOU ENJOY BEING*"=^"WE WERE DISCUSSING YOU - NOT ME.","OH,I*"pr"YOU'RE NOT REALLY TALKING ABOUT ME,ARE YOU?"|"WHAT WOULD IT MEAN TO YOU IF YOU GOT*","WHY DO YOU WANT""SUPPOSE YOU SOON GOT*","WHAT IF YOU NEVER GOT*","I O"AT DO YOU THINK MACHINES HAVE TO DO WITH YOUR PROBLEM?"C. "DON'T YOU THINK COMPUTERS CAN HELP PEOPLE?"x8 "WHAT IS THIS ABOUT MACHINES THAT WOORIES YOU?"B "SAY,DO YOU HAVE ANY PSYCHOLOGICAL PROBLEMS?"L "WHAT DOES THAT SUGGEST TO YOU?","I SEE"ELSE?""HAVE YOU ASKED SUCH QUESTIONS BEFORE"g"WHAT ELSE COMES TO MIND WHEN YOU ASK THAT?","NAMES DON'T INTEREST ME.""I DON'T CARE ABOUT NAMES - PLEASE GO ON.","IS THAT THE REAL REASON?"&"DON'T ANY OTHER REASON COME TO MIND?" 0"D"Y IS YOUR PROBLEM?"" "I THINK WE WANT TO TALK ABOUT YOU , NOT ABOUT ME."_ "WHATS ABOUT ME?","WHY DO YOU ALWAYS BRING UP MY NAME?" 1,3,4,2,6,4,6,4,10,4,14,3,17,3,20,2,22,3,25,3,28,4,28,4,32,3,35,5,40,9 40,9,40,9,40,9,40,9,40,9,49,2,51,4,"v"DO YOU DREAM OFTEN?","WHAT PERSONS ARREAR IN YOUR DREAMS?"L"ARE YOU DISTURBED BY YOUR DREAMS?""HOW DO YOU DO ... PLEASE STATE YOUR PROBLEM.""YOU DON'T SEEM QUITE CERTAIN.","WHY THE UNCERTAIN TONE?""CAN'T YOU BE MORE POSITIV?",# SELECT THE ENVIRONMENTWHERE @"CHANGESARETOBEMADE. J" 1) RASSLANDT" 2) OODLAND^" 3) OORLANDAh" 4) AND-DUNE ANDSLACKKrA$""_|A$:A$""1660yA(A$):A1A41650B0:X10(A1)1:Y10A# .LTISSIMA: OOD ESCUE","",3" 0.6 .ILOSA: AIRYOODRUSH","",.5" 0.9 .ELIX-MAS:ALEFERN","",.1H" 0.5 .ON-SCRIPTUS: LUEBELL","",2s" 0.2 .EMOROSA: OODNEMONE","",1" 0.2 .CETOSELLA: OOD ORREL","",.4"# A$""A$:A$""1800A$"Y"A$"N"1800A$"N""":1950&"NTERTHECODELETTERFORTHESPECIES10"WHOSE.. YOUWANTTOALTER?:A$"":D0SDA$:A$""1860^NIXYXA$B$(I)(A$)(B$(I))128DIblD018# RICTA: AT RASS","",3"0.4 .NGUSTIFOLIUM: OTTONRASS","",3 "0.5 .IERVIS: OOREDGE","",23 "0.02OLYTRICHUM SP.","",6] "0.3 .RENARIA: ARRAMRASS","",5 ("0.4 .UNCEIFORMES: OUCH RASS","",4 2"0.3 .RENARIA: A#AND-DUNEANDSLACK" NSWER1, 2, 3 OR 4A$""A$:A$""2030A(A$):A1A42020X10(A1)1:Y10A? " OUMAYEXPECTTOFINDTHEFOLLOWINGO"SPECIES:-o "ODE OVER PECIESz*IXY4A(I)02120>#ESTHARROW","",.7 x"0.5 .NSERINA: ILVERWEED","",.8 .2,.34,.40,.58,.65,.76,.87,.94,.97,.990,1> 1.010,1.03,1.06,1.13,1.94,2.35,3.42,4.60,5.35H 1450P Z1 59468,14:A$(40),B$(40),A(40),B(100),R(20),D(40):S32767 I140:A$(#"" 1 5 10 15 20"THIS IS A PLAN "OF THE AREA TO 1"BE SURVEYED.3"YOU MUST ENTERI"THE COORDINATESb"OF THE PARTIC- 5x"ULAR QUADRAT "SQUARE. "#UMUSTAMENDTHE " STATEMENTSBEGINNINGATLINE 500. "OUSHOULDTHENREŠTHEPROGRAM.4 " HEIMPORTANCEVALUEOFAPLANTCANBEb ""ALTERED FOR THE DURATIONOFTHIS ,"BYFOLLOWINGTHEPROCEDUREBELOW. 6"IRST # " " " "VERTICAL";V% V%21V%02470 "NOT ACCEPTABLE ":" ":"":2440& F99H%40V%: GG1:GE2530L B(G)F2520x "ALREADY SURVEYED":" " "":2400  2480 EE1:B(E)F I15 SF,122 J1200: SF,160 J1200: ( P1(PR((1(2)103))):B02 IXY<< D(I)(A(I)R((1(2)20)).5)IF BBD(I)OP ZZ IXYod D(I)(D(I)PB)un ~ " I1#IXY:BBA(I):C100B" PECIES ODE .. %"IXY:A(I)01760D$(A$(I),23)ED$;25);B$(I);30);A(I);35);(A(I)C.5)K}"OYOUWANTTOALTERANIMPORTANCEVALUE?"NSWER OR #0.1 .ULGARIS: ILKWORT","",.2"2 .QUILINUM: RACKEN","",.6"1.4 .ETRALIX: ROSSLEAVEDEATH","",2@"1.8 .ULGARIS: ING","",6g"1.8 .YRTILLUS: ILBERRY","",5"0.4 .EARULEA: URPLE OORRASS","",4"0.5 .T#50v"NTERTHENEWIMPORTANCEVALUE."(OELIMINATEASPECIESMAKE..=0)A(D)1680*" ELECTTHETYPEOFENVIRONMENTYOU@"WANTTOSURVEY.X" 1) RASSLANDn" 2) OODLAND" 3) OORLAND" 4) #ND EDGE","",.8 <"0.4 .UBRA: EDESCUE","",4 F"0.8 .EPENS: REEPINGILLOW","",.23 P"0.2 .FFICINALIS: CURVYRASS","",.03^ Z"0.5 .ARITIMA: EAAMPION","",.05 d"0.2 .UNENSE: UNETORKSBILL","",.02 n"0.8 .EPENS: #2);B$(I);5);A$(I)HR" OUSHOULDNOTETHENAMESOFTHESE\"SPECIESANDTHEIR CODELETTERS.)f" RESSANYKEYWHENYOUAREREADYTO9p"CONTINUE.CzA$""WA$:A$""2180o59468,12:59409,52x"I12118);#I),B$(I),A(I)::P50((2)50) I120:R(I): "   Z01950" " ' Q " O MAKEAPERMANENTALTERATIONTOTHE "NAME OFASPECIESORTOITSCODEORTO "ITSIMPORTANCEVALUE YO# 10 " 15$ " 20. A$""8 I1EB SB(I),102L V 59409,60:0` G0:"HORIZONTAL";H%Ej H%21H%02430|t "NOT ACCEPTABLE ":" ":"":2400~ "