ESF/SH1
FILE INFORMATION
FILENAME(S): ESF/SH1
FILE TYPE(S): PRG
FILE SIZE: 5.2K
FIRST SEEN: 2025-12-01 00:57:20
APPEARS ON: 1 disk(s)
FILE HASH
d5fa3cb50aad3df53494c7594c1c7ae6ef127e3029ec81f1955b39eda685fea6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HEINZ | ESF/SH1 | PRG | hedning, Austria | 11 | 19 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 64 00 8F 20 2D 2D 2D 2D 2D 2D 41 45 |..$.d.. ------AE|
00000010: 4E 44 45 52 4E 20 45 49 4E 45 52 20 5A 45 49 4C |NDERN EINER ZEIL|
00000020: 45 20 2D 2D 00 48 08 6E 00 8F 2A 20 20 20 20 20 |E --.H.n..* |
00000030: 45 44 49 54 20 53 45 51 2D 46 49 4C 45 20 20 20 |EDIT SEQ-FILE |
00000040: 20 20 20 20 20 20 20 2A 00 6C 08 78 00 8F 2A 20 | *.l.x..* |
00000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000060: 20 20 20 20 20 20 20 20 20 20 20 2A 00 90 08 82 | *....|
00000070: 00 8F 2A 20 45 44 49 54 49 45 52 45 4E 20 56 4F |..* EDITIEREN VO|
00000080: 4E 20 53 45 51 55 45 4E 54 49 45 4C 4C 45 4E 2A |N SEQUENTIELLEN*|
00000090: 00 B4 08 8C 00 8F 2A 20 20 20 20 20 20 20 20 20 |......* |
000000A0: 44 41 54 45 49 45 4E 20 20 20 20 20 20 20 20 20 |DATEIEN |
000000B0: 20 20 20 2A 00 D8 08 96 00 8F 2A 2A 2A 2A 2A 2A | *......******|
000000C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000D0: 2A 2A 2A 2A 2A 2A 2A 2A 00 DE 08 A0 00 3A 00 E4 |********.....:..|
000000E0: 08 AA 00 3A 00 0A 09 B4 00 86 20 54 45 24 28 39 |...:...... TE$(9|
000000F0: 30 30 29 3A 8F 20 4D 41 58 20 41 4E 5A 41 48 4C |00):. MAX ANZAHL|
00000100: 20 44 41 54 45 4E 53 41 54 5A 00 17 09 BE 00 9F | DATENSATZ......|
00000110: 31 35 2C 38 2C 31 35 00 20 09 C8 00 99 22 93 22 |15,8,15. ...."."|
00000120: 00 50 09 D2 00 99 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.P....".........|
00000130: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000140: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 |..............."|
00000150: 00 72 09 DC 00 99 22 11 20 20 20 20 20 20 4C 45 |.r....". LE|
00000160: 53 45 4E 20 55 4E 44 20 45 44 49 54 49 45 52 45 |SEN UND EDITIERE|
00000170: 4E 22 00 93 09 E6 00 99 22 11 20 20 20 20 20 20 |N"......". |
00000180: 20 20 45 49 4E 45 52 20 53 45 51 2E 20 44 41 54 | EINER SEQ. DAT|
00000190: 45 49 22 00 B7 09 F0 00 99 22 11 11 20 20 20 20 |EI"......".. |
000001A0: 20 4C 20 3D 20 4C 45 53 45 4E 20 45 49 4E 45 52 | L = LESEN EINER|
000001B0: 20 44 41 54 45 49 22 00 D7 09 FA 00 99 22 11 20 | DATEI"......". |
000001C0: 20 20 20 20 20 42 20 3D 20 50 52 4F 47 52 41 4D | B = PROGRAM|
000001D0: 4D 45 4E 44 45 20 22 00 07 0A 04 01 99 22 C0 C0 |MENDE "......"..|
000001E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000001F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000200: C0 C0 C0 C0 C0 C0 22 00 1B 0A 0E 01 99 20 22 11 |......"...... ".|
00000210: 12 20 57 41 45 48 4C 45 3A 92 22 00 32 0A 18 01 |. WAEHLE:.".2...|
00000220: A1 20 52 24 3A 8B 20 52 24 B2 22 22 20 A7 20 32 |. R$:. R$."" . 2|
00000230: 38 30 00 4B 0A 22 01 8B 20 52 24 B2 22 42 22 A7 |80.K.".. R$."B".|
00000240: 20 A0 20 32 3A A0 20 31 35 3A 80 00 5E 0A 2C 01 | . 2:. 15:..^.,.|
00000250: 8B 20 52 24 B3 B1 22 4C 22 A7 20 32 38 30 00 64 |. R$.."L". 280.d|
00000260: 0A 36 01 3A 00 87 0A 40 01 8F 2D 2D 2D 2D 4C 45 |.6.:...@..----LE|
00000270: 53 45 4E 20 45 49 4E 45 52 20 53 45 51 2D 46 49 |SEN EINER SEQ-FI|
00000280: 4C 45 2D 2D 2D 2D 2D 00 8D 0A 4A 01 3A 00 93 0A |LE-----...J.:...|
00000290: 54 01 3A 00 9B 0A 5E 01 49 B2 31 00 C7 0A 68 01 |T.:...^.I.1...h.|
000002A0: 99 22 11 11 20 57 45 4C 43 48 45 20 44 41 54 45 |.".. WELCHE DATE|
000002B0: 49 20 53 4F 4C 4C 20 47 45 4C 45 53 45 4E 20 57 |I SOLL GELESEN W|
000002C0: 45 52 44 45 4E 3F 22 00 DE 0A 72 01 85 22 44 41 |ERDEN?"...r.."DA|
000002D0: 54 45 49 4E 41 4D 45 20 3D 20 22 3B 4E 24 00 F0 |TEINAME = ";N$..|
000002E0: 0A 7C 01 46 49 24 B2 4E 24 AA 22 2C 53 2C 52 22 |.|.FI$.N$.",S,R"|
000002F0: 00 20 0B 86 01 99 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 |. ....".........|
00000300: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000310: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 |..............."|
00000320: 00 47 0B 90 01 99 22 11 11 20 20 53 4F 4C 4C 20 |.G....".. SOLL |
00000330: 4D 49 54 20 47 45 54 20 4F 44 45 52 20 4D 49 54 |MIT GET ODER MIT|
00000340: 20 49 4E 50 55 54 22 00 68 0B 9A 01 99 22 11 20 | INPUT".h....". |
00000350: 20 47 45 4C 45 53 45 4E 20 57 45 52 44 45 4E 20 | GELESEN WERDEN |
00000360: 28 47 2F 49 29 20 3F 22 00 80 0B A4 01 A1 20 52 |(G/I) ?"...... R|
00000370: 52 24 3A 8B 20 52 52 24 B2 22 22 A7 20 34 32 30 |R$:. RR$."". 420|
00000380: 00 94 0B AE 01 8B 20 52 52 24 B2 22 47 22 20 A7 |...... RR$."G" .|
00000390: 20 34 38 30 00 A8 0B B8 01 8B 20 52 52 24 B2 22 | 480...... RR$."|
000003A0: 49 22 20 A7 20 36 37 30 00 B1 0B C2 01 89 34 32 |I" . 670......42|
000003B0: 30 00 B7 0B CC 01 3A 00 DA 0B D6 01 8F 2D 2D 2D |0.....:......---|
000003C0: 2D 2D 2D 2D 2D 2D 2D 47 45 54 23 2D 2D 2D 2D 2D |-------GET#-----|
000003D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 E9 0B E0 01 9F |----------......|
000003E0: 32 2C 38 2C 32 2C 46 49 24 00 FF 0B EA 01 84 31 |2,8,2,FI$......1|
000003F0: 35 2C 20 41 31 2C 41 32 24 2C 41 33 2C 41 34 00 |5, A1,A2$,A3,A4.|
00000400: 1A 0C F4 01 8B 20 41 31 B3 B1 30 20 A7 20 8D 20 |..... A1..0 . . |
00000410: 32 33 32 30 3A 89 20 33 35 30 00 23 0C FE 01 99 |2320:. 350.#....|
00000420: 22 93 22 00 4B 0C 08 02 99 3A 99 22 20 20 20 20 |".".K....:." |
00000430: 20 20 20 20 4C 45 45 52 54 41 53 54 45 20 44 52 | LEERTASTE DR|
00000440: 55 45 43 4B 45 4E 20 21 22 3A 99 00 71 0C 12 02 |UECKEN !":..q...|
00000450: 99 22 20 20 20 20 20 20 20 20 2D 2D 2D 2D 2D 2D |." ------|
00000460: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A |--------------":|
00000470: 99 00 7F 0C 1C 02 99 22 12 22 49 22 92 22 3B 00 |......."."I".";.|
00000480: 96 0C 26 02 A1 20 52 24 3A 8B 20 52 24 B3 B1 22 |..&.. R$:. R$.."|
00000490: 20 22 A7 35 35 30 00 A1 0C 30 02 A1 23 32 2C 41 | ".550...0..#2,A|
000004A0: 24 00 C1 0C 3A 02 8B 41 24 B2 C7 28 31 33 29 20 |$...:..A$..(13) |
000004B0: A7 20 99 22 2A 22 3A 49 B2 49 AA 31 3A 89 36 31 |. ."*":I.I.1:.61|
000004C0: 30 00 D6 0C 44 02 54 45 24 28 49 29 B2 54 45 24 |0...D.TE$(I).TE$|
000004D0: 28 49 29 AA 41 24 00 DF 0C 4E 02 99 41 24 3B 00 |(I).A$...N..A$;.|
000004E0: E9 0C 58 02 89 20 35 35 30 00 FC 0C 62 02 8B 20 |..X.. 550...b.. |
000004F0: 53 54 B3 B1 36 34 20 A7 20 35 34 30 00 04 0D 6C |ST..64 . 540...l|
00000500: 02 A0 20 32 00 0E 0D 76 02 49 B2 49 AB 31 00 17 |.. 2...v.I.I.1..|
00000510: 0D 80 02 89 38 30 30 00 1D 0D 8A 02 3A 00 23 0D |....800.....:.#.|
00000520: 94 02 3A 00 47 0D 9E 02 8F 20 2D 2D 2D 2D 2D 2D |..:.G.... ------|
00000530: 49 4E 50 55 54 23 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |INPUT# ---------|
00000540: 2D 2D 2D 2D 2D 2D 2D 00 57 0D A8 02 9F 20 32 2C |-------.W.... 2,|
00000550: 38 2C 32 2C 46 49 24 00 6D 0D B2 02 84 31 35 2C |8,2,FI$.m....15,|
00000560: 20 41 31 2C 41 32 24 2C 41 33 2C 41 34 00 88 0D | A1,A2$,A3,A4...|
00000570: BC 02 8B 20 41 31 B3 B1 30 20 A7 20 8D 20 32 33 |... A1..0 . . 23|
00000580: 32 30 3A 89 20 33 35 30 00 B0 0D C6 02 99 3A 99 |20:. 350......:.|
00000590: 22 20 20 20 20 20 20 20 20 4C 45 45 52 54 41 53 |" LEERTAS|
000005A0: 54 45 20 44 52 55 45 43 4B 45 4E 20 21 22 3A 99 |TE DRUECKEN !":.|
000005B0: 00 C8 0D D0 02 A1 20 52 24 3A 8B 20 52 24 B3 B1 |...... R$:. R$..|
000005C0: 22 20 22 A7 20 37 32 30 00 D2 0D DA 02 84 32 2C |" ". 720......2,|
000005D0: 41 24 00 E0 0D E4 02 54 45 24 28 49 29 B2 41 24 |A$.....TE$(I).A$|
000005E0: 00 F1 0D EE 02 99 20 22 12 22 49 22 92 22 3B 41 |...... "."I".";A|
000005F0: 24 00 0C 0E F8 02 8B 20 53 54 B3 B1 36 34 20 A7 |$...... ST..64 .|
00000600: 20 49 B2 49 AA 31 3A 89 20 37 32 30 00 13 0E 02 | I.I.1:. 720....|
00000610: 03 A0 32 00 19 0E 0C 03 3A 00 1F 0E 16 03 3A 00 |..2.....:.....:.|
00000620: 3F 0E 20 03 8F 2D 2D 2D 2D 2D 45 44 49 54 49 52 |?. ..-----EDITIR|
00000630: 45 4E 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |EN-------------.|
00000640: 45 0E 2A 03 3A 00 50 0E 34 03 46 4C 41 47 B2 30 |E.*.:.P.4.FLAG.0|
00000650: 00 79 0E 3E 03 99 22 20 C0 C0 C0 C0 C0 C0 C0 C0 |.y.>.." ........|
00000660: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000670: C0 C0 C0 C0 C0 C0 C0 C0 22 00 9D 0E 48 03 99 22 |........"...H.."|
00000680: 11 11 20 45 20 3D 20 45 49 4E 46 55 45 47 45 4E |.. E = EINFUEGEN|
00000690: 20 45 49 4E 45 52 20 5A 45 49 4C 45 22 00 C1 0E | EINER ZEILE"...|
000006A0: 52 03 99 22 11 20 20 43 20 3D 20 41 45 4E 44 45 |R..". C = AENDE|
000006B0: 52 4E 20 20 20 45 49 4E 45 52 20 5A 45 49 4C 45 |RN EINER ZEILE|
000006C0: 22 00 E5 0E 5C 03 99 22 11 20 20 4C 20 3D 20 4C |"...\..". L = L|
000006D0: 4F 45 53 43 48 45 4E 20 20 45 49 4E 45 52 20 5A |OESCHEN EINER Z|
000006E0: 45 49 4C 45 22 00 09 0F 66 03 99 22 11 20 20 44 |EILE"...f..". D|
000006F0: 20 3D 20 44 52 55 43 4B 45 4E 20 44 45 52 20 44 | = DRUCKEN DER D|
00000700: 41 54 45 49 20 20 20 20 22 00 1F 0F 70 03 99 22 |ATEI "...p.."|
00000710: 11 20 20 32 20 3D 20 57 45 49 54 45 52 20 22 00 |. 2 = WEITER ".|
00000720: 4F 0F 7A 03 99 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |O.z.."..........|
00000730: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000740: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 |..............".|
00000750: 5E 0F 84 03 99 22 11 57 41 45 48 4C 45 22 00 74 |^....".WAEHLE".t|
00000760: 0F 8E 03 A1 20 52 24 3A 8B 20 52 24 B2 22 22 A7 |.... R$:. R$."".|
00000770: 20 39 31 30 00 88 0F 98 03 8B 20 52 24 B2 22 45 | 910...... R$."E|
00000780: 22 A7 8D 20 31 34 37 30 00 9C 0F A2 03 8B 20 52 |".. 1470...... R|
00000790: 24 B2 22 43 22 A7 8D 20 31 30 33 30 00 B1 0F AC |$."C".. 1030....|
000007A0: 03 8B 20 52 24 B2 22 4C 22 A7 20 8D 20 31 36 32 |.. R$."L". . 162|
000007B0: 30 00 C6 0F B6 03 8B 20 52 24 B2 22 44 22 A7 20 |0...... R$."D". |
000007C0: 8D 20 31 37 33 30 00 D9 0F C0 03 8B 20 52 24 B2 |. 1730...... R$.|
000007D0: 22 32 22 A7 20 31 39 36 30 00 E3 0F CA 03 89 20 |"2". 1960...... |
000007E0: 38 30 30 00 E9 0F D4 03 3A 00 EF 0F DE 03 3A 00 |800.....:.....:.|
000007F0: 1F 10 F2 03 99 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |....."..........|
00000800: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000810: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 |..............".|
00000820: 25 10 FC 03 3A 00 41 10 06 04 99 22 93 41 45 4E |%...:.A....".AEN|
00000830: 44 45 52 4E 20 45 49 4E 45 52 20 5A 45 49 4C 45 |DERN EINER ZEILE|
00000840: 22 00 66 10 10 04 99 22 11 20 49 3D 20 4D 49 54 |".f....". I= MIT|
00000850: 20 49 4E 50 55 54 20 28 4B 45 49 4E 20 4B 4F 4D | INPUT (KEIN KOM|
00000860: 4D 41 20 21 29 22 00 95 10 1A 04 99 22 11 20 47 |MA !)"......". G|
00000870: 3D 20 4D 49 54 20 47 45 54 20 28 53 43 48 52 45 |= MIT GET (SCHRE|
00000880: 49 42 46 45 48 4C 45 52 20 56 45 52 4D 45 49 44 |IBFEHLER VERMEID|
00000890: 45 4E 21 29 22 00 A8 10 24 04 99 22 11 20 32 3D |EN!)"...$..". 2=|
000008A0: 20 57 45 49 54 45 52 22 00 D8 10 2E 04 99 22 C0 | WEITER"......".|
000008B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000008C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000008D0: C0 C0 C0 C0 C0 C0 C0 22 00 E8 10 38 04 99 22 11 |......."...8..".|
000008E0: 11 57 41 45 48 4C 45 22 00 FF 10 42 04 A1 20 52 |.WAEHLE"...B.. R|
000008F0: 24 3A 8B 20 52 24 B2 22 22 A7 20 31 30 39 30 00 |$:. R$."". 1090.|
00000900: 0F 11 4C 04 8B 20 52 24 B2 22 32 22 A7 20 8E 00 |..L.. R$."2". ..|
00000910: 22 11 56 04 8B 20 52 24 B2 22 47 22 A7 20 31 33 |".V.. R$."G". 13|
00000920: 30 30 00 35 11 60 04 8B 20 52 24 B2 22 49 22 A7 |00.5.`.. R$."I".|
00000930: 20 31 31 34 30 00 40 11 6A 04 89 20 31 30 33 30 | 1140.@.j.. 1030|
00000940: 00 63 11 74 04 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 49 |.c.t.. --------I|
00000950: 4E 50 55 54 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |NPUT------------|
00000960: 2D 2D 2D 00 77 11 7E 04 8B 20 46 4C 41 47 B2 31 |---.w.~.. FLAG.1|
00000970: 20 A7 20 31 32 32 30 00 A7 11 88 04 99 22 C0 C0 | . 1220......"..|
00000980: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000990: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000009A0: C0 C0 C0 C0 C0 C0 22 00 D2 11 92 04 99 22 57 45 |......"......"WE|
000009B0: 4C 43 48 45 20 5A 45 49 4C 45 20 53 4F 4C 4C 20 |LCHE ZEILE SOLL |
000009C0: 47 45 41 45 4E 44 45 52 54 20 57 45 52 44 45 4E |GEAENDERT WERDEN|
000009D0: 3F 22 00 E8 11 9C 04 85 22 4E 52 3A 22 3B 4E 24 |?"......"NR:";N$|
000009E0: 3A 4E B2 C5 28 4E 24 29 00 1C 12 A6 04 8B 4E B3 |:N..(N$)......N.|
000009F0: 31 B0 20 4E B1 49 20 A7 99 3A 99 20 A3 38 29 22 |1. N.I ..:. .8)"|
00000A00: 4E 49 43 48 54 20 4D 4F 45 47 4C 49 43 48 21 20 |NICHT MOEGLICH! |
00000A10: 22 3A 99 3A 99 3A 89 20 31 31 36 30 00 39 12 B0 |":.:.:. 1160.9..|
00000A20: 04 99 22 41 4C 54 45 52 20 49 4E 48 41 4C 54 3A |.."ALTER INHALT:|
00000A30: 20 12 22 54 45 24 28 4E 29 00 3F 12 BA 04 99 00 | ."TE$(N).?.....|
00000A40: 76 12 C4 04 99 22 11 20 47 45 42 45 4E 20 53 49 |v....". GEBEN SI|
00000A50: 45 20 4A 45 54 5A 54 20 44 45 4E 20 4E 45 55 45 |E JETZT DEN NEUE|
00000A60: 4E 20 49 4E 48 41 4C 54 20 45 49 4E 20 28 49 4E |N INHALT EIN (IN|
00000A70: 50 55 54 29 20 22 00 7F 12 CE 04 85 20 41 24 00 |PUT) "...... A$.|
00000A80: 8D 12 D8 04 54 45 24 28 4E 29 B2 41 24 00 9D 12 |....TE$(N).A$...|
00000A90: E2 04 99 22 11 12 22 54 45 24 28 4E 29 00 A8 12 |...".."TE$(N)...|
00000AA0: EC 04 46 4C 41 47 B2 30 00 AE 12 F6 04 8E 00 D0 |..FLAG.0........|
00000AB0: 12 00 05 8F 20 2D 2D 2D 2D 4D 49 54 20 47 45 54 |.... ----MIT GET|
00000AC0: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00000AD0: 00 00 13 0A 05 99 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 |......".........|
00000AE0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000AF0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 |..............."|
00000B00: 00 14 13 14 05 8B 20 46 4C 41 47 B2 31 20 A7 20 |...... FLAG.1 . |
00000B10: 31 33 33 30 00 3F 13 1E 05 99 22 57 45 4C 43 48 |1330.?...."WELCH|
00000B20: 45 20 5A 45 49 4C 45 20 53 4F 4C 4C 20 47 45 41 |E ZEILE SOLL GEA|
00000B30: 45 4E 44 45 52 54 20 57 45 52 44 45 4E 3F 22 00 |ENDERT WERDEN?".|
00000B40: 55 13 28 05 85 22 4E 52 3A 22 3B 4E 24 3A 4E B2 |U.(.."NR:";N$:N.|
00000B50: C5 28 4E 24 29 00 7B 13 32 05 99 22 41 4C 54 45 |.(N$).{.2.."ALTE|
00000B60: 52 20 49 4E 48 41 4C 54 20 22 3B 54 45 24 28 4E |R INHALT ";TE$(N|
00000B70: 29 3A 54 45 24 28 4E 29 B2 22 22 00 AB 13 3C 05 |):TE$(N).""...<.|
00000B80: 99 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |."..............|
00000B90: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000BA0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 E4 13 46 05 |.........."...F.|
00000BB0: 99 22 11 20 47 45 42 45 4E 20 53 49 45 20 4A 45 |.". GEBEN SIE JE|
00000BC0: 54 5A 54 20 44 45 4E 20 4E 45 55 45 4E 20 49 4E |TZT DEN NEUEN IN|
00000BD0: 48 41 4C 54 20 45 49 4E 20 28 47 45 54 29 3A 20 |HALT EIN (GET): |
00000BE0: 20 22 3A 99 00 FC 13 50 05 A1 20 41 24 3A 8B 20 | ":....P.. A$:. |
00000BF0: 41 24 B2 22 22 20 A7 20 31 33 36 30 00 12 14 5A |A$."" . 1360...Z|
00000C00: 05 8B 20 41 24 B2 C7 28 31 33 29 20 A7 20 31 34 |.. A$..(13) . 14|
00000C10: 32 30 00 1C 14 64 05 99 20 41 24 3B 00 31 14 6E |20...d.. A$;.1.n|
00000C20: 05 54 45 24 28 4E 29 B2 54 45 24 28 4E 29 AA 41 |.TE$(N).TE$(N).A|
00000C30: 24 00 3C 14 78 05 89 20 31 33 36 30 00 42 14 82 |$.<.x.. 1360.B..|
00000C40: 05 3A 00 48 14 8C 05 3A 00 58 14 96 05 99 22 11 |.:.H...:.X....".|
00000C50: 12 22 54 45 24 28 4E 29 00 63 14 A0 05 46 4C 41 |."TE$(N).c...FLA|
00000C60: 47 B2 30 00 69 14 AA 05 8E 00 6F 14 B4 05 3A 00 |G.0.i.....o...:.|
00000C70: 93 14 BE 05 8F 20 2D 2D 2D 2D 2D 2D 45 49 4E 46 |..... ------EINF|
00000C80: 55 45 47 45 4E 20 45 49 4E 45 52 20 5A 45 49 4C |UEGEN EINER ZEIL|
00000C90: 45 2D 2D 00 99 14 C8 05 3A 00 C9 14 D2 05 99 22 |E--.....:......"|
00000CA0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000CB0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000CC0: C0 C0 C0 C0 C0 C0 C0 C0 22 00 E5 14 DC 05 99 22 |........"......"|
00000CD0: 48 49 4E 54 45 52 20 57 45 4C 43 48 45 52 20 5A |HINTER WELCHER Z|
00000CE0: 45 49 4C 45 22 00 ED 14 E6 05 85 20 4E 00 F7 14 |EILE"...... N...|
00000CF0: F0 05 4E B2 4E AA 31 00 2E 15 FA 05 81 20 4C B2 |..N.N.1...... L.|
00000D00: 49 20 A4 20 4E 20 A9 AB 31 20 20 20 20 20 20 20 |I . N ..1 |
00000D10: 20 20 20 20 20 20 20 20 20 31 35 34 30 20 3A 54 | 1540 :T|
00000D20: 45 24 28 4C AA 31 29 B2 54 45 24 28 4C 29 00 65 |E$(L.1).TE$(L).e|
00000D30: 15 FB 05 81 20 4C B2 49 20 A4 20 4E 20 A9 AB 31 |.... L.I . N ..1|
00000D40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000D50: 31 35 34 31 20 3A 54 45 24 28 4C AA 31 29 B2 54 |1541 :TE$(L.1).T|
00000D60: 45 24 28 4C 29 00 6D 15 0E 06 82 20 4C 00 77 15 |E$(L).m.... L.w.|
00000D70: 18 06 49 B2 49 AA 31 00 82 15 22 06 46 4C 41 47 |..I.I.1...".FLAG|
00000D80: B2 31 00 A4 15 2C 06 99 22 53 43 48 52 45 49 42 |.1...,.."SCHREIB|
00000D90: 45 4E 20 44 45 52 20 4E 45 55 45 4E 20 5A 45 49 |EN DER NEUEN ZEI|
00000DA0: 4C 45 20 22 00 AF 15 36 06 89 20 31 30 34 30 00 |LE "...6.. 1040.|
00000DB0: B5 15 40 06 3A 00 BB 15 4A 06 3A 00 DE 15 54 06 |..@.:...J.:...T.|
00000DC0: 8F 2D 2D 2D 2D 2D 2D 2D 4C 4F 45 53 43 48 45 4E |.-------LOESCHEN|
00000DD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 E4 |--------------..|
00000DE0: 15 5E 06 3A 00 EC 15 68 06 99 3A 99 00 1C 16 72 |.^.:...h..:....r|
00000DF0: 06 99 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |..".............|
00000E00: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000E10: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 3D 16 7C |...........".=.||
00000E20: 06 85 22 20 57 45 4C 43 48 45 20 5A 45 49 4C 45 |.." WELCHE ZEILE|
00000E30: 20 4C 4F 45 53 43 48 45 4E 3F 22 3B 4E 00 5A 16 | LOESCHEN?";N.Z.|
00000E40: 86 06 8B 20 4E B1 49 20 A7 20 99 22 4D 41 58 3D |... N.I . ."MAX=|
00000E50: 20 22 49 3A 89 20 31 37 31 30 00 7A 16 90 06 81 | "I:. 1710.z....|
00000E60: 20 4C B2 4E 20 A4 20 49 3A 54 45 24 28 4C 29 B2 | L.N . I:TE$(L).|
00000E70: 54 45 24 28 4C AA 31 29 3A 82 00 84 16 9A 06 49 |TE$(L.1):......I|
00000E80: B2 49 AB 31 00 A2 16 A4 06 99 22 5A 45 49 4C 45 |.I.1......"ZEILE|
00000E90: 22 4E 22 20 49 53 54 20 47 45 4C 4F 45 53 43 48 |"N" IST GELOESCH|
00000EA0: 54 22 00 A8 16 AE 06 8E 00 AE 16 B8 06 3A 00 D2 |T"...........:..|
00000EB0: 16 C2 06 8F 20 2D 2D 2D 2D 2D 2D 44 52 55 43 4B |.... ------DRUCK|
00000EC0: 45 4E 20 44 45 52 20 44 41 54 45 49 20 2D 2D 2D |EN DER DATEI ---|
00000ED0: 2D 2D 00 D8 16 CC 06 99 00 0A 17 D6 06 99 22 C0 |--............".|
00000EE0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000EF0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000F00: C0 C0 C0 C0 C0 C0 C0 22 3A 99 00 24 17 E0 06 99 |.......":..$....|
00000F10: 22 44 52 55 43 4B 45 4E 20 44 45 52 20 44 41 54 |"DRUCKEN DER DAT|
00000F20: 45 49 20 22 00 38 17 EA 06 99 22 11 20 31 3D 20 |EI ".8....". 1= |
00000F30: 44 52 55 43 4B 45 4E 22 00 4B 17 F4 06 99 22 11 |DRUCKEN".K....".|
00000F40: 20 32 3D 20 57 45 49 54 45 52 22 00 5B 17 FE 06 | 2= WEITER".[...|
00000F50: 99 22 20 20 57 41 45 48 4C 45 22 00 72 17 08 07 |." WAEHLE".r...|
00000F60: A1 20 52 24 3A 8B 20 52 24 B2 22 22 A7 20 31 38 |. R$:. R$."". 18|
00000F70: 30 30 00 8D 17 12 07 8B 20 52 24 B3 22 31 22 B0 |00...... R$."1".|
00000F80: 20 52 24 B1 22 32 22 A7 20 31 38 30 30 00 A0 17 | R$."2". 1800...|
00000F90: 1C 07 8B 20 52 24 B2 22 32 22 A7 20 31 39 31 30 |... R$."2". 1910|
00000FA0: 00 B6 17 26 07 85 22 44 52 55 43 4B 45 52 20 4F |...&.."DRUCKER O|
00000FB0: 4B 3F 22 3B 52 24 00 C4 17 30 07 9F 20 31 2C 34 |K?";R$...0.. 1,4|
00000FC0: 3A 9D 20 31 00 D5 17 3A 07 99 22 44 41 54 45 49 |:. 1...:.."DATEI|
00000FD0: 3A 20 22 4E 24 00 E3 17 44 07 81 20 4A B2 31 20 |: "N$...D.. J.1 |
00000FE0: A4 20 49 00 F3 17 4E 07 3A 99 20 4A 3B 54 45 24 |. I...N.:. J;TE$|
00000FF0: 28 4A 29 00 FB 17 58 07 82 20 4A 00 07 18 62 07 |(J)...X.. J...b.|
00001000: 99 3A 99 3A 99 3A 99 00 12 18 6C 07 98 31 3A A0 |.:.:.:....l..1:.|
00001010: 20 31 00 18 18 80 07 3A 00 1E 18 8A 07 3A 00 42 | 1.....:.....:.B|
00001020: 18 94 07 8F 20 2D 2D 2D 2D 2D 53 50 45 49 43 48 |.... -----SPEICH|
00001030: 45 52 4E 20 44 45 52 20 44 41 54 45 49 20 2D 2D |ERN DER DATEI --|
00001040: 2D 2D 00 72 18 9E 07 99 22 C0 C0 C0 C0 C0 C0 C0 |--.r....".......|
00001050: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001060: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001070: C0 22 00 AB 18 A8 07 99 22 53 4F 4C 4C 20 44 45 |."......"SOLL DE|
00001080: 52 20 47 45 53 41 4D 54 45 20 54 45 58 54 20 45 |R GESAMTE TEXT E|
00001090: 52 4E 45 55 54 20 41 42 47 45 53 50 45 49 43 48 |RNEUT ABGESPEICH|
000010A0: 45 52 54 20 57 45 52 44 45 4E 22 00 BA 18 B2 07 |ERT WERDEN".....|
000010B0: 99 22 11 20 31 3D 20 4A 41 22 00 D3 18 BC 07 99 |.". 1= JA"......|
000010C0: 22 11 20 32 3D 20 50 52 4F 47 52 41 4D 4D 45 4E |". 2= PROGRAMMEN|
000010D0: 44 45 22 00 03 19 C6 07 99 22 C0 C0 C0 C0 C0 C0 |DE"......"......|
000010E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000010F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001100: C0 C0 22 00 13 19 D0 07 99 22 11 12 57 41 45 48 |.."......"..WAEH|
00001110: 4C 45 22 00 2A 19 DA 07 A1 20 52 24 3A 8B 20 52 |LE".*.... R$:. R|
00001120: 24 B2 22 22 A7 20 32 30 31 30 00 3B 19 E4 07 8B |$."". 2010.;....|
00001130: 20 52 24 B2 22 32 22 20 A7 20 8A 00 4F 19 EE 07 | R$."2" . ..O...|
00001140: 8B 20 52 24 B3 B1 22 31 22 A7 20 32 30 31 30 00 |. R$.."1". 2010.|
00001150: 55 19 F8 07 99 00 6E 19 02 08 99 22 57 45 4C 43 |U.....n...."WELC|
00001160: 48 45 52 20 44 41 54 45 49 4E 41 4D 45 22 00 77 |HER DATEINAME".w|
00001170: 19 0C 08 85 20 4E 24 00 89 19 16 08 46 49 24 B2 |.... N$.....FI$.|
00001180: 4E 24 AA 22 2C 53 2C 57 22 00 92 19 20 08 99 22 |N$.",S,W"... .."|
00001190: 93 22 00 A6 19 2A 08 A0 20 32 3A 9F 20 32 2C 38 |."...*.. 2:. 2,8|
000011A0: 2C 32 2C 46 49 24 00 BC 19 34 08 84 31 35 2C 20 |,2,FI$...4..15, |
000011B0: 41 31 2C 41 32 24 2C 41 33 2C 41 34 00 CE 19 3E |A1,A2$,A3,A4...>|
000011C0: 08 8B 20 41 31 B2 30 20 A7 20 32 32 30 30 00 EB |.. A1.0 . 2200..|
000011D0: 19 48 08 8B 20 41 31 B3 B1 36 33 20 A7 20 8D 20 |.H.. A1..63 . . |
000011E0: 32 33 32 30 3A 89 20 31 39 36 30 00 14 1A 52 08 |2320:. 1960...R.|
000011F0: 99 3A 99 22 20 44 45 52 20 4E 41 4D 45 20 22 4E |.:." DER NAME "N|
00001200: 24 22 20 45 58 49 53 54 49 45 52 54 20 53 43 48 |$" EXISTIERT SCH|
00001210: 4F 4E 21 22 00 45 1A 5C 08 99 3A 99 22 20 57 4F |ON!".E.\..:." WO|
00001220: 4C 4C 45 4E 20 53 49 45 20 44 49 45 53 45 20 44 |LLEN SIE DIESE D|
00001230: 41 54 45 49 20 55 45 42 45 52 53 43 48 52 45 49 |ATEI UEBERSCHREI|
00001240: 42 45 4E 3F 22 00 5D 1A 66 08 99 3A 99 22 20 57 |BEN?".].f..:." W|
00001250: 41 45 48 4C 45 20 28 4A 2F 4E 29 20 22 00 74 1A |AEHLE (J/N) ".t.|
00001260: 70 08 A1 20 52 24 3A 8B 20 52 24 B2 22 22 A7 20 |p.. R$:. R$."". |
00001270: 32 31 36 30 00 94 1A 7A 08 8B 20 52 24 B2 22 4A |2160...z.. R$."J|
00001280: 22 A7 20 4E 24 B2 22 40 3A 22 AA 4E 24 3A 89 20 |". N$."@:".N$:. |
00001290: 32 30 37 30 00 A8 1A 84 08 8B 20 52 24 B3 B1 22 |2070...... R$.."|
000012A0: 4E 22 A7 20 32 31 36 30 00 D6 1A 8E 08 99 3A 99 |N". 2160......:.|
000012B0: 22 20 56 45 52 53 55 43 48 45 4E 20 53 49 45 20 |" VERSUCHEN SIE |
000012C0: 45 53 20 4E 4F 43 48 20 45 49 4E 4D 41 4C 22 3A |ES NOCH EINMAL":|
000012D0: 89 20 31 39 36 30 00 E4 1A 98 08 81 20 4A B2 31 |. 1960...... J.1|
000012E0: 20 A4 20 49 00 FD 1A A2 08 3A 98 32 2C 54 45 24 | . I.....:.2,TE$|
000012F0: 28 4A 29 20 3A 99 22 13 11 22 4A 2C 49 00 05 1B |(J) :.".."J,I...|
00001300: AC 08 82 20 4A 00 0B 1B B6 08 3A 00 1F 1B C0 08 |... J.....:.....|
00001310: 99 22 47 45 53 50 45 49 43 48 45 52 54 21 22 00 |."GESPEICHERT!".|
00001320: 27 1B CA 08 A0 20 32 00 3A 1B D4 08 81 20 49 B2 |'.... 2.:.... I.|
00001330: 31 20 A4 20 31 35 30 30 3A 82 00 40 1B DE 08 8A |1 . 1500:..@....|
00001340: 00 46 1B E8 08 3A 00 4C 1B F2 08 3A 00 55 1B FC |.F...:.L...:.U..|
00001350: 08 99 22 93 22 00 87 1B 06 09 99 22 C0 C0 C0 C0 |.."."......"....|
00001360: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001370: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001380: C0 C0 C0 C0 11 11 22 00 B9 1B 10 09 99 22 C0 C0 |......"......"..|
00001390: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000013A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000013B0: C0 C0 C0 C0 C0 C0 11 11 22 00 E0 1B 1A 09 99 22 |........"......"|
000013C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 44 49 53 | DIS|
000013D0: 4B 45 54 54 45 4E 46 45 48 4C 45 52 21 11 11 22 |KETTENFEHLER!.."|
000013E0: 00 F5 1B 24 09 99 22 20 12 20 44 41 54 45 49 20 |...$.." . DATEI |
000013F0: 3A 20 22 4E 24 00 0B 1C 2E 09 99 22 92 22 3A 8F |: "N$......".":.|
00001400: 20 52 45 56 45 52 53 20 4F 46 46 00 1D 1C 38 09 | REVERS OFF...8.|
00001410: 99 41 31 2C 41 32 24 2C 41 33 3B 41 34 00 25 1C |.A1,A2$,A3;A4.%.|
00001420: 42 09 A0 20 32 00 54 1C 4C 09 99 22 11 11 20 20 |B.. 2.T.L..".. |
00001430: 20 20 20 20 20 42 45 48 45 42 45 4E 20 53 49 45 | BEHEBEN SIE|
00001440: 20 44 45 4E 20 46 45 48 4C 45 52 20 55 4E 44 20 | DEN FEHLER UND |
00001450: 20 20 20 22 00 83 1C 56 09 99 22 11 11 20 20 2E | "...V..".. .|
00001460: 2E 2E 2E 2E 2E 2E 2E 44 52 55 45 43 4B 45 4E 20 |.......DRUECKEN |
00001470: 53 49 45 20 3E 46 3C 20 2E 2E 2E 2E 2E 2E 2E 2E |SIE >F< ........|
00001480: 2E 2E 22 00 9D 1C 60 09 A1 20 52 24 3A 8B 20 52 |.."...`.. R$:. R|
00001490: 24 B3 B1 22 46 22 20 A7 20 32 34 30 30 00 A6 1C |$.."F" . 2400...|
000014A0: 6A 09 99 22 93 22 00 AC 1C 74 09 8E 00 00 00 |j.."."...t..... |
..$.D.. ------AENDERN EINER ZEILE --.H.N
..* EDIT SEQ-FILE *.L.X..*
*......* EDIT
IEREN VON SEQUENTIELLEN*......*
DATEIEN *.X....**************
****************... .:.....:...... TE$(9
00):. MAX ANZAHL DATENSATZ......15,8,15.
.H..".".P.R..".........................
...............".R....". LESEN UND
EDITIEREN"......". EINER SEQ. DAT
EI"......".. L = LESEN EINER DATEI".
W....". B = PROGRAMMENDE "......"..
......................................".
..... ".. WAEHLE:.".2.... R$:. R$."" . 2
80.K.".. R$."B". 2: 15:..^.,.. R$.."L
". 280.D.6.:...@..----LESEN EINER SEQ-FI
LE-----...J.:...T.:...^.I.1.G.H..".. WEL
CHE DATEI SOLL GELESEN WERDEN?"...R.."DA
TEINAME = ";N$...|.FI$.N$.",S,R". ....".
......................................."
.G....".. SOLL MIT GET ODER MIT INPUT".
H....". GELESEN WERDEN (G/I) ?"...... R
R$:. RR$."". 420...... RR$."G" . 480....
.. RR$."I" . 670...B..420...L.:.Z.V..---
-------GET#---------------......2,8,2,FI
$......15, A1,A2$,A3,A4...... A1..0 . .
2320:. 350.#....".".K....:." LEER
TASTE DRUECKEN !":..Q...." ------
--------------":......"."I".";...&.. R$
:. R$.." ".550...0..#2,A$.A.:..A$.G(13)
. ."*":I.I.1:.610.V.D.TE$(I).TE$(I).A$..
.N..A$;...X.. 550...B.. ST..64 . 540...L
. 2...V.I.I.1......800.....:.#...:.G...
. ------INPUT# ----------------.W.... 2,
8,2,FI$.M....15, A1,A2$,A3,A4...... A1..
0 . . 2320:. 350...F..:." LEERTAS
TE DRUECKEN !":..H.P.. R$:. R$.." ". 720
.R.Z..2,A$.....TE$(I).A$...... "."I".";A
$...... ST..64 . I.I.1:. 720..... 2.....
:.....:.?. ..-----EDITIREN-------------.
E.*.:.P.4.FLAG.0.Y.>.." ................
................"...H..".. E = EINFUEGEN
EINER ZEILE".A.R..". C = AENDERN EIN
ER ZEILE"...\..". L = LOESCHEN EINER Z
EILE"...F..". D = DRUCKEN DER DATEI
"...P..". 2 = WEITER ".O.Z.."..........
..............................".^....".W
AEHLE".T.... R$:. R$."". 910...... R$."E
".. 1470...... R$."C".. 1030...... R$."L
". . 1620.F.... R$."D". . 1730.Y.... R$.
"2". 1960...J.. 800...T.:.....:......"..
......................................".
%...:.A....".AENDERN EINER ZEILE".F...."
. I= MIT INPUT (KEIN KOMMA !)"......". G
= MIT GET (SCHREIBFEHLER VERMEIDEN!)"...
$..". 2= WEITER".X....".................
......................."...8.."..WAEHLE"
...B.. R$:. R$."". 1090...L.. R$."2". ..
".V.. R$."G". 1300.5.`.. R$."I". 1140.@.
J.. 1030.C.T.. --------INPUT------------
---.W.~.. FLAG.1 . 1220......"..........
..............................".R...."WE
LCHE ZEILE SOLL GEAENDERT WERDEN?"......
"NR:";N$:N.E(N$)......N.1. N.I ..:. .8)"
NICHT MOEGLICH! ":.:.:. 1160.9...."ALTER
INHALT: ."TE$(N).?.....V.D..". GEBEN SI
E JETZT DEN NEUEN INHALT EIN (INPUT) ".
.N.. A$...X.TE$(N).A$......".."TE$(N)...
..FLAG.0.......P.... ----MIT GET -------
--------......".........................
..............."...... FLAG.1 . 1330.?..
.."WELCHE ZEILE SOLL GEAENDERT WERDEN?".
U.(.."NR:";N$:N.E(N$).{.2.."ALTER INHALT
";TE$(N):TE$(N).""...<.."..............
.........................."...F..". GEBE
N SIE JETZT DEN NEUEN INHALT EIN (GET):
":....P.. A$:. A$."" . 1360...Z.. A$.G(
13) . 1420...D.. A$;.1.N.TE$(N).TE$(N).A
$.<.X.. 1360.B...:.H...:.X....".."TE$(N)
.C. .FLAG.0.I.....O...:...... ------EINF
UEGEN EINER ZEILE--...H.:.I.R.."........
................................"......"
HINTER WELCHER ZEILE"...... N.....N.N.1.
..... L.I . N ..1 1540 :T
E$(L.1).TE$(L).E.... L.I . N ..1
1541 :TE$(L.1).TE$(L).M.... L.W.
..I.I.1...".FLAG.1...,.."SCHREIBEN DER N
EUEN ZEILE "...6.. 1040...@.:...J.:...T.
.-------LOESCHEN--------------...^.:...H
..:....R..".............................
...........".=.|.." WELCHE ZEILE LOESCHE
N?";N.Z.... N.I . ."MAX= "I:. 1710.Z....
L.N . I:TE$(L).TE$(L.1):......I.I.1....
.."ZEILE"N" IST GELOESCHT"...........:.R
.B.. ------DRUCKEN DER DATEI -----.X.L..
...V..".................................
.......":..$...."DRUCKEN DER DATEI ".8..
..". 1= DRUCKEN".K....". 2= WEITER".[...
." WAEHLE".R.... R$:. R$."". 1800......
R$."1". R$."2". 1800. .... R$."2". 1910
...&.."DRUCKER OK?";R$.D.0.. 1,4:. 1.U.:
.."DATEI: "N$...D.. J.1 . I...N.:. J;TE$
(J)...X.. J...B..:.:.:....L..1: 1.....:
.....:.B.... -----SPEICHERN DER DATEI --
--.R...."...............................
........."......"SOLL DER GESAMTE TEXT E
RNEUT ABGESPEICHERT WERDEN"......". 1= J
A".S....". 2= PROGRAMMENDE"...F.."......
.................................."...P.
."..WAEHLE".*.Z.. R$:. R$."". 2010.;....
R$."2" . ..O.... R$.."1". 2010.U.....N.
..."WELCHER DATEINAME".W.... N$.....FI$.
N$.",S,W"... .."."...*. 2:. 2,8,2,FI$..
.4..15, A1,A2$,A3,A4.N.>.. A1.0 . 2200..
.H.. A1..63 . . 2320:. 1960...R..:." DER
NAME "N$" EXISTIERT SCHON!".E.\..:." WO
LLEN SIE DIESE DATEI UEBERSCHREIBEN?".].
F..:." WAEHLE (J/N) ".T.P.. R$:. R$."".
2160...Z.. R$."J". N$."@:".N$:. 2070....
.. R$.."N". 2160.V....:." VERSUCHEN SIE
ES NOCH EINMAL":. 1960...... J.1 . I....
.:.2,TE$(J) :.".."J,I...... J.....:.....
."GESPEICHERT!".'.J. 2.:.T.. I.1 . 1500
:..@.....F...:.L...:.U...."."......"....
......................................".
....."..................................
........"......" DISKETTENFE
HLER!.."...$.." . DATEI : "N$......".":.
REVERS OFF...8..A1,A2$,A3;A4.%.B. 2.T.
L..".. BEHEBEN SIE DEN FEHLER UND
"...V..".. ........DRUECKEN SIE >F<
.........."...`.. R$:. R$.."F" . 2400...
J.."."...T.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL