_JZ !68D:\[" 12 )="FLUG"FLY=1FLY=2:1,1;7;"O.K. FLUGTORNISTER AKTIVIERT ":N=140(:.1}L,N:N:3000 K$(9 12 )="SCHA"FLY=2R=41,1;7;"O.K. FLIEGE NACH UNTEN ":N=030:.1}L,30-1:N:X=20:Y=20:FLY=1:3000 K$(9 12 )="SCHA"FLY=2R=201,1;7;"O.K. FLIEGE NACH OBEN ":N=030:.1}L,30:N:X=12 :Y=12 :FLY=1:3000 K$(9 12 )=G$(6,14)W$=G$(6,13):5000:TARN=1:1,1;7;"O.K. Sie sind nun unsichtbar !":n=110 :.01z# =,10 -n:n:3000 K$(9 12 )=G$(3,14)W$=G$(3,14):5000:HELL=1:1,1;7;"O.K. SCHALTE TASCHENLAMPE EIN ":.1}L,0:P=1502:P:3000 8K$(9 12 )=G$(4,14)W$=G$(4,14):5000:1,1;7;"O.K. SCHALTE TELEKOM EIN ... ":N=1100d:.001wn,N/2:N:N=318:N,0;4;" ":N:5,1;4;0;"SIE HOEREN EINEN FUNKSPRUCH";7,1;".... bei Stromausfall kann der Stuetzpunkt nur mit dem Transmitter verlassen werden. Die Energie des Transmitters reicht fuer einen Transport von 4 Personen.":"Fertig ? ";f$:3000 ƤR=4K$(9 12 )="SCHA"FLY21,1;7;"Sie stuerzen in die Tiefe !":n=130:.1}L,30-n:n:8580! ЦR=20K$(9 12 )="SCHA"FLY21,1;7;"SCHACHT zu hoch !!! ":.1}L,30:p=1502:p:3000 NR=23K$(9 12 )="TRAN"" WOHIN ? (CODENR.) ";O$:4700\ * 3300 \O$="10273"8000@ fO$="10331"8100 p 8200 $ 3300 HABEN RICHTIGEN GEGENS W$<34140, N=14 7H$(N,13)=W$(13)5100 N  4140,  X>>> 4.PHASE <<< Y ZBefreiung Staatsm. @>>> 5.PHASE <<< A BRueckflug zur ERDE C Spielende J 1100L O,15,9 ;3;5;"" Tu14,10 ;0;5;"":1,1;6;"PHASE 5";7;" - Rueckflug zur ERDE" ^N=14 h)H$(N,13)="STA"8050r mN:1,1;7;"SIE SIND EIN VERSAGER ! ":1,10 :P=1502:P:1,1;7;1;"MISSION NICHT ERFUELLT ! ":1,10 :P=11000:P: rN=146-1:N,10 ;5;5;"";N-1,10 ;0;"":.1}L,N:P=110 :P:N |N=10 29:5,N;5;5;"";5,N;0;" ":.1}L,N:P=15:P:N:5,30;5;"" =N=07:N:P=110 :.01z# =,P:P:N Y6,10 ;5;0;"GRATULIERE !!";8,8;"MISSION ERFUELLT" P=110000' "" P: 8400 :6,0;7;"Sie sind in der Hauptstadt materialisiert. Ihr ploetz- liches Erscheinen loeste einen Grossalarm aus. Nach einer kurzen Verfolgungsjagt wurden Sie eleminiert.":8800`" 8400 :6,0;7;"Transmitter sollte man nicht einfach benutzen ohne richtige Codenummer. Sie sind leider im Weltraum materialisiert. Sie starben.":8800`" О:0,0;6;" SIRIUS ";7;"ADVENTURE - SPIELENDE ";6;"": !4>>> VERLOREN <<< !>8400 :6,0;7;"Durch Ihre unueberlegte Handlung haben Sie leider einen Grossalarm ausgeloest. Ihre unbedachte Handlung bringt Sie nun leider ins Gefaengnis, da Sie von 50 Kampfrobotern ge- fangen genommen worden sind.":8800`" !H8400 :6,0;7;"Durch Ihre unueberlegte Zer- stoerungswut starben Sie im reflektierten Energieueber- schuss der Lasersperre. Von Ihnen blieb leider nur Asche uebrig.":8800`" !R8400 :6,0;7;"Sie konnten leider nur eine Wache eleminieren. Die rest- lichen Roboter erwiderten das Feuer. Sie sind tot.":8800`" !\8400 :6,0;7;"Sie konnten nur 3 Roboter er- ledigen. 2 Roboter hatten Sie beim Eintreten gleich als Feind eingestuft. Sie wurden von Ihnen eleminiert.":8800`" !f8400 :6,0;7;"Die ganze Wachstation wurde durch die Explosion zersoert. Leider erlitten Sie dabei schwere Verletzungen die zu Ihrem Tod fuehrten.":8800`" !p8400 :6,0;7;"Die 6 Roboter haben Sie geortet und beim Aufnehmen der Karte eleminiert. ":8800`" !z8400 :6,0;7;"Sie sind in den Laserstrahlen qualvoll umgekommen. Von Ihnen blieb nur noch Asche uebrig.":8800`" !8400 :6,0;7;"Beim Sturz durch den Schacht haben Sie sich das Genick gebrochen. Sie sind tot.":8800`" !8400 :6,0;7;"KRYPTON sollten Sie nicht ein- fach so mitnehmen. Dieser Leichtsinn kostet Sie das Leben.Sie starben qualvoll an den Strahlungen des Kristalls.":8800`" "`-N=5020-1:.01z# =,N:N "520,0;7;"NOCH EIN SPIEL (J/N) ?" " ="J" "=="N":10 ,7;7;"AUFWIEDERSEHEN !!!!": " 8910" #(>>> Zeichensatz <<< #) #- 9100# #2#n=07:x:""+n,x:n #3#n=07:x:""+n,x:n #4#n=07:x:""+n,x:n #5#n=07:x:""+n,x:n #6#n=07:x:""+n,x:n #7#n=07:x:""+n,x:n #8#n=07:x:""+n,x:n #9#n=07:x:""+n,x:n #:#n=07:x:""+n,x:n #;#n=07:x:""+n,x:n #<#n=07:x:""+n,x:n #{01,011,0111,00001111,0001,001?,01,255 #{10,110,1110,11110000,1000,100,10,255 #Y0,0,0,0,10011010,1011010Z,1111011{,255 #q0,0110`,01010000P,01,01011000X,01,01,0 #S0,0,0,0,10,1110,255,0 #y0,010~,10111101,10111101,10111101,010~,00100100$,00100100$ #u10,110,1000,255,255,1000,110,10 #u00011000,00011000,00111100<,00111100<,010~,010~,255,255 #]0,0,0,00011000,00111100<,01100110f,255,255 #I255,0,255,0,255,0,255,0 #01100110f,01100110f,01100110f,01100110f,01100110f,01100110f,11100111,11100111 ' x 1 2 3 Antigrav-Raum 5 6 7 8 Transmitter-RaumAusgangspunkt 11 12 Wachstation 14 15 16   XWVU~} 0,6;@|Wǡ NADELSTRAHLERSTAATSMAENNERTASCHENLAMPE TELEKOM FLUGTORNISTERTARNSPRAY CODEKARTE SCHLUESSEL GEHEIMPAPIEREKRYPTON MIKROBOMBE DESINTEGRATORar yMNADELSTRAHLER; abeachzzslocodartel                    qW N NADELSTRAHLERAN-S-O-WK OEFFNE TUERW NADELSTRAHLERT1""  RIUS Ǐ |8099|8E99|83ݝ6e3[[>>BB<DHpHDB@~BfZBBBBbRJFB>> Zeichnen Raum <<<  PN=12 18:N,0;1;" ":N 3,0; Cn=311 :n,6;3;"":n Sn=311 :n,0;4;"";n,26;4;"":n [12 ,0;1;4;"";12 ,26;4;"" Y13 ,0;1;4;"";13 ,27;4;"" W14,0;1;4;"";14,28;4;"" U15,0;1;4;"";15,29;4;"" S16,0;1;4;"";16,30;4;"" Q17,0;1;4;"";17,31;4;""  4>>> TUEREN <<< 5 6<F=4:F1=1:HELL=0F=0:F1=0 9A$="" :6R=17PZ1=1:T(1,18)=0 ;6R=27PZ2=1:T(2,26)=0 >TW=1R=305,1;F;5;"";6,1;"";7,1;"":N=813 :N,1;7;"":N:14,1;5;F1;"";15,1;"";16,1;"":A$=A$+"W-" HTN=14,13 ;7;5;" ":N=510 :N,13 ;7;0;" ":N:11 ,13 ;7;5;"":A$=A$+"N-" RTO=15,30;F;5;"";6,29;"";7,28;"":N=813 :N,28;7;" ":N:14,28;F1;5;" ";15,29;" ";16,30;"":A$=A$+"O-" VCOM=01,1;7;3;1;"STROMAUSFALL";0;0;" IM STUETZPUNKT":20,1;" ":P=1100d:P:.1}L,1:1,1;" " \TS=1A$=A$+"S-" aHELL=0 f>> PANZERTUEREN << g2R=30LSP=16,1;0;5;"|";7,1;"|";7,2;"|":N=813 :N,1;7;0;"|":N:14,1;5;0;"|";15,1;"|";14,2;"|":N=813 :N,2;0;7;"|":N:N=813 :N,3;0;7;"|":N:N=110 :1,1;3;7;"WARNUNG";7;0;" LASERSPERRE AKTIV":.1}L,0:P=120:P:1,1;" ":N hR=13 WACHE=19 ,9 ;3;0;" ";10 ,8;3;0;"/\/\/\/\/\/\";11 ,9 ;3;0;" ":4,10 ;3;0;R$(R) ikR=18PZ1=15,1;4;0;"";6,1;"";7,1;"":N=813 :N,1;0;"":N:14,1;0;1;"";15,1;"";16,1;"":10 ,2;7;0;"o":4,8;3;0;"PANZERTUER":A$="S-O " jR=26PZ2=15,30;4;2;"";6,29;"";7,28;"":N=813 :N,28;2;" ":N:14,28;1;2;" ";15,29;" ";16,30;"":10 ,28;2;0;"|":1,1;3;7;"GEHEIMTUER":.1}L,0:P=1502:P:1,1;0;" ":A$="W-N-S " kR=414,13 ;7;1;"";0;"";7;1;"";15,12 ;"";0;"";7;1;"":5,13 ;3;0;"SCHACHT" lR=203,12 ;6;" ";4,11 ;3;6;"";6,13 ;0;"SCHACHT" p*PZ1=1T(1,18)=0 q*PZ2=1T(2,26)=0 zR=235,10 ;3;7;" ";6,9 ;4;" ";11 ,10 ;0;" ":N=710 :N,10 ;1;3;4;"| | | | | |":N:4,10 ;3;0;"TRANSMITTER" R=29STA=19 ,11 ;7;3;"O O O";10 ,10 ;"/\ /\ /\";11 ,11 ;" " ZR=27COM=15,10 ;7;0;" COMPUTER ";6,10 ;1;3;" ";7,10 ;" ";8,10 ;6;" ";9 ,10 ;" ";10 ,10 ;" ";11 ,10 ;7;"oooooooo";12 ,10 ;" "  >>> KOMMANDO <<<  Z1,1;6;0;"SIRIUS";7;0;" Adventure by Achim Kern" <20,1;0;" " 720,1;7;"Moegliche Richtungen ";A$  "> ";K$ FK$="L"K$="LIST"1,1;0;7;"BESITZ ":1,30;" ":N=14:1,8;0;" ":1,8;3;7;N;". ";H$(N,):.1}L,10 :P=1100d:P:N:1,1;0;" ":2200 +R=30LSP=1K$="W"8570z!  >>> EINSORTIERN H$/G$ ?H$(1,11)=" "H$(1,1̱N$)=N$: ?H$(2,11)=" "H$(2,1̱N$)=N$: ?H$(3,11)=" "H$(3,1̱N$)=N$: ?H$(4,11)=" "H$(4,1̱N$)=N$: >>> 3.PHASE <<<  Eindringen in Stuetzp. f1,1;" ";20,1;" " 0TN=0:TS=0:TW=0:TO=0 N=132 (X*100d+Y=O(N)R=N:N:3010 N ON=318:N,0;0;" ":N HELL=03015 2000:RAUM "T(1,R)=1TW=1 "T(2,R)=1TO=1 "T(3,R)=1TN=1 "T(4,R)=1TS=1 21004:TUEREN zO(R)=10106,7;3;7;"":N=711 :N,7;7;0;"|||":N GEGENSTAND IM RAUM <1,1;0;" " 0A=112 :G(A,R)=13100 A ;1,1;0;" " 3200 /HELL=031200 :ZEICHNEN GEGENSTAND oG(1,R)=116,20;1;7;"";3;"";17,21;7;"U" G(2,R)=1 OG(3,R)=113 ,6;1;5;"";6;"" G(4,R)=114,10 ;1;7;"|";15,10 ;"|";16,10 ;0;5;"";17,10 ;"" !G(5,R)=18,22;3;0;"":N=9 11 :N,22;0;"";2;"";0;"":N:12 ,22;0;2;" " "tG(6,R)=115,8;1;7;"";16,8;4;"";17,8;"" #UG(7,R)=116,6;0;7;"-";17,6;"." $G(8,R)=14,21;3;7;"";5,21;3;7;"";6,22;"";7,22;"";7,22;1;"=" %G(9 ,R)=113 ,13 ;1;2;"";2;7;"";14,12 ;1;2;"";2;7;"";7;1;"";15,12 ;0;7;"";7;1;"" &[G(10 ,R)=117,26;1;4;"";1;"K";0;"" 'WG(11 ,R)=116,3;1;6;;"";17,3;"" (qG(12 ,R)=115,24;1;5;"";6;"";16,25;7;"U " 0L1,1;7;G$(A):.1}L,10 :P=1100d:P  >>> Auswertung Befehl <  2200 K$="BENUTZE LIFT"O(R)=1010COM=1X=1:Y=1:K$="N":20,1;7;"O.K. LIFT FUERHRT AUFWAERTS ":n=130:.01z# =,n:n:1691 6K$="W"T(1,R)=1X=X-1:3000 6K$="O"T(2,R)=1X=X+1:3000 6K$="N"T(3,R)=1Y=Y+1:3000 6K$="S"T(4,R)=1Y=Y-1:3000 K$<83300 4000 20,1;7;"Befehl nicht moeglich ! ":p=1100d:p:20,1;0;" ":3000 *>>> NIMM,VERLIERE,ELEMINIERE,OEFFNE,LIES   NIMM HABEN=4K$(14)="NIMM"1,1;7;"Sie haben schon 4 Gegenstaende":p=1200:p:3000 (K$(14)"NIMM"4100 K$<10 3300 n=112 GG(n,R)=1K$(610 )=G$(n,15)4040 cn:1,1;7;"Gegenstand nicht im Raum ! ":p=1100d:p:3300 +G$(n,14)="FLUG"FLY=1 CG$(n,14)=G$(6,14)TARN=0.5 MG$(n,14)=G$(7,14)WAche=18560p! @G$(n,14)=G$(2,14)STA=0 @G$(n,14)=G$(10 ,14)8100 IN$=G$(n,):HABEN=HABEN+1:G(n,R)=0:2500 :3000 VERLIERE  ,K$(18)"VERLIERE"4200h "n=14 '9K$(10 14)=H$(n,15)41451 (n ,`1,1;7;"Gegenstand haben Sie nicht ! ":p=1100d:p:3300 1+K$(10 13 )="FLUG"FLY=0 2K$(10 13 )=G$(6,14)TARN=11,1;7;"Sie sind nun wieder sichtbar !":.1}L,30:p=1502:p 3AK$(10 13 )=G$(6,14)TARN=0 4MK$(10 13 )=G$(3,14)COM=0HELL=0 6=H$(n,113 )=" ":HABEN=HABEN-1 @n=112 E9G$(n,15)=K$(10 14)4180T Jn TG(n,R)=1:3000 h OEFFNE r*K$(16)"OEFFNE"4300 wK$(810 )="PAN"PZ1=1R=18" WOMIT ? ";W$:5000:W$(13)=G$(8,13)1,1;7;"O.K. PANZERTUER WIRD GEOEFFNET":.1}L,10 :P=1100d:P:PZ1=0:T(1,18)=1:3000 xK$(810 )="PAN"R=18W$(13)=G$(1,13)1,1;7;"WAFFE IST ZU SCHWACH ! ":.1}L,10 :P=1502:P:3000 yK$(810 )="PAN"R=18W$(13)=G$(12 ,13)1,1;7;"WAFFE IST ZU SCHWACH ! ":.1}L,10 :P=1502:P:3000 zK$(810 )="PAN"R=18W$(13)=G$(11 ,13)1,1;7;"WAFFE IST ZU SCHWACH ! ":.1}L,10 :P=1502:P:3000 |K$(810 )="GEH"PZ2=1R=26" WOMIT ? ";W$:5000:W$(13)=G$(7,13)1,1;7;"O.K. BENUTZE ";G$(7,19 );" ":.1}L,10 :"CODENUMMER ? ";C:C=CODEPZ2=0:T(2,26)=1:.1}L,0:1,1;7;"O.K. TUER OEFFNET SICH ":P=1150:P:3000 K$(810 )="GEH"CCODER=26 1,1;7;3;1;"ALARM";0;0;" STUETZPUNKT IN GEFAHR":N=13:M=110 :.01z# =,M:M:N:8510>! K$(810 )="LAS"R=301,1;7;3;"WARNUNG";0;" zu gefaehrlich ! ":n=13:.1}L,n:n:P=1502:P:3300 ELEMINIERE )K$(15)"ELEMI"44000 K$(12 14)="PAN"R=18" WOMIT ? ";W$:5000:1,1;7;"WAFFE ZU SCHWACH !! ":.1}L,10 :P=1150:P:3000 K$(12 14)="GEH"R=26" WOMIT ? ";W$:5000:1,1;7;"TUERE ABSORBIERT ENERGIE ! ":.1}L,10 :P=1150:P:3000 K$(12 14)="LAS"R=30" WOMIT ? ";W$:5000:1,1;7;"TUERE REFLEKTIERT ENERGIE ! ":.1}L,10 :P=1100d:P:8520H! PK$(12 14)="WAC"R=13 " WOMIT ? ";W$:5000:4350  4360 TW$(13)=G$(1,13)P=1502:P:8530R! bW$(13)=G$(12 ,13)TARN=0P=1502:P:8540\! UW$(13)=G$(11 ,13)P=1502:P:8550f! W$(13)=G$(12 ,13)TARN=11,1;7;"O.K. WACHE AUSGESCHALTET !!! ":WACHE=0:N=16:.01z# =,502:N:P=1502:P:3000 ~K$(12 14)="COM"R=27" WOMIT ? ";W$:5000:H$(N,)=" ":HABEN=HABEN-1:4380  3300 W$(13)="MIK"1,1;7;"O.K. COMPUTER ELEMINIERT ":N=030:.1}L,30-N:N:COM=0:HELL=0:LSP=0 !W$(13)"MIK"1,1;3;7;1;"ALARM";0;0;" COMPUTER IN GEFAHR ! ":N=130:.1}L,1:N:8510>! 0 LIES :(K$(14)"LIES"4500 D5W$(13)=K$(68):5000 NW$(13)=G$(9 ,13)1,1;7;"O.K. TEXT LAUTET WIE FOLGT ":.1}L,10 :N=318:N,0;4;" ":N:5,3;0;4;"TOP SECRET";8,3;"DIE CODENUMMER FUER DIE";9 ,3;"GEHEIMTUER LAUTET ";CODE;11 ,3;"TRANSMITTERCODE LAUTET";13 ,3;"10273 - RAUMHAFEN";14,3;"10331 - SIRIUSCITY":"FERTIG ? ";F$:3000 Xi1,1;"KEIN TEXT AUFGEDRUCKT ! ":.1}L,10 :P=1502:P:3000  BENUTZE +K$(17)"BENUTZE"3300 K$(9@@#<B@<>|>B<.B<5B <BD~|BqBx88x8@h8x@BB@.B888x(F5 DBBBfH@BbqBDD DDxTDD<BB<.BD @0DDJ5B><<.< x88D><5B<BBB~BB<8. 53@:\[2\[y[*Z[:\[2\[y!!:\[2\[y2\[yɋ P[+L! ?$E9|8lME99|8l P !@'?+'?z& g& # <@Rݶ\\\_\_n.X!@P!!W K SR4[/[P * * * * ABENTEUERSPIEL * * * * UNTERNEHMEN SIRIUS * * * * Version I * * * *  by Achim Kern 84 * * * *   0:0: .2~L,10 :0,0;7;"Unternehmen SIRIUS";2,0;7;"Version 1.0";4,0;" by ACHIM KERN" .n=11000:n:.2~L,10 : 23658j\,8 --- SPIELANLEITUNG ---  D1,0;7;"SPIELANLEITUNG";6;" SIRIUS"  7 I4,0;"Sie sind Kommandant des Raum- kreuzer 'GOOD HOPE'." A"Der galaktische Rat ist von den SIRUSIANERN entfuehrt worden." b"Die Staatsmaenner werden auf SIRIUS in einem unterirdischen Stuetzpunkt gefangen gehalten." ,,"Ihre Mission ist nun "  ,,"1. Planet Sirius anfliegen" "2. Landung auf Sirius"  "3. Eindringen in Stuetzpunkt" ""4. Befreiung der Staatsmaenner" "5. Rueckflug zur Erde" -21,10 ;"Druecke Taste";0 =""31 On=213-1:n,0;" ":n !.2~L,10 "4,0;"Die Mission kann nur erfolgreichsein, wenn Sie geschickt und logisch vorgehen. Ueberlegen Sie Ihre Anweisungen an den COMPUTER gut." #,,"Nun die Befehlsliste:" $,,"NIMM,VERLIERE,LIES,OEFFNE" %"BENUTZE,ELEMINIERE,LIST" &,,"Richtungsangaben:" ',,"N = Norden S = SUEDEN" ("W = WESTEN O = OSTEN" )',,,,"TASTE DRUECKEN fuer Spielbeginn" *=""42* -:.2~L,10 2*10 ,5;"MOMENT BITTE . " < 9000(# d--- DATEN EINLESEN --- e n>>> Raeume << s xR$(32 ,16) n=116 R$(n) w"1","2","3","Antigrav-Raum","5","6","7","8","Transmitter-Raum","Ausgangspunkt","11","12","Wachstation","14","15","16"  n *O(32 ):N=132 :O(N):N 912,1012,1112X,1212,911,1011,1111W,1211,910,1010,1110V,1210,909,1009,1109U,1209 1720,1820,1920,2020,1719,1819,1919,2019,1718,1818,1918~,2018,1717,1817,1917},2017 >>> Gegenstaende <<<  G(12 ,32 ) -> R=Raumnummer -> A=Art Gegenstand -> max. 4 Gegenstaende G$(12 ,13 ) n=112 G$(n) "NADELSTRAHLER","STAATSMAENNER","TASCHENLAMPE","TELEKOM","FLUGTORNISTER","TARNSPRAY","CODEKARTE","SCHLUESSEL","GEHEIMPAPIERE","KRYPTON","MIKROBOMBE","DESINTEGRATOR" n N=111 A:R G(A,R)=1 N T5,1,3,6,8,7,7,13 ,12 ,15 i9 ,17,11 ,21,4,22,10 ,28,2,29,6,32 >>> Grundstellung <<<  -> x,y = Position x=0:y=0 -> H$ = Besitz Gegenst. H$(4,18) 1n=14:H$(n,11)=" ":n NA=0 HABEN=0 A$="N-S-O-W" T$="0" PWACHE=1:PZ1=1:PZ2=1:LSP=1:FLY=0:COM=1 !C=0:CODE=(*5000) TARN=0 STA=1 HELL=1 >>> TUEREN <<< T(4,32 ) :M=132 :N=14:Q:T(N,M)=Q:N:M 0,1,0,1,1,1,0,1,1,1,0,0,1,0,0,1,0,0,1,1,0,0,1,1,0,1,0,0,1,0,1,0,0,1,1,0,1,1,1,1,1,1,0,1,1,0,0,1,0,1,0,0,1,0,1,0,0,1,1,0,1,0,1,0 "0,1,0,0,1,1,0,1,1,1,0,0,1,0,0,0,0,0,0,1,0,0,1,1,0,1,0,0,1,0,0,1,0,1,1,0,1,1,1,1,1,0,0,0,0,0,1,1,0,1,0,0,1,1,1,0,1,1,0,0,1,0,1,0 >>> 1.PHASE <<<  Landen auf Planet   0 H1,3;6;"SIRIUS";7;" ADVENTURE by A.Kern" O20,2;4;"GOOD LUCK";20,21;"GOOD LUCK" 01100L:P=1300,:P:1155 LW3,0;:n=112 :5;" ":n ~15,0;5;4;" ":N=13:4;" ":N  ,15,9 ;3;5;"" X1,1;6;1;"PHASE 1";0;7;" - Anflug auf SIRIUS " x=4:y=0 P=1200:P n=xx+10 :n,y;0;5;"":.1}L,502-n:p=110 +n:p:n,y;5;"":y=y+1:n u14,10 ;0;5;"":1,1;6;"PHASE 2";7;" - Landung auf SIRIUS" <n=13:m=110 :.01z# =,n*m:m:n >>> Bewegung SIRIUS <<<  X=0:Y=0 <20,1;7;"Moegliche Richtungen N-S-O-W " 5,4;0;5;"Sie sind nun auf SIRIUS";7,2;"gelandet und haben Ihr Schiff";9 ,11 ;"verlassen";12 ,10 ;"Viel Glueck" y.2~L,0:n=1500:n:n=512 :n,0;5;" ":n .2~L,10 - şX=0Y=0NA=016,20;0;4;"";3;"";17,21;0;"U";4,1;5;G$(1) ƅX0Y0NA=116,20;4;" ";17,21;" ";4,1;5;" "  2200 X=X+(K$="O")-(K$="W") Y=Y+(K$="N")-(K$="S") .2~L,10 ٜK$="NIMM "+G$(1,113 )NA=0HABEN<4NA=1:N$=G$(1,113 ):2500 :HABEN=HABEN+1:1500 ڃK$"N"K$"S"K$"O"K$"W"K$"L"K$"LIST"20,1;7;"BEFEHL IST NICHT MOEGLICH ! ":P=1100d:P - >> LOESCHEN SCREEN << bX0Y014,10 ;5;"";15,9 ;4;5;"" lX=0Y=014,10 ;0;5;"":15,9 ;3;5;"" !X=1Y=11600@  1220 @>>> STUETZPUNKT GEF. < JA$="N-S-O-W" TL1,1;6;"PHASE 3";7;" - Stuetzpunkt " ^13 ,10 ;3;5;" ";7;"";14,9 ;5;" ";7;" " cBN=13:14+N,9 ;1;" ":N hf15,20;7;" ";16,20;" ";7;4;"";17,20;"" mh15,10 ;1;7;" ";16,18;7;"";17,18;"" rv11 ,14;5;0;"<->":12 ,15;5;0;"|";13 ,15;3;"|" s-4,1;0;5;"BUNKER" w$N=1502:.01z# =,N:N xP=1150:P | 2200 ?K$="OEFFNE BUNKER"K$="OEFFNE TUER"K$="ELEMINIERE TUER"" WOMIT ? ";W$:W$="NADELSTRAHLER"NA=120,1;7;"O.K. NADELSTRAHLER OEFFNET ":P=120:.001wn,20:P:16,18;1;5;"";17,18;"":T$="1":P=1200:P:1691 K$="OEFFNE FENSTER"K$="ELEMINIERE FENSTER"20,1;7;"FENSTER sind aus Panzerglas !!":n=300-1:.1}L,n:n K$="ELEMINIERE BUNKER"" WOMIT ? ";W$:W$="NADELSTRAHLER"20,1;7;"NADELSTRAHLER ZU SCHWACH ":P=1200:P:1691 K$"N"K$"S"K$"O"K$"W"K$"L"K$"LIST"20,1;7;"BEFEHL IST NICHT MOEGLICH ! ":P=1100d:P X=1Y=1 @ #88 @P!88q8p8p8p8p8p8p8p8p8p8p8p8D'T'|