DIR+
FILE INFORMATION
FILENAME(S): DIR+
FILE TYPE(S): PRG
FILE SIZE: 3.4K
FIRST SEEN: 2025-10-19 23:07:08
APPEARS ON: 1 disk(s)
FILE HASH
536fbc568afca88ab9fb7db99dd2f313fbfcecdb8cad6d112b909af9aff0a48b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| A36A | DIR+ | PRG | Bugjam - Argentina | 5 | 1 | 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 67 0A C8 00 81 49 |I....1020.g....I|
00000250: B2 31 A4 31 34 32 3A A1 23 38 2C 41 24 3A 97 31 |.1.142:.#8,A$:.1|
00000260: 30 32 34 2C 49 3A 82 00 90 0A D2 00 81 49 B2 31 |024,I:.......I.1|
00000270: 34 33 A4 31 36 30 3A A1 23 38 2C 41 24 3A 4E 24 |43.160:.#8,A$:N$|
00000280: B2 4E 24 AA 41 24 3A 97 31 30 32 34 2C 49 3A 82 |.N$.A$:.1024,I:.|
00000290: 00 BB 0A DC 00 81 49 B2 31 36 31 A4 31 36 32 3A |......I.161.162:|
000002A0: A1 23 38 2C 41 24 3A 49 44 24 B2 49 44 24 AA 41 |.#8,A$:ID$.ID$.A|
000002B0: 24 3A 97 31 30 32 34 2C 49 3A 82 00 ED 0A E6 00 |$:.1024,I:......|
000002C0: A1 23 38 2C 41 24 3A 81 49 B2 31 36 34 A4 31 36 |.#8,A$:.I.164.16|
000002D0: 35 3A A1 23 38 2C 41 24 3A 4F 53 24 B2 4F 53 24 |5:.#8,A$:OS$.OS$|
000002E0: AA 41 24 3A 97 31 30 32 34 2C 49 3A 82 00 0D 0B |.A$:.1024,I:....|
000002F0: F0 00 81 49 B2 31 36 36 A4 32 35 34 3A A1 23 38 |...I.166.254:.#8|
00000300: 2C 41 24 3A 97 31 30 32 34 2C 49 3A 82 00 16 0B |,A$:.1024,I:....|
00000310: FA 00 43 54 B2 38 00 22 0B 04 01 4E 4D B2 4E 4D |..CT.8."...NM.NM|
00000320: AA 31 00 36 0B 0E 01 8B 43 54 B2 38 A7 43 54 B2 |.1.6....CT.8.CT.|
00000330: 31 3A 89 33 30 30 00 52 0B 18 01 43 54 B2 43 54 |1:.300.R...CT.CT|
00000340: AA 31 3A A1 23 38 2C 41 24 2C 41 24 3A 46 4C B2 |.1:.#8,A$,A$:FL.|
00000350: 53 54 00 61 0B 22 01 8B 46 4C B3 B1 30 A7 34 38 |ST.a."..FL..0.48|
00000360: 30 00 7D 0B 2C 01 A1 23 38 2C 41 24 3A 8B 41 24 |0.}.,..#8,A$:.A$|
00000370: B2 22 22 A7 41 24 B2 C7 28 31 33 33 29 00 92 0B |."".A$..(133)...|
00000380: 36 01 46 4C B2 53 54 3A 8B 46 4C B3 B1 30 A7 34 |6.FL.ST:.FL..0.4|
00000390: 38 30 00 AF 0B 40 01 54 59 24 B2 46 54 24 28 28 |80...@.TY$.FT$((|
000003A0: C6 28 41 24 29 AF 31 39 31 29 AB 31 32 38 29 00 |.(A$).191).128).|
000003B0: C9 0B 4A 01 A1 23 38 2C 41 24 3A 8B 41 24 B2 22 |..J..#8,A$:.A$."|
000003C0: 22 A7 41 24 B2 C7 28 30 29 00 E4 0B 54 01 54 52 |".A$..(0)...T.TR|
000003D0: 24 B2 C9 28 22 20 20 22 AA C4 28 C6 28 41 24 29 |$..(" "..(.(A$)|
000003E0: 29 2C 32 29 00 FE 0B 5E 01 A1 23 38 2C 41 24 3A |),2)...^..#8,A$:|
000003F0: 8B 41 24 B2 22 22 A7 41 24 B2 C7 28 30 29 00 19 |.A$."".A$..(0)..|
00000400: 0C 68 01 53 43 24 B2 C9 28 22 20 20 22 AA C4 28 |.h.SC$..(" "..(|
00000410: C6 28 41 24 29 29 2C 32 29 00 40 0C 72 01 46 4C |.(A$)),2).@.r.FL|
00000420: 24 B2 22 22 3A 81 49 B2 33 A4 31 38 3A A1 23 38 |$."":.I.3.18:.#8|
00000430: 2C 41 24 3A 46 4C 24 B2 46 4C 24 AA 41 24 3A 82 |,A$:FL$.FL$.A$:.|
00000440: 00 5E 0C 7C 01 81 49 B2 31 39 A4 32 37 3A A1 23 |.^.|..I.19.27:.#|
00000450: 38 2C 41 24 3A 97 31 30 32 34 2C 49 3A 82 00 6E |8,A$:.1024,I:..n|
00000460: 0C 86 01 A1 23 38 2C 4C 42 24 2C 48 42 24 00 91 |....#8,LB$,HB$..|
00000470: 0C 90 01 42 4C B2 C6 28 4C 42 24 AA C7 28 30 29 |...BL..(LB$..(0)|
00000480: 29 AA 32 35 36 AC C6 28 48 42 24 AA C7 28 30 29 |).256..(HB$..(0)|
00000490: 29 00 AA 0C 9A 01 8B 54 59 24 B3 B1 22 44 45 4C |)......TY$.."DEL|
000004A0: 22 A7 46 45 B2 46 45 AB 42 4C 00 C5 0C A4 01 42 |".FE.FE.BL.....B|
000004B0: 4C 24 B2 C9 28 22 20 20 20 20 20 22 AA C4 28 42 |L$..(" "..(B|
000004C0: 4C 29 2C 33 29 00 D7 0C AE 01 8B 54 52 24 B2 22 |L),3)......TR$."|
000004D0: 20 30 22 A7 34 38 30 00 1C 0D B8 01 46 24 28 4E | 0".480.....F$(N|
000004E0: 4D 2C 30 29 B2 46 4C 24 3A 46 24 28 4E 4D 2C 31 |M,0).FL$:F$(NM,1|
000004F0: 29 B2 54 59 24 3A 46 24 28 4E 4D 2C 32 29 B2 54 |).TY$:F$(NM,2).T|
00000500: 52 24 3A 46 24 28 4E 4D 2C 33 29 B2 53 43 24 3A |R$:F$(NM,3).SC$:|
00000510: 46 24 28 4E 4D 2C 34 29 B2 42 4C 24 00 31 0D C2 |F$(NM,4).BL$.1..|
00000520: 01 46 24 28 4E 4D 2C 35 29 B2 22 20 20 20 20 20 |.F$(NM,5)." |
00000530: 22 00 51 0D CC 01 8B 54 59 24 B2 22 50 52 47 22 |".Q....TY$."PRG"|
00000540: A7 46 24 28 4E 4D 2C 35 29 B2 22 2D 2D 2D 2D 2D |.F$(NM,5)."-----|
00000550: 22 00 5A 0D D6 01 89 32 36 30 00 61 0D E0 01 A0 |".Z....260.a....|
00000560: 38 00 6B 0D EA 01 8D 31 30 32 30 00 89 0D F4 01 |8.k....1020.....|
00000570: 8B 46 24 28 4E 4D 2C 30 29 B2 22 22 A7 4E 4D B2 |.F$(NM,0)."".NM.|
00000580: 4E 4D AB 31 3A 89 35 30 30 00 A3 0D FE 01 46 45 |NM.1:.500.....FE|
00000590: 24 B2 C9 28 22 20 20 20 20 22 AA C4 28 46 45 29 |$..(" "..(FE)|
000005A0: 2C 33 29 00 D1 0D 08 02 99 22 93 22 3A 99 22 11 |,3)......".":.".|
000005B0: 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 44 |...............D|
000005C0: 49 52 45 43 43 49 4F 4E 20 49 4E 49 43 49 41 4C |IRECCION INICIAL|
000005D0: 22 00 F3 0D 0D 02 99 22 11 11 11 1D 1D 1D 1D 1D |"......"........|
000005E0: 1D 1D 1D 1D 1D 1D 1D 31 29 20 44 45 20 54 4F 44 |.......1) DE TOD|
000005F0: 4F 53 22 00 34 0E 12 02 99 22 11 11 11 1D 1D 1D |OS".4...."......|
00000600: 1D 1D 1D 1D 1D 1D 1D 1D 1D 32 29 20 44 45 20 41 |.........2) DE A|
00000610: 4C 47 55 4E 4F 53 22 3A 99 22 11 11 11 1D 1D 1D |LGUNOS":."......|
00000620: 1D 1D 1D 1D 1D 1D 1D 1D 1D 33 29 20 4E 49 4E 47 |.........3) NING|
00000630: 55 4E 4F 22 00 49 0E 1C 02 A1 41 24 3A 8B C5 28 |UNO".I....A$:..(|
00000640: 41 24 29 B2 30 A7 35 34 30 00 5A 0E 26 02 8B C5 |A$).0.540.Z.&...|
00000650: 28 41 24 29 B1 32 A7 37 37 30 00 98 0E 30 02 99 |(A$).2.770...0..|
00000660: 22 93 22 3A 8B 41 24 B2 22 31 22 A7 99 22 11 11 |".":.A$."1".."..|
00000670: 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D |................|
00000680: 1D 1D 1D 55 4E 20 4D 4F 4D 45 4E 54 4F 20 50 4F |...UN MOMENTO PO|
00000690: 52 20 46 41 56 4F 52 22 00 A4 0E 3A 02 81 49 B2 |R FAVOR"...:..I.|
000006A0: 31 A4 4E 4D 00 BC 0E 44 02 8B 46 24 28 49 2C 31 |1.NM...D..F$(I,1|
000006B0: 29 B3 B1 22 50 52 47 22 A7 37 30 30 00 CC 0E 4E |).."PRG".700...N|
000006C0: 02 8B 41 24 B2 22 31 22 A7 36 33 30 00 EA 0E 58 |..A$."1".630...X|
000006D0: 02 99 3A 99 22 1D 1D 1D 22 3B 46 24 28 49 2C 30 |..:."...";F$(I,0|
000006E0: 29 3B 22 20 28 53 2F 4E 29 22 00 FD 0E 62 02 A1 |);" (S/N)"...b..|
000006F0: 41 24 3A 8B 41 24 B2 22 22 A7 36 31 30 00 15 0F |A$:.A$."".610...|
00000700: 6C 02 8B 41 24 B3 B1 22 53 22 A7 99 22 91 22 3B |l..A$.."S"..".";|
00000710: 3A 89 37 30 30 00 25 0F 76 02 53 41 24 B2 46 24 |:.700.%.v.SA$.F$|
00000720: 28 49 2C 30 29 00 40 0F 80 02 9F 38 2C 38 2C 38 |(I,0).@....8,8,8|
00000730: 2C 22 30 3A 22 AA 53 41 24 AA 22 2C 50 2C 52 22 |,"0:".SA$.",P,R"|
00000740: 00 4A 0F 8A 02 8D 31 30 32 30 00 5A 0F 94 02 A1 |.J....1020.Z....|
00000750: 23 38 2C 4C 42 24 2C 48 42 24 00 7D 0F 9E 02 53 |#8,LB$,HB$.}...S|
00000760: 41 B2 C6 28 4C 42 24 AA C7 28 30 29 29 AA 32 35 |A..(LB$..(0)).25|
00000770: 36 AC C6 28 48 42 24 AA C7 28 30 29 29 00 84 0F |6..(HB$..(0))...|
00000780: A8 02 A0 38 00 A4 0F B2 02 46 24 28 49 2C 35 29 |...8.....F$(I,5)|
00000790: B2 C9 28 22 20 20 20 20 20 20 22 AA C4 28 53 41 |..(" "..(SA|
000007A0: 29 2C 35 29 00 AA 0F BC 02 82 00 B3 0F C1 02 99 |),5)............|
000007B0: 22 93 22 00 DA 0F C6 02 99 22 11 11 11 1D 1D 1D |"."......"......|
000007C0: 1D 1D 1D 1D 1D 1D 1D 1D 20 45 53 50 45 52 45 20 |........ ESPERE |
000007D0: 55 4E 20 4D 49 4E 55 54 4F 22 00 07 10 D0 02 99 |UN MINUTO"......|
000007E0: C7 28 31 35 30 29 3B A6 31 32 29 3B 3A 81 51 51 |.(150);.12);:.QQ|
000007F0: B2 31 A4 31 36 3A 99 C7 28 31 36 32 29 3B 3A 82 |.1.16:..(162);:.|
00000800: 3A 99 C7 28 33 30 29 00 2F 10 DA 02 8B 44 56 B2 |:..(30)./....DV.|
00000810: 33 A7 99 22 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D |3.."............|
00000820: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 59 22 00 |.............Y".|
00000830: 54 10 DC 02 8B 44 56 B2 34 A7 99 22 11 11 11 1D |T....DV.4.."....|
00000840: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000850: 1D 1D 59 22 00 81 10 DF 02 8B 44 56 B2 34 A7 99 |..Y"......DV.4..|
00000860: 22 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
00000870: 4F 50 52 49 4D 41 20 55 4E 41 20 54 45 43 4C 41 |OPRIMA UNA TECLA|
00000880: 22 00 B4 10 E0 02 8B 44 56 B2 34 A7 99 C7 28 31 |"......DV.4...(1|
00000890: 35 30 29 3B A6 31 32 29 3B 3A 81 51 51 B2 31 A4 |50);.12);:.QQ.1.|
000008A0: 31 36 3A 99 C7 28 31 36 32 29 3B 3A 82 3A 99 C7 |16:..(162);:.:..|
000008B0: 28 33 30 29 00 E6 10 E4 02 8B 44 56 B2 34 A7 99 |(30)......DV.4..|
000008C0: 22 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 50 41 52 41 |"...........PARA|
000008D0: 20 41 43 54 49 56 41 52 20 4C 41 20 49 4D 50 52 | ACTIVAR LA IMPR|
000008E0: 45 53 4F 52 41 22 00 18 11 E9 02 8B 44 56 B2 34 |ESORA"......DV.4|
000008F0: A7 99 C7 28 31 35 30 29 3B A6 37 29 3B 3A 81 51 |...(150);.7);:.Q|
00000900: 51 B2 31 A4 32 35 3A 99 C7 28 31 36 32 29 3B 3A |Q.1.25:..(162);:|
00000910: 82 3A 99 C7 28 33 30 29 00 48 11 EE 02 8B 44 56 |.:..(30).H....DV|
00000920: B2 33 A7 99 22 11 11 11 11 11 11 1D 1D 1D 1D 1D |.3.."...........|
00000930: 1D 1D 1D 1D 1D 1D 1D 4F 50 52 49 4D 41 20 55 4E |.......OPRIMA UN|
00000940: 41 20 54 45 43 4C 41 22 00 7B 11 F3 02 8B 44 56 |A TECLA".{....DV|
00000950: B2 33 A7 99 C7 28 31 35 30 29 3B A6 31 32 29 3B |.3...(150);.12);|
00000960: 3A 81 51 51 B2 31 A4 31 36 3A 99 C7 28 31 36 32 |:.QQ.1.16:..(162|
00000970: 29 3B 3A 82 3A 99 C7 28 33 30 29 00 8E 11 F8 02 |);:.:..(30).....|
00000980: A1 41 24 3A 8B 41 24 B2 22 22 A7 37 36 30 00 A1 |.A$:.A$."".760..|
00000990: 11 02 03 8B 44 56 B3 B1 34 A7 99 C7 28 31 34 37 |....DV..4...(147|
000009A0: 29 00 C6 11 0C 03 8B 44 56 B2 34 A7 8B 4E 44 24 |)......DV.4..ND$|
000009B0: B2 22 22 A7 9F 36 2C 34 2C 36 3A 98 36 2C C7 28 |.""..6,4,6:.6,.(|
000009C0: 32 31 29 3A A0 36 00 D0 11 16 03 9F 34 2C 44 56 |21):.6......4,DV|
000009D0: 00 09 12 20 03 98 34 2C 42 47 24 3B 22 B0 C0 C0 |... ..4,BG$;"...|
000009E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000009F0: B2 C0 C0 B2 C0 C0 B2 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000A00: C0 C0 C0 AE 22 3B 4E 44 24 00 44 12 2A 03 98 34 |....";ND$.D.*..4|
00000A10: 2C 42 47 24 3B 22 DD 22 3B 4E 24 3B 22 DD 22 3B |,BG$;".";N$;".";|
00000A20: 49 44 24 3B 22 DD 22 3B 4F 53 24 3B 22 DD 46 52 |ID$;".";OS$;".FR|
00000A30: 20 53 45 43 3A 22 3B 46 45 24 3B 22 20 20 DD 22 | SEC:";FE$;" ."|
00000A40: 3B 4E 44 24 00 7D 12 34 03 98 34 2C 42 47 24 3B |;ND$.}.4..4,BG$;|
00000A50: 22 AB C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"...............|
00000A60: C0 C0 B2 C0 B1 C0 B2 B1 C0 B2 B1 C0 B2 C0 C0 C0 |................|
00000A70: B2 C0 C0 C0 C0 C0 C0 B3 22 3B 4E 44 24 00 B6 12 |........";ND$...|
00000A80: 3E 03 98 34 2C 42 47 24 3B 22 DD 4E 4F 4D 42 52 |>..4,BG$;".NOMBR|
00000A90: 45 20 20 3A 20 20 20 20 20 20 20 DD 54 49 50 DD |E : .TIP.|
00000AA0: 54 52 DD 53 43 DD 42 4C 4B DD 53 54 41 52 54 20 |TR.SC.BLK.START |
00000AB0: DD 22 3B 4E 44 24 00 F0 12 48 03 98 34 2C 42 47 |.";ND$...H..4,BG|
00000AC0: 24 3B 22 AB C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |$;".............|
00000AD0: C0 C0 C0 C0 DB C0 C0 C0 DB C0 C0 DB C0 C0 DB C0 |................|
00000AE0: C0 C0 DB C0 C0 C0 C0 C0 C0 B3 11 22 3B 4E 44 24 |...........";ND$|
00000AF0: 00 FC 12 52 03 81 49 B2 31 A4 4E 4D 00 3C 13 5C |...R..I.1.NM.<.\|
00000B00: 03 46 4C 24 B2 46 24 28 49 2C 30 29 3A 54 59 24 |.FL$.F$(I,0):TY$|
00000B10: B2 46 24 28 49 2C 31 29 3A 54 52 24 B2 46 24 28 |.F$(I,1):TR$.F$(|
00000B20: 49 2C 32 29 3A 53 43 24 B2 46 24 28 49 2C 33 29 |I,2):SC$.F$(I,3)|
00000B30: 3A 42 4C 24 B2 46 24 28 49 2C 34 29 00 4F 13 66 |:BL$.F$(I,4).O.f|
00000B40: 03 8B 54 59 24 B2 22 44 45 4C 22 A7 39 30 30 00 |..TY$."DEL".900.|
00000B50: 9A 13 70 03 98 34 2C 42 47 24 3B 22 91 DD 22 3B |..p..4,BG$;"..";|
00000B60: 46 4C 24 3B 22 DD 22 3B 54 59 24 3B 22 DD 22 3B |FL$;".";TY$;".";|
00000B70: 54 52 24 3B 22 DD 22 3B 53 43 24 3B 22 DD 22 3B |TR$;".";SC$;".";|
00000B80: 42 4C 24 3B 22 DD 22 3B 46 24 28 49 2C 35 29 3B |BL$;".";F$(I,5);|
00000B90: 20 20 22 20 DD 22 3B 4E 44 24 00 D3 13 7A 03 98 | " .";ND$...z..|
00000BA0: 34 2C 42 47 24 3B 22 DD 20 20 20 20 20 20 20 20 |4,BG$;". |
00000BB0: 20 20 20 20 20 20 20 20 DD 20 20 20 DD 20 20 DD | . . .|
00000BC0: A0 A0 DD 20 20 20 DD 20 20 20 20 20 20 DD 22 3B |... . .";|
00000BD0: 4E 44 24 00 D9 13 84 03 82 00 13 14 8E 03 98 34 |ND$............4|
00000BE0: 2C 42 47 24 3B 22 91 AD C0 C0 C0 C0 C0 C0 C0 C0 |,BG$;"..........|
00000BF0: C0 C0 C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 B1 C0 C0 B1 |................|
00000C00: C0 C0 B1 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 BD 22 3B |..............";|
00000C10: 4E 44 24 00 1D 14 98 03 98 34 3A A0 34 00 25 14 |ND$......4:.4.%.|
00000C20: A2 03 A0 31 35 00 59 14 AC 03 8B 44 56 B2 34 A7 |...15.Y....DV.4.|
00000C30: 99 3A 99 3A 99 22 1D 1D 1D 1D 1D 1D 1D 49 4D 50 |.:.:.".......IMP|
00000C40: 52 49 4D 45 20 4E 55 45 56 41 4D 45 4E 54 45 20 |RIME NUEVAMENTE |
00000C50: 28 53 2F 4E 29 20 3F 20 22 00 86 14 B6 03 8B 44 |(S/N) ? "......D|
00000C60: 56 B2 33 A7 99 22 1D 1D 1D 1D 1D 1D 1D 1D 4F 54 |V.3.."........OT|
00000C70: 52 4F 20 44 49 52 45 43 54 4F 52 49 4F 20 28 53 |RO DIRECTORIO (S|
00000C80: 2F 4E 29 20 3F 22 00 9A 14 C0 03 A1 41 24 3A 8B |/N) ?"......A$:.|
00000C90: 41 24 B2 22 53 22 A7 37 37 30 00 AB 14 CA 03 8B |A$."S".770......|
00000CA0: 41 24 B3 B1 22 4E 22 A7 39 36 30 00 D9 14 D4 03 |A$.."N".960.....|
00000CB0: 99 C7 28 31 34 35 29 22 1D 1D 1D 1D 1D 1D 1D 1D |..(145)"........|
00000CC0: 4E 55 45 56 4F 20 44 49 52 45 43 54 4F 52 49 4F |NUEVO DIRECTORIO|
00000CD0: 20 28 53 2F 4E 29 20 3F 22 00 EB 14 DE 03 A1 41 | (S/N) ?"......A|
00000CE0: 24 3A 8B 41 24 B2 22 53 22 A7 8A 00 FE 14 E8 03 |$:.A$."S".......|
00000CF0: 8B 41 24 B2 22 4E 22 A7 99 22 93 22 3A 80 00 07 |.A$."N"..".":...|
00000D00: 15 F2 03 89 39 39 30 00 24 15 FC 03 84 31 35 2C |....990.$....15,|
00000D10: 45 5A 2C 45 5A 24 2C 54 52 2C 53 45 3A 8B 45 5A |EZ,EZ$,TR,SE:.EZ|
00000D20: B2 30 A7 8E 00 38 15 06 04 54 24 B2 C7 28 31 35 |.0...8...T$..(15|
00000D30: 37 29 AA C7 28 33 32 29 00 59 15 10 04 99 C7 28 |7)..(32).Y.....(|
00000D40: 31 38 29 20 45 5A 3B 54 24 3B 45 5A 3B 45 5A 24 |18) EZ;T$;EZ;EZ$|
00000D50: 3B 54 52 3B 54 24 3B 53 45 00 65 15 1A 04 A0 38 |;TR;T$;SE.e....8|
00000D60: 3A A0 20 31 35 00 00 00 |:. 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.G.H..I.1.142:.
#8,A$:.1024,I:....R..I.143.160:.#8,A$:N$
.N$.A$:.1024,I:.......I.161.162:.#8,A$:I
D$.ID$.A$:.1024,I:.......#8,A$:.I.164.16
5:.#8,A$:OS$.OS$.A$:.1024,I:.......I.166
.254:.#8,A$:.1024,I:......CT.8."...NM.NM
.1.6....CT.8.CT.1:.300.R...CT.CT.1:.#8,A
$,A$:FL.ST.A."..FL..0.480.}.,..#8,A$:.A$
."".A$.G(133)...6.FL.ST:.FL..0.480...@.T
Y$.FT$((F(A$).191).128).I.J..#8,A$:.A$."
".A$.G(0)...T.TR$.I(" ".D(F(A$)),2)...^
..#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$:.1024,I:..N
....#8,LB$,HB$.....BL.F(LB$.G(0)).256.F(
HB$.G(0))......TY$.."DEL".FE.FE.BL.E...B
L$.I(" ".D(BL),3).W....TR$." 0".480.
....F$(NM,0).FL$:F$(NM,1).TY$:F$(NM,2).T
R$:F$(NM,3).SC$:F$(NM,4).BL$.1.B.F$(NM,5
)." ".Q.L..TY$."PRG".F$(NM,5)."-----
".Z.V..260.A... 8.K....1020......F$(NM,0
)."".NM.NM.1:.500.....FE$.I(" ".D(FE)
,3).Q....".":."................DIRECCION
INICIAL"......"...............1) DE TOD
OS".4...."...............2) DE ALGUNOS":
."...............3) NINGUNO".I....A$:.E(
A$).0.540.Z.&..E(A$).2.770...0..".":.A$.
"1"..".....................UN MOMENTO PO
R FAVOR"...:..I.1.NM...D..F$(I,1).."PRG"
.700.L.N..A$."1".630...X..:."...";F$(I,0
);" (S/N)"...B..A$:.A$."".610...L..A$.."
S"..".";:.700.%.V.SA$.F$(I,0).@....8,8,8
,"0:".SA$.",P,R".J....1020.Z....#8,LB$,H
B$.}...SA.F(LB$.G(0)).256.F(HB$.G(0))...
.. 8.....F$(I,5).I(" ".D(SA),5)....
.....A..".".Z.F..".............. ESPERE
UN MINUTO"...P..G(150);.12);:.QQ.1.16:.G
(162);:.:.G(30)./.Z..DV.3.."............
.............Y".T....DV.4.."............
..........Y"......DV.4.."...............
OPRIMA UNA 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).H....DV.3.."..................O
PRIMA UNA TECLA".{....DV.3..G(150);.12);
:.QQ.1.16:.G(162);:.:.G(30)......A$:.A$.
"".760......DV..4..G(147).F....DV.4..ND$
.""..6,4,6:.6,G(21): 6.P....4,DV... ..4,
BG$;"...................................
....";ND$.D.*..4,BG$;".";N$;".";ID$;".";
OS$;".FR SEC:";FE$;" .";ND$.}.4..4,BG$;
".......................................
";ND$...>..4,BG$;".NOMBRE : .TIP.
TR.SC.BLK.START .";ND$...H..4,BG$;".....
...................................";ND$
...R..I.1.NM.<.\.FL$.F$(I,0):TY$.F$(I,1)
:TR$.F$(I,2):SC$.F$(I,3):BL$.F$(I,4).O.F
..TY$."DEL".900...P..4,BG$;"..";FL$;".";
TY$;".";TR$;".";SC$;".";BL$;".";F$(I,5);
" .";ND$.S.Z..4,BG$;".
. . . . . .";ND$.Y..........4
,BG$;"..................................
......";ND$......4: 4.%... 15.Y....DV.4.
.:.:.".......IMPRIME NUEVAMENTE (S/N) ?
"......DV.3.."........OTRO DIRECTORIO (S
/N) ?"......A$:.A$."S".770...J..A$.."N".
960.Y.T..G(145)"........NUEVO DIRECTORIO
(S/N) ?"......A$:.A$."S"........A$."N".
.".":.......990.$....15,EZ,EZ$,TR,SE:.EZ
.0...8...T$.G(157).G(32).Y....G(18) EZ;T
$;EZ;EZ$;TR;T$;SE.E... 8: 15...
> CLICK IMAGE PREVIEW FOR FULL MODAL