Lander  2000 $32300,~112p3000 J2:6:9 ::1;10 ,7;"Lunar Lander " Hn=32300,~32331K~:.1}L,n-100d:n:.2~L,12 \y=0::4,2;"Kennen Sie die Spielregeln?";6,8;"(J)A/(N)EIN" (="j"Ŧ="J"60< -"n"Ʀ"N"40( 28,1;"Versuchen Sie mglichst sanft";10 ,1;"auf dem Mond zu landen.Mit";12 ,1;"den Tasten 1-9 knnen Sie die" 714,1;"Schubkraft einstellen,mit 0";16,1;"schalten Sie ihre Triebwerke";18,1;"aus.Drcken Sie irgendeine";20,1;"Taste,um anzufangen!";:1:0 <1c=700:f=7000X:a=0:e=0 F&1:7:0:0: Py17,0;" " Z/6,11 ;"";7,11 ;"" d?23296[,235:23297[,71G:1:1 nV20,0;"speed height fuel power 000kp " x)n=23232Z23295Z:n,0:n 1m=0:p=0:s=200:h=3990 6f>0a=:a<58:a>47/p=a-480 @s=s+(6000p-h)/c:h<600Xs=s+(600X-h)/100d f=f-p*2:s=s-p*2 i=h-s/12 !f0f=0:p=0 m=m+i-h 3m>52432440~:m=m-524:200 4m<-52432400~:m=m+524:210 }20,6;(s+3);" m/s ";20,23;h+30;" m ";21,6;f;" t ";21,23;p H=i h-29300, h>620081300 " 140 ,Ds=s+2.5 :20,23;"0m ":0:0:5 1s>100d800  6s>30700 @J5,1;"Landegeschwindigkeit: ";(s*100d)/100d;"m/s" J27,1;"Restlicher Treibstoff: ";f;"t" Ts>15600X ^s>6500 0420:n=07:a:.1}L,a:n I12 ,12 ,16,12 ,16,19,19,16 4a$="++Landung gelungen++":b=540:1000 10 ,12 ;"SUPER !" c=c-100d %f=f+2000:7,24;f 5a$="2000t Treibstoffbonus":b=270:1000 `12 ,2;"Sie drfen achmal abstrzen.";14,2;"Probieren es nochmal....." 31:200:e=(e+2000/s):70F m=30:900 10 ,2;"Die Landung hat Sie zwar ganz";12 ,2;"schn mitgenommen,aber Sie";14,2;"drfen es nochmal versuchen." 0530:n=07:a:.1}L,a:n D12 ,11 ,12 ,7,4,2,4,0 4a$="++Landung gelungen++":b=270:1000 0%f=f+1500:7,24;f :6a$="1500 t Treibstoffbonus":b=270:1000 Ne=(e+2000/s):70F Xm=60<:900 b71:93],44,:8,-7:0 l7,1;"Sie leben zwar noch,aber ";9 ,2;"auf dem Mond.Und von da";11 ,2;"kommen Sie ohne Raumschiff";13 ,2;"leider nicht mehr weg." v;n=02:.3,4:n:1.2,0 6a$="+Raumschiff zerstrt +":b=540:1000  1100L r2:15,11 ;" ":m=8:900:1;16,11 ;"/";16,11 ;"--" :23297[,80P:n=03:32400~:n г5,6;"Geschwindigkeit beim";7,6;"Aufprall : ";(s*10 )/10 ;"m/s";9 ,6;"Von Ihnen sind nur";11 ,6;"noch Trmmer brig!" 2a$="-landung missglckt-":b=0:1000 J72H,38&:0,30:62>,58::20,0 &-5,-7,-9 ,-10 E750:n=03:a:.6,a:n:1.8ffff,-12  1100L  q3:15,11 ;" ":m=8:900:1;16,11 ;"/";16,11 ;"mm" *D23297[,80P:n=012 :32400~:n:5 4317,10 ;" ";18,11 ;"" >5,6;"Geschwindigkeit beim";7,6;"Aufprall : ";(s*10 )/10 ;"m/s";9 ,6;"Sie haben einen neuen";11 ,6;"Krater geschaffen !" H5a$="- landung missglckt-":b=270:1000 RJ72H,38&:0,30:63?,58::20,0 \E750:n=03:a:.6,a:n:1.8ffff,-12 f 1100L .n=0m:32440~:32400~:n: (n=1̱a$:2,31;a$(n) *m=07:1:32500~ m:n 'n=0b:1:32500~:n <n=0255:2,0;" ":32500~:n  L 300,:a=(2000/s)+e Vs<30a=a+(f/40() `5:1: joa>y8,4;"Sie haben den High Score";10 ,4;"um ";a-y;"Punkte berboten !":1160 t8,4;"Sie haben den High score";10 ,4;"nicht verbessert. Den";12 ,4;"hat nmlich immer noch";14,4;b$;" mit ";y;" Punkten":1200 ~ 60< u12 ,4;"Zur Belohnung drfen Sie";14,4;"jetzt Ihren Namen einge-";16,4;"ben ."  1200 B.05|L,16:y=a:.1}L,16:b$:.1}L,4  60< 3a$="* * "+a+"Punkte* *":b=320@:1000  9 ,0;0;0;"So kommen Sie nie zum Mond ! Damit sowas nicht nochmal passiert,werde ich Sie ein wenig anschieben...1000 m/s" ds=1000:20,6;"1000 m/s h":n=020:32400~:n:h=h-1040 (1:500 2K9 ,0;:n=015:0;"";:n:140  21004 i=115 p$ g=07 a  p$+g,a g  i  4I"a",0,0,1,1,3,15,63?,251 >Q"b",227,239,127,63?,19,36$,64@,224 HQ"c",0,0,128,128,192,240,252,223 RP"d",199,247,254,252,200,36$,2,7 \K"e",0,0,0,0,0,255,255,255 fM"f",1,3,7,31,63?,255,255,255 pK"g",0,0,1,3,15,63?,255,255 zU"h",128,192,224,248,255,255,255,255 Q"i",0,0,128,192,240,255,255,255 Q"j",0,0,129,195,255,255,255,255 H"k",0,0,0,0,0,3,31,255 K"l",0,0,0,0,0,192,248,255 K"m",68D,0,68D,68D,68D,68D,568,0 K"n",68D,0,568,68D,68D,68D,568,0 J"o",36$,0,568,4,60<,68D,60<,0 32299+~ 5"Eingabe des Maschinencodes in Dezimalwerten." i=32300,~32592P a:i,a:i,a:i  32299+~:"": 7"Lander"4000:"Land.mc."32300,~,293% 6Land.mc. %,~5'pswsdswsknrn_nrnilpl]lplgprprssrW P P P 3%mM/UM!Wq !+~v>*[?"[T]&~# *[&"[&T]?~# !X6p# !@@~ +$ MV> P P >  >  %$>> o>>g1