DEMO ZU H.BASIC

00000000: 01 08 21 08 00 00 8B 41  B2 30 A7 41 B2 31 3A 93  |..!....A.0.A.1:.|
00000010: 22 48 45 4C 50 20 42 41  53 49 43 2A 22 2C 38 2C  |"HELP BASIC*",8,|
00000020: 31 00 41 08 01 00 9E 34  39 31 35 32 3A 8B 41 B2  |1.A....49152:.A.|
00000030: 31 A7 41 B2 32 3A 93 22  42 49 4C 44 22 2C 38 2C  |1.A.2:."BILD",8,|
00000040: 31 00 69 08 03 00 5D 43  30 2C 30 2C 31 3A 99 C7  |1.i...]C0,0,1:..|
00000050: 28 31 34 29 AA C7 28 38  29 20 20 20 20 20 20 20  |(14)..(8)       |
00000060: 20 20 20 20 3A 8D 38 30  30 00 B3 08 0A 00 55 24  |    :.800.....U$|
00000070: B2 22 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |."..............|
00000080: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00000090: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 22 3A 42 24 B2 22  |..........":B$."|
000000A0: C2 45 46 45 48 4C 53 55  45 42 45 52 53 49 43 48  |.EFEHLSUEBERSICH|
000000B0: 54 3A 22 00 DB 08 0B 00  48 24 B2 22 93 C8 49 4E  |T:".....H$."..IN|
000000C0: 57 45 49 53 45 20 41 55  46 20 C8 45 4C 50 20 C2  |WEISE AUF .ELP .|
000000D0: 41 53 49 43 20 D6 30 2E  31 11 22 00 F8 08 0C 00  |ASIC .0.1.".....|
000000E0: 99 48 24 3A 99 55 24 3A  5D 40 31 35 2C 31 30 3A  |.H$:.U$:]@15,10:|
000000F0: 99 42 24 3A 8D 39 30 30  00 44 09 0D 00 8D 39 30  |.B$:.900.D....90|
00000100: 31 3A 99 22 9F 5D 4F 05  22 3A 99 55 24 3A 99 22  |1:.".]O.":.U$:."|
00000110: C4 49 45 53 45 52 20 C2  45 46 45 48 4C 20 48 4F  |.IESER .EFEHL HO|
00000120: 4C 54 20 45 49 4E 20 4D  49 54 20 27 CE C5 D7 27  |LT EIN MIT '...'|
00000130: 20 47 45 2D 20 20 20 20  4C 4F 45 53 43 48 54 45  | GE-    LOESCHTE|
00000140: 53 20 22 3B 00 91 09 0E  00 99 22 D0 52 4F 47 52  |S ";......".ROGR|
00000150: 41 4D 4D 20 57 49 45 44  45 52 20 5A 55 52 55 45  |AMM WIEDER ZURUE|
00000160: 43 4B 2C 20 46 41 4C 53  20 56 4F 52 48 45 52 20  |CK, FALS VORHER |
00000170: 4B 45 49 4E 45 20 4E 45  55 45 4E 20 D6 41 52 49  |KEINE NEUEN .ARI|
00000180: 41 42 4C 45 4E 20 46 45  53 54 47 45 4C 45 47 54  |ABLEN FESTGELEGT|
00000190: 22 00 A5 09 0F 00 99 22  57 55 52 44 45 4E 2E 22  |"......"WURDEN."|
000001A0: 3A 8D 39 30 30 00 F1 09  10 00 8D 39 30 31 3A 99  |:.900......901:.|
000001B0: 22 9F 5D 44 05 22 3A 99  55 24 3A 99 22 CD 49 54  |".]D.":.U$:.".IT|
000001C0: 20 44 49 45 53 45 4D 20  C2 45 46 45 48 4C 20 4B  | DIESEM .EFEHL K|
000001D0: 41 4E 4E 20 44 41 53 20  C4 49 52 45 4B 54 4F 52  |ANN DAS .IREKTOR|
000001E0: 59 20 20 20 20 56 4F 4D  20 C6 4C 4F 50 50 59 22  |Y    VOM .LOPPY"|
000001F0: 3B 00 3D 0A 11 00 99 22  20 4D 49 54 54 45 4E 20  |;.=...." MITTEN |
00000200: 49 4D 20 D0 52 4F 47 52  41 4D 4D 20 44 55 52 43  |IM .ROGRAMM DURC|
00000210: 48 47 45 2D 20 20 53 45  48 45 4E 20 57 45 52 44  |HGE-  SEHEN WERD|
00000220: 45 4E 2C 20 4F 48 4E 45  20 44 41 53 53 20 44 41  |EN, OHNE DASS DA|
00000230: 42 45 49 20 44 41 53 20  D0 52 4F 2D 22 00 66 0A  |BEI DAS .RO-".f.|
00000240: 12 00 99 22 47 52 41 4D  4D 4D 20 53 45 4C 42 53  |..."GRAMMM SELBS|
00000250: 54 20 56 45 52 4C 4F 52  45 4E 20 47 45 48 54 2E  |T VERLOREN GEHT.|
00000260: 22 3A 8D 39 30 30 00 A9  0A 13 00 8D 39 30 31 3A  |":.900......901:|
00000270: 99 22 9F 5D 40 30 2D 33  39 2C 30 2D 32 33 05 22  |.".]@0-39,0-23."|
00000280: 3A 99 55 24 3A 99 22 C4  49 45 53 45 52 20 C2 45  |:.U$:.".IESER .E|
00000290: 46 45 48 4C 20 42 45 44  45 55 54 45 54 20 27 D0  |FEHL BEDEUTET '.|
000002A0: D2 C9 CE D4 C1 D4 27 2E  22 00 F2 0A 14 00 99 22  |......'."......"|
000002B0: C4 41 4D 49 54 20 4B 41  4E 4E 20 4D 41 4E 20 44  |.AMIT KANN MAN D|
000002C0: 45 4E 20 D4 45 58 54 20  41 55 46 20 45 49 4E 45  |EN .EXT AUF EINE|
000002D0: 52 20 42 45 2D 20 20 20  53 54 49 4D 4D 54 45 4E  |R BE-   STIMMTEN|
000002E0: 20 D0 4F 53 49 54 49 4F  4E 20 4C 45 4E 4B 45 4E  | .OSITION LENKEN|
000002F0: 2E 22 00 3D 0B 15 00 99  22 C4 49 45 20 45 52 53  |.".=....".IE ERS|
00000300: 54 45 20 DA 41 48 4C 20  53 54 45 48 54 20 46 55  |TE .AHL STEHT FU|
00000310: 45 52 20 44 49 45 20 D3  50 41 4C 54 45 20 55 4E  |ER DIE .PALTE UN|
00000320: 44 44 49 45 20 DA 57 45  49 54 45 20 46 55 45 52  |DDIE .WEITE FUER|
00000330: 20 DA 45 49 4C 45 2E 22  3A 8D 39 30 30 00 81 0B  | .EILE.":.900...|
00000340: 16 00 8D 39 30 31 3A 99  22 9F 5D 4C 20 30 2D 32  |...901:.".]L 0-2|
00000350: 33 05 22 3A 99 55 24 3A  99 22 C8 49 45 52 4D 49  |3.":.U$:.".IERMI|
00000360: 54 20 4B 41 4E 4E 20 4D  41 4E 20 44 49 45 20 41  |T KANN MAN DIE A|
00000370: 4E 47 45 47 45 42 45 4E  45 20 DA 45 49 4C 45 22  |NGEGEBENE .EILE"|
00000380: 3B 00 C3 0B 17 00 99 22  20 20 20 56 4F 4D 20 C2  |;......"   VOM .|
00000390: 49 4C 44 53 43 48 49 52  4D 20 4C 4F 45 53 43 48  |ILDSCHIRM LOESCH|
000003A0: 45 4E 2E 11 22 3A 99 22  C7 55 54 20 47 45 45 49  |EN..":.".UT GEEI|
000003B0: 47 4E 45 54 20 46 55 45  52 20 27 C9 CE D0 D5 D4  |GNET FUER '.....|
000003C0: 27 3A 22 00 07 0C 18 00  99 22 11 9F 31 30 20 C9  |':"......"..10 .|
000003D0: CE D0 D5 D4 22 AA C7 28  33 34 29 AA 22 DA 49 46  |...."..(34).".IF|
000003E0: 46 45 52 20 20 28 31 2D  39 29 22 AA C7 28 33 34  |FER  (1-9)"..(34|
000003F0: 29 AA 22 3B 5A 22 3A 99  22 31 31 20 49 46 5A 3C  |).";Z":."11 IFZ<|
00000400: 31 4F 52 5A 3E 22 3B 00  4C 0C 19 00 99 22 39 54  |1ORZ>";.L...."9T|
00000410: 48 45 4E 5A 45 49 4C 45  3D 50 45 45 4B 28 32 31  |HENZEILE=PEEK(21|
00000420: 34 29 2D 31 3A 20 20 20  20 20 20 20 20 5D 4C 5A  |4)-1:        ]LZ|
00000430: 45 49 4C 45 3A 5D 40 30  2C 5A 45 49 4C 45 3A 47  |EILE:]@0,ZEILE:G|
00000440: 4F 54 4F 31 30 05 22 3A  8D 39 30 30 00 8A 0C 1A  |OTO10.":.900....|
00000450: 00 8D 39 30 31 3A 99 22  9F 5D 43 4C 4F 53 45 05  |..901:.".]CLOSE.|
00000460: 22 3A 99 55 24 3A 99 22  D3 43 48 4C 49 45 53 53  |":.U$:.".CHLIESS|
00000470: 54 20 41 4C 4C 45 20 5A  55 56 4F 52 20 47 45 4F  |T ALLE ZUVOR GEO|
00000480: 46 46 4E 45 54 45 4E 20  22 3B 00 9D 0C 1B 00 99  |FFNETEN ";......|
00000490: 22 C6 49 4C 45 53 2E 22  3A 8D 39 30 30 00 DF 0C  |".ILES.":.900...|
000004A0: 1C 00 8D 39 30 31 3A 99  22 9F 5D 50 52 49 4E 54  |...901:.".]PRINT|
000004B0: 23 05 22 3A 99 55 24 3A  99 22 C4 52 55 43 4B 54  |#.":.U$:.".RUCKT|
000004C0: 20 44 45 4E 20 C9 4E 48  41 4C 54 20 44 45 53 20  | DEN .NHALT DES |
000004D0: C2 49 4C 44 53 43 48 49  52 4D 53 20 41 55 46 00  |.ILDSCHIRMS AUF.|
000004E0: 12 0D 1D 00 99 22 45 49  4E 45 4E 20 41 4E 47 45  |....."EINEN ANGE|
000004F0: 53 43 48 4C 4F 53 53 45  4E 45 4E 20 C4 52 55 43  |SCHLOSSENEN .RUC|
00000500: 4B 45 52 20 41 55 46 20  C6 49 4C 45 34 20 41 55  |KER AUF .ILE4 AU|
00000510: 53 2E 00 4B 0D 1E 00 99  22 C4 41 53 20 C6 49 4C  |S..K....".AS .IL|
00000520: 45 20 4D 55 53 53 20 4A  45 44 4F 43 48 20 56 4F  |E MUSS JEDOCH VO|
00000530: 52 48 45 52 20 47 45 4F  45 46 46 4E 45 54 20 20  |RHER GEOEFFNET  |
00000540: 20 57 45 52 44 45 4E 3A  11 9F 22 00 72 0D 1F 00  | WERDEN:..".r...|
00000550: 99 22 31 30 20 4F 50 45  4E 31 2C 34 3A 5D 50 52  |."10 OPEN1,4:]PR|
00000560: 49 4E 54 23 3A 5D 43 4C  4F 53 45 05 22 3A 8D 39  |INT#:]CLOSE.":.9|
00000570: 30 30 00 B6 0D 20 00 8D  39 30 31 3A 99 22 9F 5D  |00... ..901:.".]|
00000580: 53 41 56 45 20 05 C1 4E  46 2E 41 44 52 2E 9F 2C  |SAVE ..NF.ADR..,|
00000590: 05 C5 4E 44 41 44 52 2E  9F 2B 31 22 AA C7 28 33  |..NDADR..+1"..(3|
000005A0: 34 29 AA 22 CE 41 4D 45  22 AA C7 28 33 34 29 AA  |4).".AME"..(34).|
000005B0: 22 2C 38 2C 31 22 00 04  0E 21 00 99 22 05 22 55  |",8,1"...!.."."U|
000005C0: 24 3A 99 22 D5 4D 20 47  41 4E 5A 20 42 45 53 54  |$:.".M GANZ BEST|
000005D0: 49 4D 4D 54 45 20 C2 45  52 45 49 43 48 45 20 5A  |IMMTE .EREICHE Z|
000005E0: 55 20 53 50 45 49 43 48  45 52 4E 20 49 53 54 20  |U SPEICHERN IST |
000005F0: 44 49 45 53 45 52 20 C2  45 46 45 48 4C 20 53 45  |DIESER .EFEHL SE|
00000600: 48 52 22 3B 00 49 0E 22  00 99 22 20 48 49 4C 46  |HR";.I.".." HILF|
00000610: 53 42 45 52 45 49 54 2E  22 3A 99 22 D3 4F 4D 49  |SBEREIT.":.".OMI|
00000620: 54 20 4B 4F 45 4E 4E 45  4E 20 C7 52 41 46 49 4B  |T KOENNEN .RAFIK|
00000630: 20 4F 44 45 52 20 D3 50  52 49 54 45 53 20 56 4F  | ODER .PRITES VO|
00000640: 4D 20 20 20 D0 52 4F 22  3B 00 8E 0E 23 00 99 22  |M   .RO";...#.."|
00000650: 47 52 41 4D 4D 20 41 55  53 2C 20 4F 48 4E 45 20  |GRAMM AUS, OHNE |
00000660: 56 49 45 4C 20 C1 55 46  57 41 4E 44 20 20 20 20  |VIEL .UFWAND    |
00000670: 20 20 20 20 20 47 45 53  50 45 49 43 48 45 52 54  |     GESPEICHERT|
00000680: 20 57 45 52 44 45 4E 2E  22 3A 8D 39 30 30 00 CA  | WERDEN.":.900..|
00000690: 0E 24 00 8D 39 30 31 3A  99 22 9F 5D 43 30 2D 32  |.$..901:.".]C0-2|
000006A0: 35 35 2C 30 2D 32 35 35  2C 30 2D 36 39 05 22 3A  |55,0-255,0-69.":|
000006B0: 99 55 24 3A 99 22 CD 49  54 20 44 49 45 53 45 4D  |.U$:.".IT DIESEM|
000006C0: 20 C2 45 46 45 48 4C 20  22 3B 00 12 0F 25 00 99  | .EFEHL ";...%..|
000006D0: 22 57 45 52 44 45 4E 20  44 49 45 20 45 49 4E 5A  |"WERDEN DIE EINZ|
000006E0: 45 4C 4E 45 4E 20 20 C6  41 52 42 45 4E 20 47 45  |ELNEN  .ARBEN GE|
000006F0: 53 45 54 5A 54 2E 11 22  3A 99 22 C4 49 45 20 45  |SETZT..":.".IE E|
00000700: 52 53 54 45 20 DA 41 48  4C 20 53 54 45 48 54 20  |RSTE .AHL STEHT |
00000710: 22 3B 00 57 0F 26 00 99  22 46 55 45 52 20 44 45  |";.W.&.."FUER DE|
00000720: 4E 20 D2 41 48 4D 45 4E  2C 22 3A 99 22 44 49 45  |N .AHMEN,":."DIE|
00000730: 20 DA 57 45 49 54 45 20  46 55 45 52 20 44 45 4E  | .WEITE FUER DEN|
00000740: 20 C2 49 4C 44 53 43 48  49 52 4D 2C 20 55 4E 44  | .ILDSCHIRM, UND|
00000750: 20 44 49 45 20 22 3B 00  86 0F 27 00 99 22 44 52  | DIE ";...'.."DR|
00000760: 49 54 54 45 20 DA 41 48  4C 20 46 55 45 52 20 44  |ITTE .AHL FUER D|
00000770: 49 45 20 DA 45 49 43 48  45 4E 46 41 52 42 45 2E  |IE .EICHENFARBE.|
00000780: 22 3A 8D 39 30 30 00 B8  0F 28 00 8D 39 30 31 3A  |":.900...(..901:|
00000790: 99 22 9F 5D 52 20 20 20  05 4F 44 45 52 9F 20 20  |.".]R   .ODER.  |
000007A0: 20 5D 42 20 20 20 05 4F  44 45 52 20 20 20 9F 5D  | ]B   .ODER   .]|
000007B0: 52 42 05 22 3A 99 55 24  00 EF 0F 29 00 99 22 C4  |RB.":.U$...)..".|
000007C0: 41 4D 49 54 20 4C 41 53  53 45 4E 20 53 49 43 48  |AMIT LASSEN SICH|
000007D0: 20 45 46 46 45 4B 54 56  4F 4C 4C 45 20 C4 45 4D  | EFFEKTVOLLE .EM|
000007E0: 4F 53 20 41 55 46 2D 42  41 55 45 4E 3A 11 22 00  |OS AUF-BAUEN:.".|
000007F0: 2B 10 2A 00 99 22 9F 52  20 05 53 54 45 48 54 20  |+.*..".R .STEHT |
00000800: 46 55 45 52 20 D2 41 48  4D 45 4E 22 3A 99 22 9F  |FUER .AHMEN":.".|
00000810: 42 20 05 53 54 45 48 54  20 46 55 45 52 20 C2 49  |B .STEHT FUER .I|
00000820: 4C 44 53 43 48 49 52 4D  11 11 22 00 70 10 2B 00  |LDSCHIRM..".p.+.|
00000830: 99 22 31 30 20 46 4F 52  54 3D 31 54 4F 35 30 30  |."10 FORT=1TO500|
00000840: 3A 5D 52 42 3A 4E 45 58  54 54 3A 5D 43 30 2C 30  |:]RB:NEXTT:]C0,0|
00000850: 2C 31 22 3A 99 22 11 11  C4 45 4D 4F 4E 53 54 52  |,1":."...EMONSTR|
00000860: 41 54 49 4F 4E 20 27 44  27 22 3A 5D 92 22 44 22  |ATION 'D'":]."D"|
00000870: 00 91 10 2C 00 81 46 B2  31 A4 35 30 30 3A 5D 52  |...,..F.1.500:]R|
00000880: 42 3A 82 46 3A 5D 43 30  2C 30 2C 31 3A 8D 39 30  |B:.F:]C0,0,1:.90|
00000890: 30 00 C1 10 2D 00 8D 39  30 31 3A 99 22 9F 5D 57  |0...-..901:.".]W|
000008A0: 41 49 54 22 AA C7 28 33  34 29 AA 22 5A 45 49 43  |AIT"..(34)."ZEIC|
000008B0: 48 45 4E 22 3B C7 28 33  34 29 3A 99 22 05 22 55  |HEN";.(34):."."U|
000008C0: 24 00 0C 11 2E 00 99 22  D7 41 52 54 45 54 20 41  |$......".ARTET A|
000008D0: 55 46 20 C4 52 55 43 4B  20 45 49 4E 45 52 20 42  |UF .RUCK EINER B|
000008E0: 45 53 54 49 4D 4D 54 45  4E 20 D4 41 53 54 45 2E  |ESTIMMTEN .ASTE.|
000008F0: C4 41 42 45 49 20 4B 4F  45 4E 4E 45 4E 20 41 4C  |.ABEI KOENNEN AL|
00000900: 4C 45 20 DA 45 49 43 48  45 4E 22 3B 00 44 11 2F  |LE .EICHEN";.D./|
00000910: 00 99 22 20 4D 49 54 20  C1 55 53 4E 41 48 4D 45  |.." MIT .USNAHME|
00000920: 20 56 4F 4E 20 27 D3 D0  C1 C3 C5 27 20 56 45 52  | VON '.....' VER|
00000930: 57 45 4E 44 45 54 20 57  45 52 44 45 4E 2E 22 3A  |WENDET WERDEN.":|
00000940: 8D 39 30 30 00 89 11 30  00 8D 39 30 31 3A 99 22  |.900...0..901:."|
00000950: 9F 5D 47 4F 54 4F 20 05  D6 41 52 49 41 42 4C 45  |.]GOTO ..ARIABLE|
00000960: 22 3A 99 55 24 3A 99 22  C4 49 45 53 20 49 53 54  |":.U$:.".IES IST|
00000970: 20 45 49 4E 45 20 C7 4F  54 4F 2D C1 4E 57 45 49  | EINE .OTO-.NWEI|
00000980: 53 55 4E 47 20 49 4E 22  3B 00 BC 11 31 00 99 22  |SUNG IN";...1.."|
00000990: 20 44 45 52 20 44 49 45  20 C1 4E 47 41 42 45 20  | DER DIE .NGABE |
000009A0: 56 4F 4E 20 D6 41 52 49  41 42 4C 45 4E 20 45 52  |VON .ARIABLEN ER|
000009B0: 4C 41 55 42 54 20 49 53  54 3A 11 22 00 00 12 32  |LAUBT IST:."...2|
000009C0: 00 99 22 31 30 20 47 45  54 48 24 3A 49 46 56 41  |.."10 GETH$:IFVA|
000009D0: 4C 28 48 24 29 3C 31 4F  52 56 41 4C 48 24 3E 39  |L(H$)<1ORVALH$>9|
000009E0: 54 48 45 4E 31 30 22 3A  99 22 31 31 20 5D 47 4F  |THEN10":."11 ]GO|
000009F0: 54 4F 20 56 41 4C 28 48  24 29 22 3A 8D 39 30 30  |TO VAL(H$)":.900|
00000A00: 00 39 12 33 00 8D 39 30  31 3A 99 22 9F 5D 4D 50  |.9.3..901:.".]MP|
00000A10: 2C 05 D3 50 52 49 54 45  42 4C 4F 43 4B 22 3A 99  |,..PRITEBLOCK":.|
00000A20: 55 24 3A 99 22 C4 52 55  43 4B 54 20 44 41 53 20  |U$:.".RUCKT DAS |
00000A30: CD 55 53 54 45 52 20 22  3B 00 7F 12 34 00 99 22  |.USTER ";...4.."|
00000A40: 45 49 4E 45 53 20 D3 50  52 49 54 45 53 20 41 55  |EINES .PRITES AU|
00000A50: 46 20 44 45 4D 20 C2 49  4C 44 53 43 48 49 52 4D  |F DEM .ILDSCHIRM|
00000A60: 2E 11 22 3A 99 22 C4 41  53 20 49 53 54 20 45 49  |..":.".AS IST EI|
00000A70: 4E 20 53 45 48 52 20 42  52 41 55 43 48 22 3B 00  |N SEHR BRAUCH";.|
00000A80: C9 12 35 00 99 22 42 41  52 45 52 20 C2 45 46 45  |..5.."BARER .EFE|
00000A90: 48 4C 20 55 4D 20 20 D3  50 49 45 4C 45 20 5A 55  |HL UM  .PIELE ZU|
00000AA0: 20 44 55 52 43 48 4C 45  55 43 48 54 45 4E 2C 20  | DURCHLEUCHTEN, |
00000AB0: 4F 44 45 52 20 55 45 42  45 52 48 41 55 50 54 D3  |ODER UEBERHAUPT.|
00000AC0: 50 52 49 54 45 53 20 22  3B 00 FE 12 36 00 99 22  |PRITES ";...6.."|
00000AD0: 41 55 46 20 45 49 4E 45  4D 20 C4 52 55 43 4B 45  |AUF EINEM .RUCKE|
00000AE0: 52 20 41 55 53 5A 55 47  45 42 45 4E 3A 11 22 3A  |R AUSZUGEBEN:.":|
00000AF0: 8D 39 30 32 3A 8D 39 30  30 3A 8D 39 30 31 00 4E  |.902:.900:.901.N|
00000B00: 13 37 00 99 22 9F 5D 46  20 05 C1 44 52 2E 9F 2C  |.7..".]F ..DR..,|
00000B10: 05 30 2D 31 34 37 20 55  4E 44 20 31 37 38 2D 32  |.0-147 UND 178-2|
00000B20: 35 35 22 3A 99 55 24 3A  99 22 D7 45 52 20 45 49  |55":.U$:.".ER EI|
00000B30: 4E 20 D3 50 49 45 4C 20  48 41 54 2C 20 49 4E 20  |N .PIEL HAT, IN |
00000B40: 44 45 4D 20 45 53 20 56  49 45 4C 20 5A 55 00 97  |DEM ES VIEL ZU..|
00000B50: 13 38 00 99 22 53 43 48  57 49 45 52 49 47 20 49  |.8.."SCHWIERIG I|
00000B60: 53 54 2C 20 45 49 4E 45  20 D3 50 49 45 4C 53 54  |ST, EINE .PIELST|
00000B70: 55 46 45 20 57 45 49 54  45 52 20 5A 55 4B 4F 4D  |UFE WEITER ZUKOM|
00000B80: 4D 45 4E 2C 20 44 45 52  20 4B 41 4E 4E 20 53 45  |MEN, DER KANN SE|
00000B90: 49 4E 45 4E 20 22 3B 00  DD 13 39 00 99 22 C7 45  |INEN ";...9..".E|
00000BA0: 47 4E 45 52 20 45 49 4E  46 41 43 48 20 20 41 55  |GNER EINFACH  AU|
00000BB0: 53 4C 4F 45 53 43 48 45  4E 3A 11 22 3A 99 22 DA  |SLOESCHEN:.":.".|
00000BC0: 55 45 52 53 54 20 53 54  41 52 54 45 54 20 4D 41  |UERST STARTET MA|
00000BD0: 4E 20 C8 45 4C 50 20 C2  41 53 49 43 2C 00 1C 14  |N .ELP .ASIC,...|
00000BE0: 3A 00 99 22 44 41 4E 41  43 48 20 4C 41 45 44 54  |:.."DANACH LAEDT|
00000BF0: 20 4D 41 4E 20 45 49 4E  20 D3 50 49 45 4C 2C 20  | MAN EIN .PIEL, |
00000C00: 55 4E 44 20 44 55 52 43  48 2D 20 20 53 55 43 48  |UND DURCH-  SUCH|
00000C10: 54 20 45 53 20 4D 49 54  9F 20 22 3B 00 63 14 3B  |T ES MIT. ";.c.;|
00000C20: 00 99 22 5D 4D 50 2C C1  44 52 45 53 53 45 05 20  |.."]MP,.DRESSE. |
00000C30: 4E 41 43 48 20 47 45 47  2D 20 20 20 20 20 20 4E  |NACH GEG-      N|
00000C40: 45 52 49 53 43 48 45 4E  20 D3 50 49 45 4C 46 49  |ERISCHEN .PIELFI|
00000C50: 47 55 52 45 4E 2E 20 22  3B 3A 8D 39 30 30 3A 8D  |GUREN. ";:.900:.|
00000C60: 39 34 33 00 A6 14 3C 00  99 22 93 5D 4D 50 2C 38  |943...<..".]MP,8|
00000C70: 33 32 22 3A 5D 4D 50 2C  38 33 32 3A 5D 40 32 35  |32":]MP,832:]@25|
00000C80: 2C 32 3A 99 22 D7 45 4E  4E 20 4D 41 4E 20 57 49  |,2:.".ENN MAN WI|
00000C90: 45 22 3A 5D 40 32 35 2C  33 3A 99 22 48 49 45 52  |E":]@25,3:."HIER|
00000CA0: 20 45 49 4E 45 4E 00 EB  14 3D 00 5D 40 32 35 2C  | EINEN...=.]@25,|
00000CB0: 34 3A 99 22 C7 45 47 4E  45 52 20 47 45 2D 22 3A  |4:.".EGNER GE-":|
00000CC0: 5D 40 32 35 2C 35 3A 99  22 46 55 4E 44 45 4E 20  |]@25,5:."FUNDEN |
00000CD0: 48 41 54 2C 22 3A 5D 40  32 35 2C 36 3A 99 22 53  |HAT,":]@25,6:."S|
00000CE0: 4F 20 4B 41 4E 4E 20 4D  41 4E 22 00 29 15 3E 00  |O KANN MAN".).>.|
00000CF0: 5D 40 32 35 2C 37 3A 99  22 49 48 4E 20 4D 49 54  |]@25,7:."IHN MIT|
00000D00: 22 3A 5D 40 32 35 2C 38  3A 99 22 27 5D 46 38 33  |":]@25,8:."']F83|
00000D10: 32 2C 30 27 22 3A 5D 40  32 35 2C 39 3A 99 22 4C  |2,0'":]@25,9:."L|
00000D20: 4F 45 53 43 48 45 4E 2E  22 00 5C 15 3F 00 8D 39  |OESCHEN.".\.?..9|
00000D30: 30 30 3A 5D 4C 30 3A 99  22 13 5D 46 38 33 32 2C  |00:]L0:.".]F832,|
00000D40: 30 22 3A 8D 39 30 30 3A  5D 4C 30 3A 5D 40 30 2C  |0":.900:]L0:]@0,|
00000D50: 30 3A 99 22 5D 4D 50 2C  38 33 32 22 00 79 15 40  |0:."]MP,832".y.@|
00000D60: 00 5D 46 38 33 32 2C 30  3A 5D 4D 50 2C 38 33 32  |.]F832,0:]MP,832|
00000D70: 3A 8D 39 30 30 3A 8D 38  30 00 8A 15 46 00 8F 20  |:.900:.80...F.. |
00000D80: 20 20 47 4F 53 55 42 39  30 30 00 D1 15 47 00 8D  |  GOSUB900...G..|
00000D90: 39 30 31 3A 99 22 9F 5D  50 4F 4B 45 2C 31 30 32  |901:.".]POKE,102|
00000DA0: 34 2C 32 2C 2C 2C 05 22  3A 99 55 24 3A 99 22 C4  |4,2,,,.":.U$:.".|
00000DB0: 49 45 53 20 49 53 54 20  45 49 4E 20 45 4E 44 4C  |IES IST EIN ENDL|
00000DC0: 4F 53 45 52 20 D0 4F 4B  45 2D C2 45 46 45 48 4C  |OSER .OKE-.EFEHL|
00000DD0: 2E 00 14 16 48 00 8D 39  30 30 3A 8D 39 30 31 3A  |....H..900:.901:|
00000DE0: 99 22 9F 5D 4F 52 4E 4F  54 2C 2C 2C 05 22 3A 99  |.".]ORNOT,,,.":.|
00000DF0: 55 24 3A 99 22 C4 49 45  53 20 49 53 54 20 45 49  |U$:.".IES IST EI|
00000E00: 4E 20 45 4E 44 4C 4F 53  45 52 20 C2 45 46 45 48  |N ENDLOSER .EFEH|
00000E10: 4C 20 55 4D 00 4E 16 49  00 99 22 45 49 4E 20 42  |L UM.N.I.."EIN B|
00000E20: 45 53 54 49 4D 4D 54 45  53 20 C2 49 54 20 45 49  |ESTIMMTES .IT EI|
00000E30: 4E 20 4F 44 45 52 20 41  55 53 5A 55 2D 20 20 20  |N ODER AUSZU-   |
00000E40: 20 20 20 53 43 48 41 4C  54 45 4E 2E 11 22 00 68  |   SCHALTEN..".h|
00000E50: 16 4A 00 99 22 C7 55 54  20 46 55 45 52 20 C7 52  |.J..".UT FUER .R|
00000E60: 41 46 49 4B 3A 11 11 22  00 7B 16 4B 00 99 22 31  |AFIK:..".{.K.."1|
00000E70: 31 20 46 4F 52 49 3D 31  54 4F 32 00 BA 16 4C 00  |1 FORI=1TO2...L.|
00000E80: 99 22 31 30 20 5D 4F 52  4E 4F 54 2C 35 33 32 36  |."10 ]ORNOT,5326|
00000E90: 35 2C 33 32 2C 35 33 32  37 32 2C 37 3A 57 41 49  |5,32,53272,7:WAI|
00000EA0: 54 22 AA C7 28 33 34 29  AA 22 57 22 AA C7 28 33  |T"..(34)."W"..(3|
00000EB0: 34 29 AA 22 3A 4E 45 58  54 49 00 F2 16 4D 00 8D  |4).":NEXTI...M..|
00000EC0: 39 30 30 3A 5D B0 A8 2C  35 33 32 36 35 2C 33 32  |900:]..,53265,32|
00000ED0: 2C 35 33 32 37 32 2C 37  3A 8D 39 30 30 3A 5D B0  |,53272,7:.900:].|
00000EE0: A8 2C 35 33 32 36 35 2C  33 32 2C 35 33 32 37 32  |.,53265,32,53272|
00000EF0: 2C 37 00 32 17 4E 00 8D  39 30 31 3A 99 22 9F 5D  |,7.2.N..901:.".]|
00000F00: 50 20 30 2D 36 35 35 33  36 05 22 3A 99 55 24 3A  |P 0-65536.":.U$:|
00000F10: 99 22 C4 49 45 53 45 52  20 C2 45 46 45 48 4C 20  |.".IESER .EFEHL |
00000F20: 44 49 45 4E 54 20 5A 55  52 20 D0 41 55 53 45 2E  |DIENT ZUR .AUSE.|
00000F30: 11 22 00 4D 17 4F 00 99  22 11 31 20 3D 20 31 34  |.".M.O..".1 = 14|
00000F40: 20 54 49 22 3A 8D 39 30  30 3A 89 39 30 00 97 17  | TI":.900:.90...|
00000F50: 50 00 8D 39 30 31 3A 99  22 9F 5D 53 50 43 28 05  |P..901:.".]SPC(.|
00000F60: D3 50 52 49 54 45 42 4C  4F 43 4B 41 44 52 45 53  |.PRITEBLOCKADRES|
00000F70: 53 45 9F 29 05 22 3A 99  55 24 3A 99 22 D7 45 4E  |SE.).":.U$:.".EN|
00000F80: 4E 20 D3 49 45 20 D3 50  49 45 4C 45 20 53 43 48  |N .IE .PIELE SCH|
00000F90: 52 45 49 42 45 4E 2C 00  E8 17 51 00 99 22 D3 50  |REIBEN,...Q..".P|
00000FA0: 49 45 4C 45 20 56 45 52  41 45 4E 44 45 52 4E 2C  |IELE VERAENDERN,|
00000FB0: 20 4F 44 45 52 20 47 41  4E 5A 20 53 43 48 4E 45  | ODER GANZ SCHNE|
00000FC0: 4C 4C 20 20 20 20 55 4E  44 20 4F 48 4E 45 20 56  |LL    UND OHNE V|
00000FD0: 49 45 4C 20 C1 55 46 57  41 4E 44 20 45 49 4E 45  |IEL .UFWAND EINE|
00000FE0: 4E 20 D3 50 52 49 54 45  00 36 18 52 00 99 22 5A  |N .PRITE.6.R.."Z|
00000FF0: 41 55 42 45 52 4E 20 57  4F 4C 4C 45 4E 2C 20 44  |AUBERN WOLLEN, D|
00001000: 41 4E 4E 20 47 45 48 54  20 44 41 53 20 4D 49 54  |ANN GEHT DAS MIT|
00001010: 20 C8 45 4C 50 20 20 C2  41 53 49 43 20 47 41 4E  | .ELP  .ASIC GAN|
00001020: 5A 20 53 43 48 4E 45 4C  4C 20 55 4E 44 20 45 49  |Z SCHNELL UND EI|
00001030: 4E 46 41 43 48 2E 00 85  18 53 00 99 22 D3 49 45  |NFACH....S..".IE|
00001040: 20 42 45 4E 4F 45 54 49  47 45 4E 20 4E 55 52 20  | BENOETIGEN NUR |
00001050: 44 49 45 20 C1 44 52 45  53 53 45 20 49 4E 20 44  |DIE .DRESSE IN D|
00001060: 45 52 20 20 20 D3 49 45  20 44 41 53 20 CD 55 53  |ER   .IE DAS .US|
00001070: 54 45 52 20 41 42 4C 45  47 45 4E 20 55 4E 44 20  |TER ABLEGEN UND |
00001080: 45 49 4E 22 3B 00 CE 18  54 00 99 22 20 42 49 53  |EIN";...T.." BIS|
00001090: 43 48 45 4E 20 20 C6 49  4E 47 45 52 53 50 49 54  |CHEN  .INGERSPIT|
000010A0: 5A 45 4E 47 45 46 55 45  48 4C 2E 22 3A 99 22 CD  |ZENGEFUEHL.":.".|
000010B0: 49 54 20 44 49 45 53 45  4D 20 C2 45 46 45 48 4C  |IT DIESEM .EFEHL|
000010C0: 2C 20 44 4F 52 54 20 4F  42 45 4E 20 22 3B 00 1C  |, DORT OBEN ";..|
000010D0: 19 55 00 99 22 4B 4F 45  4E 4E 45 4E 20 D3 49 45  |.U.."KOENNEN .IE|
000010E0: 42 4C 49 54 5A 53 43 48  4E 45 4C 4C 20 45 49 4E  |BLITZSCHNELL EIN|
000010F0: 20 CD 55 53 54 45 52 20  56 4F 4D 20 20 C2 49 4C  | .USTER VOM  .IL|
00001100: 44 53 43 48 49 52 4D 20  5A 55 4D 20 D3 50 52 49  |DSCHIRM ZUM .PRI|
00001110: 54 45 20 53 43 48 49 43  4B 45 4E 2E 00 5D 19 56  |TE SCHICKEN..].V|
00001120: 00 99 22 C1 55 46 20 44  45 52 20 46 4F 4C 47 45  |..".UF DER FOLGE|
00001130: 4E 44 45 4E 20 D3 45 49  54 45 20 4B 4F 45 4E 4E  |NDEN .EITE KOENN|
00001140: 45 4E 20 D3 49 45 20 45  53 20 20 4E 55 4E 20 41  |EN .IE ES  NUN A|
00001150: 55 53 50 52 4F 42 49 45  52 45 4E 2E 22 00 6B 19  |USPROBIEREN.".k.|
00001160: 59 00 8D 39 30 30 3A 89  39 31 31 00 AB 19 5A 00  |Y..900:.911...Z.|
00001170: 8D 39 30 31 3A 99 22 9F  5D 45 4E 44 05 22 3A 99  |.901:.".]END.":.|
00001180: 55 24 3A 99 22 CD 49 54  20 44 49 45 53 45 4D 20  |U$:.".IT DIESEM |
00001190: C2 45 46 45 48 4C 20 57  49 52 44 20 44 49 45 20  |.EFEHL WIRD DIE |
000011A0: C5 52 57 45 49 54 45 52  55 4E 47 00 C1 19 5B 00  |.RWEITERUNG...[.|
000011B0: 99 22 41 55 53 47 45 53  43 48 41 4C 54 45 54 2E  |."AUSGESCHALTET.|
000011C0: 22 00 E4 19 5C 00 99 22  11 11 12 CE 4F 43 48 20  |"...\.."....OCH |
000011D0: 4D 41 4C 20 56 4F 4E 20  56 4F 52 4E 20 28 4A 2F  |MAL VON VORN (J/|
000011E0: 4E 29 3A 22 00 F6 19 5D  00 A1 4B 24 3A 8B 4B 24  |N):"...]..K$:.K$|
000011F0: B2 22 22 A7 39 33 00 0B  1A 5E 00 8B 4B 24 B2 22  |."".93...^..K$."|
00001200: 4A 22 B0 4B 24 B2 22 CA  22 A7 8A 00 41 1A 5F 00  |J".K$."."...A._.|
00001210: 99 22 93 22 3A 5D 40 31  38 2C 31 30 3A 99 22 C5  |.".":]@18,10:.".|
00001220: CE C4 C5 22 3A 81 54 B2  31 A4 32 35 35 3A 5D 52  |...":.T.1.255:]R|
00001230: 42 3A 82 3A 81 54 B2 31  A4 32 35 35 3A 5D 52 3A  |B:.:.T.1.255:]R:|
00001240: 82 00 4E 1A 60 00 9E 34  39 31 35 32 3A 80 00 86  |..N.`..49152:...|
00001250: 1A 20 03 9E 34 39 31 35  32 3A 99 22 11 52 45 41  |. ..49152:.".REA|
00001260: 44 59 2E 22 3A 81 54 B2  30 A4 33 35 3A 5D 40 54  |DY.":.T.0.35:]@T|
00001270: 2C 31 35 AA 28 33 AC BF  28 54 AD FF 29 29 3A 99  |,15.(3..(T..)):.|
00001280: 22 44 45 4D 4F 22 00 C6  1A 21 03 5D 43 30 2C 30  |"DEMO"...!.]C0,0|
00001290: 2C 54 3A 82 54 3A 81 54  B2 31 A4 35 35 35 3A 5D  |,T:.T:.T.1.555:]|
000012A0: 52 3A 82 3A 8D 39 30 30  3A 5D 43 30 2C 30 2C 31  |R:.:.900:]C0,0,1|
000012B0: 3A 99 22 93 12 20 31 38  20 4E 45 55 45 20 C2 45  |:.".. 18 NEUE .E|
000012C0: 46 45 48 4C 45 22 00 0C  1B 22 03 99 22 D3 49 45  |FEHLE"..."..".IE|
000012D0: 20 48 41 42 45 4E 20 45  53 20 48 49 45 52 20 4D  | HABEN ES HIER M|
000012E0: 49 54 20 45 49 4E 45 4D  20 49 4E 54 45 4C 49 47  |IT EINEM INTELIG|
000012F0: 45 4E 54 45 4D D0 52 4F  47 52 41 4D 4D 20 5A 55  |ENTEM.ROGRAMM ZU|
00001300: 20 54 55 4E 21 11 11 22  3A 5D 50 32 00 53 1B 23  | TUN!..":]P2.S.#|
00001310: 03 99 22 D7 41 52 55 4D  20 3F 3F 3F 11 11 22 3A  |..".ARUM ???..":|
00001320: 5D 50 34 3A 99 22 C8 45  4C 50 20 C2 41 53 49 43  |]P4:.".ELP .ASIC|
00001330: 20 49 53 54 20 45 49 4E  45 20 C5 52 57 45 49 54  | IST EINE .RWEIT|
00001340: 45 52 55 4E 47 20 44 49  45 20 45 53 20 20 49 4E  |ERUNG DIE ES  IN|
00001350: 20 22 3B 00 69 1B 24 03  99 22 53 49 43 48 20 48  | ";.i.$.."SICH H|
00001360: 41 54 2E 11 22 3A 5D 50  34 00 B4 1B 25 03 99 22  |AT..":]P4...%.."|
00001370: C4 45 4E 4E 20 53 49 45  20 4B 41 4E 4E 20 41 4E  |.ENN SIE KANN AN|
00001380: 20 4A 45 44 45 52 20 58  2D 42 45 4C 49 45 42 49  | JEDER X-BELIEBI|
00001390: 47 45 4E 20 20 20 20 20  D3 54 45 4C 4C 45 20 49  |GEN     .TELLE I|
000013A0: 4D 20 D3 50 45 49 43 48  45 52 20 53 54 45 48 45  |M .PEICHER STEHE|
000013B0: 4E 2E 11 22 00 03 1C 26  03 5D 50 32 3A 99 22 C4  |N.."...&.]P2:.".|
000013C0: 49 45 53 45 20 C5 52 57  45 49 54 45 52 55 4E 47  |IESE .RWEITERUNG|
000013D0: 20 46 55 45 48 52 54 20  4B 45 49 4E 45 20 44 49  | FUEHRT KEINE DI|
000013E0: 52 45 4B 54 45 4E 20 D3  50 52 55 45 4E 47 45 20  |REKTEN .PRUENGE |
000013F0: 41 55 53 20 55 4E 44 20  45 4E 54 48 41 45 4C 54  |AUS UND ENTHAELT|
00001400: 20 22 3B 00 4F 1C 27 03  99 22 4B 4C 45 49 4E 45  | ";.O.'.."KLEINE|
00001410: 20 53 45 4C 42 2D 20 20  53 54 41 45 4E 44 49 47  | SELB-  STAENDIG|
00001420: 45 20 CD 4F 44 55 4C 45  2C 20 44 49 45 20 4D 41  |E .ODULE, DIE MA|
00001430: 4E 20 42 45 4C 49 45 42  49 47 20 20 20 20 20 20  |N BELIEBIG      |
00001440: 45 52 57 45 49 54 45 52  4E 20 4B 41 4E 4E 2E 00  |ERWEITERN KANN..|
00001450: 95 1C 28 03 99 22 11 C8  45 4C 50 20 C2 41 53 49  |..(.."..ELP .ASI|
00001460: 43 20 D6 30 2E 31 20 42  45 4E 55 54 5A 54 20 44  |C .0.1 BENUTZT D|
00001470: 49 45 20 D3 50 45 49 43  48 45 52 2D 20 20 20 5A  |IE .PEICHER-   Z|
00001480: 45 4C 4C 45 4E 20 12 32  35 31 2D 32 35 34 2E 22  |ELLEN .251-254."|
00001490: 3A 8D 39 30 30 00 E1 1C  29 03 99 22 93 C4 41 53  |:.900...).."..AS|
000014A0: 20 49 4E 54 45 4C 49 47  45 4E 54 45 20 44 45 52  | INTELIGENTE DER|
000014B0: 20 C5 52 57 45 49 54 45  52 55 4E 47 20 49 53 54  | .RWEITERUNG IST|
000014C0: 20 44 45 52 20 4B 4C 45  49 4E 45 20 DA 55 53 41  | DER KLEINE .USA|
000014D0: 54 5A 20 4D 49 54 20 44  45 4D 20 44 45 52 20 22  |TZ MIT DEM DER "|
000014E0: 3B 00 1B 1D 2A 03 99 22  DA 45 49 47 45 52 20 37  |;...*..".EIGER 7|
000014F0: 37 36 2D 37 37 37 41 55  46 20 44 49 45 53 45 20  |76-777AUF DIESE |
00001500: C5 52 57 45 49 54 45 52  55 4E 47 20 47 45 53 54  |.RWEITERUNG GEST|
00001510: 45 4C 4C 54 20 57 49 52  44 3A 22 00 5B 1D 2B 03  |ELLT WIRD:".[.+.|
00001520: 99 22 11 11 3A 20 43 4C  43 22 3A 99 22 3A 20 4C  |."..: CLC":.": L|
00001530: 44 41 20 32 30 22 3A 99  22 3A 20 41 44 43 20 23  |DA 20":.": ADC #|
00001540: 31 36 22 3A 99 22 3A 20  53 54 41 20 37 37 36 22  |16":.": STA 776"|
00001550: 3A 99 22 3A 20 4C 44 41  20 32 31 00 A9 1D 2C 03  |:.": LDA 21...,.|
00001560: 99 22 3A 20 41 44 43 20  23 30 30 22 3A 99 22 3A  |.": ADC #00":.":|
00001570: 20 53 54 41 20 37 37 37  22 3A 99 22 3A 20 52 54  | STA 777":.": RT|
00001580: 53 22 3A 99 22 3A 20 12  41 42 20 48 49 45 52 20  |S":.": .AB HIER |
00001590: 53 54 45 48 54 20 44 41  53 20 D0 52 4F 47 52 41  |STEHT DAS .ROGRA|
000015A0: 4D 4D 2E 22 3A 8D 39 30  30 00 F7 1D 2D 03 99 22  |MM.":.900...-.."|
000015B0: 93 C4 49 45 53 45 4E 20  D4 52 49 43 4B 20 4B 41  |..IESEN .RICK KA|
000015C0: 4E 4E 20 4D 41 4E 20 41  55 43 48 20 46 55 45 52  |NN MAN AUCH FUER|
000015D0: 20 20 20 20 20 20 20 20  20 D0 52 4F 47 52 41 4D  |         .ROGRAM|
000015E0: 4D 45 2C 20 57 45 4C 43  48 45 20 49 4D 20 C9 4E  |ME, WELCHE IM .N|
000015F0: 54 45 52 52 55 50 54 00  15 1E 2E 03 99 22 4C 41  |TERRUPT......"LA|
00001600: 55 46 45 4E 2C 20 42 45  4E 55 54 5A 45 4E 2E 11  |UFEN, BENUTZEN..|
00001610: 22 3A 5D 50 33 00 5C 1E  2F 03 99 22 C4 41 44 55  |":]P3.\./..".ADU|
00001620: 52 43 48 20 46 41 45 4C  4C 54 20 44 41 53 20 4C  |RCH FAELLT DAS L|
00001630: 41 45 53 53 54 49 47 45  20 52 45 43 48 4E 45 4E  |AESSTIGE RECHNEN|
00001640: 20 55 4E 44 41 45 4E 44  45 52 4E 20 44 45 52 20  | UNDAENDERN DER |
00001650: DA 45 49 47 45 52 20 57  45 47 2E 22 00 AD 1E 30  |.EIGER WEG."...0|
00001660: 03 99 22 D6 4F 52 20 41  4C 4C 45 4D 20 57 45 4E  |..".OR ALLEM WEN|
00001670: 4E 20 4D 41 4E 20 44 41  53 20 D0 52 4F 47 52 41  |N MAN DAS .ROGRA|
00001680: 4D 4D 20 44 41 4E 4E 20  20 20 20 56 45 52 53 43  |MM DANN    VERSC|
00001690: 48 49 45 42 45 4E 20 4D  4F 45 43 48 54 45 3A 11  |HIEBEN MOECHTE:.|
000016A0: 22 3A 99 22 38 32 38 3A  20 53 45 49 22 00 F2 1E  |":."828: SEI"...|
000016B0: 31 03 99 22 38 32 39 3A  20 43 4C 43 22 3A 99 22  |1.."829: CLC":."|
000016C0: 38 33 30 3A 20 4C 44 41  20 32 30 22 3A 99 22 38  |830: LDA 20":."8|
000016D0: 33 32 3A 20 41 44 43 20  23 31 38 20 20 20 A0 12  |32: ADC #18   ..|
000016E0: 38 32 38 2B 28 31 38 2B  30 2A 32 35 36 29 3D 38  |828+(18+0*256)=8|
000016F0: 34 36 00 25 1F 32 03 99  22 38 33 34 3A 20 53 54  |46.%.2.."834: ST|
00001700: 41 20 37 38 38 22 3A 99  22 38 33 37 3A 20 4C 44  |A 788":."837: LD|
00001710: 41 20 32 31 22 3A 99 22  38 33 39 3A 20 41 44 43  |A 21":."839: ADC|
00001720: 20 23 30 30 22 00 51 1F  33 03 99 22 38 34 31 3A  | #00".Q.3.."841:|
00001730: 20 53 54 41 20 37 38 39  22 3A 99 22 38 34 34 3A  | STA 789":."844:|
00001740: 20 43 4C 49 22 3A 99 22  38 34 35 3A 20 52 54 53  | CLI":."845: RTS|
00001750: 22 00 A0 1F 34 03 99 22  38 34 36 3A 20 41 42 20  |"...4.."846: AB |
00001760: 48 49 45 52 20 4B 41 4E  4E 20 45 49 4E 20 D0 52  |HIER KANN EIN .R|
00001770: 4F 47 52 41 4D 4D 20 53  54 45 48 45 4E 2C 20 20  |OGRAMM STEHEN,  |
00001780: 20 20 20 20 20 44 41 53  20 4D 49 54 20 4A 4D 50  |     DAS MIT JMP|
00001790: 20 36 35 35 39 33 20 42  45 45 4E 44 45 54 22 3B  | 65593 BEENDET";|
000017A0: 00 BB 1F 35 03 99 22 20  57 49 52 44 2E 22 3A 8D  |...5.." WIRD.":.|
000017B0: 39 30 30 3A 54 B2 30 3A  20 20 8E 00 E9 1F 84 03  |900:T.0:  ......|
000017C0: 5D 40 30 2C 32 34 3A 99  22 12 D7 45 49 54 45 52  |]@0,24:."..EITER|
000017D0: 20 4D 49 54 20 27 57 27  13 22 3A 97 31 39 38 2C  | MIT 'W'.":.198,|
000017E0: 30 3A 5D 92 22 57 22 3A  8E 00 0A 20 85 03 54 B2  |0:]."W":... ..T.|
000017F0: 54 AA 31 3A 99 48 24 3A  5D 40 30 2C 33 3A 99 42  |T.1:.H$:]@0,3:.B|
00001800: 4E 24 3B 54 3A 99 55 24  3A 8E 00 47 20 86 03 5D  |N$;T:.U$:..G ..]|
00001810: 40 30 2C 32 33 3A 99 22  12 C4 45 4D 4F 20 4D 49  |@0,23:."..EMO MI|
00001820: 54 20 27 44 27 22 3A 5D  92 22 44 22 3A 99 22 93  |T 'D'":]."D":.".|
00001830: 5D 4D 50 2C 38 33 32 22  3A 5D 4D 50 2C 38 33 32  |]MP,832":]MP,832|
00001840: 3A 5D 40 30 2C 32 33 00  65 20 87 03 99 22 12 C1  |:]@0,23.e ..."..|
00001850: 55 46 20 44 45 4D 20 C4  52 55 43 4B 45 52 20 28  |UF DEM .RUCKER (|
00001860: 4A 2F 4E 29 22 00 78 20  88 03 A1 4F 24 3A 8B 4F  |J/N)".x ...O$:.O|
00001870: 24 B2 22 22 A7 39 30 34  00 9B 20 89 03 5D 4C 32  |$."".904.. ..]L2|
00001880: 33 3A 8B 4F 24 B2 22 4A  22 B0 4F 24 B2 22 CA 22  |3:.O$."J".O$."."|
00001890: A7 9F 31 2C 34 3A 5D 98  3A 5D A0 00 A1 20 8A 03  |..1,4:].:]... ..|
000018A0: 8E 00 EE 20 8F 03 99 22  93 C1 4C 53 20 C2 45 49  |... ..."..LS .EI|
000018B0: 53 50 49 45 4C 20 57 4F  4C 4C 45 4E 20 57 49 52  |SPIEL WOLLEN WIR|
000018C0: 20 4E 55 4E 20 45 49 4E  20 D3 50 52 49 54 45 20  | NUN EIN .PRITE |
000018D0: 20 45 52 53 54 45 4C 4C  45 4E 2C 20 44 45 52 20  | ERSTELLEN, DER |
000018E0: 53 45 49 4E 20 CD 55 53  54 45 52 20 22 3B 00 14  |SEIN .USTER ";..|
000018F0: 21 90 03 99 22 41 55 53  20 C1 44 52 45 53 53 45  |!..."AUS .DRESSE|
00001900: 20 20 31 33 2A 36 34 3D  38 33 32 20 4E 49 4D 4D  |  13*64=832 NIMM|
00001910: 54 2E 11 22 00 5C 21 98  03 99 22 11 C4 41 5A 55  |T..".\!..."..AZU|
00001920: 20 4D 41 4C 45 4E 20 D3  49 45 20 4A 45 54 5A 54  | MALEN .IE JETZT|
00001930: 20 41 55 46 20 44 45 4E  20 4E 49 43 48 54 20 4D  | AUF DEN NICHT M|
00001940: 41 52 2D 20 4B 49 45 52  54 45 4E 20 C6 45 4C 44  |AR- KIERTEN .ELD|
00001950: 20 45 49 4E 45 20 C2 49  4C 44 2E 11 00 9E 21 9A  | EINE .ILD....!.|
00001960: 03 99 22 D6 45 52 57 45  4E 44 45 4E 20 D3 49 45  |..".ERWENDEN .IE|
00001970: 20 42 45 49 4D 20 DA 45  49 43 48 4E 45 4E 20 52  | BEIM .EICHNEN R|
00001980: 55 48 49 47 20 41 4C 4C  45 20 20 DA 45 49 43 48  |UHIG ALLE  .EICH|
00001990: 45 4E 2E 22 3A 8D 39 30  30 3A 99 22 93 22 00 CA  |EN.":.900:."."..|
000019A0: 21 9B 03 8D 39 34 30 3A  5D 40 32 35 2C 30 3A 99  |!...940:]@25,0:.|
000019B0: 22 DA 55 52 55 45 43 4B  20 4D 49 54 20 27 5F 27  |".URUECK MIT '_'|
000019C0: 22 3A 99 22 9C 13 11 A4  22 3B 00 DD 21 9E 03 A1  |":."....";..!...|
000019D0: 4B 24 3A 8B 4B 24 B2 22  22 A7 39 32 36 00 F4 21  |K$:.K$."".926..!|
000019E0: 9F 03 8B 4B 24 B2 22 13  22 A7 99 4B 24 AA C7 28  |...K$."."..K$..(|
000019F0: 31 33 29 3B 00 04 22 A0  03 8B 4B 24 B2 22 93 22  |13);.."...K$."."|
00001A00: A7 39 32 33 00 14 22 A1  03 8B 4B 24 B2 22 5F 22  |.923.."...K$."_"|
00001A10: A7 39 33 31 00 22 22 A2  03 99 4B 24 3B 3A 89 39  |.931.""...K$;:.9|
00001A20: 32 36 00 5D 22 A3 03 5D  43 30 2C 30 2C 32 3A 8D  |26.]"..]C0,0,2:.|
00001A30: 39 34 30 3A 99 22 13 12  9F 5D 46 38 33 32 2C 30  |940:."...]F832,0|
00001A40: 3A 5D 53 50 43 28 38 33  32 29 3A 20 05 3C 52 45  |:]SPC(832): .<RE|
00001A50: 54 55 52 4E 3E 20 22 3A  5D 40 30 2C 31 00 74 22  |TURN> ":]@0,1.t"|
00001A60: A4 03 A1 4B 24 3A 8B 4B  24 B3 B1 C7 28 31 33 29  |...K$:.K$...(13)|
00001A70: A7 39 33 32 00 87 22 A5  03 5D 46 38 33 32 2C 30  |.932.."..]F832,0|
00001A80: 3A 5D A6 38 33 32 29 00  A8 22 A6 03 8D 39 30 30  |:].832).."...900|
00001A90: 3A 5D 43 30 2C 30 2C 31  3A 97 35 33 32 36 39 2C  |:]C0,0,1:.53269,|
00001AA0: 30 3A 99 22 93 22 3A 8E  00 C3 22 AC 03 81 48 B2  |0:.".":..."...H.|
00001AB0: 31 30 32 34 A4 31 30 35  30 3A 97 48 2C 32 32 34  |1024.1050:.H,224|
00001AC0: 3A 82 48 00 F9 22 AD 03  81 48 B2 31 30 34 38 A4  |:.H.."...H.1048.|
00001AD0: 31 39 36 35 A9 34 30 3A  81 4A B2 48 A4 48 AA 31  |1965.40:.J.H.H.1|
00001AE0: 35 3A 97 4A 2C 32 32 34  3A 82 4A 3A 82 48 3A 5D  |5:.J,224:.J:.H:]|
00001AF0: 46 31 39 36 30 2C 32 32  34 00 13 23 AE 03 5D 46  |F1960,224..#..]F|
00001B00: 31 39 34 34 2C 32 32 34  3A 5D 46 31 39 30 34 2C  |1944,224:]F1904,|
00001B10: 32 32 34 00 50 23 AF 03  5D 97 2C 35 33 32 34 38  |224.P#..].,53248|
00001B20: 2C 32 35 35 2C 35 33 32  34 39 2C 31 36 35 2C 35  |,255,53249,165,5|
00001B30: 33 32 36 39 2C 31 2C 35  33 32 37 31 2C 31 2C 35  |3269,1,53271,1,5|
00001B40: 33 32 37 37 2C 31 2C 32  30 34 30 2C 31 33 3A 8E  |3277,1,2040,13:.|
00001B50: 00 00 00                                          |...             |

..!....A.0.A.1:."HELP BASIC*",8,1.A....4
9152:.A.1.A.2:."BILD",8,1.I...]C0,0,1:.G
(14).G(8)           :.800.....U$."......
..................................":B$."
BEFEHLSUEBERSICHT:".....H$.".HINWEISE AU
F HELP BASIC V0.1."......H$:.U$:]@15,10:
.B$:.900.D....901:.".]O.":.U$:."DIESER B
EFEHL HOLT EIN MIT 'NEW' GE-    LOESCHTE
S ";......"PROGRAMM WIEDER ZURUECK, FALS
 VORHER KEINE NEUEN VARIABLEN FESTGELEGT
"......"WURDEN.":.900......901:.".]D.":.
U$:."MIT DIESEM BEFEHL KANN DAS DIREKTOR
Y    VOM FLOPPY";.=...." MITTEN IM PROGR
AMM DURCHGE-  SEHEN WERDEN, OHNE DASS DA
BEI DAS PRO-".F...."GRAMMM SELBST VERLOR
EN GEHT.":.900......901:.".]@0-39,0-23."
:.U$:."DIESER BEFEHL BEDEUTET 'PRINTAT'.
"......"DAMIT KANN MAN DEN TEXT AUF EINE
R BE-   STIMMTEN POSITION LENKEN.".=....
"DIE ERSTE ZAHL STEHT FUER DIE SPALTE UN
DDIE ZWEITE FUER ZEILE.":.900......901:.
".]L 0-23.":.U$:."HIERMIT KANN MAN DIE A
NGEGEBENE ZEILE";.C...."   VOM BILDSCHIR
M LOESCHEN..":."GUT GEEIGNET FUER 'INPUT
':"......"..10 INPUT".G(34)."ZIFFER  (1-
9)".G(34).";Z":."11 IFZ<1ORZ>";.L...."9T
HENZEILE=PEEK(214)-1:        ]LZEILE:]@0
,ZEILE:GOTO10.":.900......901:.".]CLOSE.
":.U$:."SCHLIESST ALLE ZUVOR GEOFFNETEN 
";......"FILES.":.900......901:.".]PRINT
#.":.U$:."DRUCKT DEN INHALT DES BILDSCHI
RMS AUF......"EINEN ANGESCHLOSSENEN DRUC
KER AUF FILE4 AUS..K...."DAS FILE MUSS J
EDOCH VORHER GEOEFFNET   WERDEN:..".R...
."10 OPEN1,4:]PRINT#:]CLOSE.":.900... ..
901:.".]SAVE .ANF.ADR..,.ENDADR..+1".G(3
4)."NAME".G(34).",8,1"...!.."."U$:."UM G
ANZ BESTIMMTE BEREICHE ZU SPEICHERN IST 
DIESER BEFEHL SEHR";.I.".." HILFSBEREIT.
":."SOMIT KOENNEN GRAFIK ODER SPRITES VO
M   PRO";...#.."GRAMM AUS, OHNE VIEL AUF
WAND         GESPEICHERT WERDEN.":.900.J
.$..901:.".]C0-255,0-255,0-69.":.U$:."MI
T DIESEM BEFEHL ";...%.."WERDEN DIE EINZ
ELNEN  FARBEN GESETZT..":."DIE ERSTE ZAH
L STEHT ";.W.&.."FUER DEN RAHMEN,":."DIE
 ZWEITE FUER DEN BILDSCHIRM, UND DIE ";.
..'.."DRITTE ZAHL FUER DIE ZEICHENFARBE.
":.900...(..901:.".]R   .ODER.   ]B   .O
DER   .]RB.":.U$...).."DAMIT LASSEN SICH
 EFFEKTVOLLE DEMOS AUF-BAUEN:.".+.*..".R
 .STEHT FUER RAHMEN":.".B .STEHT FUER BI
LDSCHIRM..".P.+.."10 FORT=1TO500:]RB:NEX
TT:]C0,0,1":."..DEMONSTRATION 'D'":]."D"
...,..F.1.500:]RB:.F:]C0,0,1:.900.A.-..9
01:.".]WAIT".G(34)."ZEICHEN";G(34):."."U
$......"WARTET AUF DRUCK EINER BESTIMMTE
N TASTE.DABEI KOENNEN ALLE ZEICHEN";.D./
.." MIT AUSNAHME VON 'SPACE' VERWENDET W
ERDEN.":.900...0..901:.".]GOTO .VARIABLE
":.U$:."DIES IST EINE GOTO-ANWEISUNG IN"
;...1.." DER DIE ANGABE VON VARIABLEN ER
LAUBT IST:."...2.."10 GETH$:IFVAL(H$)<1O
RVALH$>9THEN10":."11 ]GOTO VAL(H$)":.900
.9.3..901:.".]MP,.SPRITEBLOCK":.U$:."DRU
CKT DAS MUSTER ";..4.."EINES SPRITES AU
F DEM BILDSCHIRM..":."DAS IST EIN SEHR B
RAUCH";.I.5.."BARER BEFEHL UM  SPIELE ZU
 DURCHLEUCHTEN, ODER UEBERHAUPTSPRITES "
;...6.."AUF EINEM DRUCKER AUSZUGEBEN:.":
.902:.900:.901.N.7..".]F .ADR..,.0-147 U
ND 178-255":.U$:."WER EIN SPIEL HAT, IN 
DEM ES VIEL ZU...8.."SCHWIERIG IST, EINE
 SPIELSTUFE WEITER ZUKOMMEN, DER KANN SE
INEN ";...9.."GEGNER EINFACH  AUSLOESCHE
N:.":."ZUERST STARTET MAN HELP BASIC,...
:.."DANACH LAEDT MAN EIN SPIEL, UND DURC
H-  SUCHT ES MIT. ";.C.;.."]MP,ADRESSE. 
NACH GEG-      NERISCHEN SPIELFIGUREN. "
;:.900:.943...<..".]MP,832":]MP,832:]@25
,2:."WENN MAN WIE":]@25,3:."HIER EINEN..
.=.]@25,4:."GEGNER GE-":]@25,5:."FUNDEN 
HAT,":]@25,6:."SO KANN MAN".).>.]@25,7:.
"IHN MIT":]@25,8:."']F832,0'":]@25,9:."L
OESCHEN.".\.?..900:]L0:.".]F832,0":.900:
]L0:]@0,0:."]MP,832".Y.@.]F832,0:]MP,832
:.900:.80...F..   GOSUB900.Q.G..901:.".]
POKE,1024,2,,,.":.U$:."DIES IST EIN ENDL
OSER POKE-BEFEHL....H..900:.901:.".]ORNO
T,,,.":.U$:."DIES IST EIN ENDLOSER BEFEH
L UM.N.I.."EIN BESTIMMTES BIT EIN ODER A
USZU-      SCHALTEN..".H.J.."GUT FUER GR
AFIK:..".{.K.."11 FORI=1TO2...L.."10 ]OR
NOT,53265,32,53272,7:WAIT".G(34)."W".G(3
4).":NEXTI...M..900:]..,53265,32,53272,7
:.900:]..,53265,32,53272,7.2.N..901:.".]
P 0-65536.":.U$:."DIESER BEFEHL DIENT ZU
R PAUSE..".M.O..".1 = 14 TI":.900:.90...
P..901:.".]SPC(.SPRITEBLOCKADRESSE.).":.
U$:."WENN SIE SPIELE SCHREIBEN,...Q.."SP
IELE VERAENDERN, ODER GANZ SCHNELL    UN
D OHNE VIEL AUFWAND EINEN SPRITE.6.R.."Z
AUBERN WOLLEN, DANN GEHT DAS MIT HELP  B
ASIC GANZ SCHNELL UND EINFACH....S.."SIE
 BENOETIGEN NUR DIE ADRESSE IN DER   SIE
 DAS MUSTER ABLEGEN UND EIN";.N.T.." BIS
CHEN  FINGERSPITZENGEFUEHL.":."MIT DIESE
M BEFEHL, DORT OBEN ";...U.."KOENNEN SIE
BLITZSCHNELL EIN MUSTER VOM  BILDSCHIRM 
ZUM SPRITE SCHICKEN..].V.."AUF DER FOLGE
NDEN SEITE KOENNEN SIE ES  NUN AUSPROBIE
REN.".K.Y..900:.911...Z..901:.".]END.":.
U$:."MIT DIESEM BEFEHL WIRD DIE ERWEITER
UNG.A.[.."AUSGESCHALTET."...\.."...NOCH 
MAL VON VORN (J/N):"...]..K$:.K$."".93..
.^..K$."J".K$."J"...A._..".":]@18,10:."E
NDE":.T.1.255:]RB:.:.T.1.255:]R:..N.`..4
9152:.... ..49152:.".READY.":.T.0.35:]@T
,15.(3..(T..)):."DEMO".F.!.]C0,0,T:.T:.T
.1.555:]R:.:.900:]C0,0,1:.".. 18 NEUE BE
FEHLE"...".."SIE HABEN ES HIER MIT EINEM
 INTELIGENTEMPROGRAMM ZU TUN!..":]P2.S.#
.."WARUM ???..":]P4:."HELP BASIC IST EIN
E ERWEITERUNG DIE ES  IN ";.I.$.."SICH H
AT..":]P4...%.."DENN SIE KANN AN JEDER X
-BELIEBIGEN     STELLE IM SPEICHER STEHE
N.."...&.]P2:."DIESE ERWEITERUNG FUEHRT 
KEINE DIREKTEN SPRUENGE AUS UND ENTHAELT
 ";.O.'.."KLEINE SELB-  STAENDIGE MODULE
, DIE MAN BELIEBIG      ERWEITERN KANN..
..(..".HELP BASIC V0.1 BENUTZT DIE SPEIC
HER-   ZELLEN .251-254.":.900...)..".DAS
 INTELIGENTE DER ERWEITERUNG IST DER KLE
INE ZUSATZ MIT DEM DER ";...*.."ZEIGER 7
76-777AUF DIESE ERWEITERUNG GESTELLT WIR
D:".[.+.."..: CLC":.": LDA 20":.": ADC #
16":.": STA 776":.": LDA 21...,..": ADC 
#00":.": STA 777":.": RTS":.": .AB HIER 
STEHT DAS PROGRAMM.":.900...-..".DIESEN 
TRICK KANN MAN AUCH FUER         PROGRAM
ME, WELCHE IM INTERRUPT......"LAUFEN, BE
NUTZEN..":]P3.\./.."DADURCH FAELLT DAS L
AESSTIGE RECHNEN UNDAENDERN DER ZEIGER W
EG."...0.."VOR ALLEM WENN MAN DAS PROGRA
MM DANN    VERSCHIEBEN MOECHTE:.":."828:
 SEI"...1.."829: CLC":."830: LDA 20":."8
32: ADC #18    .828+(18+0*256)=846.%.2..
"834: STA 788":."837: LDA 21":."839: ADC
 #00".Q.3.."841: STA 789":."844: CLI":."
845: RTS". .4.."846: AB HIER KANN EIN PR
OGRAMM STEHEN,       DAS MIT JMP 65593 B
EENDET";...5.." WIRD.":.900:T.0:  ......
]@0,24:.".WEITER MIT 'W'.":.198,0:]."W":
... ..T.T.1:.H$:]@0,3:.BN$;T:.U$:..G ..]
@0,23:.".DEMO MIT 'D'":]."D":.".]MP,832"
:]MP,832:]@0,23.E ...".AUF DEM DRUCKER (
J/N)".X ...O$:.O$."".904.. ..]L23:.O$."J
".O$."J"..1,4:].:] .. ..... ...".ALS BEI
SPIEL WOLLEN WIR NUN EIN SPRITE  ERSTELL
EN, DER SEIN MUSTER ";..!..."AUS ADRESSE
  13*64=832 NIMMT..".\!...".DAZU MALEN S
IE JETZT AUF DEN NICHT MAR- KIERTEN FELD
 EINE BILD....!..."VERWENDEN SIE BEIM ZE
ICHNEN RUHIG ALLE  ZEICHEN.":.900:.".".J
!...940:]@25,0:."ZURUECK MIT '_'":."....
";..!...K$:.K$."".926..!...K$."."..K$.G(
13);.." ..K$.".".923.."...K$."_".931."".
..K$;:.926.]"..]C0,0,2:.940:."...]F832,0
:]SPC(832): .<RETURN> ":]@0,1.T"...K$:.K
$..G(13).932.."..]F832,0:].832).."...900
:]C0,0,1:.53269,0:.".":..C"...H.1024.105
0:.H,224:.H.."...H.1048.1965.40:.J.H.H.1
5:.J,224:.J:.H:]F1960,224..#..]F1944,224
:]F1904,224.P#..].,53248,255,53249,165,5
3269,1,53271,1,53277,1,2040,13:....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL