UT 26
FILE INFORMATION
FILENAME(S): UT 26
FILE TYPE(S): PRG
FILE SIZE: 5.7K
FIRST SEEN: 2025-11-30 01:07:57
APPEARS ON: 1 disk(s)
FILE HASH
f14fcb44e2f00ce817b772ed0b38cd67bd050efe8cf35732d7ad67b9f93aa88b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITIE DISK | UT 26 | PRG | Treasure Chest - Wolfgang Rauprich | 11 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 01 00 97 34 35 2C C2 28 31 37 34 29 |.......45,.(174)|
00000010: 3A 97 34 36 2C C2 28 31 37 35 29 3A 9C 00 31 08 |:.46,.(175):..1.|
00000020: 04 00 86 54 45 24 28 39 30 30 29 3A 20 89 38 30 |...TE$(900): .80|
00000030: 30 00 42 08 0A 00 8D 38 30 31 3A 99 22 11 11 11 |0.B....801:."...|
00000040: 11 22 00 6B 08 0B 00 99 A3 38 29 22 44 41 54 45 |.".k.....8)"DATE|
00000050: 49 20 45 49 4E 4C 45 53 45 4E 20 20 20 20 20 20 |I EINLESEN |
00000060: 12 9A 20 46 20 31 20 92 9F 11 22 00 95 08 0C 00 |.. F 1 ...".....|
00000070: 99 A3 38 29 22 5A 55 4D 20 4D 45 4E 55 45 20 20 |..8)"ZUM MENUE |
00000080: 20 20 20 20 20 20 20 20 20 12 9A 20 46 20 37 20 | .. F 7 |
00000090: 92 9F 11 11 22 00 AB 08 0D 00 97 31 39 38 2C 30 |...."......198,0|
000000A0: 3A 92 31 39 38 2C 31 3A A1 45 24 00 BD 08 0E 00 |:.198,1:.E$.....|
000000B0: 8B 45 24 B2 C7 28 31 33 33 29 A7 32 30 00 D0 08 |.E$..(133).20...|
000000C0: 0F 00 8B 45 24 B2 C7 28 31 33 36 29 A7 39 30 30 |...E$..(136).900|
000000D0: 00 D8 08 10 00 89 31 33 00 F7 08 14 00 4E 24 B2 |......13.....N$.|
000000E0: 22 22 3A 99 A3 38 29 3A 85 22 44 41 54 45 49 4E |"":..8):."DATEIN|
000000F0: 41 4D 45 22 3B 4E 24 00 18 09 19 00 8B C3 28 4E |AME";N$.......(N|
00000100: 24 29 B3 B2 30 B0 C3 28 4E 24 29 B1 31 36 A7 99 |$)..0..(N$).16..|
00000110: 22 91 91 22 3A 89 32 30 00 25 09 23 00 9F 31 35 |"..":.20.%.#..15|
00000120: 2C 38 2C 31 35 00 2D 09 28 00 49 B2 31 00 3F 09 |,8,15.-.(.I.1.?.|
00000130: 37 00 46 49 24 B2 4E 24 AA 22 2C 53 2C 52 22 00 |7.FI$.N$.",S,R".|
00000140: 4F 09 3C 00 8D 38 30 31 3A 99 22 11 11 11 22 00 |O.<..801:."...".|
00000150: 78 09 41 00 99 A3 34 29 22 45 49 4E 4C 45 53 45 |x.A...4)"EINLESE|
00000160: 4E 20 4D 49 54 20 49 4E 50 55 54 20 20 12 9A 20 |N MIT INPUT .. |
00000170: 46 20 31 20 92 9F 11 22 00 A0 09 42 00 99 A3 34 |F 1 ..."...B...4|
00000180: 29 22 45 49 4E 4C 45 53 45 4E 20 4D 49 54 20 47 |)"EINLESEN MIT G|
00000190: 45 54 20 20 20 20 12 9A 20 46 20 37 20 92 9F 22 |ET .. F 7 .."|
000001A0: 00 B6 09 46 00 97 31 39 38 2C 30 3A 92 31 39 38 |...F..198,0:.198|
000001B0: 2C 31 3A A1 45 24 00 C8 09 50 00 8B 45 24 B2 C7 |,1:.E$...P..E$..|
000001C0: 28 31 33 33 29 A7 39 35 00 DB 09 51 00 8B 45 24 |(133).95...Q..E$|
000001D0: B2 C7 28 31 33 36 29 A7 31 37 30 00 E3 09 5A 00 |..(136).170...Z.|
000001E0: 89 37 30 00 F2 09 5F 00 9F 32 2C 38 2C 32 2C 46 |.70..._..2,8,2,F|
000001F0: 49 24 00 08 0A 64 00 84 31 35 2C 20 41 31 2C 41 |I$...d..15, A1,A|
00000200: 32 24 2C 41 33 2C 41 34 00 18 0A 69 00 8B 41 31 |2$,A3,A4...i..A1|
00000210: B3 B1 30 A7 89 37 36 30 00 48 0A 73 00 99 22 13 |..0..760.H.s..".|
00000220: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 A3 |..............".|
00000230: 31 33 29 22 05 44 52 55 45 43 4B 20 53 50 41 43 |13)".DRUECK SPAC|
00000240: 45 9F 22 3A 8D 37 39 30 00 51 0A 74 00 8D 38 30 |E.":.790.Q.t..80|
00000250: 31 00 7F 0A 75 00 99 A3 34 29 22 81 5A 55 4D 20 |1...u...4)".ZUM |
00000260: 45 49 4E 4C 45 53 45 4E 20 9A 53 50 41 43 45 81 |EINLESEN .SPACE.|
00000270: 20 44 52 55 45 43 4B 45 4E 9F 22 3A 53 B2 30 00 | DRUECKEN.":S.0.|
00000280: 92 0A 77 00 99 A3 34 29 22 12 05 22 49 22 92 9F |..w...4)".."I"..|
00000290: 22 3B 00 A7 0A 78 00 A1 52 24 3A 8B 52 24 B3 B1 |";...x..R$:.R$..|
000002A0: 22 20 22 A7 31 32 30 00 B2 0A 7D 00 A1 23 32 2C |" ".120...}..#2,|
000002B0: 41 24 00 D6 0A 82 00 8B 41 24 B2 C7 28 31 33 29 |A$......A$..(13)|
000002C0: A7 99 22 2A 22 3A 49 B2 49 AA 31 3A 53 B2 53 AA |.."*":I.I.1:S.S.|
000002D0: 31 3A 89 31 34 39 00 EB 0A 87 00 54 45 24 28 49 |1:.149.....TE$(I|
000002E0: 29 B2 54 45 24 28 49 29 AA 41 24 00 F7 0A 8C 00 |).TE$(I).A$.....|
000002F0: 99 A3 34 29 41 24 3B 00 00 0B 91 00 89 31 32 30 |..4)A$;......120|
00000300: 00 30 0B 95 00 8B 53 B2 31 35 A7 99 A3 31 33 29 |.0....S.15...13)|
00000310: 22 11 05 44 52 55 45 43 4B 20 52 45 54 55 52 4E |"..DRUECK RETURN|
00000320: 22 3A 8D 31 30 30 30 3A 8D 38 30 31 3A 53 B2 30 |":.1000:.801:S.0|
00000330: 00 40 0B 96 00 8B 53 54 B3 B1 36 34 A7 31 31 39 |.@....ST..64.119|
00000340: 00 69 0B 9B 00 A0 32 3A 99 A3 31 33 29 22 11 05 |.i....2:..13)"..|
00000350: 44 52 55 45 43 4B 20 52 45 54 55 52 4E 22 3A 8D |DRUECK RETURN":.|
00000360: 31 30 30 30 3A 89 32 31 30 00 78 0B AA 00 9F 32 |1000:.210.x....2|
00000370: 2C 38 2C 32 2C 46 49 24 00 8E 0B AF 00 84 31 35 |,8,2,FI$......15|
00000380: 2C 20 41 31 2C 41 32 24 2C 41 33 2C 41 34 00 9E |, A1,A2$,A3,A4..|
00000390: 0B B4 00 8B 41 31 B3 B1 30 A7 89 37 36 30 00 CE |....A1..0..760..|
000003A0: 0B B9 00 99 22 13 11 11 11 11 11 11 11 11 11 11 |...."...........|
000003B0: 11 11 11 11 22 A3 31 33 29 22 05 44 52 55 45 43 |....".13)".DRUEC|
000003C0: 4B 20 53 50 41 43 45 9F 22 3A 8D 37 39 30 00 D8 |K SPACE.":.790..|
000003D0: 0B BA 00 8D 38 30 31 3A 00 08 0C BB 00 99 A3 34 |....801:.......4|
000003E0: 29 22 91 81 5A 55 4D 20 45 49 4E 4C 45 53 45 4E |)"..ZUM EINLESEN|
000003F0: 20 9A 53 50 41 43 45 81 20 44 52 55 45 43 4B 45 | .SPACE. DRUECKE|
00000400: 4E 2E 9F 22 3A 53 B2 30 00 1D 0C BE 00 A1 52 24 |N..":S.0......R$|
00000410: 3A 8B 52 24 B3 B1 22 20 22 A7 31 39 30 00 31 0C |:.R$.." ".190.1.|
00000420: C3 00 84 32 2C 41 24 3A 54 45 24 28 49 29 B2 41 |...2,A$:TE$(I).A|
00000430: 24 00 44 0C C8 00 99 A3 34 29 22 12 22 49 22 92 |$.D.....4)"."I".|
00000440: 22 3B 41 24 00 64 0C CD 00 8B 20 53 54 B3 B1 36 |";A$.d.... ST..6|
00000450: 34 20 A7 20 49 B2 49 AA 31 3A 53 B2 53 AA 31 3A |4 . I.I.1:S.S.1:|
00000460: 89 32 30 37 00 8D 0C CE 00 A0 32 3A 99 A3 31 33 |.207......2:..13|
00000470: 29 22 11 05 44 52 55 45 43 4B 20 52 45 54 55 52 |)"..DRUECK RETUR|
00000480: 4E 22 3A 8D 31 30 30 30 3A 89 32 31 30 00 BD 0C |N":.1000:.210...|
00000490: CF 00 8B 53 B2 31 35 A7 99 A3 31 33 29 22 11 05 |...S.15...13)"..|
000004A0: 44 52 55 45 43 4B 20 52 45 54 55 52 4E 22 3A 8D |DRUECK RETURN":.|
000004B0: 31 30 30 30 3A 8D 38 30 31 3A 53 B2 30 00 C6 0C |1000:.801:S.0...|
000004C0: D0 00 89 31 39 30 00 D4 0C D2 00 8D 38 30 31 3A |...190......801:|
000004D0: 99 22 11 22 00 00 0D D3 00 99 A3 34 29 22 45 49 |.".".......4)"EI|
000004E0: 4E 46 55 45 47 45 4E 20 45 49 4E 45 52 20 5A 45 |NFUEGEN EINER ZE|
000004F0: 49 4C 45 20 20 12 9A 20 46 20 31 20 92 9F 11 22 |ILE .. F 1 ..."|
00000500: 00 2C 0D D4 00 99 A3 34 29 22 41 45 4E 44 45 52 |.,.....4)"AENDER|
00000510: 4E 20 20 20 45 49 4E 45 52 20 5A 45 49 4C 45 20 |N EINER ZEILE |
00000520: 20 12 9A 20 46 20 33 20 92 9F 11 22 00 58 0D D5 | .. F 3 ...".X..|
00000530: 00 99 A3 34 29 22 4C 4F 45 53 43 48 45 4E 20 20 |...4)"LOESCHEN |
00000540: 45 49 4E 45 52 20 5A 45 49 4C 45 20 20 12 9A 20 |EINER ZEILE .. |
00000550: 46 20 35 20 92 9F 11 22 00 84 0D D6 00 99 A3 34 |F 5 ...".......4|
00000560: 29 22 44 52 55 43 4B 45 4E 20 44 45 52 20 44 41 |)"DRUCKEN DER DA|
00000570: 54 45 49 20 20 20 20 20 20 12 9A 20 46 20 37 20 |TEI .. F 7 |
00000580: 92 9F 11 22 00 B0 0D D7 00 99 A3 34 29 22 41 55 |...".......4)"AU|
00000590: 53 47 41 42 45 20 4B 4F 4E 54 52 4F 4C 4C 45 20 |SGABE KONTROLLE |
000005A0: 20 20 20 20 20 12 9A 20 20 5E 20 20 92 9F 11 22 | .. ^ ..."|
000005B0: 00 DC 0D D8 00 99 A3 34 29 22 4E 41 45 43 48 53 |.......4)"NAECHS|
000005C0: 54 45 53 20 4D 45 4E 55 45 20 20 20 20 20 20 20 |TES MENUE |
000005D0: 20 12 9A 20 20 2A 20 20 92 9F 11 22 00 08 0E D9 | .. * ..."....|
000005E0: 00 99 A3 34 29 22 48 41 55 50 54 4D 45 4E 55 45 |...4)"HAUPTMENUE|
000005F0: 2F 42 45 45 4E 44 45 4E 20 20 20 20 20 12 9A 20 |/BEENDEN .. |
00000600: 20 40 20 20 92 9F 11 22 00 13 0E DA 00 46 4C 41 | @ ...".....FLA|
00000610: 47 B2 30 00 29 0E 04 01 97 31 39 38 2C 30 3A 92 |G.0.)....198,0:.|
00000620: 31 39 38 2C 31 3A A1 52 24 00 42 0E 09 01 8B 52 |198,1:.R$.B....R|
00000630: 24 B2 C7 28 31 33 33 29 A7 8D 34 38 35 3A 89 32 |$..(133)..485:.2|
00000640: 31 30 00 5B 0E 0E 01 8B 52 24 B2 C7 28 31 33 34 |10.[....R$..(134|
00000650: 29 A7 8D 33 30 30 3A 89 32 31 30 00 74 0E 13 01 |)..300:.210.t...|
00000660: 8B 52 24 B2 C7 28 31 33 35 29 A7 8D 35 33 30 3A |.R$..(135)..530:|
00000670: 89 32 31 30 00 8D 0E 18 01 8B 52 24 B2 C7 28 31 |.210......R$..(1|
00000680: 33 36 29 A7 8D 35 36 30 3A 89 32 31 30 00 9D 0E |36)..560:.210...|
00000690: 1D 01 8B 52 24 B2 22 2A 22 A7 36 32 35 00 AE 0E |...R$."*".625...|
000006A0: 1E 01 8B 52 24 B2 22 5E 22 A7 32 30 30 30 00 BE |...R$."^".2000..|
000006B0: 0E 1F 01 8B 52 24 B2 22 40 22 A7 39 30 30 00 C7 |....R$."@".900..|
000006C0: 0E 22 01 89 32 36 30 00 D8 0E 2C 01 8D 38 30 31 |."..260...,..801|
000006D0: 3A 99 22 11 11 11 11 22 00 03 0F 31 01 99 A3 34 |:."...."...1...4|
000006E0: 29 22 4D 49 54 20 49 4E 50 55 54 28 4F 48 4E 45 |)"MIT INPUT(OHNE|
000006F0: 20 4B 4F 4D 4D 41 29 20 12 9A 20 46 20 31 20 92 | KOMMA) .. F 1 .|
00000700: 9F 11 22 00 2E 0F 36 01 99 A3 34 29 22 4D 49 54 |.."...6...4)"MIT|
00000710: 20 47 45 54 20 20 20 20 20 20 20 20 20 20 20 20 | GET |
00000720: 20 20 20 12 9A 20 46 20 33 20 92 9F 11 22 00 58 | .. F 3 ...".X|
00000730: 0F 37 01 99 A3 34 29 22 5A 55 52 55 45 43 4B 20 |.7...4)"ZURUECK |
00000740: 5A 55 4D 20 4D 45 4E 55 45 20 20 20 20 20 12 9A |ZUM MENUE ..|
00000750: 20 46 20 37 20 92 9F 22 00 6E 0F 45 01 97 31 39 | F 7 ..".n.E..19|
00000760: 38 2C 30 3A 92 31 39 38 2C 31 3A A1 52 24 00 81 |8,0:.198,1:.R$..|
00000770: 0F 4F 01 8B 52 24 B2 C7 28 31 33 33 29 A7 33 35 |.O..R$..(133).35|
00000780: 30 00 94 0F 54 01 8B 52 24 B2 C7 28 31 33 34 29 |0...T..R$..(134)|
00000790: A7 34 32 35 00 A7 0F 55 01 8B 52 24 B2 C7 28 31 |.425...U..R$..(1|
000007A0: 33 36 29 A7 32 31 30 00 B0 0F 59 01 89 33 32 35 |36).210...Y..325|
000007B0: 00 BF 0F 5E 01 8D 38 30 31 3A 99 22 11 11 22 00 |...^..801:."..".|
000007C0: EB 0F 5F 01 8B 46 4C 41 47 B2 31 A7 99 A3 34 29 |.._..FLAG.1...4)|
000007D0: 22 4C 45 54 5A 54 45 20 5A 45 49 4C 45 20 22 3B |"LETZTE ZEILE ";|
000007E0: 54 45 24 28 4C 29 3A 89 33 38 30 00 08 10 68 01 |TE$(L):.380...h.|
000007F0: 99 A3 34 29 22 57 45 4C 43 48 45 20 5A 45 49 4C |..4)"WELCHE ZEIL|
00000800: 45 20 53 4F 4C 4C 20 22 00 36 10 69 01 4E 24 B2 |E SOLL ".6.i.N$.|
00000810: 22 22 3A 99 A3 34 29 3A 85 22 47 45 41 45 4E 44 |"":..4):."GEAEND|
00000820: 45 52 54 20 57 45 52 44 45 4E 22 3B 4E 24 3A 4E |ERT WERDEN";N$:N|
00000830: B2 C5 28 4E 24 29 00 4E 10 72 01 8B 4E B3 31 B0 |..(N$).N.r..N.1.|
00000840: 4E B1 49 A7 99 22 91 91 22 3A 89 33 36 31 00 70 |N.I.."..":.361.p|
00000850: 10 77 01 99 A3 34 29 22 11 41 4C 54 45 52 20 49 |.w...4)".ALTER I|
00000860: 4E 48 41 4C 54 3A 20 12 81 22 54 45 24 28 4E 29 |NHALT: .."TE$(N)|
00000870: 00 76 10 7C 01 99 00 99 10 81 01 99 A3 34 29 22 |.v.|.........4)"|
00000880: 9F 47 45 42 45 4E 20 53 49 45 20 4E 55 4E 20 44 |.GEBEN SIE NUN D|
00000890: 45 4E 20 4E 45 55 45 4E 22 00 AF 10 82 01 99 A3 |EN NEUEN".......|
000008A0: 34 29 22 49 4E 48 41 4C 54 20 41 4E 2E 11 22 00 |4)"INHALT AN..".|
000008B0: C7 10 86 01 99 A3 34 29 3A 85 20 41 24 3A 54 45 |......4):. A$:TE|
000008C0: 24 28 4E 29 B2 41 24 00 E0 10 8B 01 99 A3 34 29 |$(N).A$.......4)|
000008D0: 22 4E 45 55 45 52 20 49 4E 48 41 4C 54 11 9A 22 |"NEUER INHALT.."|
000008E0: 00 F3 10 90 01 99 A3 34 29 22 11 12 22 54 45 24 |.......4)".."TE$|
000008F0: 28 4E 29 00 FE 10 95 01 46 4C 41 47 B2 30 00 1F |(N).....FLAG.0..|
00000900: 11 96 01 99 A3 31 33 29 22 05 11 44 52 55 45 43 |.....13)"..DRUEC|
00000910: 4B 20 53 50 41 43 45 22 3A 8D 37 39 30 3A 8E 00 |K SPACE":.790:..|
00000920: 2E 11 A9 01 8D 38 30 31 3A 99 22 11 11 22 00 65 |.....801:."..".e|
00000930: 11 AA 01 8B 46 4C 41 47 B2 31 A7 99 A3 34 29 22 |....FLAG.1...4)"|
00000940: 4C 45 54 5A 54 45 20 5A 45 49 4C 45 20 22 3B 54 |LETZTE ZEILE ";T|
00000950: 45 24 28 4C 29 3A 54 45 24 28 4E 29 B2 22 22 3A |E$(L):TE$(N)."":|
00000960: 3A 89 34 35 30 00 81 11 AE 01 99 A3 34 29 22 57 |:.450.......4)"W|
00000970: 45 4C 43 48 45 20 5A 45 49 4C 45 20 53 4F 4C 4C |ELCHE ZEILE SOLL|
00000980: 22 00 AF 11 AF 01 4E 24 B2 22 22 3A 99 A3 34 29 |".....N$."":..4)|
00000990: 3A 85 22 47 45 41 45 4E 44 45 52 54 20 57 45 52 |:."GEAENDERT WER|
000009A0: 44 45 4E 22 3B 4E 24 3A 4E B2 C5 28 4E 24 29 00 |DEN";N$:N..(N$).|
000009B0: C7 11 B0 01 8B 4E B3 31 B0 4E B1 49 A7 99 22 91 |.....N.1.N.I..".|
000009C0: 91 22 3A 89 34 33 31 00 F1 11 B8 01 99 A3 34 29 |.":.431.......4)|
000009D0: 22 41 4C 54 45 52 20 49 4E 48 41 4C 54 20 81 22 |"ALTER INHALT ."|
000009E0: 3B 54 45 24 28 4E 29 3A 54 45 24 28 4E 29 B2 22 |;TE$(N):TE$(N)."|
000009F0: 22 00 11 12 C2 01 99 A3 34 29 22 11 9F 47 45 42 |".......4)"..GEB|
00000A00: 45 4E 20 53 49 45 20 4A 45 54 5A 54 20 44 45 4E |EN SIE JETZT DEN|
00000A10: 22 00 2E 12 C3 01 99 A3 34 29 22 4E 45 55 45 4E |".......4)"NEUEN|
00000A20: 20 49 4E 48 41 4C 54 20 45 49 4E 3A 11 22 00 45 | INHALT EIN:.".E|
00000A30: 12 C7 01 A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 |.... A$:. A$."" |
00000A40: A7 20 34 35 35 00 5A 12 CC 01 8B 20 41 24 B2 C7 |. 455.Z.... A$..|
00000A50: 28 31 33 29 20 A7 20 34 37 39 00 66 12 D1 01 99 |(13) . 479.f....|
00000A60: A3 34 29 41 24 3B 00 7B 12 D6 01 54 45 24 28 4E |.4)A$;.{...TE$(N|
00000A70: 29 B2 54 45 24 28 4E 29 AA 41 24 00 85 12 DB 01 |).TE$(N).A$.....|
00000A80: 89 20 34 35 35 00 9F 12 DF 01 99 A3 34 29 22 11 |. 455.......4)".|
00000A90: 4E 45 55 45 52 20 49 4E 48 41 4C 54 3A 11 22 00 |NEUER INHALT:.".|
00000AA0: BA 12 E0 01 99 A3 34 29 22 11 12 9A 22 54 45 24 |......4)"..."TE$|
00000AB0: 28 4E 29 3A 46 4C 41 47 B2 30 00 DB 12 E1 01 99 |(N):FLAG.0......|
00000AC0: A3 31 33 29 22 05 11 44 52 55 45 43 4B 20 53 50 |.13)"..DRUECK SP|
00000AD0: 41 43 45 22 3A 8D 37 39 30 3A 8E 00 EA 12 E5 01 |ACE":.790:......|
00000AE0: 8D 38 30 31 3A 99 22 11 11 22 00 09 13 EA 01 99 |.801:.".."......|
00000AF0: A3 34 29 22 48 49 4E 54 45 52 20 57 45 4C 43 48 |.4)"HINTER WELCH|
00000B00: 45 52 20 5A 45 49 4C 45 22 00 3A 13 EB 01 4E 24 |ER ZEILE".:...N$|
00000B10: B2 22 22 3A 99 A3 34 29 3A 85 22 45 49 4E 45 20 |."":..4):."EINE |
00000B20: 4E 45 55 45 20 45 49 4E 46 55 45 47 45 4E 22 3B |NEUE EINFUEGEN";|
00000B30: 4E 24 3A 4E B2 C5 28 4E 24 29 00 52 13 EF 01 8B |N$:N..(N$).R....|
00000B40: 4E B3 31 B0 4E B1 49 A7 99 22 91 91 22 3A 89 34 |N.1.N.I.."..":.4|
00000B50: 39 31 00 7E 13 F4 01 4E B2 4E AA 31 3A 81 4C B2 |91.~...N.N.1:.L.|
00000B60: 49 A4 4E A9 AB 31 3A 54 45 24 28 4C AA 31 29 B2 |I.N..1:TE$(L.1).|
00000B70: 54 45 24 28 4C 29 3A 82 3A 49 B2 49 AA 31 00 8E |TE$(L):.:I.I.1..|
00000B80: 13 F9 01 46 4C 41 47 B2 31 3A 89 33 30 30 00 9E |...FLAG.1:.300..|
00000B90: 13 12 02 8D 38 30 31 3A 99 22 11 11 11 22 00 BA |....801:."..."..|
00000BA0: 13 13 02 99 A3 34 29 22 57 45 4C 43 48 45 20 5A |.....4)"WELCHE Z|
00000BB0: 45 49 4C 45 20 53 4F 4C 4C 22 00 E8 13 14 02 4E |EILE SOLL".....N|
00000BC0: 24 B2 22 22 3A 99 A3 34 29 3A 85 22 47 45 4C 4F |$."":..4):."GELO|
00000BD0: 45 53 43 48 54 20 57 45 52 44 45 4E 22 3B 4E 24 |ESCHT WERDEN";N$|
00000BE0: 3A 4E B2 C5 28 4E 24 29 00 00 14 1C 02 8B 4E B3 |:N..(N$)......N.|
00000BF0: 31 B0 4E B1 49 A7 99 22 91 91 22 3A 89 35 33 32 |1.N.I.."..":.532|
00000C00: 00 29 14 1D 02 99 A3 34 29 22 11 5A 45 49 4C 45 |.).....4)".ZEILE|
00000C10: 4E 2D 49 4E 48 41 4C 54 3A 20 12 81 22 54 45 24 |N-INHALT: .."TE$|
00000C20: 28 4E 29 3A 99 22 11 9F 22 00 52 14 1E 02 99 A3 |(N):."..".R.....|
00000C30: 34 29 22 49 4E 48 41 4C 54 20 4C 4F 45 53 43 48 |4)"INHALT LOESCH|
00000C40: 45 4E 20 20 20 20 20 12 9A 20 46 20 31 20 92 9F |EN .. F 1 ..|
00000C50: 11 22 00 7B 14 1F 02 99 A3 34 29 22 5A 55 4D 20 |.".{.....4)"ZUM |
00000C60: 4D 45 4E 55 45 20 5A 55 52 55 45 43 4B 20 20 20 |MENUE ZURUECK |
00000C70: 12 9A 20 46 20 37 20 92 9F 11 22 00 91 14 20 02 |.. F 7 ..."... .|
00000C80: 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 45 |.198,0:.198,1:.E|
00000C90: 24 00 A4 14 21 02 8B 45 24 B2 C7 28 31 33 33 29 |$...!..E$..(133)|
00000CA0: A7 35 34 39 00 C5 14 22 02 8B 45 24 B2 C7 28 31 |.549..."..E$..(1|
00000CB0: 33 36 29 A7 A0 31 35 3A A0 31 3A A0 35 3A A0 32 |36)..15:.1:.5:.2|
00000CC0: 3A 89 32 31 30 00 CE 14 23 02 89 35 34 34 00 F1 |:.210...#..544..|
00000CD0: 14 25 02 81 4C B2 4E A4 49 3A 54 45 24 28 4C 29 |.%..L.N.I:TE$(L)|
00000CE0: B2 54 45 24 28 4C AA 31 29 3A 82 3A 49 B2 49 AB |.TE$(L.1):.:I.I.|
00000CF0: 31 00 17 15 26 02 99 A3 34 29 22 11 5A 45 49 4C |1...&...4)".ZEIL|
00000D00: 45 81 22 4E 22 9F 20 49 53 54 20 47 45 4C 4F 45 |E."N". IST GELOE|
00000D10: 53 43 48 54 11 05 22 00 34 15 27 02 99 A3 31 33 |SCHT..".4.'...13|
00000D20: 29 22 44 52 55 45 43 4B 20 53 50 41 43 45 22 3A |)"DRUECK SPACE":|
00000D30: 89 37 39 30 00 3A 15 2B 02 8E 00 4C 15 30 02 8D |.790.:.+...L.0..|
00000D40: 38 30 31 3A 99 22 11 11 11 11 11 22 00 77 15 31 |801:.".....".w.1|
00000D50: 02 99 A3 34 29 22 44 41 54 45 49 20 41 55 53 44 |...4)"DATEI AUSD|
00000D60: 52 55 43 4B 45 4E 20 20 20 20 20 20 12 9A 20 46 |RUCKEN .. F|
00000D70: 20 31 20 92 9F 11 22 00 A2 15 32 02 99 A3 34 29 | 1 ..."...2...4)|
00000D80: 22 5A 55 4D 20 4D 45 4E 55 45 20 20 20 20 20 20 |"ZUM MENUE |
00000D90: 20 20 20 20 20 20 20 12 9A 20 46 20 37 20 92 9F | .. F 7 ..|
00000DA0: 11 22 00 B8 15 35 02 97 31 39 38 2C 30 3A 92 31 |."...5..198,0:.1|
00000DB0: 39 38 2C 31 3A A1 45 24 00 D1 15 3A 02 8B 45 24 |98,1:.E$...:..E$|
00000DC0: B2 C7 28 31 33 33 29 A7 8D 35 38 30 3A 89 36 30 |..(133)..580:.60|
00000DD0: 30 00 E4 15 3B 02 8B 45 24 B2 C7 28 31 33 36 29 |0...;..E$..(136)|
00000DE0: A7 32 31 30 00 ED 15 3F 02 89 35 36 35 00 13 16 |.210...?..565...|
00000DF0: 44 02 97 37 36 38 2C 36 31 3A 9F 31 2C 34 2C 37 |D..768,61:.1,4,7|
00000E00: 3A 98 31 2C 22 22 3B 3A A0 31 3A 97 37 36 38 2C |:.1,"";:.1:.768,|
00000E10: 31 33 39 00 25 16 49 02 8B 53 54 B3 B1 AB 31 32 |139.%.I..ST...12|
00000E20: 38 A7 35 39 35 00 55 16 4E 02 99 A3 34 29 22 95 |8.595.U.N...4)".|
00000E30: 44 52 55 43 4B 45 52 20 45 49 4E 53 43 48 41 4C |DRUCKER EINSCHAL|
00000E40: 54 45 4E 22 3A 81 53 B2 31 A4 32 35 30 30 3A 82 |TEN":.S.1.2500:.|
00000E50: 3A 89 35 36 30 00 5B 16 53 02 8E 00 79 16 58 02 |:.560.[.S...y.X.|
00000E60: 99 A3 34 29 22 9A 44 52 55 43 4B 45 52 20 49 4E |..4)".DRUCKER IN|
00000E70: 20 42 45 54 52 49 45 42 22 00 82 16 5D 02 9F 31 | BETRIEB"...]..1|
00000E80: 2C 34 00 9F 16 62 02 98 31 2C A6 35 29 22 44 41 |,4...b..1,.5)"DA|
00000E90: 54 45 49 3A 20 22 4E 24 3A 53 B2 30 3A 98 31 00 |TEI: "N$:S.0:.1.|
00000EA0: BF 16 63 02 81 4A B2 31 A4 49 3A 53 B2 53 AA 31 |..c..J.1.I:S.S.1|
00000EB0: 3A 58 58 B2 35 3A 8B 4A B1 39 A7 58 58 B2 34 00 |:XX.5:.J.9.XX.4.|
00000EC0: D8 16 64 02 98 31 2C A6 58 58 29 4A 3B A6 34 29 |..d..1,.XX)J;.4)|
00000ED0: 3B 54 45 24 28 4A 29 3A 00 EB 16 65 02 8B 53 B2 |;TE$(J):...e..S.|
00000EE0: 32 35 A7 8D 36 31 38 3A 53 B2 30 00 F9 16 66 02 |25..618:S.0...f.|
00000EF0: 82 3A 98 31 3A A0 31 3A 8E 00 26 17 6A 02 8D 38 |.:.1:.1:..&.j..8|
00000F00: 30 31 3A 99 22 11 11 11 11 11 22 3A 99 A3 31 33 |01:.".....":..13|
00000F10: 29 22 50 41 50 49 45 52 20 4A 55 53 54 49 45 52 |)"PAPIER JUSTIER|
00000F20: 45 4E 2E 2E 2E 22 00 4C 17 6B 02 99 A3 31 33 29 |EN...".L.k...13)|
00000F30: 22 53 50 41 43 45 20 44 52 55 45 43 4B 45 4E 2E |"SPACE DRUECKEN.|
00000F40: 2E 2E 2E 2E 22 3A 8D 37 39 30 3A 8E 00 5D 17 71 |....":.790:..].q|
00000F50: 02 8D 38 30 31 3A 99 22 11 11 11 11 22 00 88 17 |..801:."...."...|
00000F60: 72 02 99 A3 34 29 22 41 45 4E 44 45 52 55 4E 47 |r...4)"AENDERUNG|
00000F70: 45 4E 20 53 50 45 49 43 48 45 52 4E 20 12 9A 20 |EN SPEICHERN .. |
00000F80: 46 20 31 20 92 9F 11 22 00 B4 17 73 02 99 A3 34 |F 1 ..."...s...4|
00000F90: 29 22 5A 55 4D 20 48 41 55 50 54 4D 45 4E 55 45 |)"ZUM HAUPTMENUE|
00000FA0: 20 20 20 20 20 20 20 20 12 9A 20 46 20 37 20 92 | .. F 7 .|
00000FB0: 9F 11 11 22 00 CA 17 76 02 97 31 39 38 2C 30 3A |..."...v..198,0:|
00000FC0: 92 31 39 38 2C 31 3A A1 45 24 00 DD 17 77 02 8B |.198,1:.E$...w..|
00000FD0: 45 24 B2 C7 28 31 33 33 29 A7 36 35 35 00 F5 17 |E$..(133).655...|
00000FE0: 78 02 8B 45 24 B2 C7 28 31 33 36 29 A7 A0 31 35 |x..E$..(136)..15|
00000FF0: 3A 89 39 30 30 00 FE 17 7A 02 89 36 33 30 00 1D |:.900...z..630..|
00001000: 18 8F 02 4E 24 B2 22 22 3A 99 A3 34 29 3A 85 22 |...N$."":..4):."|
00001010: 44 41 54 45 49 4E 41 4D 45 22 3B 4E 24 00 3F 18 |DATEINAME";N$.?.|
00001020: 90 02 8B C3 28 4E 24 29 B3 B2 30 B0 C3 28 4E 24 |....(N$)..0..(N$|
00001030: 29 B1 31 36 A7 99 22 91 91 22 3A 89 36 35 35 00 |).16.."..":.655.|
00001040: 51 18 99 02 46 49 24 B2 4E 24 AA 22 2C 53 2C 57 |Q...FI$.N$.",S,W|
00001050: 22 00 63 18 A3 02 A0 32 3A 9F 32 2C 38 2C 32 2C |".c....2:.2,8,2,|
00001060: 46 49 24 00 79 18 A8 02 84 31 35 2C 20 41 31 2C |FI$.y....15, A1,|
00001070: 41 32 24 2C 41 33 2C 41 34 00 87 18 AD 02 8B 41 |A2$,A3,A4......A|
00001080: 31 B2 30 A7 37 33 30 00 98 18 B2 02 8B 41 31 B3 |1.0.730......A1.|
00001090: B1 36 33 A7 89 37 36 30 00 C7 18 B7 02 99 A3 34 |.63..760.......4|
000010A0: 29 22 81 91 44 45 52 20 4E 41 4D 45 20 9A 22 4E |)"..DER NAME ."N|
000010B0: 24 22 81 20 45 58 49 53 54 49 45 52 54 20 53 43 |$". EXISTIERT SC|
000010C0: 48 4F 4E 21 11 9F 22 00 F2 18 BC 02 99 A3 34 29 |HON!..".......4)|
000010D0: 22 4E 41 4D 45 4E 20 55 45 42 45 52 53 43 48 52 |"NAMEN UEBERSCHR|
000010E0: 45 49 42 45 4E 20 20 12 9A 20 46 20 31 20 92 9F |EIBEN .. F 1 ..|
000010F0: 11 22 00 1D 19 BD 02 99 A3 34 29 22 4E 45 55 45 |.".......4)"NEUE|
00001100: 52 20 44 41 54 45 49 4E 41 4D 45 20 20 20 20 20 |R DATEINAME |
00001110: 20 20 12 9A 20 46 20 37 20 92 9F 11 22 00 33 19 | .. F 7 ...".3.|
00001120: BE 02 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A |...198,0:.198,1:|
00001130: A1 45 24 00 46 19 BF 02 8B 45 24 B2 C7 28 31 33 |.E$.F....E$..(13|
00001140: 33 29 A7 37 31 30 00 59 19 C0 02 8B 45 24 B2 C7 |3).710.Y....E$..|
00001150: 28 31 33 36 29 A7 36 32 35 00 62 19 C1 02 89 37 |(136).625.b....7|
00001160: 30 32 00 81 19 C6 02 A0 32 3A 9F 32 2C 38 2C 32 |02......2:.2,8,2|
00001170: 2C 22 40 3A 2C 53 2C 57 22 AA 4E 24 3A 89 36 38 |,"@:,S,W".N$:.68|
00001180: 30 00 8C 19 DA 02 81 4A B2 31 A4 49 00 9C 19 DF |0......J.1.I....|
00001190: 02 98 32 2C 54 45 24 28 4A 29 3A 82 00 DD 19 E4 |..2,TE$(J):.....|
000011A0: 02 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
000011B0: 11 11 11 22 A3 34 29 22 81 47 45 53 50 45 49 43 |...".4)".GESPEIC|
000011C0: 48 45 52 54 20 9A 22 4E 24 22 9F 20 20 20 20 20 |HERT ."N$". |
000011D0: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 F9 19 | "...|
000011E0: E5 02 A0 32 3A A0 31 35 3A 81 53 B2 31 A4 32 35 |...2:.15:.S.1.25|
000011F0: 30 30 3A 82 3A 89 39 30 30 00 0A 1A F8 02 8D 38 |00:.:.900......8|
00001200: 30 31 3A 99 22 11 11 11 11 22 00 2D 1A F9 02 99 |01:."....".-....|
00001210: A3 31 30 29 22 12 05 20 44 49 53 4B 45 54 54 45 |.10)".. DISKETTE|
00001220: 4E 46 45 48 4C 45 52 21 20 92 11 11 22 00 56 1A |NFEHLER! ...".V.|
00001230: FD 02 99 22 20 12 20 44 41 54 45 49 20 3A 20 22 |..." . DATEI : "|
00001240: 4E 24 3A 99 22 92 22 3A 99 41 31 2C 41 32 24 3A |N$:.".":.A1,A2$:|
00001250: A0 32 3A A0 31 35 00 7B 1A 02 03 99 A3 31 33 29 |.2:.15.{.....13)|
00001260: 22 11 11 05 44 52 55 45 43 4B 20 53 50 41 43 45 |"...DRUECK SPACE|
00001270: 22 3A 8D 37 39 30 3A 89 39 30 30 00 91 1A 16 03 |":.790:.900.....|
00001280: 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 45 |.198,0:.198,1:.E|
00001290: 24 00 A1 1A 17 03 8B 45 24 B2 C7 28 33 32 29 A7 |$......E$..(32).|
000012A0: 8E 00 AA 1A 18 03 89 37 39 30 00 CA 1A 20 03 97 |.......790... ..|
000012B0: 35 33 32 38 30 2C 36 3A 97 35 33 32 38 31 2C 30 |53280,6:.53281,0|
000012C0: 3A 8D 38 30 31 3A 89 38 31 30 00 FC 1A 21 03 99 |:.801:.810...!..|
000012D0: 22 91 93 9E 20 B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"... ...........|
000012E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000012F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 22 00 2F 1B 22 |..........."./."|
00001300: 03 99 22 20 C2 12 9C 20 20 20 20 20 20 20 20 20 |.." ... |
00001310: 20 20 20 44 41 54 45 49 20 4C 45 53 45 4E 20 20 | DATEI LESEN |
00001320: 20 20 20 20 20 20 20 20 20 20 20 92 9E C2 22 00 | ...".|
00001330: 63 1B 23 03 99 22 20 AD C0 C0 C0 C0 C0 C0 C0 C0 |c.#.." .........|
00001340: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001350: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 11 11 9F |................|
00001360: 22 3A 8E 00 89 1B 2A 03 99 A3 36 29 22 4D 49 54 |":....*...6)"MIT|
00001370: 20 44 49 45 53 45 4D 20 50 52 4F 47 52 41 4D 4D | DIESEM PROGRAMM|
00001380: 20 4B 4F 45 4E 4E 45 4E 22 00 AF 1B 2B 03 99 A3 | KOENNEN"...+...|
00001390: 36 29 22 53 49 45 20 45 49 4E 45 20 53 45 51 55 |6)"SIE EINE SEQU|
000013A0: 45 4E 54 49 45 4C 4C 45 20 44 41 54 45 49 22 00 |ENTIELLE DATEI".|
000013B0: D6 1B 2C 03 99 A3 36 29 22 28 53 45 51 29 20 55 |..,...6)"(SEQ) U|
000013C0: 45 42 45 52 20 47 45 54 20 4F 44 45 52 20 49 4E |EBER GET ODER IN|
000013D0: 50 55 54 11 9A 22 00 F6 1B 2D 03 99 A3 36 29 22 |PUT.."...-...6)"|
000013E0: 45 49 4E 4C 45 53 45 4E 20 55 4E 44 2E 2E 2E 2E |EINLESEN UND....|
000013F0: 2E 2E 2E 2E 2E 22 00 16 1C 2E 03 99 A3 36 29 22 |.....".......6)"|
00001400: 56 45 52 41 45 4E 44 45 52 4E 2E 2E 2E 2E 2E 2E |VERAENDERN......|
00001410: 2E 2E 2E 2E 2E 22 00 36 1C 2F 03 99 A3 36 29 22 |.....".6./...6)"|
00001420: 53 41 45 54 5A 45 20 4C 4F 45 53 43 48 45 4E 2E |SAETZE LOESCHEN.|
00001430: 2E 2E 2E 2E 2E 22 00 56 1C 30 03 99 A3 36 29 22 |.....".V.0...6)"|
00001440: 53 41 45 54 5A 45 20 48 49 4E 5A 55 46 55 45 47 |SAETZE HINZUFUEG|
00001450: 45 4E 2E 2E 2E 22 00 76 1C 31 03 99 A3 36 29 22 |EN...".v.1...6)"|
00001460: 41 55 53 44 52 55 43 4B 45 4E 20 4C 41 53 53 45 |AUSDRUCKEN LASSE|
00001470: 4E 2E 2E 2E 2E 22 00 98 1C 32 03 99 A3 36 29 22 |N...."...2...6)"|
00001480: 55 4E 44 20 4E 45 55 20 41 42 53 50 45 49 43 48 |UND NEU ABSPEICH|
00001490: 45 52 4E 2E 2E 11 9F 22 00 BA 1C 33 03 99 A3 36 |ERN...."...3...6|
000014A0: 29 22 42 45 41 43 48 54 45 4E 20 53 49 45 20 42 |)"BEACHTEN SIE B|
000014B0: 49 54 54 45 20 44 49 45 20 22 00 E2 1C 34 03 99 |ITTE DIE "...4..|
000014C0: A3 36 29 22 4A 45 57 45 49 4C 49 47 45 4E 20 45 |.6)"JEWEILIGEN E|
000014D0: 49 4E 47 41 42 45 48 49 4E 57 45 49 53 45 2E 11 |INGABEHINWEISE..|
000014E0: 05 22 00 FF 1C 35 03 99 A3 31 33 29 22 44 52 55 |."...5...13)"DRU|
000014F0: 45 43 4B 20 53 50 41 43 45 22 3A 8D 37 39 30 00 |ECK SPACE":.790.|
00001500: 11 1D 84 03 8D 38 30 31 3A 99 22 11 11 11 11 11 |.....801:.".....|
00001510: 22 00 35 1D 85 03 99 A3 38 29 22 44 41 54 45 49 |".5.....8)"DATEI|
00001520: 20 4C 45 53 45 4E 20 20 20 20 20 20 20 20 20 20 | LESEN |
00001530: 5B 31 5D 11 22 00 59 1D 86 03 99 A3 38 29 22 50 |[1].".Y.....8)"P|
00001540: 52 4F 47 52 41 4D 4D 20 42 45 45 4E 44 45 4E 20 |ROGRAMM BEENDEN |
00001550: 20 20 20 20 5B 32 5D 11 22 00 7C 1D 87 03 99 A3 | [2].".|.....|
00001560: 38 29 22 5A 55 4D 20 55 54 49 4C 49 54 49 45 20 |8)"ZUM UTILITIE |
00001570: 2D 20 4D 45 4E 55 45 20 5B 33 5D 22 00 92 1D 89 |- MENUE [3]"....|
00001580: 03 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 |..198,0:.198,1:.|
00001590: 45 24 00 A1 1D 8A 03 8B 45 24 B2 22 31 22 A7 31 |E$......E$."1".1|
000015A0: 30 00 B4 1D 8B 03 8B 45 24 B2 22 32 22 A7 9E 36 |0......E$."2"..6|
000015B0: 34 37 33 38 00 C4 1D 8C 03 8B 45 24 B2 22 33 22 |4738......E$."3"|
000015C0: A7 39 31 30 00 CD 1D 8D 03 89 39 30 35 00 0B 1E |.910......905...|
000015D0: 8E 03 99 22 13 11 11 11 11 11 11 11 11 11 11 11 |..."............|
000015E0: 11 11 11 11 22 A3 38 29 22 95 42 49 54 54 45 20 |....".8)".BITTE |
000015F0: 57 41 52 54 45 4E 20 20 20 20 20 20 20 20 20 22 |WARTEN "|
00001600: 3A 93 22 4D 45 4E 55 45 22 2C 38 00 21 1E E8 03 |:."MENUE",8.!...|
00001610: 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 45 |.198,0:.198,1:.E|
00001620: 24 00 31 1E E9 03 8B 45 24 B2 C7 28 31 33 29 A7 |$.1....E$..(13).|
00001630: 8E 00 3B 1E EA 03 89 31 30 30 30 00 4C 1E D0 07 |..;....1000.L...|
00001640: 8D 38 30 31 3A A0 31 35 3A 53 B2 30 00 6C 1E D1 |.801:.15:S.0.l..|
00001650: 07 81 4A B2 31 A4 49 3A 53 B2 53 AA 31 3A 58 58 |..J.1.I:S.S.1:XX|
00001660: B2 34 3A 8B 4A B1 39 A7 58 58 B2 33 00 8A 1E D2 |.4:.J.9.XX.3....|
00001670: 07 99 A3 34 29 22 12 05 22 4A 22 92 9F 22 3B A6 |...4)".."J"..";.|
00001680: 58 58 29 3B 54 45 24 28 4A 29 00 B8 1E D3 07 8B |XX);TE$(J)......|
00001690: 53 B2 31 35 A7 99 A3 31 33 29 22 11 05 44 52 55 |S.15...13)"..DRU|
000016A0: 45 43 4B 20 53 50 41 43 45 22 3A 8D 37 39 30 3A |ECK SPACE":.790:|
000016B0: 8D 38 30 31 3A 53 B2 30 00 BE 1E D4 07 82 00 E2 |.801:S.0........|
000016C0: 1E D5 07 99 A3 31 33 29 22 11 05 44 52 55 45 43 |.....13)"..DRUEC|
000016D0: 4B 20 53 50 41 43 45 22 3A 8D 37 39 30 3A 89 32 |K SPACE":.790:.2|
000016E0: 31 30 00 00 00 |10... |
.......45,B(174):.46,B(175):..1....TE$(9
00): .800.B....801:."....".K.....8)"DATE
I EINLESEN .. F 1 ...".......8)"ZUM
MENUE .. F 7 ...."......198,0
:.198,1:.E$......E$.G(133).20.P....E$.G(
136).900.X....13.....N$."":..8):."DATEIN
AME";N$......C(N$)..0.C(N$).16.."..":.20
.%.#..15,8,15.-.(.I.1.?.7.FI$.N$.",S,R".
O.<..801:."...".X.A...4)"EINLESEN MIT IN
PUT .. F 1 ...". .B...4)"EINLESEN MIT G
ET .. F 7 .."...F..198,0:.198,1:.E$.H
.P..E$.G(133).95...Q..E$.G(136).170...Z.
.70..._..2,8,2,FI$...D..15, A1,A2$,A3,A4
...I..A1..0..760.H.S.."...............".
13)".DRUECK SPACE.":.790.Q.T..801..U...
4)".ZUM EINLESEN .SPACE. DRUECKEN.":S.0.
..W...4)".."I"..";...X..R$:.R$.." ".120.
..}..#2,A$.V....A$.G(13).."*":I.I.1:S.S.
1:.149.....TE$(I).TE$(I).A$.......4)A$;.
.....120.0....S.15...13)"..DRUECK RETURN
":.1000:.801:S.0.@....ST..64.119.I... 2:
..13)"..DRUECK RETURN":.1000:.210.X....2
,8,2,FI$......15, A1,A2$,A3,A4......A1..
0..760.N...."...............".13)".DRUEC
K SPACE.":.790.X....801:.......4)"..ZUM
EINLESEN .SPACE. DRUECKEN..":S.0......R$
:.R$.." ".190.1.C..2,A$:TE$(I).A$.D.H...
4)"."I".";A$.D.M.. ST..64 . I.I.1:S.S.1:
.207...N. 2:..13)"..DRUECK RETURN":.1000
:.210...O..S.15...13)"..DRUECK RETURN":.
1000:.801:S.0.F.P..190.T.R..801:."."...S
...4)"EINFUEGEN EINER ZEILE .. F 1 ..."
.,.T...4)"AENDERN EINER ZEILE .. F 3
...".X.U...4)"LOESCHEN EINER ZEILE ..
F 5 ..."...V...4)"DRUCKEN DER DATEI
.. F 7 ..."...W...4)"AUSGABE KONTROLLE
.. ^ ..."...X...4)"NAECHSTES MENU
E .. * ..."...Y...4)"HAUPTMENUE
/BEENDEN .. @ ..."...Z.FLAG.0.)...
.198,0:.198,1:.R$.B....R$.G(133)..485:.2
10.[....R$.G(134)..300:.210.T....R$.G(13
5)..530:.210......R$.G(136)..560:.210...
...R$."*".625......R$."^".2000......R$."
@".900.G."..260.X.,..801:."...."...1...4
)"MIT INPUT(OHNE KOMMA) .. F 1 ..."...6.
..4)"MIT GET .. F 3 ...".X
.7...4)"ZURUECK ZUM MENUE .. F 7 .."
.N.E..198,0:.198,1:.R$...O..R$.G(133).35
0...T..R$.G(134).425...U..R$.G(136).210.
..Y..325...^..801:.".."..._..FLAG.1...4)
"LETZTE ZEILE ";TE$(L):.380...H...4)"WEL
CHE ZEILE SOLL ".6.I.N$."":..4):."GEAEND
ERT WERDEN";N$:N.E(N$).N.R..N.1.N.I.."..
":.361.P.W...4)".ALTER INHALT: .."TE$(N)
.V.|.........4)".GEBEN SIE NUN DEN NEUEN
".......4)"INHALT AN..".G.....4):. A$:TE
$(N).A$.......4)"NEUER INHALT..".......4
)".."TE$(N).....FLAG.0.......13)"..DRUEC
K SPACE":.790:.......801:."..".E....FLAG
.1...4)"LETZTE ZEILE ";TE$(L):TE$(N)."":
:.450.......4)"WELCHE ZEILE SOLL".....N$
."":..4):."GEAENDERT WERDEN";N$:N.E(N$).
G....N.1.N.I.."..":.431.......4)"ALTER I
NHALT .";TE$(N):TE$(N).""...B...4)"..GEB
EN SIE JETZT DEN"...C...4)"NEUEN INHALT
EIN:.".E.G.. A$:. A$."" . 455.Z.L.. A$.G
(13) . 479.F.Q...4)A$;.{.V.TE$(N).TE$(N)
.A$...... 455.......4)".NEUER INHALT:.".
......4)"..."TE$(N):FLAG.0.......13)"..D
RUECK SPACE":.790:.......801:.".."......
.4)"HINTER WELCHER ZEILE".:...N$."":..4)
:."EINE NEUE EINFUEGEN";N$:N.E(N$).R....
N.1.N.I.."..":.491.~...N.N.1:.L.I.N..1:T
E$(L.1).TE$(L):.:I.I.1.....FLAG.1:.300..
....801:."...".......4)"WELCHE ZEILE SOL
L".....N$."":..4):."GELOESCHT WERDEN";N$
:N.E(N$)......N.1.N.I.."..":.532.).....4
)".ZEILEN-INHALT: .."TE$(N):."..".R.....
4)"INHALT LOESCHEN .. F 1 ...".{....
.4)"ZUM MENUE ZURUECK .. F 7 ..."... .
.198,0:.198,1:.E$...!..E$.G(133).549.E."
..E$.G(136). 15: 1: 5: 2:.210.N.#..544..
.%..L.N.I:TE$(L).TE$(L.1):.:I.I.1...&...
4)".ZEILE."N". IST GELOESCHT..".4.'...13
)"DRUECK SPACE":.790.:.+...L.0..801:."..
...".W.1...4)"DATEI AUSDRUCKEN .. F
1 ..."...2...4)"ZUM MENUE .
. F 7 ..."...5..198,0:.198,1:.E$.Q.:..E$
.G(133)..580:.600...;..E$.G(136).210...?
..565...D..768,61:.1,4,7:.1,"";: 1:.768,
139.%.I..ST...128.595.U.N...4)".DRUCKER
EINSCHALTEN":.S.1.2500:.:.560.[.S...Y.X.
..4)".DRUCKER IN BETRIEB"...]..1,4...B..
1,.5)"DATEI: "N$:S.0:.1...C..J.1.I:S.S.1
:XX.5:.J.9.XX.4.X.D..1,.XX)J;.4);TE$(J):
...E..S.25..618:S.0...F..:.1: 1:..&.J..8
01:.".....":..13)"PAPIER JUSTIEREN...".L
.K...13)"SPACE DRUECKEN.....":.790:..].Q
..801:."...."...R...4)"AENDERUNGEN SPEIC
HERN .. F 1 ..."...S...4)"ZUM HAUPTMENUE
.. F 7 ....".J.V..198,0:.198,1:.
E$...W..E$.G(133).655...X..E$.G(136). 15
:.900...Z..630.....N$."":..4):."DATEINAM
E";N$.?....C(N$)..0.C(N$).16.."..":.655.
Q...FI$.N$.",S,W".C... 2:.2,8,2,FI$.Y...
.15, A1,A2$,A3,A4......A1.0.730......A1.
.63..760.G.....4)"..DER NAME ."N$". EXIS
TIERT SCHON!..".......4)"NAMEN UEBERSCHR
EIBEN .. F 1 ...".......4)"NEUER DATEIN
AME .. F 7 ...".3....198,0:.198,1:
.E$.F....E$.G(133).710.Y....E$.G(136).62
5.B.A..702...F. 2:.2,8,2,"@:,S,W".N$:.68
0...Z..J.1.I......2,TE$(J):.......".....
...........".4)".GESPEICHERT ."N$".
"..... 2: 15:.S.1.2500:.:.90
0......801:."....".-.....10)".. DISKETTE
NFEHLER! ...".V...." . DATEI : "N$:.".":
.A1,A2$: 2: 15.{.....13)"...DRUECK SPACE
":.790:.900......198,0:.198,1:.E$......E
$.G(32)........790.J. ..53280,6:.53281,0
:.801:.810...!.."... ...................
..................."./.".." B..
DATEI LESEN ..B".C.#.." .
........................................
":....*...6)"MIT DIESEM PROGRAMM KOENNEN
"...+...6)"SIE EINE SEQUENTIELLE DATEI".
V.,...6)"(SEQ) UEBER GET ODER INPUT.."..
.-...6)"EINLESEN UND.........".......6)"
VERAENDERN...........".6./...6)"SAETZE L
OESCHEN......".V.0...6)"SAETZE HINZUFUEG
EN...".V.1...6)"AUSDRUCKEN LASSEN...."..
.2...6)"UND NEU ABSPEICHERN...."...3...6
)"BEACHTEN SIE BITTE DIE "...4...6)"JEWE
ILIGEN EINGABEHINWEISE..."...5...13)"DRU
ECK SPACE":.790......801:.".....".5.....
8)"DATEI LESEN [1].".Y.....8)"P
ROGRAMM BEENDEN [2].".|.....8)"ZUM U
TILITIE - MENUE [3]"......198,0:.198,1:.
E$......E$."1".10......E$."2"..64738.D..
..E$."3".910.M....905......"............
....".8)".BITTE WARTEN ":."MENUE
",8.!....198,0:.198,1:.E$.1....E$.G(13).
..;....1000.L.P..801: 15:S.0.L.Q..J.1.I:
S.S.1:XX.4:.J.9.XX.3...R...4)".."J"..";.
XX);TE$(J)...S..S.15...13)"..DRUECK SPAC
E":.790:.801:S.0...T.....U...13)"..DRUEC
K SPACE":.790:.210...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL