FOR 1
FILE INFORMATION
FILENAME(S): FOR 1
FILE TYPE(S): PRG
FILE SIZE: 4.5K
FIRST SEEN: 2025-11-30 20:21:33
APPEARS ON: 1 disk(s)
FILE HASH
cefdcd80e57461ea5fbfbc94bf08c9e1e0df245fc8b789e8078a627b1a1ab152
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| KLAUS EVALD | FOR 1 | PRG | Curtcool, Misc | 20 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 31 08 0A 00 97 37 38 38 2C 39 37 3A 97 37 |..1....788,97:.7|
00000010: 36 38 2C 32 32 36 3A 97 37 36 39 2C 32 35 32 3A |68,226:.769,252:|
00000020: 97 37 37 35 2C 32 30 30 3A 97 36 35 37 2C 31 32 |.775,200:.657,12|
00000030: 38 00 52 08 14 00 97 35 33 32 37 32 2C 32 31 3A |8.R....53272,21:|
00000040: 97 35 33 32 38 30 2C 31 32 3A 97 35 33 32 38 31 |.53280,12:.53281|
00000050: 2C 36 00 5C 08 19 00 89 31 31 30 30 00 79 08 1E |,6.\....1100.y..|
00000060: 00 50 31 24 B2 22 30 3A 22 3A 50 32 24 B2 22 2C |.P1$."0:":P2$.",|
00000070: 50 47 52 2C 52 45 41 44 22 00 98 08 23 00 50 34 |PGR,READ"...#.P4|
00000080: 24 B2 22 40 30 3A 22 3A 50 35 24 B2 22 2C 50 47 |$."@0:":P5$.",PG|
00000090: 52 2C 57 52 49 54 45 22 00 BE 08 2B 00 99 22 93 |R,WRITE"...+..".|
000000A0: 11 11 05 22 A3 39 29 22 D5 C3 C3 C3 C3 C3 C3 C3 |...".9)"........|
000000B0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C9 22 00 DE |............."..|
000000C0: 08 2C 00 99 A3 39 29 22 DD 20 50 52 4F 47 52 41 |.,...9)". PROGRA|
000000D0: 4D 20 4B 4F 50 49 45 52 49 4E 47 20 DD 22 00 FE |M KOPIERING ."..|
000000E0: 08 2D 00 99 A3 39 29 22 CA C3 C3 C3 C3 C3 C3 C3 |.-...9)"........|
000000F0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 CB 22 00 3F |.............".?|
00000100: 09 32 00 99 22 11 11 11 11 11 11 11 11 11 11 11 |.2.."...........|
00000110: 11 11 11 11 11 12 3C 46 31 3E 20 43 4F 4E 54 20 |......<F1> CONT |
00000120: 20 3C 46 33 3E 20 41 4E 55 4C 4C 45 52 20 20 20 | <F3> ANULLER |
00000130: 3C 46 35 3E 20 48 4F 56 45 44 4D 45 4E 55 22 00 |<F5> HOVEDMENU".|
00000140: 6D 09 37 00 99 22 91 91 91 91 91 91 91 91 91 91 |m.7.."..........|
00000150: 91 91 91 91 91 1D 1D 1D 1D 50 52 4F 47 52 41 4D |.........PROGRAM|
00000160: 4E 41 56 4E 20 22 3A 50 33 24 B2 22 22 00 81 09 |NAVN ":P3$.""...|
00000170: 38 00 A1 50 30 24 3A 8B 50 30 24 B2 22 22 A7 35 |8..P0$:.P0$."".5|
00000180: 36 00 93 09 39 00 8B C6 28 50 30 24 29 B2 31 33 |6...9...(P0$).13|
00000190: A7 35 36 00 AB 09 3A 00 8B C3 28 50 33 24 29 B1 |.56...:...(P3$).|
000001A0: 31 36 A7 8D 36 33 30 3A 89 38 31 00 C4 09 3C 00 |16..630:.81...<.|
000001B0: 8B 50 30 24 B2 22 85 22 AF 50 33 24 B3 B1 22 22 |.P0$.".".P3$..""|
000001C0: A7 31 30 30 00 D4 09 4C 00 8B 50 30 24 B2 22 86 |.100...L..P0$.".|
000001D0: 22 A7 38 31 00 E6 09 4D 00 8B 50 30 24 B2 22 87 |".81...M..P0$.".|
000001E0: 22 A7 31 31 30 30 00 20 0A 4E 00 8B C6 28 50 30 |".1100. .N...(P0|
000001F0: 24 29 B3 39 31 AF C6 28 50 30 24 29 B1 36 34 B0 |$).91..(P0$).64.|
00000200: C6 28 50 30 24 29 B1 34 34 AF C6 28 50 30 24 29 |.(P0$).44..(P0$)|
00000210: B3 35 39 B0 C6 28 50 30 24 29 B2 33 32 A7 38 30 |.59..(P0$).32.80|
00000220: 00 28 0A 4F 00 89 35 36 00 48 0A 50 00 50 33 24 |.(.O..56.H.P.P3$|
00000230: B2 50 33 24 AA 50 30 24 3A 99 A3 31 37 29 22 91 |.P3$.P0$:..17)".|
00000240: 22 50 33 24 3A 89 35 36 00 77 0A 51 00 50 33 24 |"P3$:.56.w.Q.P3$|
00000250: B2 22 22 3A 99 A3 31 35 29 22 91 20 20 20 20 20 |."":..15)". |
00000260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00000270: 50 33 24 3A 89 35 36 00 8B 0A 64 00 50 47 24 B2 |P3$:.56...d.PG$.|
00000280: 50 31 24 AA 50 33 24 AA 50 32 24 00 9F 0A 6E 00 |P1$.P3$.P2$...n.|
00000290: 50 52 24 B2 50 34 24 AA 50 33 24 AA 50 35 24 00 |PR$.P4$.P3$.P5$.|
000002A0: A7 0A 96 00 49 B2 31 00 E5 0A AA 00 99 22 11 11 |....I.1......"..|
000002B0: 11 11 11 11 11 11 11 11 11 11 12 20 20 20 20 20 |........... |
000002C0: 20 49 4E 44 53 41 45 54 20 44 49 53 4B 45 54 54 | INDSAET DISKETT|
000002D0: 45 20 4F 47 20 54 52 59 4B 20 3C 46 31 3E 20 20 |E OG TRYK <F1> |
000002E0: 20 20 20 20 22 00 04 0B B4 00 8B 5A 24 B3 B1 22 | "......Z$.."|
000002F0: 44 22 A7 86 41 25 28 31 36 36 34 30 29 3A 5A 24 |D"..A%(16640):Z$|
00000300: B2 22 44 22 00 19 0B BE 00 A1 41 24 3A 8B 41 24 |."D"......A$:.A$|
00000310: B3 B1 22 85 22 A7 31 39 30 00 42 0B D2 00 99 22 |..".".190.B...."|
00000320: 93 11 11 11 11 11 1D 1D 1D 1D 1D 1D 4C 4F 41 44 |............LOAD|
00000330: 45 52 20 12 22 50 33 24 22 92 20 20 56 45 4E 54 |ER ."P3$". VENT|
00000340: 21 22 00 51 0B E6 00 9F 32 2C 38 2C 32 2C 50 47 |!".Q....2,8,2,PG|
00000350: 24 00 5C 0B F0 00 A1 23 32 2C 41 24 00 6B 0B FA |$.\....#2,A$.k..|
00000360: 00 41 24 B2 41 24 AA C7 28 30 29 00 7B 0B 04 01 |.A$.A$..(0).{...|
00000370: 41 25 28 49 29 B2 C6 28 41 24 29 00 85 0B 18 01 |A%(I)..(A$).....|
00000380: 49 B2 49 AA 31 00 97 0B 22 01 8B 53 54 41 54 55 |I.I.1..."..STATU|
00000390: 53 B2 30 A7 32 34 30 00 9E 0B 2C 01 A0 32 00 A7 |S.0.240...,..2..|
000003A0: 0B 40 01 8D 37 30 30 00 B7 0B 55 01 8B 45 4E B3 |.@..700...U..EN.|
000003B0: B1 30 A7 31 31 30 30 00 CF 0B 56 01 99 22 93 22 |.0.1100...V.."."|
000003C0: A3 31 36 29 22 11 D5 C3 C3 C3 C3 C3 C3 C9 22 00 |.16)".........".|
000003D0: E3 0B 57 01 99 A3 31 36 29 22 DD 20 4D 45 4E 55 |..W...16)". MENU|
000003E0: 20 DD 22 00 F7 0B 58 01 99 A3 31 36 29 22 CA C3 | ."...X...16)"..|
000003F0: C3 C3 C3 C3 C3 CB 22 00 1B 0C 5B 01 99 A3 31 30 |......"...[...10|
00000400: 29 22 11 11 11 11 3C 46 31 3E 20 20 3D 20 20 42 |)"....<F1> = B|
00000410: 41 43 4B 55 50 2D 4B 4F 50 49 22 00 3A 0C 5C 01 |ACKUP-KOPI".:.\.|
00000420: 99 A3 31 30 29 22 11 3C 46 33 3E 20 20 3D 20 20 |..10)".<F3> = |
00000430: 48 4F 56 45 44 4D 45 4E 55 22 00 56 0C 5D 01 99 |HOVEDMENU".V.]..|
00000440: A3 31 30 29 22 11 3C 46 35 3E 20 20 3D 20 20 41 |.10)".<F5> = A|
00000450: 46 53 4C 55 54 22 00 69 0C 5E 01 A1 51 24 3A 8B |FSLUT".i.^..Q$:.|
00000460: 51 24 B2 22 22 A7 33 35 30 00 8A 0C 5F 01 8B 51 |Q$."".350..._..Q|
00000470: 24 B3 B1 22 85 22 AF 51 24 B3 B1 22 86 22 AF 51 |$..".".Q$..".".Q|
00000480: 24 B3 B1 22 87 22 A7 33 35 30 00 9A 0C 60 01 8B |$..".".350...`..|
00000490: 51 24 B2 22 85 22 A7 33 38 30 00 AB 0C 61 01 8B |Q$.".".380...a..|
000004A0: 51 24 B2 22 86 22 A7 31 31 30 30 00 BB 0C 62 01 |Q$.".".1100...b.|
000004B0: 8B 51 24 B2 22 87 22 A7 34 39 30 00 F5 0C 7C 01 |.Q$.".".490...|.|
000004C0: 99 22 11 11 11 11 11 11 11 11 12 20 20 20 20 49 |."......... I|
000004D0: 4E 44 53 41 45 54 20 4E 59 20 44 49 53 4B 45 54 |NDSAET NY DISKET|
000004E0: 54 45 2C 20 4F 47 20 54 52 59 4B 20 3C 46 31 3E |TE, OG TRYK <F1>|
000004F0: 20 20 20 20 22 00 0A 0D 7D 01 A1 41 24 3A 8B 41 | "...}..A$:.A|
00000500: 24 B3 B1 22 85 22 A7 33 38 31 00 2E 0D 7E 01 99 |$..".".381...~..|
00000510: 22 93 11 11 11 11 22 A3 31 31 29 22 4C 41 56 45 |".....".11)"LAVE|
00000520: 52 20 42 41 43 4B 55 50 2D 4B 4F 50 49 22 00 40 |R BACKUP-KOPI".@|
00000530: 0D 7F 01 99 A3 31 37 29 22 11 56 45 4E 54 21 22 |.....17)".VENT!"|
00000540: 00 4F 0D 81 01 9F 33 2C 38 2C 33 2C 50 52 24 00 |.O....3,8,3,PR$.|
00000550: 5C 0D 86 01 81 4B B2 31 A4 49 AB 31 00 6D 0D 90 |\....K.1.I.1.m..|
00000560: 01 98 33 2C C7 28 41 25 28 4B 29 29 3B 00 74 0D |..3,.(A%(K));.t.|
00000570: 9A 01 82 4B 00 80 0D A4 01 8D 37 30 30 3A A0 33 |...K......700:.3|
00000580: 00 A9 0D D6 01 99 22 93 11 11 11 11 11 11 22 A3 |......".......".|
00000590: 39 29 22 42 41 43 4B 55 50 2D 4B 4F 50 49 45 52 |9)"BACKUP-KOPIER|
000005A0: 20 45 52 20 4B 4C 41 52 22 00 CC 0D D7 01 99 A3 | ER KLAR".......|
000005B0: 31 30 29 22 11 11 11 11 11 3C 46 31 3E 20 20 3D |10)".....<F1> =|
000005C0: 20 20 48 4F 56 45 44 4D 45 4E 55 22 00 E8 0D D8 | HOVEDMENU"....|
000005D0: 01 99 A3 31 30 29 22 11 3C 46 33 3E 20 20 3D 20 |...10)".<F3> = |
000005E0: 20 41 46 53 4C 55 54 22 00 FB 0D D9 01 A1 51 24 | AFSLUT"......Q$|
000005F0: 3A 8B 51 24 B2 22 22 A7 34 37 33 00 14 0E DA 01 |:.Q$."".473.....|
00000600: 8B 51 24 B3 B1 22 85 22 AF 51 24 B3 B1 22 86 22 |.Q$..".".Q$.."."|
00000610: A7 34 37 33 00 25 0E DB 01 8B 51 24 B2 22 85 22 |.473.%....Q$."."|
00000620: A7 31 31 30 30 00 35 0E DC 01 8B 51 24 B2 22 86 |.1100.5....Q$.".|
00000630: 22 A7 34 39 30 00 48 0E EA 01 97 37 38 38 2C 34 |".490.H....788,4|
00000640: 39 3A 9E 35 38 32 36 30 00 85 0E 76 02 99 22 11 |9:.58260...v..".|
00000650: 11 11 11 11 11 11 11 11 11 11 11 12 20 20 20 50 |............ P|
00000660: 52 4F 47 52 41 4D 4E 41 56 4E 20 46 4F 52 20 4C |ROGRAMNAVN FOR L|
00000670: 41 4E 47 54 21 21 20 20 54 52 59 4B 20 3C 46 31 |ANGT!! TRYK <F1|
00000680: 3E 20 20 20 22 00 BE 0E 80 02 50 33 24 B2 22 22 |> ".....P3$.""|
00000690: 3A 99 A3 31 35 29 22 91 91 91 91 91 91 91 91 91 |:..15)".........|
000006A0: 91 91 91 91 91 91 20 20 20 20 20 20 20 20 20 20 |...... |
000006B0: 20 20 20 20 20 20 20 20 20 20 22 50 33 24 00 D3 | "P3$..|
000006C0: 0E 85 02 A1 41 24 3A 8B 41 24 B3 B1 22 85 22 A7 |....A$:.A$..".".|
000006D0: 36 34 35 00 10 0F 8A 02 99 22 11 11 11 11 11 11 |645......"......|
000006E0: 11 11 11 11 11 11 12 3C 46 31 3E 20 43 4F 4E 54 |.......<F1> CONT|
000006F0: 20 20 3C 46 33 3E 20 41 4E 55 4C 4C 45 52 20 20 | <F3> ANULLER |
00000700: 20 3C 46 35 3E 20 48 4F 56 45 44 4D 45 4E 55 22 | <F5> HOVEDMENU"|
00000710: 00 2D 0F 94 02 99 A3 31 35 29 22 91 91 91 91 91 |.-.....15)".....|
00000720: 91 91 91 91 91 91 91 91 91 91 22 3A 8E 00 3A 0F |..........":..:.|
00000730: BC 02 9F 31 35 2C 38 2C 31 35 00 4F 0F C6 02 84 |...15,8,15.O....|
00000740: 31 35 2C 45 4E 2C 45 4D 24 2C 45 54 2C 45 53 00 |15,EN,EM$,ET,ES.|
00000750: 62 0F DA 02 8B 45 4E B2 30 A7 A0 31 3A A0 31 35 |b....EN.0..1:.15|
00000760: 3A 8E 00 82 0F E4 02 99 22 93 22 A3 36 29 22 11 |:.......".".6)".|
00000770: 11 11 53 54 41 54 55 53 3A 20 22 3B 45 4E 3B 45 |..STATUS: ";EN;E|
00000780: 4D 24 00 93 0F F8 02 81 58 B2 31 A4 31 35 30 30 |M$......X.1.1500|
00000790: 3A 82 58 00 9B 0F 02 03 A0 31 35 00 A1 0F 0C 03 |:.X......15.....|
000007A0: 8E 00 C8 0F 20 03 99 22 93 11 11 05 22 A3 39 29 |.... .."....".9)|
000007B0: 22 D5 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |"...............|
000007C0: C3 C3 C3 C3 C3 C3 C9 22 00 E9 0F 21 03 99 A3 39 |......."...!...9|
000007D0: 29 22 DD 20 44 49 53 4B 45 54 54 45 20 4F 4D 44 |)". DISKETTE OMD|
000007E0: 30 42 4E 49 4E 47 20 DD 22 00 0A 10 22 03 99 A3 |0BNING ."..."...|
000007F0: 39 29 22 CA C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |9)".............|
00000800: C3 C3 C3 C3 C3 C3 C3 C3 CB 22 00 28 10 3E 03 4E |.........".(.>.N|
00000810: 24 B2 22 22 3A 9F 31 35 2C 38 2C 31 35 3A 9F 33 |$."":.15,8,15:.3|
00000820: 2C 38 2C 33 2C 22 23 22 00 3E 10 48 03 98 31 35 |,8,3,"#".>.H..15|
00000830: 2C 22 55 31 20 33 20 30 20 31 38 20 30 22 00 52 |,"U1 3 0 18 0".R|
00000840: 10 52 03 98 31 35 2C 22 42 2D 50 20 33 20 31 34 |.R..15,"B-P 3 14|
00000850: 34 22 00 5E 10 5C 03 81 49 B2 30 A4 31 35 00 69 |4".^.\..I.0.15.i|
00000860: 10 66 03 A1 23 33 2C 41 24 00 76 10 70 03 4E 24 |.f..#3,A$.v.p.N$|
00000870: B2 4E 24 AA 41 24 00 7D 10 7A 03 82 49 00 93 10 |.N$.A$.}.z..I...|
00000880: 84 03 A1 23 33 2C 42 24 2C 43 24 2C 49 31 24 2C |...#3,B$,C$,I1$,|
00000890: 49 32 24 00 A3 10 8E 03 49 44 24 B2 49 31 24 AA |I2$.....ID$.I1$.|
000008A0: 49 32 24 00 C6 10 98 03 99 22 11 11 11 47 41 4D |I2$......"...GAM|
000008B0: 4D 45 4C 20 44 49 53 4B 45 54 54 45 2D 4E 41 56 |MEL DISKETTE-NAV|
000008C0: 4E 3A 20 22 4E 24 00 E5 10 A2 03 85 22 1D 1D 1D |N: "N$......"...|
000008D0: 4E 59 54 20 44 49 53 4B 45 54 54 45 2D 4E 41 56 |NYT DISKETTE-NAV|
000008E0: 4E 22 3B 4E 24 00 04 11 AC 03 8B C3 28 4E 24 29 |N";N$.......(N$)|
000008F0: B1 31 36 A7 99 22 91 91 22 3A 4E 24 B2 22 22 3A |.16.."..":N$."":|
00000900: 89 39 33 30 00 16 11 B6 03 81 49 B2 C3 28 4E 24 |.930......I..(N$|
00000910: 29 AA 31 A4 31 36 00 27 11 C0 03 4E 24 B2 4E 24 |).1.16.'...N$.N$|
00000920: AA C7 28 31 36 30 29 00 2E 11 CA 03 82 49 00 49 |..(160)......I.I|
00000930: 11 D4 03 99 A3 31 31 29 22 11 47 41 4D 4D 45 4C |.....11)".GAMMEL|
00000940: 20 49 44 3A 20 22 49 44 24 00 61 11 DE 03 99 A3 | ID: "ID$.a.....|
00000950: 31 34 29 3A 85 22 4E 59 54 20 49 44 22 3B 49 44 |14):."NYT ID";ID|
00000960: 24 00 7B 11 E8 03 8B C3 28 49 44 24 29 B3 B1 32 |$.{.....(ID$)..2|
00000970: A7 99 22 91 91 22 3A 89 39 39 30 00 B5 11 ED 03 |.."..":.990.....|
00000980: 99 22 11 11 11 11 11 11 11 11 11 12 20 20 4F 4D |.".......... OM|
00000990: 44 30 42 4E 49 4E 47 20 20 3C 46 31 3E 20 20 20 |D0BNING <F1> |
000009A0: 20 20 20 48 4F 56 45 44 4D 45 4E 55 20 20 3C 46 | HOVEDMENU <F|
000009B0: 33 3E 20 20 22 00 C9 11 EE 03 A1 41 24 3A 8B 41 |3> "......A$:.A|
000009C0: 24 B2 22 22 A7 31 30 30 36 00 E3 11 EF 03 8B 41 |$."".1006......A|
000009D0: 24 B3 B1 22 85 22 AF 41 24 B3 B1 22 86 22 A7 31 |$..".".A$..".".1|
000009E0: 30 30 36 00 F4 11 F0 03 8B 41 24 B2 22 85 22 A7 |006......A$.".".|
000009F0: 31 30 31 30 00 0D 12 F1 03 8B 41 24 B2 22 86 22 |1010......A$."."|
00000A00: A7 A0 33 3A A0 31 35 3A 89 31 31 30 30 00 21 12 |..3:.15:.1100.!.|
00000A10: F2 03 41 24 B2 4E 24 AA 42 24 AA 43 24 AA 49 44 |..A$.N$.B$.C$.ID|
00000A20: 24 00 35 12 FC 03 98 31 35 2C 22 42 2D 50 20 33 |$.5....15,"B-P 3|
00000A30: 20 31 34 34 22 00 40 12 06 04 98 33 2C 41 24 3B | 144".@....3,A$;|
00000A40: 00 56 12 10 04 98 31 35 2C 22 55 32 20 33 20 30 |.V....15,"U2 3 0|
00000A50: 20 31 38 20 30 22 00 5D 12 1A 04 A0 33 00 6A 12 | 18 0".]....3.j.|
00000A60: 24 04 98 31 35 2C 22 49 30 22 00 7D 12 2E 04 8D |$..15,"I0".}....|
00000A70: 37 30 30 3A A0 31 35 3A 89 31 31 30 30 00 9B 12 |700:.15:.1100...|
00000A80: 4C 04 99 22 93 05 22 A3 31 34 29 22 11 D5 C3 C3 |L.."..".14)"....|
00000A90: C3 C3 C3 C3 C3 C3 C3 C3 C3 C9 22 00 B4 12 56 04 |.........."...V.|
00000AA0: 99 A3 31 34 29 22 DD 20 48 4F 56 45 44 4D 45 4E |..14)". HOVEDMEN|
00000AB0: 55 20 DD 22 00 CD 12 60 04 99 A3 31 34 29 22 CA |U ."...`...14)".|
00000AC0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 CB 22 00 F4 12 |............"...|
00000AD0: 6A 04 99 A3 36 29 22 11 11 11 3C 31 3E 20 20 3D |j...6)"...<1> =|
00000AE0: 20 20 50 52 4F 47 52 41 4D 20 4B 4F 50 49 45 52 | PROGRAM KOPIER|
00000AF0: 49 4E 47 22 00 18 13 6F 04 99 A3 36 29 22 11 3C |ING"...o...6)".<|
00000B00: 32 3E 20 20 3D 20 20 50 52 4F 47 52 41 4D 20 53 |2> = PROGRAM S|
00000B10: 4C 45 54 4E 49 4E 47 22 00 3E 13 74 04 99 A3 36 |LETNING".>.t...6|
00000B20: 29 22 11 3C 33 3E 20 20 3D 20 20 44 49 53 4B 45 |)".<3> = DISKE|
00000B30: 54 54 45 20 4F 4D 44 30 42 4E 49 4E 47 22 00 63 |TTE OMD0BNING".c|
00000B40: 13 78 04 99 A3 36 29 22 11 3C 34 3E 20 20 3D 20 |.x...6)".<4> = |
00000B50: 20 52 45 4E 41 4D 45 20 45 54 20 50 52 4F 47 52 | RENAME ET PROGR|
00000B60: 41 4D 22 00 8B 13 79 04 99 A3 36 29 22 11 3C 35 |AM"...y...6)".<5|
00000B70: 3E 20 20 3D 20 20 56 41 4C 49 44 41 54 45 20 45 |> = VALIDATE E|
00000B80: 4E 20 44 49 53 4B 45 54 54 45 22 00 B3 13 7E 04 |N DISKETTE"...~.|
00000B90: 99 A3 36 29 22 11 3C 36 3E 20 20 3D 20 20 44 49 |..6)".<6> = DI|
00000BA0: 53 4B 45 54 54 45 20 46 4F 52 4D 41 54 45 52 49 |SKETTE FORMATERI|
00000BB0: 4E 47 22 00 DE 13 82 04 99 A3 36 29 22 11 3C 37 |NG".......6)".<7|
00000BC0: 3E 20 20 3D 20 20 49 4E 49 54 41 4C 49 53 45 52 |> = INITALISER|
00000BD0: 45 20 45 4E 20 44 49 53 4B 45 54 54 45 22 00 F8 |E EN DISKETTE"..|
00000BE0: 13 83 04 99 A3 36 29 22 11 3C 38 3E 20 20 3D 20 |.....6)".<8> = |
00000BF0: 20 41 46 53 4C 55 54 22 00 0C 14 88 04 A1 51 24 | AFSLUT"......Q$|
00000C00: 3A 8B 51 24 B2 22 22 A7 31 31 36 30 00 1D 14 92 |:.Q$."".1160....|
00000C10: 04 8B 51 24 B2 22 31 22 A7 31 35 38 30 00 2C 14 |..Q$."1".1580.,.|
00000C20: 9C 04 8B 51 24 B2 22 32 22 A7 33 30 00 3C 14 A6 |...Q$."2".30.<..|
00000C30: 04 8B 51 24 B2 22 33 22 A7 38 30 30 00 4D 14 AB |..Q$."3".800.M..|
00000C40: 04 8B 51 24 B2 22 34 22 A7 31 34 30 30 00 5E 14 |..Q$."4".1400.^.|
00000C50: B0 04 8B 51 24 B2 22 35 22 A7 31 32 33 30 00 6F |...Q$."5".1230.o|
00000C60: 14 B5 04 8B 51 24 B2 22 36 22 A7 31 33 37 30 00 |....Q$."6".1370.|
00000C70: 7F 14 BA 04 8B 51 24 B2 22 37 22 A7 34 39 30 00 |.....Q$."7".490.|
00000C80: 91 14 BF 04 8B 51 24 B2 22 38 22 A7 36 30 30 30 |.....Q$."8".6000|
00000C90: 30 00 BA 14 CE 04 99 22 93 11 11 05 22 A3 38 29 |0......"....".8)|
00000CA0: 22 D5 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 |"...............|
00000CB0: D3 D3 D3 D3 D3 D3 D3 D3 C9 22 00 DD 14 D8 04 99 |........."......|
00000CC0: A3 38 29 22 DD 20 44 49 53 4B 45 54 54 45 20 46 |.8)". DISKETTE F|
00000CD0: 4F 52 4D 41 54 45 52 49 4E 47 20 DD 22 00 00 15 |ORMATERING ."...|
00000CE0: E2 04 99 A3 38 29 22 CA C3 C3 C3 C3 C3 C3 C3 C3 |....8)".........|
00000CF0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 CB 22 |..............."|
00000D00: 00 26 15 F6 04 85 22 13 11 11 11 11 11 11 11 11 |.&....".........|
00000D10: 11 1D 1D 1D 1D 44 49 53 4B 45 54 54 45 20 4E 41 |.....DISKETTE NA|
00000D20: 56 4E 22 3B 4D 24 00 40 15 00 05 8B C3 28 4D 24 |VN";M$.@.....(M$|
00000D30: 29 B1 31 36 A7 4D 24 B2 22 22 3A 89 31 32 33 30 |).16.M$."":.1230|
00000D40: 00 58 15 0A 05 99 A3 31 32 29 3A 85 22 11 49 44 |.X.....12):.".ID|
00000D50: 20 4E 52 2E 22 3B 4E 24 00 6B 15 14 05 8B C3 28 | NR.";N$.k.....(|
00000D60: 4E 24 29 B3 B1 32 A7 31 32 33 30 00 A6 15 1E 05 |N$)..2.1230.....|
00000D70: 99 22 11 11 11 11 11 11 11 11 11 11 12 20 46 4F |."........... FO|
00000D80: 52 4D 41 54 45 52 49 4E 47 20 20 3C 46 31 3E 20 |RMATERING <F1> |
00000D90: 20 20 20 20 20 48 4F 56 45 44 4D 45 4E 55 20 20 | HOVEDMENU |
00000DA0: 3C 46 33 3E 20 22 00 BB 15 28 05 A1 41 24 3A 20 |<F3> "...(..A$: |
00000DB0: 8B 41 24 B2 22 22 A7 31 33 32 30 00 D5 15 2C 05 |.A$."".1320...,.|
00000DC0: 8B 41 24 B3 B1 22 85 22 AF 41 24 B3 B1 22 86 22 |.A$..".".A$.."."|
00000DD0: A7 31 33 32 30 00 E6 15 2D 05 8B 41 24 B2 22 85 |.1320...-..A$.".|
00000DE0: 22 A7 31 33 33 30 00 04 16 2E 05 8B 41 24 B2 22 |".1330......A$."|
00000DF0: 86 22 A7 4D 24 B2 22 22 3A 4E 24 B2 22 22 3A 89 |.".M$."":N$."":.|
00000E00: 31 31 30 30 00 22 16 32 05 9F 31 2C 38 2C 31 35 |1100.".2..1,8,15|
00000E10: 3A 98 31 2C 22 4E 30 3A 22 AA 4D 24 22 2C 22 AA |:.1,"N0:".M$",".|
00000E20: 4E 24 00 34 16 3C 05 8D 37 30 30 3A A0 31 3A 89 |N$.4.<..700:.1:.|
00000E30: 31 31 30 30 00 44 16 5A 05 9F 32 2C 38 2C 31 35 |1100.D.Z..2,8,15|
00000E40: 2C 22 49 22 00 4B 16 5F 05 A0 32 00 5A 16 64 05 |,"I".K._..2.Z.d.|
00000E50: 8D 37 30 30 3A 89 31 31 30 30 00 81 16 78 05 99 |.700:.1100...x..|
00000E60: 22 93 11 11 05 22 A3 31 30 29 22 D5 C3 C3 C3 C3 |"....".10)".....|
00000E70: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C9 |................|
00000E80: 22 00 A2 16 82 05 99 A3 31 30 29 22 DD 20 56 41 |".......10)". VA|
00000E90: 4C 49 44 41 54 45 20 44 49 53 4B 45 54 54 45 20 |LIDATE DISKETTE |
00000EA0: DD 22 00 C3 16 8C 05 99 A3 31 30 29 22 CA C3 C3 |.".......10)"...|
00000EB0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00000EC0: C3 CB 22 00 D7 16 96 05 9F 32 2C 38 2C 31 35 3A |.."......2,8,15:|
00000ED0: 98 32 2C 22 56 30 22 00 E9 16 A0 05 8D 37 30 30 |.2,"V0"......700|
00000EE0: 3A A0 32 3A 89 31 31 30 30 00 11 17 B4 05 99 22 |:.2:.1100......"|
00000EF0: 93 11 11 05 22 A3 38 29 22 D5 C3 C3 C3 C3 C3 C3 |....".8)".......|
00000F00: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C9 |................|
00000F10: 22 00 33 17 BE 05 99 A3 38 29 22 DD 20 53 4C 45 |".3.....8)". SLE|
00000F20: 54 4E 49 4E 47 20 41 46 20 50 52 4F 47 52 41 4D |TNING AF PROGRAM|
00000F30: 20 DD 22 00 55 17 C8 05 99 A3 38 29 22 CA C3 C3 | .".U.....8)"...|
00000F40: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00000F50: C3 C3 C3 CB 22 00 7B 17 D2 05 85 22 13 11 11 11 |....".{...."....|
00000F60: 11 11 11 11 11 11 1D 1D 1D 1D 50 52 4F 47 52 41 |..........PROGRA|
00000F70: 4D 2D 4E 41 56 4E 20 22 3B 4D 24 00 95 17 DC 05 |M-NAVN ";M$.....|
00000F80: 8B C3 28 4D 24 29 B1 31 36 A7 4D 24 B2 22 22 3A |..(M$).16.M$."":|
00000F90: 89 31 35 30 30 00 CF 17 E6 05 99 22 11 11 11 11 |.1500......"....|
00000FA0: 11 11 11 11 11 12 20 20 53 4C 45 54 4E 49 4E 47 |...... SLETNING|
00000FB0: 20 20 3C 46 31 3E 20 20 20 20 20 20 20 48 4F 56 | <F1> HOV|
00000FC0: 45 44 4D 45 4E 55 20 20 3C 46 33 3E 20 20 22 00 |EDMENU <F3> ".|
00000FD0: E3 17 F0 05 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 |.....A$:.A$."".1|
00000FE0: 35 32 30 00 FD 17 FA 05 8B 41 24 B3 B1 22 85 22 |520......A$.."."|
00000FF0: AF 41 24 B3 B1 22 86 22 A7 31 35 32 30 00 0E 18 |.A$..".".1520...|
00001000: 04 06 8B 41 24 B2 22 85 22 A7 31 35 36 30 00 1F |...A$.".".1560..|
00001010: 18 0E 06 8B 41 24 B2 22 86 22 A7 31 31 30 30 00 |....A$.".".1100.|
00001020: 34 18 18 06 9F 32 2C 38 2C 31 35 2C 22 53 30 3A |4....2,8,15,"S0:|
00001030: 22 AA 4D 24 00 46 18 22 06 8D 37 30 30 3A A0 32 |".M$.F."..700:.2|
00001040: 3A 89 31 31 30 30 00 6C 18 2C 06 99 22 93 11 11 |:.1100.l.,.."...|
00001050: 05 22 A3 39 29 22 D5 C3 C3 C3 C3 C3 C3 C3 C3 C3 |.".9)"..........|
00001060: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C9 22 00 8C 18 36 |..........."...6|
00001070: 06 99 A3 39 29 22 DD 20 52 45 4E 41 4D 45 20 45 |...9)". RENAME E|
00001080: 54 20 50 52 4F 47 52 41 4D 20 DD 22 00 AC 18 40 |T PROGRAM ."...@|
00001090: 06 99 A3 39 29 22 CA C3 C3 C3 C3 C3 C3 C3 C3 C3 |...9)"..........|
000010A0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 CB 22 00 D4 18 4A |..........."...J|
000010B0: 06 4D 24 B2 22 22 3A 85 22 11 11 11 47 41 4D 4D |.M$."":."...GAMM|
000010C0: 45 4C 20 50 52 4F 47 52 41 4D 2D 4E 41 56 4E 20 |EL PROGRAM-NAVN |
000010D0: 22 3B 4D 24 00 F7 18 54 06 8B C3 28 4D 24 29 B1 |";M$...T...(M$).|
000010E0: 31 36 A7 99 22 91 91 91 91 91 22 3A 4D 24 B2 22 |16..".....":M$."|
000010F0: 22 3A 89 31 36 31 30 00 1C 19 5E 06 4E 24 B2 22 |":.1610...^.N$."|
00001100: 22 3A 85 22 1D 1D 1D 1D 4E 59 54 20 50 52 4F 47 |":."....NYT PROG|
00001110: 52 41 4D 2D 4E 41 56 4E 22 3B 4E 24 00 3C 19 68 |RAM-NAVN";N$.<.h|
00001120: 06 8B C3 28 4E 24 29 B1 31 36 A7 99 22 91 91 22 |...(N$).16..".."|
00001130: 3A 4E 24 B2 22 22 3A 89 31 36 33 30 00 77 19 72 |:N$."":.1630.w.r|
00001140: 06 99 22 11 11 11 11 11 11 11 11 11 11 12 20 52 |.."........... R|
00001150: 45 4E 41 4D 45 20 20 20 3C 46 31 3E 20 20 20 20 |ENAME <F1> |
00001160: 20 20 20 20 20 48 4F 56 45 44 4D 45 4E 55 20 20 | HOVEDMENU |
00001170: 20 3C 46 33 3E 20 22 00 8B 19 7C 06 A1 41 24 3A | <F3> "...|..A$:|
00001180: 8B 41 24 B2 22 22 A7 31 36 36 30 00 A5 19 86 06 |.A$."".1660.....|
00001190: 8B 41 24 B3 B1 22 85 22 AF 41 24 B3 B1 22 86 22 |.A$..".".A$.."."|
000011A0: A7 31 36 36 30 00 B6 19 90 06 8B 41 24 B2 22 85 |.1660......A$.".|
000011B0: 22 A7 31 37 30 30 00 D4 19 9A 06 8B 41 24 B2 22 |".1700......A$."|
000011C0: 86 22 A7 4D 24 B2 22 22 3A 4E 24 B2 22 22 3A 89 |.".M$."":N$."":.|
000011D0: 31 31 30 30 00 F0 19 A4 06 9F 32 2C 38 2C 31 35 |1100......2,8,15|
000011E0: 2C 22 52 30 3A 22 AA 4E 24 AA 22 3D 22 AA 4D 24 |,"R0:".N$."=".M$|
000011F0: 00 02 1A AE 06 8D 37 30 30 3A A0 32 3A 89 31 31 |......700:.2:.11|
00001200: 30 30 00 0C 1A 78 E6 8F 20 2A 2A 2A 00 1D 1A 60 |00...x.. ***...`|
00001210: EA 93 22 4D 41 49 4E 2A 22 2C 38 3A 8A 00 00 00 |.."MAIN*",8:....|
..1....788,97:.768,226:.769,252:.775,200
:.657,128.R....53272,21:.53280,12:.53281
,6.\....1100.Y...P1$."0:":P2$.",PGR,READ
"...#.P4$."@0:":P5$.",PGR,WRITE"...+..".
...".9)"UCCCCCCCCCCCCCCCCCCCI"...,...9)"
. PROGRAM KOPIERING ."...-...9)"JCCCCCCC
CCCCCCCCCCCCK".?.2..".................<F
1> CONT <F3> ANULLER <F5> HOVEDMENU".
M.7.."...................PROGRAMNAVN ":P
3$.""...8..P0$:.P0$."".56...9..F(P0$).13
.56...:..C(P3$).16..630:.81.D.<..P0$."."
.P3$.."".100.T.L..P0$.".".81...M..P0$.".
".1100. .N..F(P0$).91.F(P0$).64.F(P0$).4
4.F(P0$).59.F(P0$).32.80.(.O..56.H.P.P3$
.P3$.P0$:..17)"."P3$:.56.W.Q.P3$."":..15
)". "P3$:.56...D.PG$.
P1$.P3$.P2$...N.PR$.P4$.P3$.P5$.....I.1.
....."............. INDSAET DISKETT
E OG TRYK <F1> "......Z$.."D"..A%(1
6640):Z$."D"......A$:.A$..".".190.B.R.."
............LOADER ."P3$". VENT!".Q....
2,8,2,PG$.\....#2,A$.K...A$.A$.G(0).{...
A%(I).F(A$).....I.I.1..."..STATUS.0.240.
..,. 2...@..700...U..EN..0.1100.O.V.."."
.16)".UCCCCCCI"...W...16)". MENU ."...X.
..16)"JCCCCCCK"...[...10)"....<F1> = B
ACKUP-KOPI".:.\...10)".<F3> = HOVEDMEN
U".V.]...10)".<F5> = AFSLUT".I.^..Q$:.
Q$."".350..._..Q$..".".Q$..".".Q$..".".3
50...`..Q$.".".380...A..Q$.".".1100...B.
.Q$.".".490...|.."......... INDSAET N
Y DISKETTE, OG TRYK <F1> "...}..A$:.A
$..".".381...~..".....".11)"LAVER BACKUP
-KOPI".@....17)".VENT!".O....3,8,3,PR$.
\....K.1.I.1.M....3,G(A%(K));.T....K....
..700: 3...V..".......".9)"BACKUP-KOPIER
ER KLAR".L.W...10)".....<F1> = HOVEDM
ENU"...X...10)".<F3> = AFSLUT"...Y..Q$
:.Q$."".473...Z..Q$..".".Q$..".".473.%..
..Q$.".".1100.5....Q$.".".490.H....788,4
9:.58260...V.."............. PROGRAMNA
VN FOR LANGT!! TRYK <F1> ".....P3$.""
:..15)"...............
"P3$.S....A$:.A$..".".645......"......
.......<F1> CONT <F3> ANULLER <F5> HO
VEDMENU".-.....15)"...............":..:.
...15,8,15.O.F..15,EN,EM$,ET,ES.B.Z..EN.
0. 1: 15:.......".".6)"...STATUS: ";EN;E
M$......X.1.1500:.X..... 15.......H. .."
....".9)"UCCCCCCCCCCCCCCCCCCCCI"...!...9
)". DISKETTE OMD0BNING ."..."...9)"JCCCC
CCCCCCCCCCCCCCCCK".(.>.N$."":.15,8,15:.3
,8,3,"#".>.H..15,"U1 3 0 18 0".R.R..15,"
B-P 3 144".^.\..I.0.15.I.F..#3,A$.V.P.N$
.N$.A$.}.Z..I......#3,B$,C$,I1$,I2$.....
ID$.I1$.I2$.F...."...GAMMEL DISKETTE-NAV
N: "N$......"...NYT DISKETTE-NAVN";N$...
...C(N$).16.."..":N$."":.930......I.C(N$
).1.16.'...N$.N$.G(160)...J..I.I.T...11)
".GAMMEL ID: "ID$.A.....14):."NYT ID";ID
$.{....C(ID$)..2.."..":.990......"......
.... OMD0BNING <F1> HOVEDMENU <F
3> ".I....A$:.A$."".1006......A$..".".A
$..".".1006......A$.".".1010......A$."."
. 3: 15:.1100.!...A$.N$.B$.C$.ID$.5....1
5,"B-P 3 144".@....3,A$;.V....15,"U2 3 0
18 0".]... 3.J.$..15,"I0".}....700: 15:
.1100...L.."..".14)".UCCCCCCCCCCCI"...V.
..14)". HOVEDMENU .".M.`...14)"JCCCCCCCC
CCCK"...J...6)"...<1> = PROGRAM KOPIER
ING"...O...6)".<2> = PROGRAM SLETNING"
.>.T...6)".<3> = DISKETTE OMD0BNING".C
.X...6)".<4> = RENAME ET PROGRAM"...Y.
..6)".<5> = VALIDATE EN DISKETTE"...~.
..6)".<6> = DISKETTE FORMATERING".....
..6)".<7> = INITALISERE EN DISKETTE"..
.....6)".<8> = AFSLUT"......Q$:.Q$."".
1160......Q$."1".1580.,....Q$."2".30.<..
..Q$."3".800.M....Q$."4".1400.^....Q$."5
".1230.O....Q$."6".1370.....Q$."7".490.
.....Q$."8".60000...N.."....".8)"USSSSSS
SSSSSSSSSSSSSSSSI"...X...8)". DISKETTE F
ORMATERING .".......8)"JCCCCCCCCCCCCCCCC
CCCCCCK".&...."..............DISKETTE NA
VN";M$.@....C(M$).16.M$."":.1230.X.....1
2):.".ID NR.";N$.K....C(N$)..2.1230.....
."........... FORMATERING <F1> HOV
EDMENU <F3> "...(..A$: .A$."".1320.U.,.
.A$..".".A$..".".1320...-..A$.".".1330..
....A$.".".M$."":N$."":.1100.".2..1,8,15
:.1,"N0:".M$",".N$.4.<..700: 1:.1100.D.Z
..2,8,15,"I".K._. 2.Z.D..700:.1100...X..
"....".10)"UCCCCCCCCCCCCCCCCCCCI".......
10)". VALIDATE DISKETTE .".C.....10)"JCC
CCCCCCCCCCCCCCCCCK".W....2,8,15:.2,"V0".
.. ..700: 2:.1100......"....".8)"UCCCCCC
CCCCCCCCCCCCCCCI".3.....8)". SLETNING AF
PROGRAM .".U.H...8)"JCCCCCCCCCCCCCCCCCC
CCCK".{.R.."..............PROGRAM-NAVN "
;M$......C(M$).16.M$."":.1500.O...."....
...... SLETNING <F1> HOVEDMENU
<F3> "......A$:.A$."".1520......A$.."."
.A$..".".1520......A$.".".1560......A$."
.".1100.4....2,8,15,"S0:".M$.F."..700: 2
:.1100.L.,.."....".9)"UCCCCCCCCCCCCCCCCC
CCI"...6...9)". RENAME ET PROGRAM ."...@
...9)"JCCCCCCCCCCCCCCCCCCCK".T.J.M$."":.
"...GAMMEL PROGRAM-NAVN ";M$...T..C(M$).
16..".....":M$."":.1610...^.N$."":."....
NYT PROGRAM-NAVN";N$.<.H..C(N$).16..".."
:N$."":.1630.W.R.."........... RENAME
<F1> HOVEDMENU <F3> "...|..A$:
.A$."".1660......A$..".".A$..".".1660...
...A$.".".1700.T....A$.".".M$."":N$."":.
1100......2,8,15,"R0:".N$."=".M$......70
0: 2:.1100...X.. ***...`.."MAIN*",8:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL