DIR
FILE INFORMATION
FILENAME(S): DIR
FILE TYPE(S): PRG
FILE SIZE: 3.3K
FIRST SEEN: 2025-10-19 23:07:08
APPEARS ON: 1 disk(s)
FILE HASH
1d28cf6fba5e9fc719592a16b33b1934390193561320a45b04cbeeaca9630509
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| A36A | DIR | PRG | Bugjam - Argentina | 13 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0C 08 0A 00 4E 44 24 B2 22 22 00 1E 08 14 |......ND$.""....|
00000010: 00 8F 20 4E 44 24 3D 43 48 52 24 28 38 29 00 41 |.. ND$=CHR$(8).A|
00000020: 08 1E 00 86 46 54 24 28 35 29 3A 81 49 B2 30 A4 |....FT$(5):.I.0.|
00000030: 35 3A 87 41 24 3A 46 54 24 28 49 29 B2 41 24 3A |5:.A$:FT$(I).A$:|
00000040: 82 00 5F 08 28 00 83 20 44 45 4C 2C 53 45 51 2C |.._.(.. DEL,SEQ,|
00000050: 50 52 47 2C 55 53 52 2C 52 45 4C 2C 44 45 4C 00 |PRG,USR,REL,DEL.|
00000060: 6F 08 32 00 86 20 46 24 28 31 34 34 2C 35 29 00 |o.2.. F$(144,5).|
00000070: 7A 08 3C 00 46 45 B2 36 36 34 00 C1 08 46 00 99 |z.<.FE.664...F..|
00000080: C7 28 31 34 37 29 3B C7 28 33 30 29 3B 22 11 11 |.(147);.(30);"..|
00000090: 11 1D 11 11 11 11 11 11 11 11 11 53 41 4C 49 44 |...........SALID|
000000A0: 41 20 45 4E 20 50 41 4E 54 41 4C 4C 41 20 4F 20 |A EN PANTALLA O |
000000B0: 49 4D 50 52 45 53 4F 52 41 20 28 50 2F 49 29 3F |IMPRESORA (P/I)?|
000000C0: 22 00 D3 08 50 00 A1 41 24 3A 8B 41 24 B2 22 22 |"...P..A$:.A$.""|
000000D0: A7 38 30 00 E9 08 5A 00 44 56 B2 33 3A 8B 41 24 |.80...Z.DV.3:.A$|
000000E0: B2 22 49 22 A7 44 56 B2 34 00 F9 08 64 00 8B 41 |."I".DV.4...d..A|
000000F0: 24 B2 22 50 22 A7 31 34 30 00 35 09 6E 00 99 22 |$."P".140.5.n.."|
00000100: 93 22 3A 99 22 1D 1D 1D 1D 1D 1D 1D 11 11 11 11 |.":."...........|
00000110: 11 11 11 11 11 11 11 11 53 49 4D 50 4C 45 20 4F |........SIMPLE O|
00000120: 20 44 4F 42 4C 45 20 41 4E 43 48 4F 20 28 53 2F | DOBLE ANCHO (S/|
00000130: 44 29 20 3F 22 00 48 09 78 00 A1 41 24 3A 8B 41 |D) ?".H.x..A$:.A|
00000140: 24 B2 22 22 A7 31 32 30 00 68 09 82 00 42 47 24 |$."".120.h...BG$|
00000150: B2 C7 28 31 35 29 3A 8B 41 24 B2 22 44 22 A7 42 |..(15):.A$."D".B|
00000160: 47 24 B2 C7 28 31 34 29 00 99 09 8C 00 99 22 93 |G$..(14)......".|
00000170: 22 3A 99 22 11 11 11 11 11 11 11 11 1D 1D 1D 1D |":."............|
00000180: 1D 1D 1D 1D 1D 1D 1D 1D 43 4F 4C 4F 51 55 45 20 |........COLOQUE |
00000190: 45 4C 20 44 49 53 43 4F 22 00 C7 09 91 00 99 22 |EL DISCO"......"|
000001A0: 11 11 11 11 11 1D 1D 1D 1D 1D 1D 59 20 4C 55 45 |...........Y LUE|
000001B0: 47 4F 20 4F 50 52 49 4D 41 20 41 4C 47 55 4E 41 |GO OPRIMA ALGUNA|
000001C0: 20 54 45 43 4C 41 22 00 DA 09 96 00 A1 41 24 3A | TECLA"......A$:|
000001D0: 8B 41 24 B2 22 22 A7 31 35 30 00 10 0A A0 00 99 |.A$."".150......|
000001E0: 22 93 22 3A 99 22 11 11 11 11 11 11 11 11 11 11 |".":."..........|
000001F0: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 55 4E 20 4D 4F |...........UN MO|
00000200: 4D 45 4E 54 4F 20 50 4F 52 20 46 41 56 4F 52 22 |MENTO POR FAVOR"|
00000210: 00 2B 0A AA 00 9F 31 35 2C 38 2C 31 35 3A 98 31 |.+....15,8,15:.1|
00000220: 35 2C 22 49 22 3A 8D 31 30 32 30 00 3F 0A B4 00 |5,"I":.1020.?...|
00000230: 9F 38 2C 38 2C 38 2C 22 24 30 2C 53 2C 52 22 00 |.8,8,8,"$0,S,R".|
00000240: 49 0A BE 00 8D 31 30 32 30 00 5F 0A C8 00 81 49 |I....1020._....I|
00000250: B2 31 A4 31 34 32 3A A1 23 38 2C 41 24 3A 82 00 |.1.142:.#8,A$:..|
00000260: 80 0A D2 00 81 49 B2 31 34 33 A4 31 36 30 3A A1 |.....I.143.160:.|
00000270: 23 38 2C 41 24 3A 4E 24 B2 4E 24 AA 41 24 3A 82 |#8,A$:N$.N$.A$:.|
00000280: 00 A3 0A DC 00 81 49 B2 31 36 31 A4 31 36 32 3A |......I.161.162:|
00000290: A1 23 38 2C 41 24 3A 49 44 24 B2 49 44 24 AA 41 |.#8,A$:ID$.ID$.A|
000002A0: 24 3A 82 00 CD 0A E6 00 A1 23 38 2C 41 24 3A 81 |$:.......#8,A$:.|
000002B0: 49 B2 31 36 34 A4 31 36 35 3A A1 23 38 2C 41 24 |I.164.165:.#8,A$|
000002C0: 3A 4F 53 24 B2 4F 53 24 AA 41 24 3A 82 00 E5 0A |:OS$.OS$.A$:....|
000002D0: F0 00 81 49 B2 31 36 36 A4 32 35 34 3A A1 23 38 |...I.166.254:.#8|
000002E0: 2C 41 24 3A 82 00 EE 0A FA 00 43 54 B2 38 00 FA |,A$:......CT.8..|
000002F0: 0A 04 01 4E 4D B2 4E 4D AA 31 00 0E 0B 0E 01 8B |...NM.NM.1......|
00000300: 43 54 B2 38 A7 43 54 B2 31 3A 89 33 30 30 00 2A |CT.8.CT.1:.300.*|
00000310: 0B 18 01 43 54 B2 43 54 AA 31 3A A1 23 38 2C 41 |...CT.CT.1:.#8,A|
00000320: 24 2C 41 24 3A 46 4C B2 53 54 00 39 0B 22 01 8B |$,A$:FL.ST.9."..|
00000330: 46 4C B3 B1 30 A7 34 38 30 00 55 0B 2C 01 A1 23 |FL..0.480.U.,..#|
00000340: 38 2C 41 24 3A 8B 41 24 B2 22 22 A7 41 24 B2 C7 |8,A$:.A$."".A$..|
00000350: 28 31 33 33 29 00 6A 0B 36 01 46 4C B2 53 54 3A |(133).j.6.FL.ST:|
00000360: 8B 46 4C B3 B1 30 A7 34 38 30 00 87 0B 40 01 54 |.FL..0.480...@.T|
00000370: 59 24 B2 46 54 24 28 28 C6 28 41 24 29 AF 31 39 |Y$.FT$((.(A$).19|
00000380: 31 29 AB 31 32 38 29 00 A1 0B 4A 01 A1 23 38 2C |1).128)...J..#8,|
00000390: 41 24 3A 8B 41 24 B2 22 22 A7 41 24 B2 C7 28 30 |A$:.A$."".A$..(0|
000003A0: 29 00 BC 0B 54 01 54 52 24 B2 C9 28 22 20 20 22 |)...T.TR$..(" "|
000003B0: AA C4 28 C6 28 41 24 29 29 2C 32 29 00 D6 0B 5E |..(.(A$)),2)...^|
000003C0: 01 A1 23 38 2C 41 24 3A 8B 41 24 B2 22 22 A7 41 |..#8,A$:.A$."".A|
000003D0: 24 B2 C7 28 30 29 00 F1 0B 68 01 53 43 24 B2 C9 |$..(0)...h.SC$..|
000003E0: 28 22 20 20 22 AA C4 28 C6 28 41 24 29 29 2C 32 |(" "..(.(A$)),2|
000003F0: 29 00 18 0C 72 01 46 4C 24 B2 22 22 3A 81 49 B2 |)...r.FL$."":.I.|
00000400: 33 A4 31 38 3A A1 23 38 2C 41 24 3A 46 4C 24 B2 |3.18:.#8,A$:FL$.|
00000410: 46 4C 24 AA 41 24 3A 82 00 2E 0C 7C 01 81 49 B2 |FL$.A$:....|..I.|
00000420: 31 39 A4 32 37 3A A1 23 38 2C 41 24 3A 82 00 3E |19.27:.#8,A$:..>|
00000430: 0C 86 01 A1 23 38 2C 4C 42 24 2C 48 42 24 00 61 |....#8,LB$,HB$.a|
00000440: 0C 90 01 42 4C B2 C6 28 4C 42 24 AA C7 28 30 29 |...BL..(LB$..(0)|
00000450: 29 AA 32 35 36 AC C6 28 48 42 24 AA C7 28 30 29 |).256..(HB$..(0)|
00000460: 29 00 7A 0C 9A 01 8B 54 59 24 B3 B1 22 44 45 4C |).z....TY$.."DEL|
00000470: 22 A7 46 45 B2 46 45 AB 42 4C 00 95 0C A4 01 42 |".FE.FE.BL.....B|
00000480: 4C 24 B2 C9 28 22 20 20 20 20 20 22 AA C4 28 42 |L$..(" "..(B|
00000490: 4C 29 2C 33 29 00 A7 0C AE 01 8B 54 52 24 B2 22 |L),3)......TR$."|
000004A0: 20 30 22 A7 34 38 30 00 EC 0C B8 01 46 24 28 4E | 0".480.....F$(N|
000004B0: 4D 2C 30 29 B2 46 4C 24 3A 46 24 28 4E 4D 2C 31 |M,0).FL$:F$(NM,1|
000004C0: 29 B2 54 59 24 3A 46 24 28 4E 4D 2C 32 29 B2 54 |).TY$:F$(NM,2).T|
000004D0: 52 24 3A 46 24 28 4E 4D 2C 33 29 B2 53 43 24 3A |R$:F$(NM,3).SC$:|
000004E0: 46 24 28 4E 4D 2C 34 29 B2 42 4C 24 00 01 0D C2 |F$(NM,4).BL$....|
000004F0: 01 46 24 28 4E 4D 2C 35 29 B2 22 20 20 20 20 20 |.F$(NM,5)." |
00000500: 22 00 21 0D CC 01 8B 54 59 24 B2 22 50 52 47 22 |".!....TY$."PRG"|
00000510: A7 46 24 28 4E 4D 2C 35 29 B2 22 2D 2D 2D 2D 2D |.F$(NM,5)."-----|
00000520: 22 00 2A 0D D6 01 89 32 36 30 00 31 0D E0 01 A0 |".*....260.1....|
00000530: 38 00 3B 0D EA 01 8D 31 30 32 30 00 59 0D F4 01 |8.;....1020.Y...|
00000540: 8B 46 24 28 4E 4D 2C 30 29 B2 22 22 A7 4E 4D B2 |.F$(NM,0)."".NM.|
00000550: 4E 4D AB 31 3A 89 35 30 30 00 73 0D FE 01 46 45 |NM.1:.500.s...FE|
00000560: 24 B2 C9 28 22 20 20 20 20 22 AA C4 28 46 45 29 |$..(" "..(FE)|
00000570: 2C 33 29 00 A1 0D 08 02 99 22 93 22 3A 99 22 11 |,3)......".":.".|
00000580: 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 44 |...............D|
00000590: 49 52 45 43 43 49 4F 4E 20 49 4E 49 43 49 41 4C |IRECCION INICIAL|
000005A0: 22 00 C3 0D 0D 02 99 22 11 11 11 1D 1D 1D 1D 1D |"......"........|
000005B0: 1D 1D 1D 1D 1D 1D 1D 31 29 20 44 45 20 54 4F 44 |.......1) DE TOD|
000005C0: 4F 53 22 00 04 0E 12 02 99 22 11 11 11 1D 1D 1D |OS"......"......|
000005D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 32 29 20 44 45 20 41 |.........2) DE A|
000005E0: 4C 47 55 4E 4F 53 22 3A 99 22 11 11 11 1D 1D 1D |LGUNOS":."......|
000005F0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 33 29 20 4E 49 4E 47 |.........3) NING|
00000600: 55 4E 4F 22 00 19 0E 1C 02 A1 41 24 3A 8B C5 28 |UNO"......A$:..(|
00000610: 41 24 29 B2 30 A7 35 34 30 00 2A 0E 26 02 8B C5 |A$).0.540.*.&...|
00000620: 28 41 24 29 B1 32 A7 37 37 30 00 68 0E 30 02 99 |(A$).2.770.h.0..|
00000630: 22 93 22 3A 8B 41 24 B2 22 31 22 A7 99 22 11 11 |".":.A$."1".."..|
00000640: 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D |................|
00000650: 1D 1D 1D 55 4E 20 4D 4F 4D 45 4E 54 4F 20 50 4F |...UN MOMENTO PO|
00000660: 52 20 46 41 56 4F 52 22 00 74 0E 3A 02 81 49 B2 |R FAVOR".t.:..I.|
00000670: 31 A4 4E 4D 00 8C 0E 44 02 8B 46 24 28 49 2C 31 |1.NM...D..F$(I,1|
00000680: 29 B3 B1 22 50 52 47 22 A7 37 30 30 00 9C 0E 4E |).."PRG".700...N|
00000690: 02 8B 41 24 B2 22 31 22 A7 36 33 30 00 BA 0E 58 |..A$."1".630...X|
000006A0: 02 99 3A 99 22 1D 1D 1D 22 3B 46 24 28 49 2C 30 |..:."...";F$(I,0|
000006B0: 29 3B 22 20 28 53 2F 4E 29 22 00 CD 0E 62 02 A1 |);" (S/N)"...b..|
000006C0: 41 24 3A 8B 41 24 B2 22 22 A7 36 31 30 00 E5 0E |A$:.A$."".610...|
000006D0: 6C 02 8B 41 24 B3 B1 22 53 22 A7 99 22 91 22 3B |l..A$.."S"..".";|
000006E0: 3A 89 37 30 30 00 F5 0E 76 02 53 41 24 B2 46 24 |:.700...v.SA$.F$|
000006F0: 28 49 2C 30 29 00 10 0F 80 02 9F 38 2C 38 2C 38 |(I,0)......8,8,8|
00000700: 2C 22 30 3A 22 AA 53 41 24 AA 22 2C 50 2C 52 22 |,"0:".SA$.",P,R"|
00000710: 00 1A 0F 8A 02 8D 31 30 32 30 00 2A 0F 94 02 A1 |......1020.*....|
00000720: 23 38 2C 4C 42 24 2C 48 42 24 00 4D 0F 9E 02 53 |#8,LB$,HB$.M...S|
00000730: 41 B2 C6 28 4C 42 24 AA C7 28 30 29 29 AA 32 35 |A..(LB$..(0)).25|
00000740: 36 AC C6 28 48 42 24 AA C7 28 30 29 29 00 54 0F |6..(HB$..(0)).T.|
00000750: A8 02 A0 38 00 74 0F B2 02 46 24 28 49 2C 35 29 |...8.t...F$(I,5)|
00000760: B2 C9 28 22 20 20 20 20 20 20 22 AA C4 28 53 41 |..(" "..(SA|
00000770: 29 2C 35 29 00 7A 0F BC 02 82 00 83 0F C1 02 99 |),5).z..........|
00000780: 22 93 22 00 AA 0F C6 02 99 22 11 11 11 1D 1D 1D |"."......"......|
00000790: 1D 1D 1D 1D 1D 1D 1D 1D 20 45 53 50 45 52 45 20 |........ ESPERE |
000007A0: 55 4E 20 4D 49 4E 55 54 4F 22 00 D7 0F D0 02 99 |UN MINUTO"......|
000007B0: C7 28 31 35 30 29 3B A6 31 32 29 3B 3A 81 51 51 |.(150);.12);:.QQ|
000007C0: B2 31 A4 31 36 3A 99 C7 28 31 36 32 29 3B 3A 82 |.1.16:..(162);:.|
000007D0: 3A 99 C7 28 33 30 29 00 FF 0F DA 02 8B 44 56 B2 |:..(30)......DV.|
000007E0: 33 A7 99 22 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D |3.."............|
000007F0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 59 22 00 |.............Y".|
00000800: 24 10 DC 02 8B 44 56 B2 34 A7 99 22 11 11 11 1D |$....DV.4.."....|
00000810: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000820: 1D 1D 59 22 00 51 10 DF 02 8B 44 56 B2 34 A7 99 |..Y".Q....DV.4..|
00000830: 22 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
00000840: 4F 50 52 49 4D 41 20 55 4E 41 20 54 45 43 4C 41 |OPRIMA UNA TECLA|
00000850: 22 00 84 10 E0 02 8B 44 56 B2 34 A7 99 C7 28 31 |"......DV.4...(1|
00000860: 35 30 29 3B A6 31 32 29 3B 3A 81 51 51 B2 31 A4 |50);.12);:.QQ.1.|
00000870: 31 36 3A 99 C7 28 31 36 32 29 3B 3A 82 3A 99 C7 |16:..(162);:.:..|
00000880: 28 33 30 29 00 B6 10 E4 02 8B 44 56 B2 34 A7 99 |(30)......DV.4..|
00000890: 22 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 50 41 52 41 |"...........PARA|
000008A0: 20 41 43 54 49 56 41 52 20 4C 41 20 49 4D 50 52 | ACTIVAR LA IMPR|
000008B0: 45 53 4F 52 41 22 00 E8 10 E9 02 8B 44 56 B2 34 |ESORA"......DV.4|
000008C0: A7 99 C7 28 31 35 30 29 3B A6 37 29 3B 3A 81 51 |...(150);.7);:.Q|
000008D0: 51 B2 31 A4 32 35 3A 99 C7 28 31 36 32 29 3B 3A |Q.1.25:..(162);:|
000008E0: 82 3A 99 C7 28 33 30 29 00 18 11 EE 02 8B 44 56 |.:..(30)......DV|
000008F0: B2 33 A7 99 22 11 11 11 11 11 11 1D 1D 1D 1D 1D |.3.."...........|
00000900: 1D 1D 1D 1D 1D 1D 1D 4F 50 52 49 4D 41 20 55 4E |.......OPRIMA UN|
00000910: 41 20 54 45 43 4C 41 22 00 4B 11 F3 02 8B 44 56 |A TECLA".K....DV|
00000920: B2 33 A7 99 C7 28 31 35 30 29 3B A6 31 32 29 3B |.3...(150);.12);|
00000930: 3A 81 51 51 B2 31 A4 31 36 3A 99 C7 28 31 36 32 |:.QQ.1.16:..(162|
00000940: 29 3B 3A 82 3A 99 C7 28 33 30 29 00 5E 11 F8 02 |);:.:..(30).^...|
00000950: A1 41 24 3A 8B 41 24 B2 22 22 A7 37 36 30 00 71 |.A$:.A$."".760.q|
00000960: 11 02 03 8B 44 56 B3 B1 34 A7 99 C7 28 31 34 37 |....DV..4...(147|
00000970: 29 00 96 11 0C 03 8B 44 56 B2 34 A7 8B 4E 44 24 |)......DV.4..ND$|
00000980: B2 22 22 A7 9F 36 2C 34 2C 36 3A 98 36 2C C7 28 |.""..6,4,6:.6,.(|
00000990: 32 31 29 3A A0 36 00 A0 11 16 03 9F 34 2C 44 56 |21):.6......4,DV|
000009A0: 00 D9 11 20 03 98 34 2C 42 47 24 3B 22 B0 C0 C0 |... ..4,BG$;"...|
000009B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000009C0: B2 C0 C0 B2 C0 C0 B2 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000009D0: C0 C0 C0 AE 22 3B 4E 44 24 00 14 12 2A 03 98 34 |....";ND$...*..4|
000009E0: 2C 42 47 24 3B 22 DD 22 3B 4E 24 3B 22 DD 22 3B |,BG$;".";N$;".";|
000009F0: 49 44 24 3B 22 DD 22 3B 4F 53 24 3B 22 DD 46 52 |ID$;".";OS$;".FR|
00000A00: 20 53 45 43 3A 22 3B 46 45 24 3B 22 20 20 DD 22 | SEC:";FE$;" ."|
00000A10: 3B 4E 44 24 00 4D 12 34 03 98 34 2C 42 47 24 3B |;ND$.M.4..4,BG$;|
00000A20: 22 AB C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"...............|
00000A30: C0 C0 B2 C0 B1 C0 B2 B1 C0 B2 B1 C0 B2 C0 C0 C0 |................|
00000A40: B2 C0 C0 C0 C0 C0 C0 B3 22 3B 4E 44 24 00 86 12 |........";ND$...|
00000A50: 3E 03 98 34 2C 42 47 24 3B 22 DD 4E 4F 4D 42 52 |>..4,BG$;".NOMBR|
00000A60: 45 20 20 3A 20 20 20 20 20 20 20 DD 54 49 50 DD |E : .TIP.|
00000A70: 54 52 DD 53 43 DD 42 4C 4B DD 53 54 41 52 54 20 |TR.SC.BLK.START |
00000A80: DD 22 3B 4E 44 24 00 BF 12 48 03 98 34 2C 42 47 |.";ND$...H..4,BG|
00000A90: 24 3B 22 AB C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |$;".............|
00000AA0: C0 C0 C0 C0 DB C0 C0 C0 DB C0 C0 DB C0 C0 DB C0 |................|
00000AB0: C0 C0 DB C0 C0 C0 C0 C0 C0 B3 22 3B 4E 44 24 00 |..........";ND$.|
00000AC0: CB 12 52 03 81 49 B2 31 A4 4E 4D 00 0B 13 5C 03 |..R..I.1.NM...\.|
00000AD0: 46 4C 24 B2 46 24 28 49 2C 30 29 3A 54 59 24 B2 |FL$.F$(I,0):TY$.|
00000AE0: 46 24 28 49 2C 31 29 3A 54 52 24 B2 46 24 28 49 |F$(I,1):TR$.F$(I|
00000AF0: 2C 32 29 3A 53 43 24 B2 46 24 28 49 2C 33 29 3A |,2):SC$.F$(I,3):|
00000B00: 42 4C 24 B2 46 24 28 49 2C 34 29 00 1E 13 66 03 |BL$.F$(I,4)...f.|
00000B10: 8B 54 59 24 B2 22 44 45 4C 22 A7 39 30 30 00 69 |.TY$."DEL".900.i|
00000B20: 13 70 03 98 34 2C 42 47 24 3B 20 22 DD 22 3B 46 |.p..4,BG$; ".";F|
00000B30: 4C 24 3B 22 DD 22 3B 54 59 24 3B 22 DD 22 3B 54 |L$;".";TY$;".";T|
00000B40: 52 24 3B 22 DD 22 3B 53 43 24 3B 22 DD 22 3B 42 |R$;".";SC$;".";B|
00000B50: 4C 24 3B 22 DD 22 3B 46 24 28 49 2C 35 29 3B 20 |L$;".";F$(I,5); |
00000B60: 20 22 20 DD 22 3B 4E 44 24 00 A2 13 7A 03 98 34 | " .";ND$...z..4|
00000B70: 2C 42 47 24 3B 22 DD 20 20 20 20 20 20 20 20 20 |,BG$;". |
00000B80: 20 20 20 20 20 20 20 DD 20 20 20 DD 20 20 DD A0 | . . ..|
00000B90: A0 DD 20 20 20 DD 20 20 20 20 20 20 DD 22 3B 4E |.. . .";N|
00000BA0: 44 24 00 A8 13 84 03 82 00 E1 13 8E 03 98 34 2C |D$............4,|
00000BB0: 42 47 24 3B 22 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |BG$;"...........|
00000BC0: C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 B1 C0 C0 B1 C0 C0 |................|
00000BD0: B1 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 BD 22 3B 4E 44 |............";ND|
00000BE0: 24 00 EB 13 98 03 98 34 3A A0 34 00 F3 13 A2 03 |$......4:.4.....|
00000BF0: A0 31 35 00 27 14 AC 03 8B 44 56 B2 34 A7 99 3A |.15.'....DV.4..:|
00000C00: 99 3A 99 22 1D 1D 1D 1D 1D 1D 1D 49 4D 50 52 49 |.:.".......IMPRI|
00000C10: 4D 45 20 4E 55 45 56 41 4D 45 4E 54 45 20 28 53 |ME NUEVAMENTE (S|
00000C20: 2F 4E 29 20 3F 20 22 00 58 14 B6 03 8B 44 56 B2 |/N) ? ".X....DV.|
00000C30: 33 A7 99 3A 99 3A 99 22 1D 1D 1D 1D 1D 1D 1D 1D |3..:.:."........|
00000C40: 4F 54 52 4F 20 44 49 52 45 43 54 4F 52 49 4F 20 |OTRO DIRECTORIO |
00000C50: 28 53 2F 4E 29 20 3F 22 00 6C 14 C0 03 A1 41 24 |(S/N) ?".l....A$|
00000C60: 3A 8B 41 24 B2 22 53 22 A7 37 37 30 00 7D 14 CA |:.A$."S".770.}..|
00000C70: 03 8B 41 24 B3 B1 22 4E 22 A7 39 36 30 00 AF 14 |..A$.."N".960...|
00000C80: D4 03 99 3A 99 3A 99 C7 28 31 34 35 29 22 1D 1D |...:.:..(145)"..|
00000C90: 1D 1D 1D 1D 1D 1D 4E 55 45 56 4F 20 44 49 52 45 |......NUEVO DIRE|
00000CA0: 43 54 4F 52 49 4F 20 28 53 2F 4E 29 20 3F 22 00 |CTORIO (S/N) ?".|
00000CB0: C1 14 DE 03 A1 41 24 3A 8B 41 24 B2 22 53 22 A7 |.....A$:.A$."S".|
00000CC0: 8A 00 D4 14 E8 03 8B 41 24 B2 22 4E 22 A7 99 22 |.......A$."N".."|
00000CD0: 93 22 3A 80 00 DD 14 F2 03 89 39 39 30 00 FA 14 |.":.......990...|
00000CE0: FC 03 84 31 35 2C 45 5A 2C 45 5A 24 2C 54 52 2C |...15,EZ,EZ$,TR,|
00000CF0: 53 45 3A 8B 45 5A B2 30 A7 8E 00 0E 15 06 04 54 |SE:.EZ.0.......T|
00000D00: 24 B2 C7 28 31 35 37 29 AA C7 28 33 32 29 00 2F |$..(157)..(32)./|
00000D10: 15 10 04 99 C7 28 31 38 29 20 45 5A 3B 54 24 3B |.....(18) EZ;T$;|
00000D20: 45 5A 3B 45 5A 24 3B 54 52 3B 54 24 3B 53 45 00 |EZ;EZ$;TR;T$;SE.|
00000D30: 3B 15 1A 04 A0 38 3A A0 20 31 35 00 00 00 |;....8:. 15... |
......ND$.""...... ND$=CHR$(8).A....FT$(
5):.I.0.5:.A$:FT$(I).A$:.._.(.. DEL,SEQ,
PRG,USR,REL,DEL.O.2.. F$(144,5).Z.<.FE.6
64.A.F..G(147);G(30);".............SALID
A EN PANTALLA O IMPRESORA (P/I)?".S.P..A
$:.A$."".80...Z.DV.3:.A$."I".DV.4...D..A
$."P".140.5.N..".":."...................
SIMPLE O DOBLE ANCHO (S/D) ?".H.X..A$:.A
$."".120.H...BG$.G(15):.A$."D".BG$.G(14)
......".":."....................COLOQUE
EL DISCO".G...."...........Y LUEGO OPRIM
A ALGUNA TECLA".Z....A$:.A$."".150... ..
".":.".....................UN MOMENTO PO
R FAVOR".+....15,8,15:.15,"I":.1020.?...
.8,8,8,"$0,S,R".I....1020._.H..I.1.142:.
#8,A$:....R..I.143.160:.#8,A$:N$.N$.A$:.
......I.161.162:.#8,A$:ID$.ID$.A$:..M...
.#8,A$:.I.164.165:.#8,A$:OS$.OS$.A$:....
...I.166.254:.#8,A$:......CT.8.....NM.NM
.1......CT.8.CT.1:.300.*...CT.CT.1:.#8,A
$,A$:FL.ST.9."..FL..0.480.U.,..#8,A$:.A$
."".A$.G(133).J.6.FL.ST:.FL..0.480...@.T
Y$.FT$((F(A$).191).128)...J..#8,A$:.A$."
".A$.G(0)...T.TR$.I(" ".D(F(A$)),2).V.^
..#8,A$:.A$."".A$.G(0)...H.SC$.I(" ".D(
F(A$)),2)...R.FL$."":.I.3.18:.#8,A$:FL$.
FL$.A$:....|..I.19.27:.#8,A$:..>....#8,L
B$,HB$.A...BL.F(LB$.G(0)).256.F(HB$.G(0)
).Z....TY$.."DEL".FE.FE.BL.....BL$.I("
".D(BL),3)......TR$." 0".480.....F$(N
M,0).FL$:F$(NM,1).TY$:F$(NM,2).TR$:F$(NM
,3).SC$:F$(NM,4).BL$...B.F$(NM,5)."
".!.L..TY$."PRG".F$(NM,5)."-----".*.V..2
60.1... 8.;....1020.Y....F$(NM,0)."".NM.
NM.1:.500.S...FE$.I(" ".D(FE),3).....
.".":."................DIRECCION INICIAL
".C...."...............1) DE TODOS".....
."...............2) DE ALGUNOS":."......
.........3) NINGUNO"......A$:.E(A$).0.54
0.*.&..E(A$).2.770.H.0..".":.A$."1".."..
...................UN MOMENTO POR FAVOR"
.T.:..I.1.NM...D..F$(I,1).."PRG".700...N
..A$."1".630...X..:."...";F$(I,0);" (S/N
)".M.B..A$:.A$."".610...L..A$.."S"..".";
:.700...V.SA$.F$(I,0)......8,8,8,"0:".SA
$.",P,R"......1020.*....#8,LB$,HB$.M...S
A.F(LB$.G(0)).256.F(HB$.G(0)).T... 8.T..
.F$(I,5).I(" ".D(SA),5).Z.......A..
"."...F..".............. ESPERE UN MINUT
O".W.P..G(150);.12);:.QQ.1.16:.G(162);:.
:.G(30)...Z..DV.3.."....................
.....Y".$....DV.4.."....................
..Y".Q....DV.4.."...............OPRIMA U
NA TECLA"......DV.4..G(150);.12);:.QQ.1.
16:.G(162);:.:.G(30)......DV.4..".......
....PARA ACTIVAR LA IMPRESORA"......DV.4
..G(150);.7);:.QQ.1.25:.G(162);:.:.G(30)
......DV.3.."..................OPRIMA UN
A TECLA".K....DV.3..G(150);.12);:.QQ.1.1
6:.G(162);:.:.G(30).^....A$:.A$."".760.Q
....DV..4..G(147)......DV.4..ND$.""..6,4
,6:.6,G(21): 6. ....4,DV.Y. ..4,BG$;"...
....................................";ND
$...*..4,BG$;".";N$;".";ID$;".";OS$;".FR
SEC:";FE$;" .";ND$.M.4..4,BG$;".......
................................";ND$...
>..4,BG$;".NOMBRE : .TIP.TR.SC.BL
K.START .";ND$...H..4,BG$;".............
..........................";ND$.K.R..I.1
.NM...\.FL$.F$(I,0):TY$.F$(I,1):TR$.F$(I
,2):SC$.F$(I,3):BL$.F$(I,4)...F..TY$."DE
L".900.I.P..4,BG$; ".";FL$;".";TY$;".";T
R$;".";SC$;".";BL$;".";F$(I,5); " .";ND
$...Z..4,BG$;". . . .
. . .";ND$............4,BG$;"...
....................................";ND
$......4: 4..... 15.'....DV.4..:.:."....
...IMPRIME NUEVAMENTE (S/N) ? ".X....DV.
3..:.:."........OTRO DIRECTORIO (S/N) ?"
.L....A$:.A$."S".770.}.J..A$.."N".960...
T..:.:.G(145)"........NUEVO DIRECTORIO (
S/N) ?".A....A$:.A$."S"...T....A$."N".."
.":.......990......15,EZ,EZ$,TR,SE:.EZ.0
.......T$.G(157).G(32)./....G(18) EZ;T$;
EZ;EZ$;TR;T$;SE.;... 8: 15...
> CLICK IMAGE PREVIEW FOR FULL MODAL