PureBoard

Code: Alles auswählen

if playerX=asteroidX1 and playerY= aseroidY1 or  playerX=asteroidX2 and playerY= aseroidY2 ...

Code: Alles auswählen

... 

PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PLAY " O2  T150 L16 dd P16 d c P16 cd P16 d L8 fga L16 dd P16 df P16 cd" 
PRINT 
PRINT 
COLOR 3 
PRINT "                                     *" 
COLOR 1 
PRINT "                                  ******* " 
COLOR 5 
PRINT "                              ***    1    ***" 
COLOR 4 
PRINT "                             *****************" 
COLOR 6 
PRINT "                              *  Der 1.Tag  *" 
COLOR 2 
PRINT "                               *************" 
PRINT 
PRINT "                             " 
PRINT "                            " 
PRINT " " 
COLOR 31 
PRINT "                                  (TASTE) " 
PRINT "                                 " 
SLEEP 
GOTO 168 
168  CLS 
COLOR 7 
PRINT "Schnorch, ratzpüh, grunz..." 
SLEEP 2 
PRINT "'HEY!! RUHE DA UNTEN, ODER WIR HOLEN DIE BULLEN!!'" 
SLEEP 2 
PRINT "'Hä? Wiewaswowann?' Doing, Boff. Du wurdest gerade lautstark von deiner" 
PRINT "Vermieterin aus dem Bett gejagt und hast dir den Kopf an der zu tief" 
PRINT "hängenden Messinglampe gestoßen. Aua. Nunmehr wach gelingt es dir dich" 
PRINT "aus dem Bett zu quälen und ins Bad zu kriechen. Du stellst dich unter" 
PRINT "die Dusche, drehst auf und bist nun endgültig erwacht. Dann putzt du" 
PRINT "dir die Zähne. Du stehst jetzt im Bad, frierst, weil es Winter ist und" 
PRINT "die Heizung kaputt ist und überlegst dir was du machen könntest." 
PRINT 
PRINT "                                Was also?" 
PRINT 
COLOR 4 
PRINT "   (1) Zähne putzen" 
COLOR 1 
PRINT "   (2) Sachen suchen und anziehen" 
COLOR 2 
PRINT "   (3) Durchs Fenster springen und dich im Schnee wälzen" 
COLOR 6 
PRINT "   (4) Schnell ins Bett hüpfen und weiterschlafen" 
PRINT 
COLOR 7 
INPUT " Gib eine der Zahlen ein:", ImBad$ 
IF ImBad$ = "1" THEN 11 
IF ImBad$ = "2" THEN 22 
IF ImBad$ = "3" THEN 33 
IF ImBad$ = "4" THEN 44 
11 CLS 
COLOR 7 
PRINT "         Jo mei! Das hast du doch schon gemacht. Versuchs nochmal!" 
PRINT 
PRINT "                                 (TASTE)" 
SLEEP 
GOTO 168 
33  CLS 
COLOR 7 
PRINT "Du nimmst Anlauf und stürtzt dich mit einem heiseren Jubelschrei" 
PRINT "aus dem Fenster. Du fällst...und fällst und schlägst irgendwann auf" 
PRINT "dem Boden auf. Ein Räumfahrzeug kehrt deine Überreste weg. " 
PRINT "Hatte ich vergessen zu erwähnen dass du im 10. Stock wohnst? Oops..." 
PRINT 
PRINT "                                 (TASTE)" 
SLEEP 
GOTO 99990 
99990 CLS 
PRINT 
PLAY "O1MB T255  L2 dd L4 defa L2 g L4 d P4 L3 d P3 L4eL2 f  L2 d L2d L4ecdP4 L4ddd" 
PRINT 
PRINT 
COLOR 8 
PRINT "                                GAME OVER" 
SLEEP 2 
COLOR 1 
PRINT "                                    ?" 
COLOR 5 
PRINT "                                 ???????   " 
COLOR 4 
PRINT "                            ?????????????????  " 
COLOR 6 
PRINT "                        ???????????????????????????      " 
COLOR 2 
PRINT "                   ?????????????????????????????????????" 
PRINT "                  ?  Willst du immernoch weiterspielen  ?" 
COLOR 3 
PRINT "                   ????????????????????????????????????? " 
PRINT 
PRINT 
COLOR 14 
INPUT "                           Gib ja oder nein ein:", Gover$ 
IF Gover$ = "ja" THEN 10 
IF Gover$ = "nein" THEN 232 
232  CLS 
COLOR 4 
PRINT "                       Wie nochmal? Du willst aufhören?" 
COLOR 27 
PRINT "                               ???????????????????" 
PRINT "                          ????????????????????????????" 
PRINT "                 ?????????????????????????????????????????" 
PRINT "                ????????????                   ???????????" 
PRINT "                 ?????????                     ???????????" 
PRINT "                                             ?????????" 
PRINT "                                        ????????????" 
PRINT "                                 ??????????????" 
PRINT "                             ???????????????" 
PRINT "                         ?????????????" 
PRINT "                     ???????????" 
PRINT "                    ????????????" 
PRINT "                      ??????????????????" 
PRINT "                         ??????????????????????         ????" 
PRINT "                            ???????????????????????????????" 
PRINT "                                   ???????????????????????" 
PRINT "                                         ?????????????" 
PRINT 
PRINT "                                       ??????????" 
PRINT "                                 ??????????????????????" 
PRINT "                                 ??????????????????????" 
PRINT "                                       ??????????" 
INPUT "                                          ", Ggover$ 
IF Ggover$ = "ja" THEN 9990 
IF Ggover$ = "Ja" THEN 9990 
IF Ggover$ = "JA" THEN 9990 
IF Ggover$ = "Nein" THEN 10 
IF Ggover$ = "NEIN" THEN 10 
IF Ggover$ = "nein" THEN 10 
44  CLS 
COLOR 7 
PRINT "Du gehst zitternd vor Kälte in dein schönes, warmes Bett und schläfst" 
PRINT "ein. Nach einer Weile wirst du von einem stechenden Schmerz im linken" 
PRINT "Bein geweckt, der daherrührt, dass die Dogge der Vermieterin selbiges" 
PRINT "gerade abgebissen hat und laut schmatzend vertilgt. Du wünschst dem Tier" 
PRINT "einen gesegneten Appetit und bietest im noch den Arm an, den es aber" 
PRINT "ablehnt. Dann Hüpfst du auf einem Bein auf die Straáe, fällst einen Baum" 
PRINT "und schnitzt dir ein Holzbein. Puh, nochmal Glück gehabt. Dann kommt eine" 
PRINT "Dampfwalze und überrollt dich." 
PRINT 
COLOR 7 
PRINT "                                (TASTE)" 
SLEEP 
GOTO 99990 
22 CLS 
COLOR 5 
PRINT "                                   Super!" 
SLEEP 1 
PRINT 
COLOR 4 
PRINT "                                   Toll!!" 
SLEEP 1 
PRINT 
COLOR 2 
PRINT "                                 Einmalig!!!" 
SLEEP 1 
PRINT 
PRINT 
PRINT 
PRINT 
COLOR 7 
PRINT "Du hast die erste Aufgabe des Spiels bestanden. UNGLAUBLICH!" 
PRINT "Wie gesagt, ziehst du dich jetzt an und freust dich(noch) auf die Arbeit." 
PRINT "'Mannomann, ein richtiger Polizist' denkst du dir und freust dich schon," 
PRINT "die Gangster zu jagen, mit dem Polizeiheli zu fliegen, Strafzettel zu " 
PRINT "verteilen... Nachts 3 Stunden Streife zu fahren.... 10 Seiten Berichte zu" 
PRINT "schreiben.... Hmmm... langsam kommen dir Zweifel.'Ach Quark!' denkst du" 
PRINT "und fährst mit deinem neuerworbenen Fahrrad los. Doch recht beschwerlich," 
PRINT "wenn man bedenkt, dass es ja Winter ist, kommst du nach 15 Minuten in der" 
PRINT "Borzstrasse an." 
PRINT 
PRINT "                                (TASTE)" 
SLEEP 

...