SUPER DIRECTORY2
FILE INFORMATION
FILENAME(S): SUPER DIRECTORY2
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-10-19 23:07:05
APPEARS ON: 1 disk(s)
FILE HASH
91c2421dfa03cdf9079cf4485d7da22e92471ee4d75b05524b26897dea3e2efd
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MARTON SOFT 784 | SUPER DIRECTORY2 | PRG | Bugjam - Argentina | 30 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3A 08 0A 00 9C 3A 86 44 24 28 31 34 33 29 |..:....:.D$(143)|
00000010: 3A 86 4E 24 28 31 34 33 29 3A 97 35 33 32 38 30 |:.N$(143):.53280|
00000020: 2C 30 3A 97 35 33 32 38 31 2C 30 3A 47 B2 31 30 |,0:.53281,0:G.10|
00000030: 32 34 3A 5A 24 B2 C7 28 30 29 00 6C 08 14 00 53 |24:Z$..(0).l...S|
00000040: 24 B2 28 28 28 C7 28 31 39 32 29 AA C7 28 31 38 |$.(((.(192)..(18|
00000050: 29 29 AA C7 28 31 29 29 AA 22 F9 F9 F9 F9 F9 F9 |))..(1))."......|
00000060: F9 F9 F9 F9 F9 F9 F9 F9 F9 F9 22 29 00 8C 08 1E |..........")....|
00000070: 00 8B 28 C3 28 53 24 29 B3 33 30 29 A7 3A 53 24 |..(.(S$).30).:S$|
00000080: B2 28 53 24 AA 5A 24 29 3A 89 33 30 00 94 08 28 |.(S$.Z$):.30...(|
00000090: 00 49 B2 31 00 B1 08 32 00 81 49 B2 49 A4 33 30 |.I.1...2..I.I.30|
000000A0: 3A 4C 24 B2 28 4C 24 AA C7 28 32 35 35 29 29 3A |:L$.(L$..(255)):|
000000B0: 82 00 E7 08 3C 00 99 22 93 9C 12 20 20 20 20 20 |....<.."... |
000000C0: 20 20 20 20 20 4D 4F 44 49 46 49 43 41 52 20 44 | MODIFICAR D|
000000D0: 49 52 45 43 54 4F 52 49 4F 20 20 20 20 20 20 20 |IRECTORIO |
000000E0: 20 20 20 92 9E 11 22 00 01 09 46 00 41 24 B2 22 | ..."...F.A$."|
000000F0: 43 41 4D 45 4C 20 2A 20 53 4F 46 54 57 41 52 45 |CAMEL * SOFTWARE|
00000100: 22 00 1E 09 50 00 99 22 20 20 20 20 50 52 4F 47 |"...P.." PROG|
00000110: 52 41 4D 41 44 4F 20 50 4F 52 3A 20 22 3B 00 26 |RAMADO POR: ";.&|
00000120: 09 5A 00 99 41 24 00 2E 09 64 00 49 B2 31 00 3D |.Z..A$...d.I.1.=|
00000130: 09 6E 00 81 49 B2 49 A4 C3 28 41 24 29 00 54 09 |.n..I.I..(A$).T.|
00000140: 78 00 41 B2 28 41 AA C6 28 CA 28 41 24 2C 49 2C |x.A.(A..(.(A$,I,|
00000150: 31 29 29 29 00 5A 09 82 00 82 00 8B 09 8C 00 99 |1))).Z..........|
00000160: 22 11 20 20 20 20 42 55 45 4E 4F 53 20 41 49 52 |". BUENOS AIR|
00000170: 45 53 20 52 45 50 55 42 4C 49 43 41 20 41 52 47 |ES REPUBLICA ARG|
00000180: 45 4E 54 49 4E 41 20 20 20 20 22 00 9C 09 96 00 |ENTINA ".....|
00000190: 41 24 B2 22 4D 41 52 54 4F 4E 2E 22 00 C5 09 A0 |A$."MARTON."....|
000001A0: 00 99 22 11 20 20 56 45 52 53 49 4F 4E 20 43 36 |..". VERSION C6|
000001B0: 34 20 44 45 53 43 4F 4D 50 49 4C 41 44 41 20 50 |4 DESCOMPILADA P|
000001C0: 4F 52 20 22 3B 00 CD 09 AA 00 99 41 24 00 D5 09 |OR ";......A$...|
000001D0: B4 00 41 B2 30 00 DD 09 BE 00 49 B2 31 00 EC 09 |..A.0.....I.1...|
000001E0: C8 00 81 49 B2 49 A4 C3 28 41 24 29 00 03 0A D2 |...I.I..(A$)....|
000001F0: 00 41 B2 28 41 AA C6 28 CA 28 41 24 2C 49 2C 31 |.A.(A..(.(A$,I,1|
00000200: 29 29 29 00 09 0A DC 00 82 00 3C 0A E6 00 99 22 |))).......<...."|
00000210: 11 11 11 11 20 20 4C 45 45 52 20 44 49 52 45 43 |.... LEER DIREC|
00000220: 54 4F 52 49 4F 20 2A 20 2A 20 2A 20 50 55 4C 53 |TORIO * * * PULS|
00000230: 45 20 55 4E 41 20 54 45 43 4C 41 22 00 7A 0A F0 |E UNA TECLA".z..|
00000240: 00 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
00000250: 11 11 11 11 11 11 11 20 20 20 20 20 20 46 37 29 |....... F7)|
00000260: 20 53 45 50 41 52 41 44 4F 52 20 44 45 20 44 49 | SEPARADOR DE DI|
00000270: 52 45 43 54 4F 52 49 4F 2E 22 00 B8 0A FA 00 99 |RECTORIO."......|
00000280: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
00000290: 11 11 11 20 20 20 20 20 46 31 29 20 54 4F 4D 41 |... F1) TOMA|
000002A0: 52 20 46 49 4C 41 53 20 48 41 43 49 41 20 4C 41 |R FILAS HACIA LA|
000002B0: 20 4C 49 53 54 41 2E 22 00 F6 0A FB 00 99 22 13 | LISTA."......".|
000002C0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000002D0: 11 11 11 11 11 20 20 20 20 20 20 20 20 20 4F 29 |..... O)|
000002E0: 20 4F 52 44 45 4E 41 52 20 44 49 52 45 43 54 4F | ORDENAR DIRECTO|
000002F0: 52 49 4F 11 11 22 00 01 0B 04 01 97 31 39 38 2C |RIO.."......198,|
00000300: 30 00 0C 0B 0E 01 92 31 39 38 2C 31 00 4D 0B 18 |0......198,1.M..|
00000310: 01 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
00000320: 11 11 11 12 20 20 20 20 20 20 20 45 53 50 45 52 |.... ESPER|
00000330: 45 2C 20 4C 45 59 45 4E 44 4F 20 44 49 52 45 43 |E, LEYENDO DIREC|
00000340: 54 4F 52 49 4F 20 20 20 20 20 20 20 22 00 60 0B |TORIO ".`.|
00000350: 22 01 9F 31 35 2C 38 2C 31 35 2C 22 55 49 2B 22 |"..15,8,15,"UI+"|
00000360: 00 6F 0B 2C 01 9F 33 2C 38 2C 33 2C 22 23 22 00 |.o.,..3,8,3,"#".|
00000370: 79 0B 36 01 8D 31 39 30 30 00 83 0B 40 01 9D 31 |y.6..1900...@..1|
00000380: 35 2C 3B 00 99 0B 4A 01 98 31 35 2C 22 55 31 3A |5,;...J..15,"U1:|
00000390: 33 2C 30 2C 31 38 2C 30 22 00 A3 0B 54 01 8D 31 |3,0,18,0"...T..1|
000003A0: 39 30 30 00 AE 0B 5E 01 A1 23 33 2C 54 24 00 B9 |900...^..#3,T$..|
000003B0: 0B 68 01 A1 23 33 2C 55 24 00 DC 0B 72 01 99 22 |.h..#3,U$...r.."|
000003C0: 93 45 53 54 45 20 44 49 52 45 43 54 4F 52 49 4F |.ESTE DIRECTORIO|
000003D0: 20 55 54 49 4C 49 5A 41 20 3A 11 22 00 ED 0B 7C | UTILIZA :."...||
000003E0: 01 49 B2 C6 28 28 54 24 AA 5A 24 29 29 00 FE 0B |.I..((T$.Z$))...|
000003F0: 86 01 4A B2 C6 28 28 55 24 AA 5A 24 29 29 00 0F |..J..((U$.Z$))..|
00000400: 0C 90 01 99 22 50 49 53 54 41 20 3A 22 49 3B 00 |...."PISTA :"I;.|
00000410: 35 0C 9A 01 99 22 20 20 20 20 20 20 20 20 53 45 |5...." SE|
00000420: 43 54 4F 52 3A 20 20 20 20 20 9D 9D 9D 9D 9D 22 |CTOR: ....."|
00000430: 3B 4A 22 91 22 00 3B 0C A4 01 3A 00 4C 0C AE 01 |;J".".;...:.L...|
00000440: 8B 28 49 AB 31 38 29 A7 3A 46 B2 31 00 56 0C B8 |.(I.18).:F.1.V..|
00000450: 01 9D 31 35 2C 3B 00 65 0C C2 01 99 22 55 31 3A |..15,;.e...."U1:|
00000460: 33 2C 30 22 3B 00 6D 0C CC 01 99 49 3B 00 77 0C |3,0";.m....I;.w.|
00000470: D6 01 98 31 35 2C 4A 00 81 0C E0 01 8D 31 39 30 |...15,J......190|
00000480: 30 00 8C 0C EA 01 A1 23 33 2C 54 24 00 97 0C F4 |0......#3,T$....|
00000490: 01 A1 23 33 2C 55 24 00 9F 0C FE 01 49 B2 30 00 |..#3,U$.....I.0.|
000004A0: AA 0C 08 02 81 49 B2 49 A4 37 00 B4 0C 12 02 42 |.....I.I.7.....B|
000004B0: 24 B2 22 22 00 BC 0C 1C 02 4A B2 31 00 C8 0C 26 |$."".....J.1...&|
000004C0: 02 81 4A B2 4A A4 33 30 00 D3 0C 30 02 A1 23 33 |..J.J.30...0..#3|
000004D0: 2C 41 24 00 E7 0C 3A 02 8B 28 41 24 B2 22 22 29 |,A$...:..(A$."")|
000004E0: A7 3A 41 24 B2 5A 24 00 F6 0C 44 02 42 24 B2 28 |.:A$.Z$...D.B$.(|
000004F0: 42 24 AA 41 24 29 00 FC 0C 4E 02 82 00 38 0D 58 |B$.A$)...N...8.X|
00000500: 02 8B 28 28 C6 28 42 24 29 B1 30 29 AF 28 CA 28 |..((.(B$).0).(.(|
00000510: 42 24 2C 34 2C 31 36 29 B3 B1 CA 28 53 24 2C 34 |B$,4,16)...(S$,4|
00000520: 2C 31 36 29 29 29 A7 3A 44 24 28 45 29 B2 42 24 |,16))).:D$(E).B$|
00000530: 3A 45 B2 28 45 AA 31 29 00 43 0D 62 02 A1 23 33 |:E.(E.1).C.b..#3|
00000540: 2C 41 24 00 4E 0D 6C 02 A1 23 33 2C 41 24 00 54 |,A$.N.l..#3,A$.T|
00000550: 0D 76 02 82 00 65 0D 80 02 8B 28 54 24 B1 22 22 |.v...e....(T$.""|
00000560: 29 A7 33 38 30 00 6C 0D 8A 02 A0 33 00 78 0D 94 |).380.l....3.x..|
00000570: 02 45 B2 28 45 AB 31 29 00 80 0D 9E 02 99 3A 99 |.E.(E.1)......:.|
00000580: 00 A1 0D A8 02 8B 45 B3 30 A7 3A 99 22 4E 4F 20 |......E.0.:."NO |
00000590: 48 41 59 20 44 49 52 45 43 54 4F 52 49 4F 22 3A |HAY DIRECTORIO":|
000005A0: 80 00 F1 0D B2 02 8B 46 A7 3A 99 22 20 20 27 56 |.......F.:." 'V|
000005B0: 41 4C 49 44 41 52 27 20 44 49 53 43 4F 20 44 45 |ALIDAR' DISCO DE|
000005C0: 53 50 55 45 53 20 44 45 20 46 4F 52 4D 41 52 20 |SPUES DE FORMAR |
000005D0: 45 4C 22 3A 99 22 20 20 20 20 20 20 20 20 20 20 |EL":." |
000005E0: 20 4E 55 45 56 4F 20 44 49 52 45 43 54 4F 52 49 | NUEVO DIRECTORI|
000005F0: 4F 00 F7 0D BC 02 3A 00 1F 0E C6 02 99 22 11 20 |O.....:......". |
00000600: 20 20 20 20 20 20 20 20 20 2D 3E 20 50 55 4C 53 | -> PULS|
00000610: 45 20 55 4E 41 20 54 45 43 4C 41 20 3C 2D 22 00 |E UNA TECLA <-".|
00000620: 31 0E D0 02 97 31 39 38 2C 30 3A 92 31 39 38 2C |1....198,0:.198,|
00000630: 31 00 65 0E DA 02 99 22 93 12 9E 20 20 20 20 20 |1.e...."... |
00000640: 20 20 20 20 20 4D 4F 44 49 46 49 43 41 52 20 44 | MODIFICAR D|
00000650: 49 52 45 43 54 4F 52 49 4F 20 20 20 20 20 20 20 |IRECTORIO |
00000660: 20 20 05 22 3B 00 8D 0E E4 02 99 22 92 20 20 20 | .";......". |
00000670: 20 20 20 20 20 20 20 20 20 56 49 45 4A 4F 20 44 | VIEJO D|
00000680: 49 52 45 43 54 4F 52 49 4F 20 3A 9E 22 00 9A 0E |IRECTORIO :."...|
00000690: EE 02 42 B2 28 41 AA 31 39 29 00 AA 0E F8 02 8B |..B.(A.19)......|
000006A0: 28 42 B1 45 29 A7 3A 42 B2 45 00 B0 0E 02 03 3A |(B.E).:B.E.....:|
000006B0: 00 BB 0E 0C 03 81 49 B2 41 A4 42 00 C5 0E 16 03 |......I.A.B.....|
000006C0: 99 A3 31 30 29 00 D9 0E 20 03 99 CA 28 44 24 28 |..10)... ...(D$(|
000006D0: 49 29 2C 34 2C 31 36 29 3B 00 E3 0E 2A 03 99 A3 |I),4,16);...*...|
000006E0: 32 34 29 00 12 0F 34 03 99 28 C6 28 CA 28 44 24 |24)...4..(.(.(D$|
000006F0: 28 49 29 2C 32 39 2C 31 29 29 AA 28 C6 28 CA 28 |(I),29,1)).(.(.(|
00000700: 44 24 28 49 29 2C 33 30 2C 31 29 29 AD 32 35 36 |D$(I),30,1)).256|
00000710: 29 29 00 18 0F 3E 03 82 00 20 0F 48 03 51 B2 30 |))...>... .H.Q.0|
00000720: 00 38 0F 52 03 97 28 28 47 AA 38 35 29 AA 28 59 |.8.R..((G.85).(Y|
00000730: AC 34 30 29 29 2C 36 32 00 43 0F 5C 03 8B 51 A7 |.40)),62.C.\..Q.|
00000740: 37 33 30 00 55 0F 66 03 97 31 39 38 2C 30 3A 92 |730.U.f..198,0:.|
00000750: 31 39 38 2C 31 00 70 0F 8E 03 A1 41 24 3A 42 B2 |198,1.p....A$:B.|
00000760: C6 28 41 24 29 3A 8B 42 B2 37 39 A7 32 31 37 30 |.(A$):.B.79.2170|
00000770: 00 88 0F 98 03 97 28 28 47 AA 38 35 29 AA 28 59 |......((G.85).(Y|
00000780: AC 34 30 29 29 2C 33 32 00 AB 0F A2 03 8B 28 28 |.40)),32......((|
00000790: 42 B2 31 34 35 29 AF 28 59 B1 30 29 29 A7 3A 59 |B.145).(Y.0)).:Y|
000007A0: B2 28 59 AB 31 29 3A 89 38 35 30 00 D4 0F AC 03 |.(Y.1):.850.....|
000007B0: 8B 28 28 42 B2 31 34 35 29 AF 28 41 B1 30 29 29 |.((B.145).(A.0))|
000007C0: A7 3A 41 B2 28 41 AB 32 30 29 3A 59 B2 31 39 3A |.:A.(A.20):Y.19:|
000007D0: 89 37 33 30 00 E6 0F B6 03 8B 28 42 B2 31 33 33 |.730......(B.133|
000007E0: 29 A7 31 30 31 30 00 F8 0F C0 03 8B 28 42 B2 31 |).1010......(B.1|
000007F0: 33 36 29 A7 31 30 38 30 00 0B 10 CA 03 8B 28 28 |36).1080......((|
00000800: 41 AA 59 29 B2 45 29 A7 38 35 30 00 2F 10 D4 03 |A.Y).E).850./...|
00000810: 8B 28 28 42 B2 31 37 29 AF 28 59 B3 31 39 29 29 |.((B.17).(Y.19))|
00000820: A7 3A 59 B2 28 59 AA 31 29 3A 89 31 30 30 30 00 |.:Y.(Y.1):.1000.|
00000830: 4E 10 DE 03 8B 28 42 B2 31 37 29 A7 3A 41 B2 28 |N....(B.17).:A.(|
00000840: 41 AA 32 30 29 3A 59 B2 30 3A 89 37 33 30 00 57 |A.20):Y.0:.730.W|
00000850: 10 E8 03 89 38 35 30 00 6B 10 F2 03 4E 24 28 4E |....850.k...N$(N|
00000860: 29 B2 44 24 28 28 41 AA 59 29 29 00 7B 10 FC 03 |).D$((A.Y)).{...|
00000870: 8B 28 45 B2 30 29 A7 31 31 36 30 00 B0 10 06 04 |.(E.0).1160.....|
00000880: 8B 28 28 41 AA 59 29 B3 45 29 A7 3A 49 B2 28 41 |.((A.Y).E).:I.(A|
00000890: AA 59 29 3A 81 49 B2 49 A4 28 45 AB 31 29 3A 44 |.Y):.I.I.(E.1):D|
000008A0: 24 28 49 29 B2 44 24 28 28 49 AA 31 29 29 3A 82 |$(I).D$((I.1)):.|
000008B0: 00 BC 10 10 04 4E B2 28 4E AA 31 29 00 C8 10 1A |.....N.(N.1)....|
000008C0: 04 45 B2 28 45 AB 31 29 00 E7 10 24 04 8B 28 28 |.E.(E.1)...$..((|
000008D0: 41 AA 59 29 B1 45 29 A7 3A 42 B2 31 34 35 3A 51 |A.Y).E).:B.145:Q|
000008E0: B2 31 3A 89 39 32 30 00 F0 10 2E 04 89 37 33 30 |.1:.920......730|
000008F0: 00 05 11 38 04 8B 28 28 4E AA 45 29 B1 31 34 31 |...8..((N.E).141|
00000900: 29 A7 38 35 30 00 12 11 42 04 4E 24 28 4E 29 B2 |).850...B.N$(N).|
00000910: 53 24 00 1E 11 4C 04 4E B2 28 4E AA 31 29 00 49 |S$...L.N.(N.1).I|
00000920: 11 56 04 99 22 13 11 05 20 20 20 20 20 20 20 20 |.V.."... |
00000930: 55 44 2E 20 45 4C 49 47 49 4F 20 55 4E 20 53 45 |UD. ELIGIO UN SE|
00000940: 50 41 52 41 44 4F 52 2E 22 00 58 11 6A 04 81 51 |PARADOR.".X.j..Q|
00000950: B2 31 A4 35 30 30 3A 82 00 61 11 7E 04 89 38 35 |.1.500:..a.~..85|
00000960: 30 00 88 11 88 04 99 22 93 9E 20 20 20 20 20 20 |0......".. |
00000970: 20 20 20 20 20 4E 55 45 56 4F 20 44 49 52 45 43 | NUEVO DIREC|
00000980: 54 4F 52 49 4F 20 3A 22 00 8E 11 92 04 3A 00 AA |TORIO :".....:..|
00000990: 11 9C 04 81 49 B2 30 A4 4E 3A 99 CA 28 4E 24 28 |....I.0.N:..(N$(|
000009A0: 49 29 2C 34 2C 31 36 29 3A 82 00 D4 11 A6 04 99 |I),4,16):.......|
000009B0: 22 11 44 45 53 45 41 20 52 45 45 53 43 52 49 42 |".DESEA REESCRIB|
000009C0: 49 52 20 44 49 52 45 43 54 4F 52 49 4F 20 28 53 |IR DIRECTORIO (S|
000009D0: 2F 4E 29 22 00 E6 11 B0 04 97 31 39 38 2C 30 3A |/N)"......198,0:|
000009E0: 92 31 39 38 2C 31 00 FD 11 BA 04 A1 41 24 3A 8B |.198,1......A$:.|
000009F0: 41 24 B3 B1 22 53 22 A7 9C 3A 89 31 30 00 2E 12 |A$.."S"..:.10...|
00000A00: C4 04 99 22 93 4C 4F 53 20 53 45 50 41 52 41 44 |...".LOS SEPARAD|
00000A10: 4F 52 45 53 20 4E 4F 20 53 45 20 50 55 45 44 45 |ORES NO SE PUEDE|
00000A20: 4E 20 42 4F 52 52 41 52 20 21 21 21 21 22 00 36 |N BORRAR !!!!".6|
00000A30: 12 CE 04 45 B2 30 00 63 12 D8 04 99 22 11 11 20 |...E.0.c....".. |
00000A40: 20 20 20 20 20 20 12 9E 45 44 49 54 41 4E 44 4F | ..EDITANDO|
00000A50: 20 56 49 45 4A 4F 20 44 49 52 45 43 54 4F 52 49 | VIEJO DIRECTORI|
00000A60: 4F 2E 22 00 6D 12 E2 04 9D 31 35 2C 3B 00 96 12 |O.".m....15,;...|
00000A70: EC 04 98 31 35 2C 22 49 22 3A 8D 31 39 30 30 3A |...15,"I":.1900:|
00000A80: 9F 33 2C 38 2C 33 2C 22 23 22 3A 8D 31 39 30 30 |.3,8,3,"#":.1900|
00000A90: 3A 9D 31 35 2C 3B 00 AC 12 F6 04 98 31 35 2C 22 |:.15,;......15,"|
00000AA0: 55 31 3A 33 2C 30 2C 31 38 2C 30 22 00 B6 12 00 |U1:3,0,18,0"....|
00000AB0: 05 8D 31 39 30 30 00 BF 12 0A 05 9D 33 2C 3B 00 |..1900......3,;.|
00000AC0: CB 12 14 05 99 C7 28 31 38 29 3B 00 D6 12 1E 05 |......(18);.....|
00000AD0: 99 C7 28 31 29 3B 00 DF 12 28 05 98 33 2C 3B 00 |..(1);...(..3,;.|
00000AE0: E9 12 32 05 9D 31 35 2C 3B 00 FF 12 3C 05 98 31 |..2..15,;...<..1|
00000AF0: 35 2C 22 55 32 3A 33 2C 30 2C 31 38 2C 30 22 00 |5,"U2:3,0,18,0".|
00000B00: 09 13 46 05 8D 31 39 30 30 00 0F 13 50 05 3A 00 |..F..1900...P.:.|
00000B10: 1B 13 5A 05 81 49 B2 30 A4 31 38 00 25 13 64 05 |..Z..I.0.18.%.d.|
00000B20: 9D 31 35 2C 3B 00 36 13 6E 05 99 22 42 2D 46 3A |.15,;.6.n.."B-F:|
00000B30: 30 2C 31 38 22 3B 00 40 13 78 05 98 31 35 2C 49 |0,18";.@.x..15,I|
00000B40: 00 4A 13 82 05 8D 31 39 30 30 00 50 13 8C 05 82 |.J....1900.P....|
00000B50: 00 5A 13 96 05 9D 31 35 2C 3B 00 6F 13 A0 05 98 |.Z....15,;.o....|
00000B60: 31 35 2C 22 42 2D 41 3A 30 2C 31 38 2C 30 22 00 |15,"B-A:0,18,0".|
00000B70: 77 13 AA 05 53 B2 31 00 81 13 B4 05 9D 31 35 2C |w...S.1......15,|
00000B80: 3B 00 92 13 BE 05 99 22 42 2D 41 3A 30 2C 31 38 |;......"B-A:0,18|
00000B90: 22 3B 00 9C 13 C8 05 98 31 35 2C 53 00 A6 13 D2 |";......15,S....|
00000BA0: 05 9D 31 35 2C 3B 00 B8 13 DC 05 98 31 35 2C 22 |..15,;......15,"|
00000BB0: 42 2D 50 3A 33 2C 30 22 00 BE 13 E6 05 3A 00 C9 |B-P:3,0".....:..|
00000BC0: 13 F0 05 81 49 B2 30 A4 37 00 D2 13 FA 05 9D 33 |....I.0.7......3|
00000BD0: 2C 3B 00 DB 13 04 06 99 5A 24 3B 00 E4 13 0E 06 |,;......Z$;.....|
00000BE0: 99 5A 24 3B 00 F0 13 18 06 99 4E 24 28 45 29 3B |.Z$;......N$(E);|
00000BF0: 00 F9 13 22 06 98 33 2C 3B 00 09 14 2C 06 8B 28 |..."..3,;...,..(|
00000C00: 45 B2 4E 29 A7 31 37 35 30 00 15 14 36 06 45 B2 |E.N).1750...6.E.|
00000C10: 28 45 AA 31 29 00 1B 14 40 06 82 00 27 14 4A 06 |(E.1)...@...'.J.|
00000C20: 54 B2 28 53 AA 33 29 00 3D 14 54 06 8B 28 54 B1 |T.(S.3).=.T..(T.|
00000C30: 31 38 29 A7 3A 54 B2 28 54 AB 31 37 29 00 47 14 |18).:T.(T.17).G.|
00000C40: 5E 06 9D 31 35 2C 3B 00 59 14 68 06 98 31 35 2C |^..15,;.Y.h..15,|
00000C50: 22 42 2D 50 3A 33 2C 30 22 00 62 14 72 06 9D 33 |"B-P:3,0".b.r..3|
00000C60: 2C 3B 00 6E 14 7C 06 99 C7 28 31 38 29 3B 00 79 |,;.n.|...(18);.y|
00000C70: 14 86 06 99 C7 28 54 29 3B 00 82 14 90 06 98 33 |.....(T);......3|
00000C80: 2C 3B 00 8C 14 9A 06 9D 31 35 2C 3B 00 9E 14 A4 |,;......15,;....|
00000C90: 06 99 22 55 32 3A 33 2C 30 2C 31 38 22 3B 00 A8 |.."U2:3,0,18";..|
00000CA0: 14 AE 06 98 31 35 2C 53 00 B2 14 B8 06 8D 31 39 |....15,S......19|
00000CB0: 30 30 00 BA 14 C2 06 53 B2 54 00 C4 14 CC 06 89 |00.....S.T......|
00000CC0: 31 34 36 30 00 F5 14 D6 06 8B 28 49 B3 37 29 A7 |1460......(I.7).|
00000CD0: 3A 4A B2 31 3A 81 4A B2 4A A4 28 28 37 AB 49 29 |:J.1:.J.J.((7.I)|
00000CE0: AC 33 32 29 3A 9D 33 2C 3B 3A 99 5A 24 3B 3A 98 |.32):.3,;:.Z$;:.|
00000CF0: 33 2C 3B 3A 82 00 FF 14 E0 06 9D 31 35 2C 3B 00 |3,;:.......15,;.|
00000D00: 11 15 EA 06 98 31 35 2C 22 42 2D 50 3A 33 2C 30 |.....15,"B-P:3,0|
00000D10: 22 00 1A 15 F4 06 9D 33 2C 3B 00 23 15 FE 06 99 |"......3,;.#....|
00000D20: 5A 24 3B 00 30 15 08 07 99 C7 28 32 35 35 29 3B |Z$;.0.....(255);|
00000D30: 00 39 15 12 07 98 33 2C 3B 00 43 15 1C 07 9D 31 |.9....3,;.C....1|
00000D40: 35 2C 3B 00 55 15 26 07 99 22 55 32 3A 33 2C 30 |5,;.U.&.."U2:3,0|
00000D50: 2C 31 38 22 3B 00 5F 15 30 07 98 31 35 2C 53 00 |,18";._.0..15,S.|
00000D60: 69 15 3A 07 8D 31 39 30 30 00 73 15 44 07 9D 31 |i.:..1900.s.D..1|
00000D70: 35 2C 3B 00 7F 15 4E 07 98 31 35 2C 22 49 22 00 |5,;...N..15,"I".|
00000D80: 86 15 58 07 A0 33 00 90 15 62 07 89 31 39 37 30 |..X..3...b..1970|
00000D90: 00 A1 15 6C 07 84 31 35 2C 41 2C 42 24 2C 43 2C |...l..15,A,B$,C,|
00000DA0: 44 00 AE 15 76 07 8B 28 41 B2 30 29 A7 8E 00 CF |D...v..(A.0)....|
00000DB0: 15 80 07 99 22 93 45 52 52 4F 52 20 45 4E 20 44 |....".ERROR EN D|
00000DC0: 49 53 43 4F 20 3A 22 41 3B 42 24 3B 43 3B 44 00 |ISCO :"A;B$;C;D.|
00000DD0: 1F 16 B2 07 41 24 B2 22 50 52 4F 47 52 41 4D 41 |....A$."PROGRAMA|
00000DE0: 20 4D 4F 44 49 46 49 43 41 44 4F 52 20 44 45 20 | MODIFICADOR DE |
00000DF0: 44 49 52 45 43 54 4F 52 49 4F 2E 20 20 50 52 4F |DIRECTORIO. PRO|
00000E00: 44 55 43 49 44 4F 20 50 4F 52 3A 20 12 43 41 4D |DUCIDO POR: .CAM|
00000E10: 45 4C 20 2A 20 53 4F 46 54 57 41 52 45 92 22 00 |EL * SOFTWARE.".|
00000E20: 32 16 BC 07 49 B2 31 3A 81 49 B2 49 A4 C3 28 41 |2...I.1:.I.I..(A|
00000E30: 24 29 00 49 16 C6 07 41 B2 28 41 AA C6 28 CA 28 |$).I...A.(A..(.(|
00000E40: 41 24 2C 49 2C 31 29 29 29 00 4F 16 D0 07 82 00 |A$,I,1))).O.....|
00000E50: 5E 16 DA 07 9F 33 2C 38 2C 33 2C 22 23 22 00 68 |^....3,8,3,"#".h|
00000E60: 16 E4 07 9D 31 35 2C 3B 00 7E 16 EE 07 98 31 35 |....15,;.~....15|
00000E70: 2C 22 55 31 3A 33 2C 30 2C 31 38 2C 30 22 00 88 |,"U1:3,0,18,0"..|
00000E80: 16 F8 07 9D 31 35 2C 3B 00 9C 16 02 08 98 31 35 |....15,;......15|
00000E90: 2C 22 42 2D 50 3A 33 2C 31 38 30 22 00 A5 16 0C |,"B-P:3,180"....|
00000EA0: 08 9D 33 2C 3B 00 AE 16 16 08 99 41 24 3B 00 B7 |..3,;......A$;..|
00000EB0: 16 20 08 98 33 2C 3B 00 C1 16 2A 08 9D 31 35 2C |. ..3,;...*..15,|
00000EC0: 3B 00 D7 16 34 08 98 31 35 2C 22 55 32 3A 33 2C |;...4..15,"U2:3,|
00000ED0: 30 2C 31 38 2C 30 22 00 E1 16 3E 08 9D 31 35 2C |0,18,0"...>..15,|
00000EE0: 3B 00 ED 16 48 08 98 31 35 2C 22 49 22 00 F5 16 |;...H..15,"I"...|
00000EF0: 52 08 A0 31 35 00 FC 16 5C 08 A0 33 00 02 17 66 |R..15...\..3...f|
00000F00: 08 9C 00 0A 17 70 08 89 31 30 00 13 17 7A 08 99 |.....p..10...z..|
00000F10: 22 93 22 00 1E 17 8E 08 81 49 B2 30 A4 45 00 28 |"."......I.0.E.(|
00000F20: 17 98 08 42 24 B2 4C 24 00 33 17 AC 08 81 4A B2 |...B$.L$.3....J.|
00000F30: 30 A4 45 00 61 17 B6 08 8B 28 CA 28 44 24 28 4A |0.E.a....(.(D$(J|
00000F40: 29 2C 34 2C 31 36 29 B3 42 24 29 A7 3A 42 24 B2 |),4,16).B$).:B$.|
00000F50: CA 28 44 24 28 4A 29 2C 34 2C 31 36 29 3A 51 B2 |.(D$(J),4,16):Q.|
00000F60: 4A 00 87 17 C0 08 99 22 13 4F 52 44 45 4E 41 4E |J......".ORDENAN|
00000F70: 44 4F 2C 20 45 53 50 45 52 45 2E 2E 2E 3A 22 3B |DO, ESPERE...:";|
00000F80: 42 24 22 91 22 3A 82 00 97 17 CA 08 4E 24 28 4E |B$".":......N$(N|
00000F90: 29 B2 44 24 28 51 29 00 A3 17 D4 08 4E B2 28 4E |).D$(Q).....N.(N|
00000FA0: AA 31 29 00 B0 17 DE 08 44 24 28 51 29 B2 4C 24 |.1).....D$(Q).L$|
00000FB0: 00 B6 17 E8 08 82 00 C2 17 F2 08 4E B2 28 4E AB |...........N.(N.|
00000FC0: 31 29 00 CC 17 FC 08 89 31 31 36 30 00 D2 17 06 |1)......1160....|
00000FD0: 09 80 00 00 00 |..... |
..:....:.D$(143):.N$(143):.53280,0:.5328
1,0:G.1024:Z$.G(0).L...S$.(((G(192).G(18
)).G(1))."................")......(C(S$)
.30).:S$.(S$.Z$):.30...(.I.1...2..I.I.30
:L$.(L$.G(255)):....<.."... MOD
IFICAR DIRECTORIO ..."...F.A$."
CAMEL * SOFTWARE"...P.." PROGRAMADO P
OR: ";.&.Z..A$...D.I.1.=.N..I.I.C(A$).T.
X.A.(A.F(J(A$,I,1))).Z..........". BU
ENOS AIRES REPUBLICA ARGENTINA ".....
A$."MARTON.".E. ..". VERSION C64 DESCOM
PILADA POR ";.M....A$.U...A.0.....I.1...
H..I.I.C(A$)...R.A.(A.F(J(A$,I,1))).....
..<....".... LEER DIRECTORIO * * * PULS
E UNA TECLA".Z...."....................
F7) SEPARADOR DE DIRECTORIO."......
".................. F1) TOMAR FILAS
HACIA LA LISTA."......".................
..... O) ORDENAR DIRECTORIO.."..
....198,0......198,1.M....".............
.... ESPERE, LEYENDO DIRECTORIO
".`."..15,8,15,"UI+".O.,..3,8,3,"#".
Y.6..1900...@..15,;...J..15,"U1:3,0,18,0
"...T..1900...^..#3,T$...H..#3,U$...R.."
.ESTE DIRECTORIO UTILIZA :."...|.I.F((T$
.Z$)).....J.F((U$.Z$))......"PISTA :"I;.
5...." SECTOR: .....";J".".;.
..:.L....(I.18).:F.1.V....15,;.E.B.."U1:
3,0";.M.L..I;.W.V..15,J......1900......#
3,T$......#3,U$.....I.0......I.I.7.....B
$."".....J.1.H.&..J.J.30.S.0..#3,A$...:.
.(A$."").:A$.Z$...D.B$.(B$.A$)...N...8.X
..((F(B$).0).(J(B$,4,16)..J(S$,4,16))).:
D$(E).B$:E.(E.1).C.B..#3,A$.N.L..#3,A$.T
.V...E....(T$."").380.L... 3.X...E.(E.1)
......:.......E.0.:."NO HAY DIRECTORIO":
.......F.:." 'VALIDAR' DISCO DESPUES DE
FORMAR EL":." NUEVO DIRECTORI
O.....:...F..". -> PULSE UNA TE
CLA <-".1.P..198,0:.198,1.E.Z.."...
MODIFICAR DIRECTORIO .";...
...". VIEJO DIRECTORIO :."...
..B.(A.19)......(B.E).:B.E.....:......I.
A.B.E.....10).Y. ..J(D$(I),4,16);...*...
24)...4..(F(J(D$(I),29,1)).(F(J(D$(I),30
,1)).256))...>... .H.Q.0.8.R..((G.85).(Y
.40)),62.C.\..Q.730.U.F..198,0:.198,1.P.
...A$:B.F(A$):.B.79.2170......((G.85).(Y
.40)),32......((B.145).(Y.0)).:Y.(Y.1):.
850.T....((B.145).(A.0)).:A.(A.20):Y.19:
.730......(B.133).1010......(B.136).1080
...J..((A.Y).E).850./.T..((B.17).(Y.19))
.:Y.(Y.1):.1000.N....(B.17).:A.(A.20):Y.
0:.730.W....850.K...N$(N).D$((A.Y)).{...
.(E.0).1160......((A.Y).E).:I.(A.Y):.I.I
.(E.1):D$(I).D$((I.1)):......N.(N.1).H..
.E.(E.1)...$..((A.Y).E).:B.145:Q.1:.920.
.....730...8..((N.E).141).850...B.N$(N).
S$...L.N.(N.1).I.V.."... UD. ELIG
IO UN SEPARADOR.".X.J..Q.1.500:..A.~..85
0......".. NUEVO DIRECTORIO :"
.....:......I.0.N:.J(N$(I),4,16):..T....
".DESEA REESCRIBIR DIRECTORIO (S/N)"....
..198,0:.198,1......A$:.A$.."S"..:.10...
D..".LOS SEPARADORES NO SE PUEDEN BORRAR
!!!!".6.N.E.0.C.X..".. ..EDITANDO
VIEJO DIRECTORIO.".M....15,;......15,"I
":.1900:.3,8,3,"#":.1900:.15,;......15,"
U1:3,0,18,0"......1900......3,;.K....G(1
8);.V....G(1);...(..3,;...2..15,;...<..1
5,"U2:3,0,18,0"...F..1900...P.:...Z..I.0
.18.%.D..15,;.6.N.."B-F:0,18";.@.X..15,I
.J....1900.P.....Z....15,;.O. ..15,"B-A:
0,18,0".W...S.1......15,;......"B-A:0,18
";...H..15,S...R..15,;......15,"B-P:3,0"
.....:.I....I.0.7.R....3,;......Z$;.....
.Z$;......N$(E);..."..3,;...,..(E.N).175
0...6.E.(E.1)...@...'.J.T.(S.3).=.T..(T.
18).:T.(T.17).G.^..15,;.Y.H..15,"B-P:3,0
".B.R..3,;.N.|..G(18);.Y....G(T);......3
,;......15,;......"U2:3,0,18";......15,S
......1900...B.S.T.D.L..1460...V..(I.7).
:J.1:.J.J.((7.I).32):.3,;:.Z$;:.3,;:....
...15,;......15,"B-P:3,0"......3,;.#....
Z$;.0....G(255);.9....3,;.C....15,;.U.&.
."U2:3,0,18";._.0..15,S.I.:..1900.S.D..1
5,;..N..15,"I"...X. 3...B..1970...L..15
,A,B$,C,D...V..(A.0)...O....".ERROR EN D
ISCO :"A;B$;C;D.....A$."PROGRAMA MODIFIC
ADOR DE DIRECTORIO. PRODUCIDO POR: .CAM
EL * SOFTWARE.".2...I.1:.I.I.C(A$).I.F.A
.(A.F(J(A$,I,1))).O.P...^.Z..3,8,3,"#".H
....15,;.~....15,"U1:3,0,18,0"......15,;
......15,"B-P:3,180"......3,;......A$;..
. ..3,;.A.*..15,;.W.4..15,"U2:3,0,18,0".
..>..15,;...H..15,"I"...R. 15...\. 3...F
.....P..10...Z.."."......I.0.E.(...B$.L$
.3....J.0.E.A....(J(D$(J),4,16).B$).:B$.
J(D$(J),4,16):Q.J......".ORDENANDO, ESPE
RE...:";B$".":....J.N$(N).D$(Q)...T.N.(N
.1).....D$(Q).L$.......B...N.(N.1).L....
1160.R.......
> CLICK IMAGE PREVIEW FOR FULL MODAL