_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

10

FILE INFORMATION

FILENAME(S): 10

FILE TYPE(S): PRG

FILE SIZE: 4.1K

FIRST SEEN: 2025-11-02 22:12:15

APPEARS ON: 1 disk(s)

FILE HASH

a0bb06a7607ed731c76392a55a611bbb9df678e46345ecc8b9842d4cfc6640db

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
ROLAND 10 PRG Treasure Chest - ToGuMi 23 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 1C 08 0A 00 99 22  93 22 3A 97 35 33 32 38  |.......".":.5328|
00000010: 30 2C 30 3A 97 35 33 32  38 31 2C 30 00 52 08 6E  |0,0:.53281,0.R.n|
00000020: 00 97 35 36 2C C2 28 34  36 29 AA 31 34 3A 9C 3A  |..56,.(46).14:.:|
00000030: 52 42 B2 32 35 35 AB C2  28 35 36 29 3A 50 41 B2  |RB.255..(56):PA.|
00000040: 31 3A 41 4E B2 30 3A 42  4C B2 30 3A 4E 46 24 B2  |1:AN.0:BL.0:NF$.|
00000050: 22 22 00 85 08 78 00 50  45 B2 C2 28 34 35 29 AA  |""...x.PE..(45).|
00000060: 32 35 36 AC C2 28 34 36  29 3A 4D 52 B2 50 45 AB  |256..(46):MR.PE.|
00000070: 31 33 35 3A 4D 57 B2 50  45 AB 37 39 3A 4D 44 B2  |135:MW.PE.79:MD.|
00000080: 50 45 AB 32 34 00 BC 08  82 00 86 4E 46 24 28 31  |PE.24......NF$(1|
00000090: 34 30 29 2C 43 46 25 28  31 34 30 29 2C 42 4C 25  |40),CF%(140),BL%|
000000A0: 28 31 34 30 29 2C 50 25  28 31 30 29 2C 41 4C 25  |(140),P%(10),AL%|
000000B0: 28 39 30 29 2C 41 48 25  28 39 30 29 00 E0 08 8C  |(90),AH%(90)....|
000000C0: 00 50 25 28 30 29 B2 30  3A 41 4C 25 28 30 29 B2  |.P%(0).0:AL%(0).|
000000D0: 30 3A 41 48 25 28 30 29  B2 C2 28 35 36 29 AB 31  |0:AH%(0)..(56).1|
000000E0: 00 06 09 96 00 8F 20 2A  2A 2A 2A 2A 2A 2A 2A 2A  |...... *********|
000000F0: 43 4F 50 59 20 34 30 30  30 2A 2A 2A 2A 2A 2A 2A  |COPY 4000*******|
00000100: 2A 2A 2A 2A 2A 2A 00 2C  09 97 00 8F 20 2A 2A 43  |******.,.... **C|
00000110: 4F 50 59 52 49 47 48 54  20 28 43 29 20 42 59 20  |OPYRIGHT (C) BY |
00000120: 43 2E 20 48 41 45 4E 53  43 48 2A 2A 00 52 09 98  |C. HAENSCH**.R..|
00000130: 00 8F 20 2A 2A 54 45 4C  3A 20 28 30 33 30 29 2F  |.. **TEL: (030)/|
00000140: 33 33 34 20 33 33 20 36  32 20 20 20 20 20 20 20  |334 33 62       |
00000150: 2A 2A 00 78 09 99 00 8F  20 2A 2A 42 45 52 4C 49  |**.x.... **BERLI|
00000160: 4E 20 32 30 2C 44 45 4E  20 32 33 2E 33 2E 31 39  |N 20,DEN 23.3.19|
00000170: 38 34 20 20 20 20 2A 2A  00 9E 09 9A 00 8F 20 2A  |84    **...... *|
00000180: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000190: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 00 A4  |**************..|
000001A0: 09 A0 00 8F 00 D8 09 AA  00 99 22 93 12 91 9C 20  |..........".... |
000001B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000001C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000001D0: 20 20 20 20 20 20 20 22  00 0B 0A AB 00 99 22 12  |       "......".|
000001E0: 91 1E 20 20 20 20 20 20  20 20 20 20 20 20 43 20  |..            C |
000001F0: 4F 20 50 20 59 20 20 34  20 30 20 30 20 30 20 20  |O P Y  4 0 0 0  |
00000200: 20 20 20 20 20 20 20 20  20 20 22 00 3E 0A AC 00  |          ".>...|
00000210: 99 22 12 91 81 20 20 20  20 20 20 20 20 20 28 43  |."...         (C|
00000220: 29 20 42 59 20 53 45 42  41 53 54 49 41 4E 20 42  |) BY SEBASTIAN B|
00000230: 4F 4C 44 54 20 20 20 20  20 20 20 20 20 22 00 5E  |OLDT         ".^|
00000240: 0A B3 00 99 22 05 20 20  20 20 20 20 20 20 20 20  |....".          |
00000250: 20 20 20 20 20 4D 20 45  20 4E 20 55 20 45 00 8F  |     M E N U E..|
00000260: 0A B4 00 99 22 05 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |...."...........|
00000270: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00000280: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 22 00  |..............".|
00000290: BA 0A B5 00 99 22 11 1D  1D 12 31 2E 92 20 20 44  |....."....1..  D|
000002A0: 49 52 45 43 54 4F 52 59  20 20 20 20 12 32 2E 92  |IRECTORY    .2..|
000002B0: 20 20 4B 4F 50 49 45 52  45 4E 00 EE 0A B6 00 99  |  KOPIEREN......|
000002C0: 22 11 1D 1D 12 33 2E 92  20 20 46 4F 52 4D 41 54  |"....3..  FORMAT|
000002D0: 49 45 52 45 4E 20 20 12  34 2E 92 20 20 44 49 53  |IEREN  .4..  DIS|
000002E0: 4B 4E 41 4D 45 2F 49 44  20 28 4E 45 55 29 00 1A  |KNAME/ID (NEU)..|
000002F0: 0B B7 00 99 22 1D 1D 12  35 2E 92 20 20 53 43 52  |...."...5..  SCR|
00000300: 41 54 43 48 20 20 20 20  20 20 12 36 2E 92 20 20  |ATCH      .6..  |
00000310: 49 4E 49 54 49 41 4C 49  5A 45 00 43 0B B8 00 99  |INITIALIZE.C....|
00000320: 22 11 1D 1D 12 37 2E 92  20 20 44 49 53 4B 2D 46  |"....7..  DISK-F|
00000330: 45 48 4C 45 52 20 20 12  38 2E 92 20 20 52 45 4E  |EHLER  .8..  REN|
00000340: 41 4D 45 00 6A 0B B9 00  99 22 11 1D 1D 12 39 2E  |AME.j...."....9.|
00000350: 92 20 20 56 41 4C 49 44  41 54 45 20 20 20 20 20  |.  VALIDATE     |
00000360: 12 45 2E 92 20 20 45 4E  44 45 00 9A 0B DC 00 99  |.E..  ENDE......|
00000370: 22 11 11 11 11 12 1D 1D  1D 1D 1D 1D 1D 1D 1D 42  |"..............B|
00000380: 49 54 54 45 20 57 41 45  48 4C 45 4E 20 53 49 45  |ITTE WAEHLEN SIE|
00000390: 21 21 22 3A 44 43 24 B2  22 22 00 B0 0B DD 00 A1  |!!":DC$.""......|
000003A0: 44 43 24 3A 8B 44 43 24  B2 22 45 22 A7 36 36 30  |DC$:.DC$."E".660|
000003B0: 00 CD 0B E6 00 44 43 B2  C5 28 44 43 24 29 3A 8B  |.....DC..(DC$):.|
000003C0: 44 43 B3 31 B0 44 43 B1  39 A7 32 32 31 00 FF 0B  |DC.1.DC.9.221...|
000003D0: F0 00 91 44 43 89 39 31  30 2C 32 37 30 2C 37 30  |...DC.910,270,70|
000003E0: 30 2C 31 31 30 30 2C 31  32 30 30 2C 31 33 30 30  |0,1100,1200,1300|
000003F0: 2C 31 34 30 30 2C 31 35  30 30 2C 31 36 30 30 00  |,1400,1500,1600.|
00000400: 05 0C 04 01 8F 00 2D 0C  0E 01 99 22 93 11 11 11  |......-...."....|
00000410: 11 11 11 11 11 12 9C 4F  52 47 49 4E 41 4C 44 49  |.......ORGINALDI|
00000420: 53 4B 20 45 49 4E 4C 45  47 45 4E 05 22 00 36 0C  |SK EINLEGEN.".6.|
00000430: 18 01 8D 39 39 30 00 3C  0C 22 01 8F 00 4C 0C 2C  |...990.<."...L.,|
00000440: 01 9F 31 2C 38 2C 30 2C  22 24 30 22 00 62 0C 36  |..1,8,0,"$0".b.6|
00000450: 01 8D 37 36 30 3A 8B 4E  46 24 B3 B1 22 22 A7 33  |..760:.NF$.."".3|
00000460: 34 30 00 70 0C 40 01 8B  53 54 B2 30 A7 33 31 30  |40.p.@..ST.0.310|
00000470: 00 79 0C 4A 01 89 33 35  30 00 B7 0C 54 01 42 4C  |.y.J..350...T.BL|
00000480: 25 28 41 4E 29 B2 C6 28  42 4C 24 AA C7 28 30 29  |%(AN)..(BL$..(0)|
00000490: 29 3A 4E 46 24 28 41 4E  29 B2 4E 46 24 3A 8B 53  |):NF$(AN).NF$:.S|
000004A0: 54 B2 30 A7 41 4E B2 41  4E AA 31 3A 4E 46 24 B2  |T.0.AN.AN.1:NF$.|
000004B0: 22 22 3A 89 33 31 30 00  E9 0C 5E 01 A0 31 3A 41  |"":.310...^..1:A|
000004C0: 4E B2 41 4E AB 31 3A 8B  41 4E B2 30 A7 99 22 11  |N.AN.1:.AN.0..".|
000004D0: 11 12 4C 45 45 52 45 20  44 49 53 4B 45 54 54 45  |..LEERE DISKETTE|
000004E0: 92 22 3A 8D 39 39 30 3A  8A 00 EF 0C 68 01 8F 00  |.":.990:....h...|
000004F0: 18 0D 72 01 99 22 93 1D  1D 1D 1D 1D 1D 1D 1D 1D  |..r.."..........|
00000500: 1D 41 4E 54 57 4F 52 54  45 4E 20 53 49 45 20 4D  |.ANTWORTEN SIE M|
00000510: 49 54 20 4A 2F 4E 11 22  00 44 0D 7C 01 81 49 B2  |IT J/N.".D.|..I.|
00000520: 31 A4 41 4E 3A 99 42 4C  25 28 49 29 3B A3 39 29  |1.AN:.BL%(I);.9)|
00000530: 4E 46 24 28 49 29 22 14  14 14 14 22 3B 3A 97 31  |NF$(I)"....";:.1|
00000540: 39 38 2C 30 00 53 0D 86  01 92 31 39 38 2C 31 3A  |98,0.S....198,1:|
00000550: A1 41 24 00 8D 0D 87 01  8B 41 24 B2 22 4A 22 A7  |.A$......A$."J".|
00000560: 43 46 25 28 49 29 B2 AB  31 3A 42 4C B2 42 4C AA  |CF%(I)..1:BL.BL.|
00000570: 42 4C 25 28 49 29 3A 99  A3 33 30 29 22 12 1E 20  |BL%(I):..30)".. |
00000580: 20 4A 41 20 20 92 05 22  3A 89 34 32 30 00 A7 0D  | JA  ..":.420...|
00000590: 90 01 43 46 25 28 49 29  B2 30 3A 8B 41 24 B3 B1  |..CF%(I).0:.A$..|
000005A0: 22 4E 22 A7 33 39 30 00  BD 0D 9A 01 99 A3 33 30  |"N".390.......30|
000005B0: 29 22 12 1C 20 4E 45 49  4E 20 92 05 22 00 E5 0D  |)".. NEIN .."...|
000005C0: A4 01 8B 42 4C B1 52 42  A7 50 25 28 50 41 29 B2  |...BL.RB.P%(PA).|
000005D0: 49 AB 31 3A 50 41 B2 50  41 AA 31 3A 42 4C B2 42  |I.1:PA.PA.1:BL.B|
000005E0: 4C 25 28 49 29 00 F6 0D  AE 01 82 49 3A 50 25 28  |L%(I)......I:P%(|
000005F0: 50 41 29 B2 41 4E 00 04  0E B8 01 8B 42 4C B2 30  |PA).AN......BL.0|
00000600: A7 36 34 30 00 0A 0E C2  01 8F 00 1E 0E CC 01 99  |.640............|
00000610: 22 93 12 4B 4F 50 49 45  52 45 21 92 11 22 00 2A  |"..KOPIERE!..".*|
00000620: 0E D6 01 81 49 B2 31 A4  50 41 00 60 0E E0 01 81  |....I.1.PA.`....|
00000630: 52 57 B2 30 A4 31 3A 4E  52 B2 30 3A 8B 52 57 B2  |RW.0.1:NR.0:.RW.|
00000640: 31 A7 99 22 12 11 1E 5A  49 45 4C 44 49 53 4B 20  |1.."...ZIELDISK |
00000650: 45 49 4E 4C 45 47 45 4E  92 05 22 3A 8D 39 39 30  |EINLEGEN..":.990|
00000660: 00 77 0E EA 01 81 4A B2  50 25 28 49 AB 31 29 AA  |.w....J.P%(I.1).|
00000670: 31 A4 50 25 28 49 29 00  8C 0E F4 01 8B A8 43 46  |1.P%(I).......CF|
00000680: 25 28 4A 29 A7 82 4A 3A  89 35 34 30 00 BF 0E FE  |%(J)..J:.540....|
00000690: 01 4E 46 24 B2 4E 46 24  28 4A 29 3A 99 42 4C 25  |.NF$.NF$(J):.BL%|
000006A0: 28 4A 29 3B A3 35 29 4E  46 24 3A 8D 35 37 30 3A  |(J);.5)NF$:.570:|
000006B0: 8B 53 54 B2 30 B0 53 54  B2 36 34 A7 35 33 30 00  |.ST.0.ST.64.530.|
000006C0: CA 0E 08 02 8D 38 38 30  3A 8A 00 D1 0E 12 02 82  |.....880:.......|
000006D0: 4A 00 E3 0E 1C 02 82 52  57 3A 8B 49 B2 50 41 A7  |J......RW:.I.PA.|
000006E0: 36 34 30 00 06 0F 26 02  99 22 12 9C 4F 52 47 49  |640...&.."..ORGI|
000006F0: 4E 41 4C 44 49 53 4B 20  45 49 4E 4C 45 47 45 4E  |NALDISK EINLEGEN|
00000700: 22 3A 8D 39 39 30 00 0F  0F 30 02 82 49 3A 8A 00  |":.990...0..I:..|
00000710: 1D 0F 3A 02 8B 52 57 B2  31 A7 36 31 30 00 47 0F  |..:..RW.1.610.G.|
00000720: 44 02 9F 31 2C 38 2C 35  2C 4E 46 24 AA 22 2C 52  |D..1,8,5,NF$.",R|
00000730: 22 3A 97 32 35 32 2C 30  3A 97 32 35 33 2C 41 48  |":.252,0:.253,AH|
00000740: 25 28 4E 52 29 AA 31 00  75 0F 4E 02 9E 4D 52 3A  |%(NR).1.u.N..MR:|
00000750: 4E 52 B2 4E 52 AA 31 3A  41 4C 25 28 4E 52 29 B2  |NR.NR.1:AL%(NR).|
00000760: C2 28 32 35 34 29 3A 41  48 25 28 4E 52 29 B2 C2  |.(254):AH%(NR)..|
00000770: 28 32 35 35 29 00 7E 0F  58 02 A0 31 3A 8E 00 A8  |(255).~.X..1:...|
00000780: 0F 62 02 9F 31 2C 38 2C  35 2C 4E 46 24 AA 22 2C  |.b..1,8,5,NF$.",|
00000790: 57 22 3A 97 32 35 32 2C  30 3A 97 32 35 33 2C 41  |W":.252,0:.253,A|
000007A0: 48 25 28 4E 52 29 AA 31  00 CE 0F 6C 02 97 32 35  |H%(NR).1...l..25|
000007B0: 34 2C 41 4C 25 28 4E 52  AA 31 29 3A 97 32 35 35  |4,AL%(NR.1):.255|
000007C0: 2C 41 48 25 28 4E 52 AA  31 29 3A 9E 4D 57 00 DF  |,AH%(NR.1):.MW..|
000007D0: 0F 76 02 4E 52 B2 4E 52  AA 31 3A A0 31 3A 8E 00  |.v.NR.NR.1:.1:..|
000007E0: F5 0F 80 02 99 22 12 05  4B 4F 50 49 45 20 46 45  |....."..KOPIE FE|
000007F0: 52 54 49 47 21 00 00 10  8A 02 8D 39 39 30 3A 8A  |RTIG!......990:.|
00000800: 00 0B 10 94 02 9E 36 34  37 33 38 00 19 10 9E 02  |......64738.....|
00000810: 97 35 36 2C 31 36 30 3A  80 00 1F 10 A8 02 3A 00  |.56,160:......:.|
00000820: 25 10 B2 02 8F 00 6A 10  BC 02 85 22 93 11 1D 05  |%.....j...."....|
00000830: 44 49 53 4B 4E 41 4D 45  22 3B 46 4F 24 3A 49 44  |DISKNAME";FO$:ID|
00000840: 24 B2 22 22 3A 85 22 11  1D 44 49 53 4B 2D 49 44  |$."":."..DISK-ID|
00000850: 22 3B 49 44 24 3A 8B 49  44 24 B3 B1 22 22 A7 49  |";ID$:.ID$.."".I|
00000860: 44 24 B2 22 2C 22 AA 49  44 24 00 7A 10 C6 02 46  |D$.",".ID$.z...F|
00000870: 4F 24 B2 46 4F 24 AA 49  44 24 00 97 10 D0 02 99  |O$.FO$.ID$......|
00000880: 22 12 1E 5A 49 45 4C 44  49 53 4B 20 45 49 4E 4C  |"..ZIELDISK EINL|
00000890: 45 47 45 4E 92 05 22 00  A0 10 DA 02 8D 39 39 30  |EGEN.."......990|
000008A0: 00 B8 10 E4 02 9F 31 2C  38 2C 31 35 2C 22 4E 3A  |......1,8,15,"N:|
000008B0: 22 AA 46 4F 24 3A A0 31  00 C6 10 EE 02 8D 38 38  |".FO$:.1......88|
000008C0: 30 3A 89 31 37 30 00 CC  10 F8 02 8F 00 DA 10 02  |0:.170..........|
000008D0: 03 A1 23 31 2C 41 24 2C  42 24 00 E9 10 0C 03 A1  |..#1,A$,B$......|
000008E0: 23 31 2C 42 4C 24 2C 42  24 00 F4 10 16 03 A1 23  |#1,BL$,B$......#|
000008F0: 31 2C 41 24 00 08 11 20  03 A1 23 31 2C 42 24 3A  |1,A$... ..#1,B$:|
00000900: 8B 53 54 B3 B1 30 A7 8E  00 1B 11 2A 03 8B 42 24  |.ST..0.....*..B$|
00000910: B3 B1 C7 28 33 34 29 A7  38 30 30 00 41 11 34 03  |...(34).800.A.4.|
00000920: A1 23 31 2C 42 24 3A 8B  42 24 B3 B1 C7 28 33 34  |.#1,B$:.B$...(34|
00000930: 29 A7 4E 46 24 B2 4E 46  24 AA 42 24 3A 89 38 32  |).NF$.NF$.B$:.82|
00000940: 30 00 5A 11 3E 03 A1 23  31 2C 42 24 3A 8B 42 24  |0.Z.>..#1,B$:.B$|
00000950: B2 C7 28 33 32 29 A7 38  33 30 00 88 11 48 03 4E  |..(32).830...H.N|
00000960: 46 24 B2 4E 46 24 AA 22  2C 22 AA 42 24 3A 81 49  |F$.NF$.",".B$:.I|
00000970: B2 30 A4 31 3A A1 23 31  2C 42 24 3A 4E 46 24 B2  |.0.1:.#1,B$:NF$.|
00000980: 4E 46 24 AA 42 24 3A 82  00 9F 11 52 03 A1 23 31  |NF$.B$:....R..#1|
00000990: 2C 42 24 3A 8B 42 24 B3  B1 22 22 A7 38 35 30 00  |,B$:.B$.."".850.|
000009A0: A5 11 5C 03 8E 00 AB 11  66 03 8F 00 DA 11 70 03  |..\.....f.....p.|
000009B0: 9F 31 35 2C 38 2C 31 35  3A 84 31 35 2C 41 2C 42  |.15,8,15:.15,A,B|
000009C0: 24 2C 43 2C 44 3A 99 41  3B 42 24 3B 43 3B 44 3A  |$,C,D:.A;B$;C;D:|
000009D0: A0 31 35 3A 8D 39 39 30  3A 8E 00 E0 11 7A 03 3A  |.15:.990:....z.:|
000009E0: 00 E6 11 84 03 8F 00 EF  11 8E 03 99 22 93 22 00  |............".".|
000009F0: 09 12 98 03 9F 33 2C 38  2C 30 2C 22 24 30 22 3A  |.....3,8,0,"$0":|
00000A00: A1 23 33 2C 41 24 2C 41  24 00 1F 12 A2 03 A1 23  |.#3,A$,A$......#|
00000A10: 33 2C 41 24 2C 41 24 2C  42 4C 24 2C 42 48 24 00  |3,A$,A$,BL$,BH$.|
00000A20: 32 12 AC 03 8B 41 24 B2  22 22 A7 A0 33 3A 89 39  |2....A$.""..3:.9|
00000A30: 38 30 00 50 12 B6 03 42  4C 24 B2 42 4C 24 AA C7  |80.P...BL$.BL$..|
00000A40: 28 30 29 3A 42 48 24 B2  42 48 24 AA C7 28 30 29  |(0):BH$.BH$..(0)|
00000A50: 00 68 12 C0 03 99 32 35  36 AC C6 28 42 48 24 29  |.h....256..(BH$)|
00000A60: AA C6 28 42 4C 24 29 3B  00 75 12 CA 03 9E 4D 44  |..(BL$);.u....MD|
00000A70: 3A 89 39 33 30 00 83 12  D4 03 8D 39 39 30 3A 89  |:.930......990:.|
00000A80: 31 37 30 00 89 12 DE 03  8F 00 A1 12 E8 03 97 31  |170............1|
00000A90: 39 38 2C 30 3A 92 31 39  38 2C 31 3A A1 41 24 3A  |98,0:.198,1:.A$:|
00000AA0: 8E 00 AC 12 4C 04 A0 31  3A A0 31 35 00 C9 12 56  |....L..1:.15...V|
00000AB0: 04 50 4E 24 B2 22 93 44  49 53 4B 20 49 44 20 41  |.PN$.".DISK ID A|
00000AC0: 45 4E 44 45 52 45 52 22  3A 00 13 13 5B 04 99 22  |ENDERER":...[.."|
00000AD0: 1D 22 AA 50 4E 24 AA 22  1D 22 3A 99 22 4D 49 54  |.".PN$.".":."MIT|
00000AE0: 20 44 49 45 53 45 4D 20  50 52 4F 47 52 41 4D 4D  | DIESEM PROGRAMM|
00000AF0: 20 4B 4F 45 4E 4E 45 4E  20 53 49 45 20 44 45 4E  | KOENNEN SIE DEN|
00000B00: 20 44 49 53 4B 2F 49 44  20 41 45 4E 44 45 52 45  | DISK/ID AENDERE|
00000B10: 4E 21 22 00 34 13 60 04  81 4C B2 31 A4 31 33 3A  |N!".4.`..L.1.13:|
00000B20: 99 22 20 20 20 22 3B 3A  82 3A 99 3A 99 3A 58 24  |."   ";:.:.:.:X$|
00000B30: B2 22 30 22 00 41 13 65  04 44 56 B2 C5 28 58 24  |."0".A.e.DV..(X$|
00000B40: 29 00 5E 13 6A 04 44 56  24 B2 58 24 3A 8B 44 56  |).^.j.DV$.X$:.DV|
00000B50: AF 32 35 34 A7 99 22 22  3A 89 31 31 32 30 00 66  |.254.."":.1120.f|
00000B60: 13 6F 04 99 44 56 00 9D  13 74 04 99 22 41 45 4E  |.o..DV...t.."AEN|
00000B70: 44 45 52 55 4E 47 20 56  4F 4E 20 44 49 53 4B 2D  |DERUNG VON DISK-|
00000B80: 4E 41 4D 45 22 3A 99 3A  99 A3 39 29 22 4F 44 45  |NAME":.:..9)"ODE|
00000B90: 52 20 44 49 53 4B 2D 49  44 20 3F 22 3B 00 D1 13  |R DISK-ID ?";...|
00000BA0: 79 04 99 22 1D 1D 1D 28  4E 2F 49 29 20 20 22 3B  |y.."...(N/I)  ";|
00000BB0: 3A 8D 31 31 39 30 3A 8B  58 24 B3 B1 22 4E 22 AF  |:.1190:.X$.."N".|
00000BC0: 58 24 B3 B1 22 49 22 A7  99 22 22 3A 89 31 31 34  |X$.."I".."":.114|
00000BD0: 30 00 DC 13 7D 04 A0 31  3A A0 31 35 00 19 14 7E  |0...}..1:.15...~|
00000BE0: 04 99 58 24 3A 9F 31 35  2C 38 2C 31 35 3A 98 31  |..X$:.15,8,15:.1|
00000BF0: 35 2C 22 49 22 AA 44 56  24 3A 9F 31 2C 38 2C 33  |5,"I".DV$:.1,8,3|
00000C00: 2C 22 23 22 3A 98 31 35  2C 22 55 31 3A 33 22 44  |,"#":.15,"U1:3"D|
00000C10: 56 22 2C 31 38 2C 30 22  22 00 2A 14 80 04 8B 58  |V",18,0"".*....X|
00000C20: 24 B2 22 4E 22 A7 31 31  36 33 00 64 14 82 04 98  |$."N".1163.d....|
00000C30: 31 35 2C 22 42 2D 50 3A  33 2C 31 36 32 22 3A A1  |15,"B-P:3,162":.|
00000C40: 23 31 2C 41 24 2C 42 24  2C 43 24 2C 44 24 2C 45  |#1,A$,B$,C$,D$,E|
00000C50: 24 3A 99 22 44 49 53 4B  2D 49 44 20 49 53 54 20  |$:."DISK-ID IST |
00000C60: 22 41 24 3B 00 95 14 84  04 99 42 24 3B 43 24 3B  |"A$;......B$;C$;|
00000C70: 44 24 3B 45 24 3A 85 22  4E 45 55 45 20 49 44 20  |D$;E$:."NEUE ID |
00000C80: 28 4D 41 58 2E 20 35 20  5A 45 49 43 48 45 4E 29  |(MAX. 5 ZEICHEN)|
00000C90: 22 3B 4E 49 24 00 B4 14  86 04 8B C3 28 4E 49 24  |";NI$.......(NI$|
00000CA0: 29 B3 B1 34 A7 49 24 B2  C8 28 4E 49 24 AA 22 20  |)..4.I$..(NI$." |
00000CB0: 22 2C 35 29 00 E3 14 88  04 98 31 35 2C 22 42 2D  |",5)......15,"B-|
00000CC0: 50 3A 33 2C 31 36 32 22  3A 98 31 2C 4E 49 24 3B  |P:3,162":.1,NI$;|
00000CD0: 3A 98 31 35 2C 22 55 32  3A 33 22 44 56 22 2C 31  |:.15,"U2:3"DV",1|
00000CE0: 38 2C 30 00 00 15 89 04  49 24 B2 22 49 22 AA CA  |8,0.....I$."I"..|
00000CF0: 28 C4 28 44 56 29 2C 32  29 3A 98 31 35 2C 49 24  |(.(DV),2):.15,I$|
00000D00: 00 09 15 8A 04 89 31 36  30 00 40 15 8B 04 98 31  |......160.@....1|
00000D10: 35 2C 22 42 2D 50 3A 33  2C 31 34 34 22 3A 44 4E  |5,"B-P:3,144":DN|
00000D20: 24 B2 22 22 3A 81 4C B2  31 A4 31 36 3A A1 23 31  |$."":.L.1.16:.#1|
00000D30: 2C 41 24 3A 44 4E 24 B2  44 4E 24 AA 41 24 3A 82  |,A$:DN$.DN$.A$:.|
00000D40: 00 71 15 8C 04 99 22 44  45 52 5A 45 49 54 49 47  |.q...."DERZEITIG|
00000D50: 45 52 20 44 49 53 4B 2D  4E 41 4D 45 20 49 53 54  |ER DISK-NAME IST|
00000D60: 3A 22 3A 99 3A 99 22 20  22 AA 44 4E 24 AA 22 20  |:":.:." ".DN$." |
00000D70: 22 00 A1 15 8D 04 99 22  4E 45 55 45 52 20 44 49  |"......"NEUER DI|
00000D80: 53 4B 2D 4E 41 4D 45 20  28 4D 41 58 2E 20 31 36  |SK-NAME (MAX. 16|
00000D90: 20 5A 45 49 43 48 45 4E  29 22 3A 85 4E 44 24 3A  | ZEICHEN)":.ND$:|
00000DA0: 99 00 C4 15 8E 04 4E 44  24 B2 C8 28 4E 44 24 AA  |......ND$..(ND$.|
00000DB0: 22 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  |"              "|
00000DC0: 2C 31 36 29 00 FA 15 8F  04 98 31 35 2C 22 42 2D  |,16)......15,"B-|
00000DD0: 50 3A 33 2C 31 34 34 22  3A 98 31 2C 4E 44 24 3B  |P:3,144":.1,ND$;|
00000DE0: 3A 98 31 35 2C 22 55 32  3A 33 22 44 56 22 2C 31  |:.15,"U2:3"DV",1|
00000DF0: 38 2C 30 22 3A 89 31 31  36 31 00 07 16 90 04 A1  |8,0":.1161......|
00000E00: 58 24 3A 89 31 36 30 00  19 16 A6 04 A1 58 24 3A  |X$:.160......X$:|
00000E10: 8B 58 24 B3 B1 22 22 A7  8E 00 23 16 A7 04 89 31  |.X$..""...#....1|
00000E20: 31 39 30 00 29 16 B0 04  8F 00 5A 16 BA 04 85 22  |190.).....Z...."|
00000E30: 93 11 11 11 11 57 45 4C  43 48 45 53 20 50 52 2E  |.....WELCHES PR.|
00000E40: 20 53 4F 4C 4C 20 47 45  4C 4F 45 53 43 48 54 20  | SOLL GELOESCHT |
00000E50: 57 45 52 44 45 4E 22 3B  41 24 00 79 16 C4 04 9F  |WERDEN";A$.y....|
00000E60: 31 2C 38 2C 31 35 3A 98  31 2C 22 53 3A 22 3B 41  |1,8,15:.1,"S:";A|
00000E70: 24 3A A0 31 3A 89 31 36  30 00 7F 16 14 05 8F 00  |$:.1:.160.......|
00000E80: 9A 16 1E 05 9F 31 2C 38  2C 31 35 3A 98 31 2C 22  |.....1,8,15:.1,"|
00000E90: 49 22 3A A0 31 3A 89 31  36 30 00 BA 16 78 05 99  |I":.1:.160...x..|
00000EA0: 22 93 11 11 11 44 49 53  4B 46 45 48 4C 45 52 20  |"....DISKFEHLER |
00000EB0: 3A 11 11 11 11 22 3A A0  31 35 00 F4 16 82 05 9F  |:....":.15......|
00000EC0: 31 35 2C 38 2C 31 35 3A  84 31 35 2C 41 24 2C 42  |15,8,15:.15,A$,B|
00000ED0: 24 2C 43 24 2C 44 24 3A  99 41 24 3B 22 2C 22 3B  |$,C$,D$:.A$;",";|
00000EE0: 42 24 3B 22 2C 22 3B 43  24 3B 22 2C 22 3B 44 24  |B$;",";C$;",";D$|
00000EF0: 3A A0 31 35 00 FD 16 8C  05 89 39 38 30 00 03 17  |:.15......980...|
00000F00: DC 05 8F 00 20 17 E6 05  85 22 93 11 11 1D 1D 1D  |.... ...."......|
00000F10: 41 4C 54 45 52 20 4E 41  4D 45 20 20 22 3B 41 24  |ALTER NAME  ";A$|
00000F20: 00 3B 17 F0 05 85 22 11  1D 1D 1D 4E 45 55 45 52  |.;...."....NEUER|
00000F30: 20 4E 41 4D 45 20 20 22  3B 42 24 00 61 17 FA 05  | NAME  ";B$.a...|
00000F40: 9F 31 2C 38 2C 31 35 3A  98 31 2C 22 52 3A 22 3B  |.1,8,15:.1,"R:";|
00000F50: 42 24 3B 22 3D 22 3B 41  24 3A A0 31 3A 89 31 36  |B$;"=";A$:.1:.16|
00000F60: 30 00 6C 17 40 06 A0 31  3A A0 31 35 00 8B 17 4A  |0.l.@..1:.15...J|
00000F70: 06 99 22 93 11 11 11 11  11 1D 1D 1D 1D 1D 1D 42  |.."............B|
00000F80: 49 54 54 45 20 57 41 52  54 45 4E 00 B7 17 54 06  |ITTE WARTEN...T.|
00000F90: 99 22 11 1D 1D 1D 1D 1D  1D 56 41 4C 49 44 41 54  |.".......VALIDAT|
00000FA0: 45 20 57 49 52 44 20 44  55 52 43 48 47 45 46 55  |E WIRD DURCHGEFU|
00000FB0: 45 48 52 54 21 21 22 00  C7 17 5E 06 9F 31 2C 38  |EHRT!!"...^..1,8|
00000FC0: 2C 31 35 2C 22 56 22 00  D0 17 68 06 89 31 36 30  |,15,"V"...h..160|
00000FD0: 00 00 00 A2 01 20 C6 FF  A0 00 20 CF FF 78 AA A5  |..... .... ..x..|
00000FE0: 01 29 FC 85 01 8A 91 FC  A5 01 09 03 85 01 58 20  |.)............X |
00000FF0: B7 FF C9 40 F0 0B C9 00  D0 07 C8 D0 DD E6 FD D0  |...@............|
00001000: D9 20 CC FF 84 FE A5 FD  85 FF 60 A2 01 20 C9 FF  |. ........`.. ..|
00001010: A0 00 78 A5 01 29 FC 85  01 B1 FC AA A5 01 09 03  |..x..)..........|
00001020: 85 01 58 8A 20 D2 FF 20  B7 FF C9 00 D0 11 C8 D0  |..X. .. ........|
00001030: 02 E6 FD A5 FF C5 FD D0  D9 C4 FE 90 D5 F0 D3 4C  |...............L|
00001040: CC FF A2 03 20 C6 FF 20  CF FF 20 D2 FF D0 F8 A9  |.... .. .. .....|
00001050: 0D 20 D2 FF 4C CC FF 00  00 00                    |. ..L.....      |
.......".":.53280,0:.53281,0.R.N..56,B(4
6).14:.:RB.255.B(56):PA.1:AN.0:BL.0:NF$.
""...X.PE.B(45).256.B(46):MR.PE.135:MW.P
E.79:MD.PE.24......NF$(140),CF%(140),BL%
(140),P%(10),AL%(90),AH%(90).....P%(0).0
:AL%(0).0:AH%(0).B(56).1...... *********
COPY 4000*************.,.... **COPYRIGHT
 (C) BY C. HAENSCH**.R.... **TEL: (030)/
334 33 62       **.X.... **BERLIN 20,DEN
 23.3.1984    **...... *****************
**************... ...X...."....         
                               "......".
..            C O P Y  4 0 0 0          
  ".>...."...         (C) BY SEBASTIAN B
OLDT         ".^....".               M E
 N U E......"...........................
.............."......"....1..  DIRECTORY
    .2..  KOPIEREN......"....3..  FORMAT
IEREN  .4..  DISKNAME/ID (NEU)......"...
5..  SCRATCH      .6..  INITIALIZE.C....
"....7..  DISK-FEHLER  .8..  RENAME.J...
."....9..  VALIDATE     .E..  ENDE......
"..............BITTE WAEHLEN SIE!!":DC$.
""......DC$:.DC$."E".660.M...DC.E(DC$):.
DC.1.DC.9.221......DC.910,270,700,1100,1
200,1300,1400,1500,1600.......-...."....
.......ORGINALDISK EINLEGEN.".6....990.<
."...L.,..1,8,0,"$0".B.6..760:.NF$.."".3
40.P.@..ST.0.310.Y.J..350...T.BL%(AN).F(
BL$.G(0)):NF$(AN).NF$:.ST.0.AN.AN.1:NF$.
"":.310...^. 1:AN.AN.1:.AN.0.."...LEERE 
DISKETTE.":.990:....H.....R.."..........
.ANTWORTEN SIE MIT J/N.".D.|..I.1.AN:.BL
%(I);.9)NF$(I)"....";:.198,0.S....198,1:
.A$......A$."J".CF%(I)..1:BL.BL.BL%(I):.
.30)"..  JA  ..":.420.....CF%(I).0:.A$..
"N".390.......30)".. NEIN .."......BL.RB
.P%(PA).I.1:PA.PA.1:BL.BL%(I)......I:P%(
PA).AN......BL.0.640...B.....L.."..KOPIE
RE!..".*.V..I.1.PA.`....RW.0.1:NR.0:.RW.
1.."...ZIELDISK EINLEGEN..":.990.W....J.
P%(I.1).1.P%(I).......CF%(J)..J:.540....
.NF$.NF$(J):.BL%(J);.5)NF$:.570:.ST.0.ST
.64.530.J....880:..Q....J......RW:.I.PA.
640...&.."..ORGINALDISK EINLEGEN":.990..
.0..I:....:..RW.1.610.G.D..1,8,5,NF$.",R
":.252,0:.253,AH%(NR).1.U.N..MR:NR.NR.1:
AL%(NR).B(254):AH%(NR).B(255).~.X. 1:...
.B..1,8,5,NF$.",W":.252,0:.253,AH%(NR).1
.N.L..254,AL%(NR.1):.255,AH%(NR.1):.MW..
.V.NR.NR.1: 1:......."..KOPIE FERTIG!...
...990:.......64738......56,160:......:.
%.....J...."....DISKNAME";FO$:ID$."":.".
.DISK-ID";ID$:.ID$.."".ID$.",".ID$.Z.F.F
O$.FO$.ID$...P.."..ZIELDISK EINLEGEN..".
 .Z..990......1,8,15,"N:".FO$: 1.F....88
0:.170.L.....Z....#1,A$,B$......#1,BL$,B
$......#1,A$... ..#1,B$:.ST..0.....*..B$
..G(34).800.A.4..#1,B$:.B$..G(34).NF$.NF
$.B$:.820.Z.>..#1,B$:.B$.G(32).830...H.N
F$.NF$.",".B$:.I.0.1:.#1,B$:NF$.NF$.B$:.
...R..#1,B$:.B$.."".850...\.....F...Z.P.
.15,8,15:.15,A,B$,C,D:.A;B$;C;D: 15:.990
:....Z.:............"."......3,8,0,"$0":
.#3,A$,A$......#3,A$,A$,BL$,BH$.2....A$.
"". 3:.980.P...BL$.BL$.G(0):BH$.BH$.G(0)
.H....256.F(BH$).F(BL$);.U.J..MD:.930...
T..990:.170............198,0:.198,1:.A$:
....L. 1: 15.I.V.PN$.".DISK ID AENDERER"
:...[..".".PN$.".":."MIT DIESEM PROGRAMM
 KOENNEN SIE DEN DISK/ID AENDEREN!".4.`.
.L.1.13:."   ";:.:.:.:X$."0".A.E.DV.E(X$
).^.J.DV$.X$:.DV.254.."":.1120.F.O..DV..
.T.."AENDERUNG VON DISK-NAME":.:..9)"ODE
R DISK-ID ?";.Q.Y.."...(N/I)  ";:.1190:.
X$.."N".X$.."I".."":.1140...}. 1: 15...~
..X$:.15,8,15:.15,"I".DV$:.1,8,3,"#":.15
,"U1:3"DV",18,0"".*....X$."N".1163.D....
15,"B-P:3,162":.#1,A$,B$,C$,D$,E$:."DISK
-ID IST "A$;......B$;C$;D$;E$:."NEUE ID 
(MAX. 5 ZEICHEN)";NI$......C(NI$)..4.I$.
H(NI$." ",5)......15,"B-P:3,162":.1,NI$;
:.15,"U2:3"DV",18,0.....I$."I".J(D(DV),2
):.15,I$......160.@....15,"B-P:3,144":DN
$."":.L.1.16:.#1,A$:DN$.DN$.A$:..Q...."D
ERZEITIGER DISK-NAME IST:":.:." ".DN$." 
"......"NEUER DISK-NAME (MAX. 16 ZEICHEN
)":.ND$:..D...ND$.H(ND$."              "
,16)......15,"B-P:3,144":.1,ND$;:.15,"U2
:3"DV",18,0":.1161......X$:.160......X$:
.X$..""...#....1190.).....Z....".....WEL
CHES PR. SOLL GELOESCHT WERDEN";A$.Y.D..
1,8,15:.1,"S:";A$: 1:.160...........1,8
,15:.1,"I": 1:.160...X.."....DISKFEHLER 
:....": 15......15,8,15:.15,A$,B$,C$,D$:
.A$;",";B$;",";C$;",";D$: 15......980...
.... ...."......ALTER NAME  ";A$.;....".
...NEUER NAME  ";B$.A....1,8,15:.1,"R:";
B$;"=";A$: 1:.160.L.@. 1: 15...J..".....
.......BITTE WARTEN...T..".......VALIDAT
E WIRD DURCHGEFUEHRT!!".G.^..1,8,15,"V".
P.H..160..... F. . O.X...)............X 
..I@..I.P.HP...PY L.......`.. I. .X..)..
..........X. R. ..I.P.HP.....E.PYD..U.SL
L... F. O. R.P... R.LL....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL