> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0C 08 32 00 99 C7 28 31 34 29 00 1B 08 64 |....2...(14)...d|
00000010: 00 8D 36 32 30 3A 52 45 25 B2 30 00 43 08 6E 00 |..620:RE%.0.C.n.|
00000020: 99 22 93 05 C2 45 47 49 4E 4E 20 44 45 52 20 D3 |."...EGINN DER .|
00000030: 55 43 48 45 20 D3 50 55 52 20 22 44 49 25 22 2C |UCHE .PUR "DI%",|
00000040: 31 11 22 00 62 08 78 00 53 50 25 B2 31 3A 54 52 |1.".b.x.SP%.1:TR|
00000050: 25 B2 44 49 25 3A 9F 31 35 2C 38 2C 31 35 2C 22 |%.DI%:.15,8,15,"|
00000060: 49 30 00 78 08 82 00 9F 38 2C 38 2C 32 2C 22 23 |I0.x....8,8,2,"#|
00000070: 32 22 3A 46 49 25 B2 30 00 96 08 8C 00 98 31 35 |2":FI%.0......15|
00000080: 2C 22 55 31 3A 22 32 3B 30 3B 54 52 25 3B 53 50 |,"U1:"2;0;TR%;SP|
00000090: 25 3A 8D 35 36 30 00 C4 08 96 00 81 49 B2 30 A4 |%:.560......I.0.|
000000A0: 31 3A A1 23 38 2C 41 24 3A 8D 35 33 30 3A 50 25 |1:.#8,A$:.530:P%|
000000B0: 28 49 29 B2 C6 28 41 24 29 3A 82 3A 41 B2 32 3A |(I)..(A$):.:A.2:|
000000C0: 8D 35 35 30 00 DE 08 A0 00 A1 23 38 2C 41 24 3A |.550......#8,A$:|
000000D0: 8D 35 33 30 3A 41 B2 C6 28 41 24 29 AF 37 00 09 |.530:A..(A$).7..|
000000E0: 09 AA 00 48 24 B2 22 22 3A 81 49 B2 30 A4 31 3A |...H$."":.I.0.1:|
000000F0: A1 23 38 2C 41 24 3A 8D 35 33 30 3A 4C 25 28 49 |.#8,A$:.530:L%(I|
00000100: 29 B2 C6 28 41 24 29 3A 82 00 28 09 B4 00 81 49 |)..(A$):..(....I|
00000110: B2 33 A4 31 38 3A A1 23 38 2C 41 24 3A 48 24 B2 |.3.18:.#8,A$:H$.|
00000120: 48 24 AA 41 24 3A 82 3A 00 37 09 BE 00 8B 48 24 |H$.A$:.:.7....H$|
00000130: B2 22 22 A7 32 31 30 00 6E 09 C8 00 99 20 4B 49 |."".210.n.... KI|
00000140: 24 28 41 29 3B 22 20 22 3B 43 4F 24 3B 48 24 3B |$(A);" ";CO$;H$;|
00000150: A3 31 31 29 43 4F 24 3B 3B 4C 25 28 30 29 3B 4C |.11)CO$;;L%(0);L|
00000160: 25 28 31 29 3A 8B 41 B2 30 A7 89 33 38 30 00 98 |%(1):.A.0..380..|
00000170: 09 D2 00 46 49 25 B2 46 49 25 AA 31 3A 8B 46 49 |...FI%.FI%.1:.FI|
00000180: 25 B3 38 A7 41 B2 46 49 25 AC 33 32 AA 32 3A 8D |%.8.A.FI%.32.2:.|
00000190: 35 35 30 3A 89 31 36 30 00 A9 09 DC 00 8B 50 25 |550:.160......P%|
000001A0: 28 30 29 B2 30 A7 32 34 30 00 EE 09 E6 00 99 22 |(0).0.240......"|
000001B0: 11 D7 45 43 48 53 45 4C 20 41 55 46 20 D3 50 55 |..ECHSEL AUF .PU|
000001C0: 52 22 3B 3A 54 52 25 B2 50 25 28 30 29 3A 53 50 |R";:TR%.P%(0):SP|
000001D0: 25 B2 50 25 28 31 29 3A 46 49 25 B2 30 3A 99 54 |%.P%(1):FI%.0:.T|
000001E0: 52 25 3B 53 50 25 22 11 22 3A 89 31 34 30 00 2B |R%;SP%".":.140.+|
000001F0: 0A F0 00 A0 38 3A 99 22 12 11 C4 49 52 45 43 54 |....8:."...IRECT|
00000200: 4F 52 59 20 C5 4E 44 45 92 22 2C 3A 8B 52 45 25 |ORY .NDE.",:.RE%|
00000210: A7 99 22 C3 4F 4C 4C 45 43 54 20 C4 52 49 56 45 |..".OLLECT .RIVE|
00000220: 20 31 22 3A 98 31 35 2C 22 56 30 00 3A 0A FA 00 | 1":.15,"V0.:...|
00000230: 8D 35 36 30 3A A0 31 35 3A 80 00 56 0A 04 01 8F |.560:.15:..V....|
00000240: 2A 2A 20 20 52 45 54 52 49 45 56 45 20 41 20 46 |** RETRIEVE A F|
00000250: 49 4C 45 20 2A 2A 00 75 0A 0E 01 98 31 35 2C 22 |ILE **.u....15,"|
00000260: 55 31 3A 22 32 3B 30 3B 4C 25 28 30 29 3B 4C 25 |U1:"2;0;L%(0);L%|
00000270: 28 31 29 3A 8E 00 90 0A 18 01 44 25 B2 32 3A 99 |(1):......D%.2:.|
00000280: 22 11 D3 50 55 52 2C 20 D3 45 4B 54 4F 52 22 3B |"..PUR, .EKTOR";|
00000290: 00 B8 0A 22 01 8D 32 37 30 3A 81 49 B2 30 A4 31 |..."..270:.I.0.1|
000002A0: 3A A1 23 38 2C 41 24 3A 8D 35 33 30 3A 5A 25 28 |:.#8,A$:.530:Z%(|
000002B0: 49 29 B2 C6 28 41 24 29 00 DE 0A 2C 01 99 5A 25 |I)..(A$)...,..Z%|
000002C0: 28 49 29 22 9D 20 22 3B 3A 82 3A 99 3A 99 22 91 |(I)". ";:.:.:.".|
000002D0: D3 50 55 52 2C 20 D3 45 4B 54 4F 52 22 3B 00 EF |.PUR, .EKTOR";..|
000002E0: 0A 36 01 8B 5A 25 28 30 29 B2 30 A7 99 3A 8E 00 |.6..Z%(0).0..:..|
000002F0: 2F 0B 40 01 98 31 35 2C 22 42 2D 46 22 30 3B 5A |/.@..15,"B-F"0;Z|
00000300: 25 28 30 29 3B 5A 25 28 31 29 3A 4C 25 28 30 29 |%(0);Z%(1):L%(0)|
00000310: B2 5A 25 28 30 29 3A 4C 25 28 31 29 B2 5A 25 28 |.Z%(0):L%(1).Z%(|
00000320: 31 29 3A 5A 25 28 44 25 29 B2 5A 25 28 30 29 00 |1):Z%(D%).Z%(0).|
00000330: 4A 0B 4A 01 5A 25 28 44 25 AA 31 29 B2 5A 25 28 |J.J.Z%(D%.1).Z%(|
00000340: 31 29 3A 44 25 B2 44 25 AA 32 00 58 0B 54 01 8B |1):D%.D%.2.X.T..|
00000350: 44 53 B2 30 A7 32 39 30 00 9E 0B 5E 01 99 3A 99 |DS.0.290...^..:.|
00000360: 22 12 C4 41 53 20 C6 49 4C 45 20 57 55 52 44 45 |"..AS .ILE WURDE|
00000370: 20 42 45 52 45 49 54 53 20 55 45 42 45 52 53 43 | BEREITS UEBERSC|
00000380: 48 52 49 45 42 45 4E 92 21 22 3A 58 25 B2 A8 28 |HRIEBEN.!":X%..(|
00000390: 58 25 29 3A 41 B2 46 49 25 AC 33 32 AA 32 00 CA |X%):A.FI%.32.2..|
000003A0: 0B 68 01 81 49 B2 32 A4 44 25 AB 34 A9 32 3A 98 |.h..I.2.D%.4.2:.|
000003B0: 31 35 2C 22 42 2D 46 3A 22 30 3B 5A 25 28 49 29 |15,"B-F:"0;Z%(I)|
000003C0: 3B 5A 25 28 49 AA 31 29 3A 82 00 EC 0B 72 01 4C |;Z%(I.1):....r.L|
000003D0: 25 28 30 29 B2 54 52 25 3A 4C 25 28 31 29 B2 53 |%(0).TR%:L%(1).S|
000003E0: 50 25 3A 8D 32 37 30 3A 89 35 35 30 00 0A 0C 7C |P%:.270:.550...||
000003F0: 01 99 22 DA 55 52 55 45 43 4B 48 4F 4C 45 4E 3F |..".URUECKHOLEN?|
00000400: 20 28 CA 2F CE 29 A0 A0 A0 A0 00 21 0C 81 01 A1 | (./.).....!....|
00000410: 20 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 33 38 | A$:. A$."" . 38|
00000420: 35 00 33 0C 86 01 8B 20 41 24 B3 B1 22 4A 22 A7 |5.3.... A$.."J".|
00000430: 32 31 30 00 71 0C 90 01 58 25 B2 30 3A 99 22 11 |210.q...X%.0:.".|
00000440: C2 4C 4F 43 4B 53 20 57 49 45 44 45 52 42 45 4C |.LOCKS WIEDERBEL|
00000450: 45 47 45 4E 2E 2E 2E 22 3A 5A 25 28 30 29 B2 4C |EGEN...":Z%(0).L|
00000460: 25 28 30 29 3A 8D 32 38 30 3A 8B 58 25 A7 32 31 |%(0):.280:.X%.21|
00000470: 30 00 A9 0C 9A 01 99 22 11 C9 53 54 20 44 49 45 |0......"..ST DIE|
00000480: 53 20 45 49 4E 20 12 D0 92 52 4F 47 52 41 4D 4D |S EIN ...ROGRAMM|
00000490: 2C 12 D3 92 45 51 55 45 4E 49 45 4C 4C 45 53 2C |,...EQUENIELLES,|
000004A0: 20 12 D5 92 53 45 52 2C 22 00 C7 0C A4 01 99 22 | ...SER,"......"|
000004B0: 4F 44 45 52 20 12 D2 92 45 4C 41 54 49 56 45 53 |ODER ...ELATIVES|
000004C0: 20 C6 49 4C 45 22 3B 00 FA 0C AE 01 A1 20 4A 41 | .ILE";...... JA|
000004D0: 24 3A 8B 4A 41 24 B3 B1 22 50 22 AF 4A 41 24 B3 |$:.JA$.."P".JA$.|
000004E0: B1 22 53 22 AF 4A 41 24 B3 B1 22 55 22 AF 4A 41 |."S".JA$.."U".JA|
000004F0: 24 B3 B1 22 52 22 A7 34 33 30 00 02 0D B3 01 99 |$.."R".430......|
00000500: 3A 99 00 2D 0D B8 01 99 3A 8B 4A 41 24 B2 22 50 |:..-....:.JA$."P|
00000510: 22 A7 99 22 12 D0 52 4F 47 52 41 4D 4D 92 2D 22 |".."..ROGRAMM.-"|
00000520: 3A 4B 49 25 B2 31 33 30 3A 89 34 38 30 00 52 0D |:KI%.130:.480.R.|
00000530: C2 01 8B 4A 41 24 B2 22 55 22 A7 99 22 12 D5 53 |...JA$."U".."..S|
00000540: 45 52 92 2D 22 3A 4B 49 25 B2 31 33 31 3A 89 34 |ER.-":KI%.131:.4|
00000550: 38 30 00 7C 0D CC 01 8B 4A 41 24 B2 22 52 22 A7 |80.|....JA$."R".|
00000560: 99 22 12 D2 45 4C 41 54 49 56 45 53 92 2D 22 3A |."..ELATIVES.-":|
00000570: 4B 49 25 B2 31 33 32 3A 89 34 38 30 00 9C 0D D6 |KI%.132:.480....|
00000580: 01 99 22 12 D3 45 51 55 45 4E 54 49 45 4C 4C 45 |.."..EQUENTIELLE|
00000590: 53 92 2D 22 3A 4B 49 25 B2 31 32 39 00 B7 0D E0 |S.-":KI%.129....|
000005A0: 01 99 22 C6 49 4C 45 20 57 49 45 44 45 52 48 4F |..".ILE WIEDERHO|
000005B0: 4C 45 4E 2E 2E 2E 22 00 D4 0D EA 01 4C 25 28 30 |LEN...".....L%(0|
000005C0: 29 B2 54 52 25 3A 4C 25 28 31 29 B2 53 50 25 3A |).TR%:L%(1).SP%:|
000005D0: 8D 32 37 30 00 F3 0D F4 01 41 B2 46 49 25 AC 33 |.270.....A.FI%.3|
000005E0: 32 AA 32 3A 8D 35 35 30 3A 98 38 2C C7 28 4B 49 |2.2:.550:.8,.(KI|
000005F0: 25 29 3B 00 1B 0E FE 01 42 4C 25 B2 28 28 44 25 |%);.....BL%.((D%|
00000600: AB 32 29 AD 32 29 AA 31 3A 99 22 11 22 42 4C 25 |.2).2).1:."."BL%|
00000610: 22 C2 4C 4F 45 43 4B 45 20 22 3B 00 57 0E 08 02 |".LOECKE ";.W...|
00000620: 98 31 35 2C 22 55 32 3A 22 32 3B 30 3B 54 52 25 |.15,"U2:"2;0;TR%|
00000630: 3B 53 50 25 3A 99 22 D7 49 45 44 45 52 48 45 52 |;SP%:.".IEDERHER|
00000640: 47 45 53 54 45 4C 4C 54 20 21 11 22 3A 52 45 25 |GESTELLT !.":RE%|
00000650: B2 31 3A 89 32 31 30 00 6A 0E 12 02 8B 41 24 B2 |.1:.210.j....A$.|
00000660: 22 22 A7 41 24 B2 C7 28 30 29 00 70 0E 1C 02 8E |"".A$..(0).p....|
00000670: 00 82 0E 26 02 98 31 35 2C 22 42 2D 50 3A 22 32 |...&..15,"B-P:"2|
00000680: 3B 41 00 A3 0E 30 02 84 31 35 2C 45 4E 25 2C 45 |;A...0..15,EN%,E|
00000690: 4D 24 2C 45 54 25 2C 45 53 25 3A 8B 45 4E 25 B2 |M$,ET%,ES%:.EN%.|
000006A0: 30 A7 8E 00 B9 0E 3A 02 99 22 11 11 12 44 49 53 |0.....:.."...DIS|
000006B0: 4B 20 46 45 48 4C 45 52 92 00 E8 0E 44 02 99 22 |K FEHLER....D.."|
000006C0: 11 C6 45 48 4C 45 52 20 CD 45 4C 44 55 4E 47 92 |..EHLER .ELDUNG.|
000006D0: 3A 20 22 45 4E 25 22 20 22 45 4D 24 22 2C 22 45 |: "EN%" "EM$","E|
000006E0: 54 25 22 2C 22 45 53 25 00 02 0F 4E 02 99 22 42 |T%","ES%...N.."B|
000006F0: 49 54 54 45 20 27 C3 CF CE D4 27 20 47 45 42 45 |ITTE '....' GEBE|
00000700: 4E 2E 00 08 0F 58 02 80 00 0E 0F 62 02 8E 00 38 |N....X.....b...8|
00000710: 0F 6C 02 86 50 25 28 31 29 2C 4C 25 28 31 29 2C |.l..P%(1),L%(1),|
00000720: 5A 25 28 33 30 30 29 2C 4B 49 24 28 34 29 3A 43 |Z%(300),KI$(4):C|
00000730: 4F 24 B2 C7 28 33 34 29 00 4D 0F 76 02 81 49 B2 |O$..(34).M.v..I.|
00000740: 30 A4 34 3A 87 4B 49 24 28 49 29 3A 82 00 72 0F |0.4:.KI$(I):..r.|
00000750: 80 02 83 22 12 C4 C5 CC 92 22 2C 22 D3 C5 D1 22 |...".....","..."|
00000760: 2C 22 D0 D2 C7 22 2C 22 D5 D3 D2 22 2C 22 D2 C5 |,"...","...","..|
00000770: CC 22 00 A9 0F 8A 02 50 47 24 B2 22 05 93 12 20 |.".....PG$."... |
00000780: 20 20 20 20 20 C4 49 53 4B 20 C6 49 4C 45 20 D2 | .ISK .ILE .|
00000790: 45 54 54 45 52 20 D6 C3 31 35 34 30 2F 31 35 34 |ETTER ..1540/154|
000007A0: 31 20 20 20 20 20 20 92 22 00 E0 0F 94 02 99 50 |1 ."......P|
000007B0: 47 24 22 11 22 3A 99 22 C4 49 45 53 45 53 20 D0 |G$".":.".IESES .|
000007C0: 52 4F 47 52 41 4D 4D 20 45 52 4D 4F 45 47 4C 49 |ROGRAMM ERMOEGLI|
000007D0: 43 48 54 20 44 41 53 20 D7 49 45 44 45 52 2D 22 |CHT DAS .IEDER-"|
000007E0: 00 08 10 9E 02 99 22 48 45 52 53 54 45 4C 4C 45 |......"HERSTELLE|
000007F0: 4E 20 56 4F 4E 20 47 45 4C 4F 45 53 43 48 54 45 |N VON GELOESCHTE|
00000800: 4E 20 C6 49 4C 45 53 2E 00 39 10 A8 02 99 22 C5 |N .ILES..9....".|
00000810: 53 20 57 49 52 44 20 56 4F 52 41 55 53 47 45 53 |S WIRD VORAUSGES|
00000820: 45 54 5A 54 2C 44 41 53 53 20 44 49 45 20 C4 49 |ETZT,DASS DIE .I|
00000830: 53 4B 20 4E 4F 43 48 22 3B 00 5F 10 B2 02 99 22 |SK NOCH";._...."|
00000840: 4E 49 43 48 54 20 57 49 45 44 45 52 20 42 45 53 |NICHT WIEDER BES|
00000850: 43 48 52 49 45 42 45 4E 20 57 55 52 44 45 2E 00 |CHRIEBEN WURDE..|
00000860: 8E 10 BC 02 99 22 11 31 30 30 25 20 C5 52 46 4F |.....".100% .RFO|
00000870: 4C 47 20 49 53 54 20 4E 55 52 20 4E 41 43 48 20 |LG IST NUR NACH |
00000880: 27 D3 C3 D2 C1 D4 C3 C8 27 20 47 45 2D 22 00 A2 |'.......' GE-"..|
00000890: 10 C6 02 99 22 57 41 45 48 52 4C 45 49 53 54 45 |...."WAEHRLEISTE|
000008A0: 54 2E 00 E4 10 D0 02 99 22 11 C2 45 49 4D 20 D3 |T......."..EIM .|
000008B0: 55 43 48 45 4E 20 57 45 52 44 45 4E 20 4E 55 52 |UCHEN WERDEN NUR|
000008C0: 20 44 49 45 20 47 45 4C 4F 45 53 43 48 54 45 4E | DIE GELOESCHTEN|
000008D0: 20 20 C4 41 54 45 49 45 4E 20 41 42 47 45 46 52 | .ATEIEN ABGEFR|
000008E0: 41 47 54 22 00 02 11 E4 02 99 22 11 11 11 20 20 |AGT"......"... |
000008F0: 20 D4 41 53 54 45 20 44 52 55 45 43 4B 45 4E 20 | .ASTE DRUECKEN |
00000900: 21 22 00 1B 11 E9 02 A1 20 54 44 24 3A 8B 20 54 |!"...... TD$:. T|
00000910: 44 24 B2 22 22 20 A7 20 37 34 35 00 28 11 EE 02 |D$."" . 745.(...|
00000920: 44 49 25 B2 31 38 3A 8E 00 39 11 F8 02 99 22 91 |DI%.18:..9....".|
00000930: 91 91 91 22 3A 89 37 34 30 00 00 00 |...":.740... |
....2..G(14)...D..620:RE%.0.C.N.."..BEGI
NN DER SUCHE SPUR "DI%",1.".B.X.SP%.1:TR
%.DI%:.15,8,15,"I0.X....8,8,2,"#2":FI%.0
......15,"U1:"2;0;TR%;SP%:.560.D....I.0.
1:.#8,A$:.530:P%(I).F(A$):.:A.2:.550...
..#8,A$:.530:A.F(A$).7.....H$."":.I.0.1:
.#8,A$:.530:L%(I).F(A$):..(....I.3.18:.#
8,A$:H$.H$.A$:.:.7....H$."".210.N.H.. KI
$(A);" ";CO$;H$;.11)CO$;;L%(0);L%(1):.A.
0..380...R.FI%.FI%.1:.FI%.8.A.FI%.32.2:.
550:.160......P%(0).0.240......".WECHSEL
AUF SPUR";:TR%.P%(0):SP%.P%(1):FI%.0:.T
R%;SP%".":.140.+... 8:."..DIRECTORY ENDE
.",:.RE%.."COLLECT DRIVE 1":.15,"V0.:...
.560: 15:..V....** RETRIEVE A FILE **.U
....15,"U1:"2;0;L%(0);L%(1):......D%.2:.
".SPUR, SEKTOR";..."..270:.I.0.1:.#8,A$:
.530:Z%(I).F(A$)...,..Z%(I)". ";:.:.:.".
SPUR, SEKTOR";...6..Z%(0).0..:../.@..15,
"B-F"0;Z%(0);Z%(1):L%(0).Z%(0):L%(1).Z%(
1):Z%(D%).Z%(0).J.J.Z%(D%.1).Z%(1):D%.D%
.2.X.T..DS.0.290...^..:.".DAS FILE WURDE
BEREITS UEBERSCHRIEBEN.!":X%..(X%):A.FI
%.32.2.J.H..I.2.D%.4.2:.15,"B-F:"0;Z%(I)
;Z%(I.1):....R.L%(0).TR%:L%(1).SP%:.270:
.550...|.."ZURUECKHOLEN? (J/N) .!....
A$:. A$."" . 385.3.... A$.."J".210.Q...
X%.0:.".BLOCKS WIEDERBELEGEN...":Z%(0).L
%(0):.280:.X%.210......".IST DIES EIN .P
.ROGRAMM,.S.EQUENIELLES, .U.SER,".G...."
ODER .R.ELATIVES FILE";...... JA$:.JA$..
"P".JA$.."S".JA$.."U".JA$.."R".430......
:..-....:.JA$."P"..".PROGRAMM.-":KI%.130
:.480.R.B..JA$."U"..".USER.-":KI%.131:.4
80.|.L..JA$."R"..".RELATIVES.-":KI%.132:
.480...V..".SEQUENTIELLES.-":KI%.129....
.."FILE WIEDERHOLEN...".T...L%(0).TR%:L%
(1).SP%:.270.....A.FI%.32.2:.550:.8,G(KI
%);.....BL%.((D%.2).2).1:."."BL%"BLOECKE
";.W....15,"U2:"2;0;TR%;SP%:."WIEDERHER
GESTELLT !.":RE%.1:.210.J....A$."".A$.G(
0).P.......&..15,"B-P:"2;A...0..15,EN%,E
M$,ET%,ES%:.EN%.0.....:.."...DISK FEHLER
....D..".FEHLER MELDUNG.: "EN%" "EM$","E
T%","ES%...N.."BITTE 'CONT' GEBEN....X..
...B...8.L..P%(1),L%(1),Z%(300),KI$(4):C
O$.G(34).M.V..I.0.4:.KI$(I):..R....".DEL
.","SEQ","PRG","USR","REL".....PG$."...
DISK FILE RETTER VC1540/1541 .
"......PG$".":."DIESES PROGRAMM ERMOEGLI
CHT DAS WIEDER-"......"HERSTELLEN VON GE
LOESCHTEN FILES..9...."ES WIRD VORAUSGES
ETZT,DASS DIE DISK NOCH";._...."NICHT WI
EDER BESCHRIEBEN WURDE.......".100% ERFO
LG IST NUR NACH 'SCRATCH' GE-"...F.."WAE
HRLEISTET....P..".BEIM SUCHEN WERDEN NUR
DIE GELOESCHTEN DATEIEN ABGEFRAGT"....
.."... TASTE DRUECKEN !"...... TD$:. T
D$."" . 745.(...DI%.18:..9...."....":.74
0...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL