Lander >>5@32299+~:"":"" L2:6:9 ::1;10 ,7;" LUNAR LANDER " Hn=32300,~32331K~:.1}L,n-100d:n:.2~L,12 Zy=0::4,2;"Kennen Sie die Spielregeln ?";6,12 ;"J / N" (="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: Pv17,0;" " Z/6,11 ;"";7,11 ;"" d?23296[,235:23297[,71G:1:1 nV20,0;"speed height fuel power 000 kp " 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 ,Fs=s+2.5 :20,23;"0 m ":0:0:5 1s>100d800  6s>30700 @K5,1;"Landegeschwindigkeit: ";(s*100d)/100d;" m/s" J37,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 8a$="+ + Landung gelungen + +":b=540:1000 10 ,12 ;"SUPER !" c=c-100d %f=f+2000:7,24;f 6a$="2000 t Treibstoffbonus":b=270:1000 f12 ,2;"Sie drfen auch mal abstrzen.";14,2;"Probieren Sie 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 8a$="+ + 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 7a$="+ 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 !" 4a$="- 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  r3: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 !" H6a$="- Landung missglckt -":b=270:1000 RJ72H,38&:0,30:62>,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: jpa>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 C.05|L,16:y=a:.1}L,16:b$:.1}L,4  60< 5a$="* * "+a+" Punkte * *":b=320@:1000  9 ,0;0;0;" So kommen Sie nie zum Mond ! Damit sowas nicht noch mal 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 O"Lander"5:"Lander 1"32300,~,293%:"Lander 2""a",120x uLander 1 %,~>'pswsdswsknrn_nrnilpl]lplgprprssrW P P P 3%mM/UM!Wq !+~v>*[?"[T]&~# *[&"[&T]?~# !X6p# !@@~ +$ MV> P P >  >  %$>> o>>g1Lander 2 xX>@z??$@$??DDDDD8D8DDD8$8