DISK MENUE
FILE INFORMATION
FILENAME(S): DISK MENUE
FILE TYPE(S): PRG
FILE SIZE: 2.6K
FIRST SEEN: 2025-12-01 13:57:30
APPEARS ON: 1 disk(s)
FILE HASH
3034fb5393800e4071be1b8f2f3d06fcbd736c98fc0ad96a46b5bfed83892506
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ANWENDER 59 1 | DISK MENUE | PRG | HOL2001, Misc | 1 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 10 07 10 0A 00 8F 00 25 10 0B 00 F9 31 2C 22 |........%....1,"| 00000010: 53 43 4E 43 4C 52 3A 47 4F 54 4F 33 36 30 22 AA |SCNCLR:GOTO360".| 00000020: C7 28 31 33 29 00 4D 10 0C 00 F9 32 2C 22 53 43 |.(13).M....2,"SC| 00000030: 4E 43 4C 52 3A 43 31 3D 30 3A 43 32 3D 30 3A 47 |NCLR:C1=0:C2=0:G| 00000040: 4F 54 4F 33 36 30 22 AA C7 28 31 33 29 00 62 10 |OTO360"..(13).b.| 00000050: 14 00 83 20 20 20 20 20 44 49 53 4B 2D 4D 45 4E |... DISK-MEN| 00000060: 55 45 00 77 10 28 00 8F 20 56 4F 52 42 45 53 45 |UE.w.(.. VORBESE| 00000070: 54 5A 55 4E 47 45 4E 00 8D 10 32 00 E7 31 2C 31 |TZUNGEN...2..1,1| 00000080: 3A E7 30 2C 32 3A E7 34 2C 37 3A DB 35 00 B4 10 |:.0,2:.4,7:.5...| 00000090: 3C 00 4C 24 B2 22 20 20 20 20 20 20 20 20 20 20 |<.L$." | 000000A0: 20 20 20 20 20 20 20 20 20 20 22 3A 4C 24 B2 4C | ":L$.L| 000000B0: 24 AA 4C 24 00 CB 10 46 00 43 24 B2 C7 28 33 34 |$.L$...F.C$..(34| 000000C0: 29 3A 86 20 50 24 28 31 34 34 29 00 ED 10 50 00 |):. P$(144)...P.| 000000D0: 53 24 B2 22 24 2A 22 3A 8F 20 53 45 4C 45 4B 54 |S$."$*":. SELEKT| 000000E0: 49 4F 4E 53 4B 52 49 54 45 52 49 55 4D 00 04 11 |IONSKRITERIUM...| 000000F0: 5A 00 9F 31 2C 38 2C 30 2C 53 24 3A 8B 20 53 54 |Z..1,8,0,S$:. ST| 00000100: 20 A7 20 80 00 0A 11 64 00 3A 00 1E 11 6E 00 8F | . ....d.:...n..| 00000110: 20 42 49 4C 44 53 43 48 49 52 4D 20 20 49 00 38 | BILDSCHIRM I.8| 00000120: 11 78 00 99 22 93 12 22 3B 4C 24 3B 4C 24 3B 4C |.x.."..";L$;L$;L| 00000130: 24 3B 4C 24 3B 4C 24 3B 00 4A 11 82 00 87 41 24 |$;L$;L$;.J....A$| 00000140: 3A E0 2C 31 35 2C 31 2C 41 24 00 69 11 96 00 E0 |:.,15,1,A$.i....| 00000150: 2C 30 2C 32 32 2C C7 28 32 37 29 AA 22 4D 12 22 |,0,22,.(27)."M."| 00000160: AA 4C 24 AA 4C 24 AA 4C 24 00 8E 11 A0 00 E0 2C |.L$.L$.L$......,| 00000170: 31 34 2C 32 33 2C 22 42 49 54 54 45 20 57 41 52 |14,23,"BITTE WAR| 00000180: 54 45 4E 22 AA C7 28 32 37 29 AA 22 4C 22 00 B3 |TEN"..(27)."L"..| 00000190: 11 AA 00 E0 2C 39 2C 31 32 2C 22 92 44 49 52 45 |....,9,12,".DIRE| 000001A0: 43 54 4F 52 59 20 57 49 52 44 20 47 45 4C 45 53 |CTORY WIRD GELES| 000001B0: 45 4E 22 00 B9 11 B4 00 3A 00 CD 11 BE 00 8F 20 |EN".....:...... | 000001C0: 52 45 41 44 20 44 49 53 4B 4E 41 4D 45 00 E2 11 |READ DISKNAME...| 000001D0: C8 00 EB FC 46 24 B2 43 24 3A A1 23 31 2C 46 24 |....F$.C$:.#1,F$| 000001E0: 3A EC 00 00 12 D2 00 EB FC 41 24 B2 22 22 3A A1 |:........A$."":.| 000001F0: 23 31 2C 41 24 3A 46 24 B2 46 24 AA 41 24 3A EC |#1,A$:F$.F$.A$:.| 00000200: 00 21 12 DC 00 E0 2C 31 30 2C 33 2C 22 12 22 AA |.!....,10,3,".".| 00000210: C8 28 46 24 2C 32 31 29 3A 50 24 28 30 29 B2 46 |.(F$,21):P$(0).F| 00000220: 24 00 27 12 E6 00 3A 00 3B 12 F0 00 8F 20 52 45 |$.'...:.;.... RE| 00000230: 41 44 20 46 49 4C 45 4E 41 4D 45 00 43 12 FA 00 |AD FILENAME.C...| 00000240: 49 B2 30 00 49 12 04 01 EB 00 5D 12 0E 01 A1 23 |I.0.I.....]....#| 00000250: 31 2C 41 24 2C 41 24 2C 41 24 2C 41 24 00 6E 12 |1,A$,A$,A$,A$.n.| 00000260: 18 01 46 24 B2 22 22 3A 41 24 B2 22 20 22 00 86 |..F$."":A$." "..| 00000270: 12 22 01 EB FC 46 24 B2 43 24 3A A1 23 31 2C 46 |."...F$.C$:.#1,F| 00000280: 24 3A EC FC 53 54 00 90 12 2C 01 8B 53 54 A7 ED |$:..ST...,..ST..| 00000290: 00 AE 12 36 01 EB FC 41 24 B2 22 22 3A A1 23 31 |...6...A$."":.#1| 000002A0: 2C 41 24 3A 46 24 B2 46 24 AA 41 24 3A EC 00 C1 |,A$:F$.F$.A$:...| 000002B0: 12 40 01 49 B2 49 AA 31 3A 50 24 28 49 29 B2 46 |.@.I.I.1:P$(I).F| 000002C0: 24 00 C7 12 4A 01 EC 00 CE 12 54 01 A0 31 00 D4 |$...J.....T..1..| 000002D0: 12 5E 01 3A 00 E8 12 68 01 8F 20 42 49 4C 44 53 |.^.:...h.. BILDS| 000002E0: 43 48 49 52 4D 20 49 49 00 00 13 72 01 E0 2C 31 |CHIRM II...r..,1| 000002F0: 2C 31 32 2C 22 92 22 AA C8 28 4C 24 2C 33 35 29 |,12,"."..(L$,35)| 00000300: 00 2E 13 7C 01 E0 2C 35 2C 32 33 2C 22 12 57 41 |...|..,5,23,".WA| 00000310: 45 48 4C 45 20 50 52 4F 47 52 41 4D 4D 20 2A 20 |EHLE PROGRAMM * | 00000320: 57 45 49 54 45 52 3D 92 54 41 53 54 45 22 00 5B |WEITER=.TASTE".[| 00000330: 13 81 01 E0 2C 35 2C 32 34 2C 22 12 52 45 4E 41 |....,5,24,".RENA| 00000340: 4D 45 3D 52 20 20 20 20 20 20 20 20 2A 20 53 43 |ME=R * SC| 00000350: 52 41 54 43 48 20 3D 20 53 92 22 00 67 13 86 01 |RATCH = S.".g...| 00000360: 81 20 4A B2 31 A4 38 00 7F 13 90 01 E0 2C 35 2C |. J.1.8......,5,| 00000370: 4A AC 32 AA 34 2C C9 28 C4 28 4A 29 2C 31 29 00 |J.2.4,.(.(J),1).| 00000380: 85 13 9A 01 82 00 8B 13 A4 01 3A 00 A2 13 AE 01 |..........:.....| 00000390: 8F 20 41 52 52 41 59 20 41 55 46 46 55 45 4C 4C |. ARRAY AUFFUELL| 000003A0: 45 4E 00 B7 13 B8 01 4A B2 B5 28 28 49 AB 30 2E |EN.....J..((I.0.| 000003B0: 35 29 AD 38 29 AA 31 00 CB 13 C2 01 81 20 4B 20 |5).8).1...... K | 000003C0: B2 20 49 AA 31 A4 28 4A 29 AC 38 00 DE 13 CC 01 |. I.1.(J).8.....| 000003D0: 50 24 28 4B 29 B2 C8 28 4C 24 2C 32 35 29 00 E6 |P$(K)..(L$,25)..| 000003E0: 13 D6 01 82 20 4B 00 EC 13 E0 01 3A 00 01 14 EA |.... K.....:....| 000003F0: 01 8F 20 46 49 4C 45 53 20 41 4E 5A 45 49 47 45 |.. FILES ANZEIGE| 00000400: 4E 00 07 14 F4 01 EB 00 16 14 FE 01 81 20 4B 20 |N............ K | 00000410: B2 20 31 A4 20 4A 00 25 14 08 02 81 20 4C 20 B2 |. 1. J.%.... L .| 00000420: 20 31 A4 20 38 00 41 14 12 02 E0 2C 39 2C 4C AC | 1. 8.A....,9,L.| 00000430: 32 AA 34 2C 50 24 28 28 4B AB 31 29 AC 38 AA 4C |2.4,P$((K.1).8.L| 00000440: 29 00 52 14 1C 02 82 4C 3A DA 31 2C 36 30 30 2C |).R....L:.1,600,| 00000450: 31 30 00 5B 14 26 02 A1 F9 41 24 00 6B 14 2B 02 |10.[.&...A$.k.+.| 00000460: 8B 41 24 B2 22 52 22 A7 39 30 30 00 7C 14 2C 02 |.A$."R".900.|.,.| 00000470: 8B 41 24 B2 22 53 22 A7 31 30 30 30 00 94 14 30 |.A$."S".1000...0| 00000480: 02 8B 20 41 24 B1 22 30 22 AF 20 41 24 B3 22 39 |.. A$."0". A$."9| 00000490: 22 A7 20 ED 00 9C 14 3A 02 82 20 4B 00 A2 14 44 |". ....:.. K...D| 000004A0: 02 EC 00 B6 14 4E 02 41 B2 28 4B AB 31 29 AC 38 |.....N.A.(K.1).8| 000004B0: AA C5 28 41 24 29 00 C5 14 58 02 8B 20 41 B1 49 |..(A$)...X.. A.I| 000004C0: A7 20 35 30 30 00 D3 14 62 02 8B 43 31 B2 31 A7 |. 500...b..C1.1.| 000004D0: 39 32 30 00 E2 14 64 02 8B 43 32 B2 31 A7 31 30 |920...d..C2.1.10| 000004E0: 32 30 00 F7 14 6C 02 8F 20 42 49 4C 44 53 43 48 |20...l.. BILDSCH| 000004F0: 49 52 4D 20 49 49 49 00 0D 15 76 02 99 22 93 13 |IRM III...v.."..| 00000500: 22 3A E7 30 2C 31 35 3A E7 34 2C 31 35 00 25 15 |":.0,15:.4,15.%.| 00000510: 94 02 46 24 B2 C8 28 50 24 28 41 29 2C 31 38 29 |..F$..(P$(A),18)| 00000520: 3A 8D 37 38 30 00 40 15 9E 02 E0 2C 31 30 2C 31 |:.780.@....,10,1| 00000530: 34 2C 22 50 52 4F 47 52 41 4D 4D 20 22 AA 46 24 |4,"PROGRAMM ".F$| 00000540: 00 5B 15 A8 02 E0 2C 31 33 2C 31 35 2C 22 57 49 |.[....,13,15,"WI| 00000550: 52 44 20 47 45 4C 41 44 45 4E 22 00 61 15 B2 02 |RD GELADEN".a...| 00000560: 3A 00 7A 15 BC 02 8F 20 4C 4F 41 44 20 28 44 49 |:.z.... LOAD (DI| 00000570: 52 45 4B 54 4D 4F 44 55 53 29 00 84 15 C6 02 E7 |REKTMODUS)......| 00000580: 31 2C 31 35 00 94 15 D0 02 E0 2C 30 2C 30 2C 22 |1,15......,0,0,"| 00000590: 4E 45 57 22 00 B0 15 DA 02 E0 2C 30 2C 33 2C 22 |NEW"......,0,3,"| 000005A0: 4C 4F 41 44 22 AA 46 24 AA 22 2C 38 22 AA 4D 24 |LOAD".F$.",8".M$| 000005B0: 00 D3 15 E4 02 42 24 B2 22 43 4F 4C 4F 52 30 2C |.....B$."COLOR0,| 000005C0: 32 3A 50 52 49 4E 54 22 AA 43 24 AA 22 93 90 22 |2:PRINT".C$.".."| 000005D0: AA 43 24 00 E8 15 EE 02 E0 2C 30 2C 38 2C 42 24 |.C$......,0,8,B$| 000005E0: AA 53 54 24 AA 4D 42 24 00 05 16 F8 02 97 32 33 |.ST$.MB$......23| 000005F0: 39 2C 34 3A 97 31 33 31 39 2C 31 39 3A 97 31 33 |9,4:.1319,19:.13| 00000600: 32 30 2C 31 33 00 1B 16 02 03 97 31 33 32 31 2C |20,13......1321,| 00000610: 31 33 3A 97 31 33 32 32 2C 31 33 00 38 16 0C 03 |13:.1322,13.8...| 00000620: 4D 41 24 B2 C9 28 46 24 2C 36 29 3A 4D 42 24 B2 |MA$..(F$,6):MB$.| 00000630: C8 28 4D 41 24 2C 35 29 00 58 16 16 03 4D 43 24 |.(MA$,5).X...MC$| 00000640: B2 C9 28 4D 42 24 2C 32 29 3A 8B 4D 43 24 B2 22 |..(MB$,2):.MC$."| 00000650: 20 2E 22 A7 89 38 33 30 00 7D 16 20 03 8B C5 28 | ."..830.}. ...(| 00000660: 4D 43 24 29 B3 B1 30 A7 4D 24 B2 22 2C 31 22 3A |MC$)..0.M$.",1":| 00000670: D5 4D 24 B2 22 22 3A 4D 42 24 B2 22 22 00 9F 16 |.M$."":MB$.""...| 00000680: 2A 03 8B 4D 24 B2 22 22 A7 53 54 24 B2 22 3A 52 |*..M$."".ST$.":R| 00000690: 55 4E 22 3A D5 53 54 24 B2 22 3A 53 59 53 22 00 |UN":.ST$.":SYS".| 000006A0: A5 16 34 03 8E 00 C3 16 3E 03 4D 24 B2 22 2C 31 |..4.....>.M$.",1| 000006B0: 22 3A 53 54 24 B2 22 3A 52 55 4E 22 3A 4D 42 24 |":ST$.":RUN":MB$| 000006C0: B2 22 22 00 C9 16 48 03 8E 00 D7 16 84 03 43 31 |.""...H.......C1| 000006D0: B2 31 3A 89 35 35 30 00 EA 16 98 03 58 24 B2 C8 |.1:.550.....X$..| 000006E0: 28 50 24 28 41 29 2C 31 38 29 00 F0 16 A2 03 E8 |(P$(A),18)......| 000006F0: 00 21 17 A7 03 99 22 11 11 11 1D 1D 2A 2A 2A 2A |.!....".....****| 00000700: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000710: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000720: 22 00 3B 17 A8 03 99 22 20 20 41 4C 54 45 52 20 |".;...." ALTER | 00000730: 4E 41 4D 45 20 3D 20 22 3B 58 24 00 69 17 A9 03 |NAME = ";X$.i...| 00000740: 99 22 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |." ************| 00000750: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000760: 2A 2A 2A 2A 2A 2A 2A 2A 22 00 A1 17 AC 03 E0 31 |********"......1| 00000770: 2C 32 2C 31 32 2C 22 2A 2A 2A 2A 2A 2A 2A 2A 2A |,2,12,"*********| 00000780: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000790: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3A 89 39 34 |***********":.94| 000007A0: 36 00 CF 17 AE 03 E0 31 2C 32 2C 31 34 2C 22 20 |6......1,2,14," | 000007B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2E 2E | ..| 000007C0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 5E 2E 2E 2E 2E 22 00 |.........^....".| 000007D0: F4 17 B1 03 E0 31 2C 32 2C 31 35 2C 22 4E 45 55 |.....1,2,15,"NEU| 000007E0: 45 52 20 4E 41 4D 45 20 3D 20 22 3A 85 59 24 3A |ER NAME = ":.Y$:| 000007F0: 89 39 35 35 00 2C 18 B2 03 E0 31 2C 32 2C 31 37 |.955.,....1,2,17| 00000800: 2C 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |,"**************| 00000810: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000820: 2A 2A 2A 2A 2A 2A 22 3A 89 39 34 32 00 49 18 B6 |******":.942.I..| 00000830: 03 E0 31 2C 38 2C 31 30 2C 22 4E 45 55 45 52 20 |..1,8,10,"NEUER | 00000840: 4E 41 4D 45 22 3A 85 59 24 00 59 18 BB 03 5A 24 |NAME":.Y$.Y...Z$| 00000850: B2 43 24 AA 59 24 AA 43 24 00 66 18 BC 03 50 24 |.C$.Y$.C$.f...P$| 00000860: 28 41 29 B2 5A 24 00 6C 18 BD 03 E8 00 84 18 C0 |(A).Z$.l........| 00000870: 03 99 22 52 45 4E 41 4D 45 22 3B 58 24 22 54 4F |.."RENAME";X$"TO| 00000880: 22 3B 5A 24 00 8F 18 CA 03 97 32 33 39 2C 32 00 |";Z$......239,2.| 00000890: 9C 18 CF 03 97 31 33 31 39 2C 31 39 00 A9 18 D4 |.....1319,19....| 000008A0: 03 97 31 33 32 30 2C 31 33 00 D9 18 D5 03 99 22 |..1320,13......"| 000008B0: 11 11 11 11 11 11 11 11 1D 1D 52 45 4E 41 4D 45 |..........RENAME| 000008C0: 20 2F 20 53 43 52 41 54 43 48 20 57 45 49 54 45 | / SCRATCH WEITE| 000008D0: 52 20 4D 49 54 20 46 31 22 00 F9 18 D6 03 99 3A |R MIT F1"......:| 000008E0: 99 22 1D 1D 50 52 4F 47 52 41 4D 4D 20 4C 41 44 |."..PROGRAMM LAD| 000008F0: 45 4E 20 4D 49 54 20 46 32 00 08 19 D7 03 99 22 |EN MIT F2......"| 00000900: 11 11 11 11 11 11 11 22 00 0E 19 D9 03 90 00 1C |......."........| 00000910: 19 E8 03 43 32 B2 31 3A 89 35 35 30 00 2F 19 FC |...C2.1:.550./..| 00000920: 03 57 24 B2 C8 28 50 24 28 41 29 2C 31 38 29 00 |.W$..(P$(A),18).| 00000930: 35 19 06 04 E8 00 65 19 0B 04 99 22 11 11 1D 1D |5.....e...."....| 00000940: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000950: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000960: 2A 2A 2A 2A 22 00 80 19 10 04 99 22 11 1D 1D 1D |****"......"....| 00000970: 1D 1D 1D 53 43 52 41 54 43 48 20 20 22 3B 57 24 |...SCRATCH ";W$| 00000980: 00 AF 19 15 04 99 22 11 1D 1D 2A 2A 2A 2A 2A 2A |......"...******| 00000990: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000009A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 |**************".| 000009B0: D1 19 1A 04 99 22 11 11 11 20 20 20 20 20 20 20 |....."... | 000009C0: 20 20 20 20 20 20 20 20 20 20 20 4A 20 2F 20 4E | J / N| 000009D0: 22 00 E6 19 24 04 A1 41 24 3A 8B 41 24 B2 22 4A |"...$..A$:.A$."J| 000009E0: 22 A7 31 30 39 30 00 F9 19 2E 04 8B 41 24 B2 22 |".1090......A$."| 000009F0: 4E 22 A7 E8 3A 89 33 36 30 00 03 1A 38 04 89 31 |N"..:.360...8..1| 00000A00: 30 36 30 00 1F 1A 42 04 E8 3A 99 22 53 43 52 41 |060...B..:."SCRA| 00000A10: 54 43 48 22 3B 22 22 3B 57 24 22 2C 55 38 22 00 |TCH";"";W$",U8".| 00000A20: 2D 1A 47 04 50 24 28 41 29 B2 22 20 22 00 45 1A |-.G.P$(A)." ".E.| 00000A30: 48 04 50 24 28 41 29 B2 22 50 52 47 20 53 43 52 |H.P$(A)."PRG SCR| 00000A40: 41 54 43 48 22 00 4E 1A 4C 04 89 39 37 30 00 00 |ATCH".N.L..970..| 00000A50: 00 |. |
........%....1,"SCNCLR:GOTO360".G(13).M.
...2,"SCNCLR:C1=0:C2=0:GOTO360".G(13).B.
... DISK-MENUE.W.(.. VORBESETZUNGEN.
..2..1,1:.0,2:.4,7:.5...<.L$."
":L$.L$.L$.K.F.C$.G(34):. P$(1
44)...P.S$."$*":. SELEKTIONSKRITERIUM...
Z..1,8,0,S$:. ST . ....D.:...N.. BILDSCH
IRM I.8.X.."..";L$;L$;L$;L$;L$;.J....A$
:.,15,1,A$.I....,0,22,G(27)."M.".L$.L$.L
$... ..,14,23,"BITTE WARTEN".G(27)."L"..
....,9,12,".DIRECTORY WIRD GELESEN".....
:.M.... READ DISKNAME...H...F$.C$:.#1,F$
:....R...A$."":.#1,A$:F$.F$.A$:..!....,1
0,3,".".H(F$,21):P$(0).F$.'...:.;.... RE
AD FILENAME.C...I.0.I.....]....#1,A$,A$,
A$,A$.N...F$."":A$." "..."...F$.C$:.#1,F
$:..ST...,..ST.....6...A$."":.#1,A$:F$.F
$.A$:..A.@.I.I.1:P$(I).F$.G.J...N.T. 1.T
.^.:...H.. BILDSCHIRM II...R..,1,12,".".
H(L$,35)...|..,5,23,".WAEHLE PROGRAMM *
WEITER=.TASTE".[....,5,24,".RENAME=R
* SCRATCH = S.".G.... J.1.8.....,5,
J.2.4,I(D(J),1)...........:...... ARRAY
AUFFUELLEN.....J..((I.0.5).8).1.K.B.. K
. I.1.(J).8...L.P$(K).H(L$,25)...V.. K..
...:...... FILES ANZEIGEN............ K
. 1. J.%.... L . 1. 8.A....,9,L.2.4,P$((
K.1).8.L).R....L:Z1,600,10.[.&...A$.K.+.
.A$."R".900.|.,..A$."S".1000...0.. A$."0
". A$."9". ....:.. K...D.....N.A.(K.1).8
.E(A$).E.X.. A.I. 500.S.B..C1.1.920...D.
.C2.1.1020...L.. BILDSCHIRM III...V.."..
":.0,15:.4,15.%...F$.H(P$(A),18):.780.@.
...,10,14,"PROGRAMM ".F$.[....,13,15,"WI
RD GELADEN".A...:.Z.... LOAD (DIREKTMODU
S)...F..1,15...P..,0,0,"NEW"...Z..,0,3,"
LOAD".F$.",8".M$.S...B$."COLOR0,2:PRINT"
.C$."..".C$......,0,8,B$.ST$.MB$......23
9,4:.1319,19:.1320,13......1321,13:.1322
,13.8...MA$.I(F$,6):MB$.H(MA$,5).X...MC$
.I(MB$,2):.MC$." ."..830.}. ..E(MC$)..0.
M$.",1":UM$."":MB$.""...*..M$."".ST$.":R
UN":UST$.":SYS"...4...C.>.M$.",1":ST$.":
RUN":MB$."".I.H...W...C1.1:.550.....X$.H
(P$(A),18).......!....".....************
************************".;...." ALTER
NAME = ";X$.I...." ********************
****************"......1,2,12,"*********
***************************":.946.O....1
,2,14," ...........^....".
.....1,2,15,"NEUER NAME = ":.Y$:.955.,..
..1,2,17,"******************************
******":.942.I....1,8,10,"NEUER NAME":.Y
$.Y...Z$.C$.Y$.C$.F...P$(A).Z$.L........
.."RENAME";X$"TO";Z$...J..239,2...O..131
9,19...T..1320,13.Y.U.."..........RENAME
/ SCRATCH WEITER MIT F1"...V..:."..PROG
RAMM LADEN MIT F2...W.."......."...Y....
...C2.1:.550./...W$.H(P$(A),18).5.....E.
..."....********************************
****"......".......SCRATCH ";W$......".
..************************************".
Q...."... J / N"...$..A
$:.A$."J".1090......A$."N"..:.360...8..1
060...B..:."SCRATCH";"";W$",U8".-.G.P$(A
)." ".E.H.P$(A)."PRG SCRATCH".N.L..970..
.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL