0 PRINT"[153][147]":POKE53280,12:POKE53281,0 1 PRINT"[175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175]" 2 PRINT"[145][159] [208][207][215][197][210] [196][201][211][203] 64 - [208]ROGRAMMENU 2/97 " 3 PRINT"[145][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183]" 5 PRINT"[159]1 = [212][207][208]-[208][210][199]:[198]LYIN' [200]IGH" 6 PRINT"2 = [198]IVE [195]ARD [211]TUD" 7 PRINT"3 = [215]ITZE [201][201] (2) 4 = [195]LASSIC: [199]NURZ" 8 PRINT"5 = [200]AUPTMENU" 9 PRINT"6 = [210][197][211][197][212]" 10 INPUT"[215]ELCHE [206]UMMER";A:PRINT"[145][145][145]" 11 IF A<1 OR A>6 THEN0 12 IF A = 1 THEN GOTO100 13 IF A = 2 THEN GOTO300 14 IF A = 3 THEN GOTO410 15 IF A = 5 THEN GOTO500 16 IF A = 6 THEN GOTO600 17 IF A = 4 THEN GOTO200 100 PRINT"[147] [198]LYIN' [200]IGH " 101 PRINT"1 = [193]NLEITUNG 2 = [211]TART" 102 GETA$:IFA$=""THEN102 103 IFA$="1"THEN700 104 IFA$="2"THEN106 105 GOTO102 106 POKE828,0 107 PRINT CHR$(147) CHR$(17) 108 PRINT "LOAD"CHR$(34);"FLY*";CHR$(34); ",8,1 109 [153] [199](17) [199](17) [199](17) [199](17) "RUN" 110 [151]631,13:[151]632,13:[151]198,2 111 [153] [199](19);:[128] 200 [151]828,0 201 [153] [199](147) [199](17) 202 [153] "LOAD"[199](34);"GNU*";[199](34); ",8 203 PRINT CHR$(17) CHR$(17) CHR$(17) CHR$(17) "RUN" 204 POKE631,13:POKE632,13:POKE198,2 205 PRINT CHR$(19);:END 300 PRINT"[147][195]= UND [211][200][201][198][212] DRUECKEN UM AUF [199]ROSSBUCH- STABEN UMZUSCHALTEN !!!" 301 GETA$:IFA$=""THEN301 305 POKE828,0 306 PRINT CHR$(147) CHR$(17) 307 PRINT "LOAD"CHR$(34);"FIVE*";CHR$(34); ",8 308 [153] [199](17) [199](17) [199](17) [199](17) "RUN" 309 [151]631,13:[151]632,13:[151]198,2 310 [153] [199](19);:[128] 410 [151]828,0 411 [153] [199](147) [199](17) 412 [153] "LOAD"[199](34);"WITZ*";[199](34); ",8 413 PRINT CHR$(17) CHR$(17) CHR$(17) CHR$(17) "RUN" 414 POKE631,13:POKE632,13:POKE198,2 415 PRINT CHR$(19);:END 500 POKE828,0 501 PRINT CHR$(147) CHR$(17) 502 PRINT "LOAD"CHR$(34);"HAUPT*";CHR$(34); ",8 503 [153] [199](17) [199](17) [199](17) [199](17) "RUN" 504 [151]631,13:[151]632,13:[151]198,2 505 [153] [199](19);:[128] 600 [158]64738 700 [153]"LOAD(null)ACH ENDLOSEN WINZIGEN ASCEHLERN DIE MICH WAHNSINNIG VIEL (null)EIT KOSTETEN,IST" 701 [153]"ASC(null)(null)RIGHT$(null)' LEFT$RIGHT$CHR$LEFT$ NUN DOCH NOCH EINIGERMASSEN FERTIG.STR$ER (null)ULTI-(null)LAYER (null)ODUS UND" 702 [153]"DIE (null)EAM-(null)(null) MUSSTEN AUS (null)(null)(null) (null)ASC (null)VAL(null)(null)(null)(null) (null)ROBLEMEN WEGFALLEN.RIGHT$N (null)EILE 10" 703 [153]"KANN MAN MIT DER (null)ERAENDERUNG DER (null)ARI- ABLEN CHR$VAL BESTIMMEN WIEVIELE MID$AHRE" 704 [153]"MAN SPIELT.RIGHT$N DER ASCORTSETZUNG DES CHR$AMES WIRD DAS DANN VOM (null)ROGRAMM AUS ZU" 705 [153]"REGELN SEIN.VALBENFALLS VERSUCHE ICH DANN DEN (null)ULTI-(null)LAYER (null)ODUS UND DIE" 706 [153]"(null)EAM-(null)(null) REINZUBRINGEN.(null)USAETZLICH UEBERLEGE ICH MIR NOCH EIN PAAR" 707 [153]"WEITERE (null)EUHEITEN.MID$ETZT ABER ERST MAL ZUDER JETZIGEN (null)ERSION ..." 708 [153]"(null)AN FAENGT IM ATNLTER VON 20 MID$AHREN ALS (null)KI-(null)PRINGER EINE (null)ARRIERE AN." 709 [153]"STR$URCH (null)RAINING UND ZUSAETZLICHE AEUSSEREVALINFLUESSE KANN MAN SICH SELBST" 710 [153]"VERBESSERN.RIGHT$M (null)(null)ATN(null)RIGHT$(null)(null)RIGHT$(null) (null)ENUPUNKT HAT MAN EINE (null)EBERSICHT UEBER DIE" 711 [161]A$:[139]A$[178]""[167]711 712 [153]"(null)ETTKAEMPFE UND UNTER (null)(null)LENLEFT$VAL(null)(null)ATN(null)(null)(null)CHR$ KANN MAN SICH FUER EBEN DIESE EINTRAGEN. 713 PRINT"[196]AS GILT NICHT FUER DIE [215][205]! [205]ANCHMAL ISTES DURCHAUS BESSER AN EINEM [215]ETT-" 714 PRINT"KAMPFWOCHENENDE ZU TRAINIEREN.[196]IE [206]ERVENSTAERKE DES [211]PRINGERS KANN" 715 PRINT"NAEMLICH NICHT TRAINIERT WERDEN,UND WENNMAN SCHLECHT DRAUF IST UND BEI" 716 PRINT"[215]ETTKAMEPFEN TEILNIMMT,SICH ABER NICHT QUALIFIZIERT,DANN IST DAS SCHLECHT! 717 [153]"ATNLSO SETZT MAN BESSER MAL AUS,BEHAELT DIE (null)ERVENSTAERKE BEI UND TRAINIERT 718 PRINT"ZUSAETZLICH NOCH EIN BISSCHEN.[196]ABEI IST ZU BEMERKEN,DASS VOR ALLEM DER" 719 PRINT"[193]BSPRUNG UND DIE [198]LUGPHASE WICHTIG SIND!" 720 GETA$:IFA$=""THEN720 721 PRINT"[193]CH JA ... DIE [194][201][212][212][197] [215][193][210][212][197][206] [211]EQUENZEN DAUERN RECHT LANG - NICHT WUNDERN" 722 PRINT"ODER EINSCHLAFEN,EINFACH NUR 'NE GUTE [195][196]LAUFEN LASSEN.[201]N EINER WETTKAMPF-" 723 PRINT"FREIEN [215]OCHE MUSS MAN ZWISCHEN [212]AG 6 UND7 NACH DEM [194][201][212][212][197] [215][193][210][212][197][206] [194]ILDSCHIRM" 724 PRINT"(NACHDEM ER HALT WEG IST) [211][208][193][195][197] ODER 'NEANDERE [212]ASTE DRUECKEN.[215]ARUM,WEISS" 725 PRINT"ICH NICHT,JEDENFALLS STEHT IN DIESEM [198]ALLE AUSSER [198][204][217][201][206]' [200][201][199][200] OBEN NIX" 726 PRINT"MEHR AM [194]ILDSCHIRM IN DIESEM [198]ALLE. [193]NSONSTEN STEHT IMMER ETWAS AUF DEM 727 [153]"PEEKILDSCHIRM,WIE Z.PEEK. PEEKRIGHT$(null)(null)VAL (null)ATN(null)(null)VAL(null) ODER AUCH (null)(null)ATN(null)RIGHT$ASCRIGHT$(null)ATN(null)RIGHT$(null)(null) ODER SO ..." 728 [161]A$:[139]A$[178]""[167]728 729 [153]"(null).(null).:ATNUS ZEITLICHEN CHR$RUENDEN HABE ICH DAS STR$ISK-(null)ENU WEGGELASSEN,DAS AM 730 PRINT"[197]NDE DOCH NOCH REIN SPEICHERPLATZMAESSIGREINGEPASST HAETTE.[207]HNE DIE ZEIT-" 731 PRINT"LICHEN [208]ROBLEME MIT DIESEM [199]AME WAERE DIESE [193]USGABE SCHON [197]NDE [193]UGUST" 732 PRINT"RAUSBEKOMMEN.[196]AHER MACHE ICH FUER DIE NAECHSTE [193]USGABE KEIN EIGENES [199]AME! 733 [161]A$:[139]A$[178]""[167]733 734 [137]0