TEXTVERARBEITUNG
FILE INFORMATION
FILENAME(S): TEXTVERARBEITUNG
FILE TYPE(S): PRG
FILE SIZE: 2.9K
FIRST SEEN: 2025-10-20 14:26:14
APPEARS ON: 1 disk(s)
FILE HASH
b96cf1fba9041d5850447a214395ea81a931863d390a52663cee9f9524379cd1
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ARBEITSP | TEXTVERARBEITUNG | PRG | Treasure Chest - Katarakt | 3 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3D 08 64 00 86 20 54 24 28 33 32 29 3A 97 |..=.d.. T$(32):.| 00000010: 35 33 32 37 32 2C 32 33 3A 5A 24 B2 22 A0 A0 A0 |53272,23:Z$."...| 00000020: A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 |................| 00000030: A0 22 3A 54 24 B2 22 A0 A0 A0 A0 A0 22 00 71 08 |.":T$.".....".q.| 00000040: 6E 00 99 22 93 12 20 54 45 58 54 56 45 52 41 52 |n..".. TEXTVERAR| 00000050: 42 45 49 54 55 4E 47 20 92 20 20 20 20 22 B8 28 |BEITUNG . ".(| 00000060: 30 29 22 42 59 54 45 20 46 52 45 49 11 11 11 11 |0)"BYTE FREI....| 00000070: 11 00 96 08 78 00 99 22 57 4F 4C 4C 45 4E 20 53 |....x.."WOLLEN S| 00000080: 49 45 20 54 45 58 54 20 12 45 92 44 49 54 49 45 |IE TEXT .E.DITIE| 00000090: 52 45 4E 3F A0 22 00 B3 08 82 00 99 A6 31 35 29 |REN?.".......15)| 000000A0: 22 20 12 4C 92 41 44 45 4E 20 56 4F 4E 20 43 41 |" .L.ADEN VON CA| 000000B0: 53 53 2E 00 D4 08 8C 00 99 A6 31 35 29 22 20 12 |SS........15)" .| 000000C0: 53 92 50 45 49 43 48 45 52 4E 20 41 55 46 20 43 |S.PEICHERN AUF C| 000000D0: 41 53 53 2E 00 F2 08 96 00 99 A6 31 35 29 22 20 |ASS........15)" | 000000E0: 12 41 92 55 53 44 52 55 43 4B 45 4E 20 28 34 2C |.A.USDRUCKEN (4,| 000000F0: 34 29 00 11 09 A0 00 99 A6 31 35 29 22 20 12 42 |4).......15)" .B| 00000100: 92 49 4C 44 53 43 48 49 52 4D 41 55 53 47 41 42 |.ILDSCHIRMAUSGAB| 00000110: 45 00 51 09 AA 00 58 24 B2 22 20 20 20 20 20 20 |E.Q...X$." | 00000120: 20 20 20 20 4F 44 45 52 20 20 12 4E 92 45 55 45 | ODER .N.EUE| 00000130: 4E 20 54 45 58 54 20 45 49 4E 47 45 42 45 4E 22 |N TEXT EINGEBEN"| 00000140: 3A 8D 32 34 30 3A 8B 43 24 B2 22 45 22 89 36 33 |:.240:.C$."E".63| 00000150: 30 00 61 09 B4 00 8B 43 24 B2 22 4C 22 89 39 36 |0.a....C$."L".96| 00000160: 30 00 72 09 BE 00 8B 43 24 B2 22 53 22 89 31 30 |0.r....C$."S".10| 00000170: 34 30 00 82 09 C8 00 8B 43 24 B2 22 41 22 89 37 |40......C$."A".7| 00000180: 30 30 00 92 09 D2 00 8B 43 24 B2 22 4E 22 89 36 |00......C$."N".6| 00000190: 37 30 00 A3 09 DC 00 8B 43 24 B3 B1 22 42 22 89 |70......C$.."B".| 000001A0: 31 31 30 00 C6 09 E6 00 50 54 B2 30 3A 4C 4C B2 |110.....PT.0:LL.| 000001B0: 32 30 3A 4B B2 34 30 3A 4E B2 4B 3A 53 24 B2 22 |20:K.40:N.K:S$."| 000001C0: 22 3A 89 38 30 30 00 D7 09 F0 00 99 58 24 AA 22 |":.800......X$."| 000001D0: 3F 22 3A 89 32 36 30 00 F2 09 FA 00 99 22 11 12 |?":.260......"..| 000001E0: 20 4C 45 45 52 54 41 53 54 45 20 42 49 54 54 45 | LEERTASTE BITTE| 000001F0: 20 22 00 10 0A 04 01 97 31 39 38 2C 30 3A 92 31 | "......198,0:.1| 00000200: 39 38 2C 31 3A A1 43 24 3A 99 22 93 22 3B 3A 8E |98,1:.C$:.".";:.| 00000210: 00 30 0A 0E 01 58 24 B2 22 22 3A 4A B2 30 3A 8F |.0...X$."":J.0:.| 00000220: 20 2A 43 41 53 45 20 52 45 56 45 52 53 41 4C 2A | *CASE REVERSAL*| 00000230: 00 59 0A 18 01 A1 43 24 3A 8B 43 24 B2 22 22 A7 |.Y....C$:.C$."".| 00000240: 99 22 A6 22 C7 28 31 35 37 29 22 20 22 C7 28 31 |.".".(157)" ".(1| 00000250: 35 37 29 3B 3A 89 32 38 30 00 67 0A 22 01 8B 43 |57);:.280.g."..C| 00000260: 24 B2 22 5C 22 A7 8E 00 86 0A 2C 01 43 B2 C6 28 |$."\".....,.C..(| 00000270: 43 24 29 3A 8B 43 B1 36 34 AF 43 B3 39 31 A7 43 |C$):.C.64.C.91.C| 00000280: B2 43 AA 32 35 36 00 99 0A 36 01 8B 43 B1 31 32 |.C.256...6..C.12| 00000290: 37 A7 43 B2 43 AB 31 32 38 00 C9 0A 40 01 4C B2 |7.C.C.128...@.L.| 000002A0: C3 28 58 24 29 3A 8B 43 B2 31 33 B0 43 B2 31 37 |.(X$):.C.13.C.17| 000002B0: B0 43 B2 31 38 B0 43 B2 32 39 B0 28 43 B2 32 30 |.C.18.C.29.(C.20| 000002C0: AF 4C B2 30 29 89 32 38 30 00 D7 0A 4A 01 8B 43 |.L.0).280...J..C| 000002D0: B2 32 30 89 33 37 30 00 01 0B 54 01 43 24 B2 C7 |.20.370...T.C$..| 000002E0: 28 43 29 3A 99 43 24 3B 3A 58 24 B2 58 24 AA 43 |(C):.C$;:X$.X$.C| 000002F0: 24 3A 8B 43 B2 33 34 A7 99 43 24 22 9D 20 9D 22 |$:.C.34..C$". ."| 00000300: 3B 00 10 0B 5E 01 8B 4C B3 31 37 30 89 32 38 30 |;...^..L.170.280| 00000310: 00 16 0B 68 01 8E 00 2A 0B 72 01 8B 4C B2 31 A7 |...h...*.r..L.1.| 00000320: 58 24 B2 22 22 3A 89 33 39 30 00 3B 0B 7C 01 58 |X$."":.390.;.|.X| 00000330: 24 B2 C8 28 58 24 2C 4C AB 31 29 00 4B 0B 86 01 |$..(X$,L.1).K...| 00000340: 99 C7 28 43 29 3B 3A 89 32 38 30 00 62 0B 90 01 |..(C);:.280.b...| 00000350: 49 B2 30 3A 8F 20 45 44 49 54 49 45 52 4C 4F 47 |I.0:. EDITIERLOG| 00000360: 49 47 00 81 0B 9A 01 99 22 93 22 3A 8B 4B A7 99 |IG......".":.K..| 00000370: 22 91 12 22 C9 28 54 24 28 4B AB 31 29 2C 32 30 |"..".(T$(K.1),20| 00000380: 29 00 96 0B A4 01 99 3A 99 58 24 3A 4C 4C B2 C3 |)......:.X$:LL..| 00000390: 28 58 24 29 AB 31 00 BF 0B AE 01 A1 43 24 3A 4C |(X$).1......C$:L| 000003A0: B2 31 31 30 34 AA 49 3A 97 4C 2C C2 28 4C 29 AA |.1104.I:.L,.(L).| 000003B0: 31 32 38 3A 8B 43 24 B2 22 5E 22 89 35 37 30 00 |128:.C$."^".570.| 000003C0: D1 0B B8 01 8B 43 24 B2 22 1D 22 A7 49 B2 49 AA |.....C$.".".I.I.| 000003D0: 31 00 E9 0B C2 01 8B 43 24 B2 22 91 22 AF 49 B1 |1......C$.".".I.| 000003E0: 33 39 A7 49 B2 49 AB 34 30 00 FC 0B CC 01 8B 43 |39.I.I.40......C| 000003F0: 24 B2 22 11 22 A7 49 B2 49 AA 34 30 00 0C 0C D6 |$.".".I.I.40....| 00000400: 01 8B 43 24 B2 22 13 22 A7 49 B2 30 00 1B 0C E0 |..C$.".".I.0....| 00000410: 01 8B 43 24 B2 22 22 89 35 32 30 00 33 0C EA 01 |..C$."".520.3...| 00000420: 55 B2 C6 28 43 24 29 3A 8B 55 B2 31 33 A7 49 B2 |U..(C$):.U.13.I.| 00000430: 31 39 31 00 47 0C F4 01 8B 55 B2 32 30 A7 8D 35 |191.G....U.20..5| 00000440: 34 30 3A 89 34 31 30 00 62 0C FE 01 8B 43 24 B2 |40:.410.b....C$.| 00000450: 22 9D 22 A7 49 B2 49 AB 31 3A 8B 49 B3 30 A7 49 |".".I.I.1:.I.0.I| 00000460: B2 30 00 7A 0C 08 02 97 4C 2C C2 28 4C 29 AB 31 |.0.z....L,.(L).1| 00000470: 32 38 3A 8B 49 B1 4C 4C A7 8E 00 8D 0C 12 02 81 |28:.I.LL........| 00000480: 4A B2 30 A4 39 3A 82 4A 3A 89 34 33 30 00 A5 0C |J.0.9:.J:.430...| 00000490: 1C 02 4C 24 B2 22 22 3A 8B 49 A7 4C 24 B2 C8 28 |..L$."":.I.L$..(| 000004A0: 58 24 2C 49 29 00 C3 0C 26 02 52 24 B2 22 22 3A |X$,I)...&.R$."":| 000004B0: 8B 49 B3 4C 4C A7 52 24 B2 C9 28 58 24 2C 4C 4C |.I.LL.R$..(X$,LL| 000004C0: AB 49 29 00 D2 0C 30 02 58 24 B2 4C 24 AA 52 24 |.I)...0.X$.L$.R$| 000004D0: 3A 8E 00 E0 0C 3A 02 8D 35 34 30 3A 8D 32 37 30 |:....:..540:.270| 000004E0: 00 0C 0D 44 02 8B C3 28 4C 24 29 AA C3 28 58 24 |...D...(L$)..(X$| 000004F0: 29 AA C3 28 52 24 29 B3 31 37 31 A7 58 24 B2 4C |)..(R$).171.X$.L| 00000500: 24 AA 58 24 AA 52 24 3A 89 34 31 30 00 2E 0D 4E |$.X$.R$:.410...N| 00000510: 02 81 4A B2 33 32 A4 4B AA 32 A9 AB 31 3A 54 24 |..J.32.K.2..1:T$| 00000520: 28 4A 29 B2 54 24 28 4A AB 31 29 3A 82 4A 00 68 |(J).T$(J.1):.J.h| 00000530: 0D 58 02 4A B2 C3 28 52 24 29 AA C3 28 58 24 29 |.X.J..(R$)..(X$)| 00000540: AB 31 37 30 3A 8B 4A B1 30 A7 4C 24 B2 4C 24 AA |.170:.J.0.L$.L$.| 00000550: C8 28 58 24 2C 4A 29 3A 58 24 B2 C9 28 58 24 2C |.(X$,J):X$..(X$,| 00000560: C3 28 58 24 29 AB 4A 29 00 85 0D 62 02 54 24 28 |.(X$).J)...b.T$(| 00000570: 4B AA 31 29 B2 58 24 AA 52 24 3A 58 24 B2 4C 24 |K.1).X$.R$:X$.L$| 00000580: 3A 89 34 31 30 00 A0 0D 6C 02 97 31 2C 32 33 3A |:.410...l..1,23:| 00000590: 97 31 36 32 2C 30 3A 92 31 36 32 2C 31 36 3A 8E |.162,0:.162,16:.| 000005A0: 00 BD 0D 76 02 8F 20 2A 2A 20 45 44 49 54 49 45 |...v.. ** EDITIE| 000005B0: 52 20 50 52 4F 47 52 41 4D 4D 20 2A 2A 00 F3 0D |R PROGRAMM **...| 000005C0: 80 02 81 4B B2 30 A4 33 31 3A 8B 54 24 28 4B 29 |...K.0.31:.T$(K)| 000005D0: B1 B3 22 22 A7 58 24 B2 54 24 28 4B 29 3A 8D 34 |.."".X$.T$(K):.4| 000005E0: 30 30 3A 54 24 28 4B 29 B2 58 24 3A 82 4B 3A 89 |00:T$(K).X$:.K:.| 000005F0: 31 31 30 00 30 0E 8A 02 99 22 93 11 11 44 41 53 |110.0...."...DAS| 00000600: 20 49 53 54 20 44 41 53 20 45 4E 44 45 2E 22 3A | IST DAS ENDE.":| 00000610: 58 24 B2 22 11 46 45 52 54 49 47 20 3F 20 22 3A |X$.".FERTIG ? ":| 00000620: 8D 32 34 30 3A 8B 43 24 B2 22 4A 22 89 31 31 30 |.240:.C$."J".110| 00000630: 00 39 0E 94 02 89 36 38 30 00 5A 0E 9E 02 4B B2 |.9....680.Z...K.| 00000640: 30 3A 8F 20 2A 2A 20 53 43 48 52 45 49 42 20 50 |0:. ** SCHREIB P| 00000650: 52 4F 47 52 41 4D 4D 20 2A 2A 00 8E 0E A8 02 58 |ROGRAMM **.....X| 00000660: 24 B2 54 24 28 4B 29 3A 8D 32 37 30 3A 54 24 28 |$.T$(K):.270:T$(| 00000670: 4B 29 B2 58 24 3A 8B 43 24 B3 B1 22 5C 22 AF 4B |K).X$:.C$.."\".K| 00000680: B3 33 31 A7 4B B2 4B AA 31 3A 89 36 38 30 00 AD |.31.K.K.1:.680..| 00000690: 0E B2 02 81 4A B2 4B AA 31 A4 33 32 3A 54 24 28 |....J.K.1.32:T$(| 000006A0: 4A 29 B2 22 22 3A 82 4A 3A 89 31 31 30 00 C3 0E |J)."":.J:.110...| 000006B0: BC 02 8F 20 2A 2A 50 52 49 4E 54 20 4C 4F 47 49 |... **PRINT LOGI| 000006C0: 4B 2A 2A 00 EB 0E C6 02 58 24 B2 22 41 4E 5A 41 |K**.....X$."ANZA| 000006D0: 48 4C 20 4C 45 45 52 5A 45 49 43 48 45 4E 20 49 |HL LEERZEICHEN I| 000006E0: 4D 20 54 41 42 22 3A 8D 32 34 30 00 0D 0F D0 02 |M TAB":.240.....| 000006F0: 54 24 B2 22 A0 9D 22 3A 8B C5 28 43 24 29 A7 54 |T$."..":..(C$).T| 00000700: 24 B2 C8 28 5A 24 2C C5 28 43 24 29 29 00 4D 0F |$..(Z$,.(C$)).M.| 00000710: DA 02 50 54 B2 30 3A 58 24 B2 22 41 55 46 20 12 |..PT.0:X$."AUF .| 00000720: 42 92 49 4C 44 53 43 48 49 52 4D 20 4F 44 45 52 |B.ILDSCHIRM ODER| 00000730: 20 12 44 92 52 55 43 4B 45 52 22 3A 8D 32 34 30 | .D.RUCKER":.240| 00000740: 3A 8B 43 24 B2 22 44 22 A7 50 54 B2 31 00 85 0F |:.C$."D".PT.1...| 00000750: E4 02 44 53 B2 30 3A 58 24 B2 22 44 4F 50 50 45 |..DS.0:X$."DOPPE| 00000760: 4C 54 45 52 20 5A 45 49 4C 45 4E 41 42 53 54 41 |LTER ZEILENABSTA| 00000770: 4E 44 22 3A 8D 32 34 30 3A 8B 43 24 B2 22 59 22 |ND":.240:.C$."Y"| 00000780: A7 44 53 B2 31 00 A3 0F EE 02 4E B2 34 30 AC 28 |.DS.1.....N.40.(| 00000790: 31 AA 50 54 29 3A 8B 50 54 A7 9F 34 2C 34 3A 89 |1.PT):.PT..4,4:.| 000007A0: 37 37 30 00 C3 0F F8 02 85 22 57 49 45 56 49 45 |770......"WIEVIE| 000007B0: 4C 45 20 5A 45 49 4C 45 4E 2F 42 4C 41 54 54 22 |LE ZEILEN/BLATT"| 000007C0: 3B 4C 4C 00 EA 0F 02 03 85 22 11 57 49 45 20 56 |;LL......".WIE V| 000007D0: 49 45 4C 45 20 5A 45 49 43 48 45 4E 2F 5A 45 49 |IELE ZEICHEN/ZEI| 000007E0: 4C 45 22 3B 4B 3A 99 22 93 22 00 19 10 0C 03 4E |LE";K:.".".....N| 000007F0: B2 28 50 54 AA 31 29 AC 34 30 3A 8B 4B B1 4E A7 |.(PT.1).40:.K.N.| 00000800: 99 22 11 5A 55 20 56 49 4C 45 20 5A 45 49 43 48 |.".ZU VILE ZEICH| 00000810: 45 4E 11 22 3A 89 37 37 30 00 3B 10 16 03 53 24 |EN.":.770.;...S$| 00000820: B2 22 22 3A 8B 4B B3 4E AB 31 A7 53 24 B2 C8 28 |."":.K.N.1.S$..(| 00000830: 5A 24 2C 28 4E AB 4B 29 AD 32 29 00 62 10 20 03 |Z$,(N.K).2).b. .| 00000840: 54 46 B2 30 3A 4C B2 31 3A 58 24 B2 22 22 3A 81 |TF.0:L.1:X$."":.| 00000850: 4A B2 30 A4 33 31 3A 58 24 B2 58 24 AA 54 24 28 |J.0.31:X$.X$.T$(| 00000860: 4A 29 00 78 10 2A 03 8B 54 46 A7 58 24 B2 54 24 |J).x.*..TF.X$.T$| 00000870: AA 58 24 3A 54 46 B2 30 00 9E 10 34 03 4D B2 C3 |.X$:TF.0...4.M..| 00000880: 28 58 24 29 3A 8B C6 28 58 24 29 B2 33 32 A7 58 |(X$):..(X$).32.X| 00000890: 24 B2 CA 28 58 24 2C 32 29 3A 89 38 32 30 00 AF |$..(X$,2):.820..| 000008A0: 10 3E 03 8B 4A B3 33 31 AF 4D B3 4B A7 82 4A 00 |.>..J.31.M.K..J.| 000008B0: D3 10 48 03 81 55 B2 31 A4 4B 3A 8B CA 28 58 24 |..H..U.1.K:..(X$| 000008C0: 2C 55 2C 31 29 B2 22 5E 22 A7 54 46 B2 31 3A 89 |,U,1)."^".TF.1:.| 000008D0: 38 37 30 00 E9 10 52 03 82 55 3A 8B 4A B2 33 31 |870...R..U:.J.31| 000008E0: AF 4D B3 B2 4B 89 39 34 30 00 1E 11 5C 03 81 55 |.M..K.940...\..U| 000008F0: B2 4B A4 31 A9 AB 31 3A 8B CA 28 58 24 2C 55 2C |.K.1..1:..(X$,U,| 00000900: 31 29 B3 B1 22 20 22 A7 82 55 3A 99 22 93 11 12 |1).." "..U:."...| 00000910: 5A 55 20 57 45 4E 49 47 22 3A 89 37 37 30 00 3A |ZU WENIG":.770.:| 00000920: 11 66 03 4C 24 B2 22 22 3A 8B 55 B1 31 A7 4C 24 |.f.L$."":.U.1.L$| 00000930: B2 C8 28 58 24 2C 55 AB 31 29 00 56 11 70 03 52 |..(X$,U.1).V.p.R| 00000940: 24 B2 22 22 3A 8B 55 B3 4D A7 52 24 B2 C9 28 58 |$."":.U.M.R$..(X| 00000950: 24 2C 4D AB 55 29 00 71 11 7A 03 8B 44 53 AF 28 |$,M.U).q.z..DS.(| 00000960: 50 54 B2 30 29 A7 4C 24 B2 4C 24 AA C7 28 31 33 |PT.0).L$.L$..(13| 00000970: 29 00 88 11 84 03 8B 44 53 AF 50 54 A7 4C 24 B2 |)......DS.PT.L$.| 00000980: 4C 24 AA C7 28 31 32 29 00 A9 11 8E 03 58 24 B2 |L$..(12).....X$.| 00000990: 52 24 3A 8B 50 54 A7 98 34 2C C7 28 31 35 29 53 |R$:.PT..4,.(15)S| 000009A0: 24 AA 4C 24 3A 89 38 31 30 00 CC 11 98 03 99 53 |$.L$:.810......S| 000009B0: 24 AA 4C 24 3A 4C B2 4C AA 31 AA 44 53 3A 8B 4C |$.L$:L.L.1.DS:.L| 000009C0: B1 4C 4C A7 4C B2 31 3A 8D 32 35 30 00 D5 11 A2 |.LL.L.1:.250....| 000009D0: 03 89 38 31 30 00 F3 11 AC 03 8B 50 54 A7 98 34 |..810......PT..4| 000009E0: 2C C7 28 31 35 29 53 24 AA 58 24 3A A0 34 3A 89 |,.(15)S$.X$:.4:.| 000009F0: 31 31 30 00 08 12 B6 03 99 53 24 AA 58 24 3A 8D |110......S$.X$:.| 00000A00: 32 35 30 3A 89 31 31 30 00 0F 12 C0 03 9F 31 00 |250:.110......1.| 00000A10: 17 12 CA 03 4A B2 30 00 25 12 D4 03 49 B2 30 3A |....J.0.%...I.0:| 00000A20: 41 24 B2 22 22 00 45 12 DE 03 A1 23 31 2C 43 24 |A$."".E....#1,C$| 00000A30: 3A 8B 43 24 B2 22 5C 22 A7 20 43 24 B2 22 22 3A |:.C$."\". C$."":| 00000A40: 89 31 30 32 32 00 58 12 E8 03 41 24 B2 41 24 AA |.1022.X...A$.A$.| 00000A50: 43 24 3A 49 B2 49 AA 31 00 78 12 F2 03 8B 20 49 |C$:I.I.1.x.... I| 00000A60: B2 33 32 20 A7 54 24 28 4A 29 B2 41 24 3A 4A B2 |.32 .T$(J).A$:J.| 00000A70: 4A AA 31 3A 89 39 38 30 00 82 12 FC 03 89 20 39 |J.1:.980...... 9| 00000A80: 39 30 00 95 12 FE 03 41 24 B2 41 24 AA 43 24 3A |90.....A$.A$.C$:| 00000A90: 49 B2 49 AA 31 00 A2 12 00 04 54 24 28 4A 29 B2 |I.I.1.....T$(J).| 00000AA0: 41 24 00 B0 12 06 04 A0 20 31 3A 89 20 31 31 30 |A$...... 1:. 110| 00000AB0: 00 CC 12 0B 04 8F 20 20 20 20 5A 24 3D 4D 49 44 |...... Z$=MID| 00000AC0: 24 28 54 24 28 4A 29 2C 5A 2C 31 29 00 0D 13 10 |$(T$(J),Z,1)....| 00000AD0: 04 85 22 42 45 4C 49 45 42 49 47 45 4E 20 46 49 |.."BELIEBIGEN FI| 00000AE0: 4C 45 4E 41 4D 45 4E 20 28 4D 41 58 20 35 20 42 |LENAMEN (MAX 5 B| 00000AF0: 55 43 48 53 54 29 20 20 20 20 20 42 49 54 54 45 |UCHST) BITTE| 00000B00: 20 45 49 4E 47 45 42 45 4E 22 3B 4C 24 00 1C 13 | EINGEBEN";L$...| 00000B10: 1A 04 9F 20 31 2C 31 2C 31 2C 4C 24 00 2B 13 24 |... 1,1,1,L$.+.$| 00000B20: 04 81 20 49 B2 30 20 A4 20 33 32 00 42 13 2E 04 |.. I.0 . 32.B...| 00000B30: 8B 20 54 24 28 49 29 B2 22 22 A7 20 89 20 31 31 |. T$(I)."". . 11| 00000B40: 30 30 00 50 13 38 04 98 31 2C 54 24 28 49 29 3B |00.P.8..1,T$(I);| 00000B50: 00 58 13 42 04 82 20 49 00 67 13 4C 04 98 31 2C |.X.B.. I.g.L..1,| 00000B60: 22 5C 22 3A A0 20 31 00 71 13 56 04 89 20 31 31 |"\":. 1.q.V.. 11| 00000B70: 30 00 00 00 60 04 4B 45 59 20 54 4F 20 43 4F 4E |0...`.KEY TO CON| 00000B80: 54 49 4E 55 45 22 00 4D 0B 3C 23 A1 20 58 24 00 |TINUE".M.<#. X$.| 00000B90: 5F 0B 46 23 8B 20 58 24 B2 22 22 20 89 39 30 32 |_.F#. X$."" .902| 00000BA0: 30 00 6F 0B 50 23 99 C7 28 31 34 37 29 3A 99 3A |0.o.P#..(147):.:| 00000BB0: 8E 00 00 00 24 |....$ |
..=.D.. T$(32):.53272,23:Z$."
":T$." ".Q.N..".. TEXTVERAR
BEITUNG . ".(0)"BYTE FREI........X.."
WOLLEN SIE TEXT .E.DITIEREN? ".......15)
" .L.ADEN VON CASS..T.....15)" .S.PEICHE
RN AUF CASS........15)" .A.USDRUCKEN (4,
4)... ...15)" .B.ILDSCHIRMAUSGABE.Q...X$
." ODER .N.EUEN TEXT EINGEBEN"
:.240:.C$."E".630.A....C$."L".960.R....C
$."S".1040...H..C$."A".700...R..C$."N".6
70......C$.."B".110.F...PT.0:LL.20:K.40:
N.K:S$."":.800.W....X$."?":.260......"..
LEERTASTE BITTE "......198,0:.198,1:.C$
:.".";:..0...X$."":J.0:. *CASE REVERSAL*
.Y....C$:.C$."".."."G(157)" "G(157);:.28
0.G."..C$."\".....,.C.F(C$):.C.64.C.91.C
.C.256...6..C.127.C.C.128.I.@.L.C(X$):.C
.13.C.17.C.18.C.29.(C.20.L.0).280.W.J..C
.20.370...T.C$.G(C):.C$;:X$.X$.C$:.C.34.
.C$". .";...^..L.170.280...H...*.R..L.1.
X$."":.390.;.|.X$.H(X$,L.1).K....G(C);:.
280.B...I.0:. EDITIERLOGIG......".":.K..
".."I(T$(K.1),20)......:.X$:LL.C(X$).1..
....C$:L.1104.I:.L,B(L).128:.C$."^".570.
Q....C$.".".I.I.1...B..C$.".".I.39.I.I.4
0...L..C$.".".I.I.40...V..C$.".".I.0....
..C$."".520.3...U.F(C$):.U.13.I.191.G...
.U.20..540:.410.B....C$.".".I.I.1:.I.0.I
.0.Z....L,B(L).128:.I.LL........J.0.9:.J
:.430.....L$."":.I.L$.H(X$,I).C.&.R$."":
.I.LL.R$.I(X$,LL.I).R.0.X$.L$.R$:....:..
540:.270...D..C(L$).C(X$).C(R$).171.X$.L
$.X$.R$:.410...N..J.32.K.2..1:T$(J).T$(J
.1):.J.H.X.J.C(R$).C(X$).170:.J.0.L$.L$.
H(X$,J):X$.I(X$,C(X$).J)...B.T$(K.1).X$.
R$:X$.L$:.410. .L..1,23:.162,0:.162,16:.
...V.. ** EDITIER PROGRAMM **......K.0.3
1:.T$(K).."".X$.T$(K):.400:T$(K).X$:.K:.
110.0...."...DAS IST DAS ENDE.":X$.".FER
TIG ? ":.240:.C$."J".110.9....680.Z...K.
0:. ** SCHREIB PROGRAMM **.....X$.T$(K):
.270:T$(K).X$:.C$.."\".K.31.K.K.1:.680..
....J.K.1.32:T$(J)."":.J:.110.C.... **PR
INT LOGIK**...F.X$."ANZAHL LEERZEICHEN I
M TAB":.240...P.T$." .":.E(C$).T$.H(Z$,E
(C$)).M.Z.PT.0:X$."AUF .B.ILDSCHIRM ODER
.D.RUCKER":.240:.C$."D".PT.1.....DS.0:X
$."DOPPELTER ZEILENABSTAND":.240:.C$."Y"
.DS.1.....N.40.(1.PT):.PT..4,4:.770.C...
."WIEVIELE ZEILEN/BLATT";LL......".WIE V
IELE ZEICHEN/ZEILE";K:.".".....N.(PT.1).
40:.K.N..".ZU VILE ZEICHEN.":.770.;...S$
."":.K.N.1.S$.H(Z$,(N.K).2).B. .TF.0:L.1
:X$."":.J.0.31:X$.X$.T$(J).X.*..TF.X$.T$
.X$:TF.0...4.M.C(X$):.F(X$).32.X$.J(X$,2
):.820...>..J.31.M.K..J.S.H..U.1.K:.J(X$
,U,1)."^".TF.1:.870...R..U:.J.31.M..K.94
0...\..U.K.1..1:.J(X$,U,1).." "..U:."...
ZU WENIG":.770.:.F.L$."":.U.1.L$.H(X$,U.
1).V.P.R$."":.U.M.R$.I(X$,M.U).Q.Z..DS.(
PT.0).L$.L$.G(13)......DS.PT.L$.L$.G(12)
.....X$.R$:.PT..4,G(15)S$.L$:.810.L....S
$.L$:L.L.1.DS:.L.LL.L.1:.250.U....810...
...PT..4,G(15)S$.X$: 4:.110......S$.X$:.
250:.110......1...J.J.0.%.T.I.0:A$."".E.
...#1,C$:.C$."\". C$."":.1022.X...A$.A$.
C$:I.I.1.X.... I.32 .T$(J).A$:J.J.1:.980
...... 990.....A$.A$.C$:I.I.1.....T$(J).
A$..... 1:. 110.L.... Z$=MID$(T$(J),
Z,1)......"BELIEBIGEN FILENAMEN (MAX 5 B
UCHST) BITTE EINGEBEN";L$...... 1,1,
1,L$.+.$.. I.0 . 32.B.... T$(I)."". . 11
00.P.8..1,T$(I);.X.B.. I.G.L..1,"\": 1.
Q.V.. 110...`.KEY TO CONTINUE".M.<#. X$.
_.F#. X$."" .9020.O.P#.G(147):.:....$
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL