SUPER DIR

00000000: 01 08 0C 08 0A 00 4E 44  24 B2 22 22 00 2F 08 1E  |......ND$.""./..|
00000010: 00 86 46 54 24 28 35 29  3A 81 49 B2 30 A4 35 3A  |..FT$(5):.I.0.5:|
00000020: 87 41 24 3A 46 54 24 28  49 29 B2 41 24 3A 82 00  |.A$:FT$(I).A$:..|
00000030: 4C 08 28 00 83 44 45 4C  2C 53 45 51 2C 50 52 47  |L.(..DEL,SEQ,PRG|
00000040: 2C 55 53 52 2C 52 45 4C  2C 44 45 4C 00 5B 08 32  |,USR,REL,DEL.[.2|
00000050: 00 86 46 24 28 31 34 34  2C 35 29 00 66 08 3C 00  |..F$(144,5).f.<.|
00000060: 46 45 B2 36 36 34 00 9B  08 46 00 99 C7 28 31 34  |FE.664...F...(14|
00000070: 37 29 3B C7 28 33 30 29  3B C7 28 31 37 29 3B 22  |7);.(30);.(17);"|
00000080: 50 41 4E 54 41 4C 4C 41  20 4F 20 49 4D 50 52 45  |PANTALLA O IMPRE|
00000090: 53 4F 52 41 20 28 50 2F  49 29 22 00 AD 08 50 00  |SORA (P/I)"...P.|
000000A0: A1 41 24 3A 8B 41 24 B2  22 22 A7 38 30 00 C3 08  |.A$:.A$."".80...|
000000B0: 5A 00 44 56 B2 33 3A 8B  41 24 B2 22 49 22 A7 44  |Z.DV.3:.A$."I".D|
000000C0: 56 B2 34 00 D3 08 64 00  8B 41 24 B2 22 50 22 A7  |V.4...d..A$."P".|
000000D0: 31 34 30 00 FA 08 6E 00  99 C7 28 31 37 29 22 53  |140...n...(17)"S|
000000E0: 49 4D 50 4C 45 20 4F 20  44 4F 42 4C 45 20 41 4E  |IMPLE O DOBLE AN|
000000F0: 43 48 4F 20 28 53 2F 44  29 22 00 0D 09 78 00 A1  |CHO (S/D)"...x..|
00000100: 41 24 3A 8B 41 24 B2 22  22 A7 31 32 30 00 2D 09  |A$:.A$."".120.-.|
00000110: 82 00 42 47 24 B2 C7 28  31 35 29 3A 8B 41 24 B2  |..BG$..(15):.A$.|
00000120: 22 44 22 A7 42 47 24 B2  C7 28 31 34 29 00 61 09  |"D".BG$..(14).a.|
00000130: 8C 00 99 C7 28 31 37 29  22 43 4F 4C 4F 51 55 45  |....(17)"COLOQUE|
00000140: 20 45 4C 20 44 49 53 43  4F 59 20 4F 50 52 49 4D  | EL DISCOY OPRIM|
00000150: 41 20 41 4C 47 55 4E 41  20 54 45 43 4C 41 22 3A  |A ALGUNA TECLA":|
00000160: 99 00 74 09 96 00 A1 41  24 3A 8B 41 24 B2 22 22  |..t....A$:.A$.""|
00000170: A7 31 35 30 00 A8 09 A0  00 99 C7 28 31 34 35 29  |.150.......(145)|
00000180: 22 55 4E 20 4D 4F 4D 45  4E 54 4F 20 50 4F 52 20  |"UN MOMENTO POR |
00000190: 46 41 56 4F 52 2C 4C 45  59 45 4E 44 4F 20 44 49  |FAVOR,LEYENDO DI|
000001A0: 52 45 43 54 4F 52 59 22  00 C3 09 AA 00 9F 31 35  |RECTORY"......15|
000001B0: 2C 38 2C 31 35 3A 98 31  35 2C 22 49 22 3A 8D 31  |,8,15:.15,"I":.1|
000001C0: 30 32 30 00 D7 09 B4 00  9F 38 2C 38 2C 38 2C 22  |020......8,8,8,"|
000001D0: 24 30 2C 53 2C 52 22 00  E1 09 BE 00 8D 31 30 32  |$0,S,R"......102|
000001E0: 30 00 F7 09 C8 00 81 49  B2 31 A4 31 34 32 3A A1  |0......I.1.142:.|
000001F0: 23 38 2C 41 24 3A 82 00  18 0A D2 00 81 49 B2 31  |#8,A$:.......I.1|
00000200: 34 33 A4 31 36 30 3A A1  23 38 2C 41 24 3A 4E 24  |43.160:.#8,A$:N$|
00000210: B2 4E 24 AA 41 24 3A 82  00 3B 0A DC 00 81 49 B2  |.N$.A$:..;....I.|
00000220: 31 36 31 A4 31 36 32 3A  A1 23 38 2C 41 24 3A 49  |161.162:.#8,A$:I|
00000230: 44 24 B2 49 44 24 AA 41  24 3A 82 00 65 0A E6 00  |D$.ID$.A$:..e...|
00000240: A1 23 38 2C 41 24 3A 81  49 B2 31 36 34 A4 31 36  |.#8,A$:.I.164.16|
00000250: 35 3A A1 23 38 2C 41 24  3A 4F 53 24 B2 4F 53 24  |5:.#8,A$:OS$.OS$|
00000260: AA 41 24 3A 82 00 7D 0A  F0 00 81 49 B2 31 36 36  |.A$:..}....I.166|
00000270: A4 32 35 34 3A A1 23 38  2C 41 24 3A 82 00 86 0A  |.254:.#8,A$:....|
00000280: FA 00 43 54 B2 38 00 92  0A 04 01 4E 4D B2 4E 4D  |..CT.8.....NM.NM|
00000290: AA 31 00 A6 0A 0E 01 8B  43 54 B2 38 A7 43 54 B2  |.1......CT.8.CT.|
000002A0: 31 3A 89 33 30 30 00 C2  0A 18 01 43 54 B2 43 54  |1:.300.....CT.CT|
000002B0: AA 31 3A A1 23 38 2C 41  24 2C 41 24 3A 46 4C B2  |.1:.#8,A$,A$:FL.|
000002C0: 53 54 00 D1 0A 22 01 8B  46 4C B3 B1 30 A7 34 38  |ST..."..FL..0.48|
000002D0: 30 00 ED 0A 2C 01 A1 23  38 2C 41 24 3A 8B 41 24  |0...,..#8,A$:.A$|
000002E0: B2 22 22 A7 41 24 B2 C7  28 31 33 33 29 00 02 0B  |."".A$..(133)...|
000002F0: 36 01 46 4C B2 53 54 3A  8B 46 4C B3 B1 30 A7 34  |6.FL.ST:.FL..0.4|
00000300: 38 30 00 1F 0B 40 01 54  59 24 B2 46 54 24 28 28  |80...@.TY$.FT$((|
00000310: C6 28 41 24 29 AF 31 39  31 29 AB 31 32 38 29 00  |.(A$).191).128).|
00000320: 3D 0B 4A 01 A1 23 38 2C  41 24 3A 8B 41 24 B2 22  |=.J..#8,A$:.A$."|
00000330: 22 A7 41 24 B2 22 43 48  52 24 28 30 29 00 58 0B  |".A$."CHR$(0).X.|
00000340: 54 01 54 52 24 B2 C9 28  22 20 20 22 AA C4 28 C6  |T.TR$..("  "..(.|
00000350: 28 41 24 29 29 2C 32 29  00 72 0B 5E 01 A1 23 38  |(A$)),2).r.^..#8|
00000360: 2C 41 24 3A 8B 41 24 B2  22 22 A7 41 24 B2 C7 28  |,A$:.A$."".A$..(|
00000370: 30 29 00 8D 0B 68 01 53  43 24 B2 C9 28 22 20 20  |0)...h.SC$..("  |
00000380: 22 AA C4 28 C6 28 41 24  29 29 2C 32 29 00 B4 0B  |"..(.(A$)),2)...|
00000390: 72 01 46 4C 24 B2 22 22  3A 81 49 B2 33 A4 31 38  |r.FL$."":.I.3.18|
000003A0: 3A A1 23 38 2C 41 24 3A  46 4C 24 B2 46 4C 24 AA  |:.#8,A$:FL$.FL$.|
000003B0: 41 24 3A 82 00 CA 0B 7C  01 81 49 B2 31 39 A4 32  |A$:....|..I.19.2|
000003C0: 37 3A A1 23 38 2C 41 24  3A 82 00 DA 0B 86 01 A1  |7:.#8,A$:.......|
000003D0: 23 38 2C 4C 42 24 2C 48  42 24 00 FD 0B 90 01 42  |#8,LB$,HB$.....B|
000003E0: 4C B2 C6 28 4C 42 24 AA  C7 28 30 29 29 AA 32 35  |L..(LB$..(0)).25|
000003F0: 36 AC C6 28 48 42 24 AA  C7 28 30 29 29 00 16 0C  |6..(HB$..(0))...|
00000400: 9A 01 8B 54 59 24 B3 B1  22 44 45 4C 22 A7 46 45  |...TY$.."DEL".FE|
00000410: B2 46 45 AB 42 4C 00 31  0C A4 01 42 4C 24 B2 C9  |.FE.BL.1...BL$..|
00000420: 28 22 20 20 20 20 20 22  AA C4 28 42 4C 29 2C 33  |("     "..(BL),3|
00000430: 29 00 43 0C AE 01 8B 54  52 24 B2 22 20 30 22 A7  |).C....TR$." 0".|
00000440: 34 38 30 00 88 0C B8 01  46 24 28 4E 4D 2C 30 29  |480.....F$(NM,0)|
00000450: B2 46 4C 24 3A 46 24 28  4E 4D 2C 31 29 B2 54 59  |.FL$:F$(NM,1).TY|
00000460: 24 3A 46 24 28 4E 4D 2C  32 29 B2 54 52 24 3A 46  |$:F$(NM,2).TR$:F|
00000470: 24 28 4E 4D 2C 33 29 B2  53 43 24 3A 46 24 28 4E  |$(NM,3).SC$:F$(N|
00000480: 4D 2C 34 29 B2 42 4C 24  00 9D 0C C2 01 46 24 28  |M,4).BL$.....F$(|
00000490: 4E 4D 2C 35 29 B2 22 20  20 20 20 20 22 00 BD 0C  |NM,5)."     "...|
000004A0: CC 01 8B 54 59 24 B2 22  50 52 47 22 A7 46 24 28  |...TY$."PRG".F$(|
000004B0: 4E 4D 2C 35 29 B2 22 2D  2D 2D 2D 2D 22 00 C6 0C  |NM,5)."-----"...|
000004C0: D6 01 89 32 36 30 00 CD  0C E0 01 A0 38 00 D7 0C  |...260......8...|
000004D0: EA 01 8D 31 30 32 30 00  F5 0C F4 01 8B 46 24 28  |...1020......F$(|
000004E0: 4E 4D 2C 30 29 B2 22 22  A7 4E 4D B2 4E 4D AB 31  |NM,0)."".NM.NM.1|
000004F0: 3A 89 35 30 30 00 0F 0D  FE 01 46 45 24 B2 C9 28  |:.500.....FE$..(|
00000500: 22 20 20 20 20 22 AA C4  28 46 45 29 2C 33 29 00  |"    "..(FE),3).|
00000510: 4A 0D 08 02 99 C7 28 31  34 35 29 3B 22 44 49 52  |J.....(145);"DIR|
00000520: 45 43 43 49 4F 4E 20 49  4E 49 43 49 41 4C 3A 20  |ECCION INICIAL: |
00000530: 20 20 20 20 22 3A 99 C7  28 31 37 29 3B 22 20 31  |    ":..(17);" 1|
00000540: 29 20 44 45 20 54 4F 44  4F 53 00 6F 0D 12 02 99  |) DE TODOS.o....|
00000550: 22 20 32 29 20 44 45 20  41 4C 47 55 4E 4F 53 22  |" 2) DE ALGUNOS"|
00000560: 3A 99 22 20 33 29 20 4E  49 4E 47 55 4E 4F 22 00  |:." 3) NINGUNO".|
00000570: 84 0D 1C 02 A1 41 24 3A  8B C5 28 41 24 29 B2 30  |.....A$:..(A$).0|
00000580: A7 35 34 30 00 95 0D 26  02 8B C5 28 41 24 29 B1  |.540...&...(A$).|
00000590: 32 A7 37 37 30 00 B4 0D  30 02 99 22 93 22 3A 8B  |2.770...0..".":.|
000005A0: 41 24 B2 22 31 22 A7 99  22 55 4E 20 4D 4F 4D 45  |A$."1".."UN MOME|
000005B0: 4E 54 4F 22 00 C0 0D 3A  02 81 49 B2 31 A4 4E 4D  |NTO"...:..I.1.NM|
000005C0: 00 D8 0D 44 02 8B 46 24  28 49 2C 31 29 B3 B1 22  |...D..F$(I,1).."|
000005D0: 50 52 47 22 A7 37 30 30  00 E8 0D 4E 02 8B 41 24  |PRG".700...N..A$|
000005E0: B2 22 31 22 A7 36 33 30  00 FD 0D 58 02 99 46 24  |."1".630...X..F$|
000005F0: 28 49 2C 30 29 3B 22 20  28 53 2F 4E 29 00 10 0E  |(I,0);" (S/N)...|
00000600: 62 02 A1 41 24 3A 8B 41  24 B2 22 22 A7 36 31 30  |b..A$:.A$."".610|
00000610: 00 28 0E 6C 02 8B 41 24  B3 B1 22 53 22 A7 99 22  |.(.l..A$.."S".."|
00000620: 91 22 3B 3A 89 37 30 30  00 38 0E 76 02 53 41 24  |.";:.700.8.v.SA$|
00000630: B2 46 24 28 49 2C 30 29  00 53 0E 80 02 9F 38 2C  |.F$(I,0).S....8,|
00000640: 38 2C 38 2C 22 30 3A 22  AA 53 41 24 AA 22 2C 50  |8,8,"0:".SA$.",P|
00000650: 2C 52 22 00 5D 0E 8A 02  8D 31 30 32 30 00 6D 0E  |,R".]....1020.m.|
00000660: 94 02 A1 23 38 2C 4C 42  24 2C 48 42 24 00 90 0E  |...#8,LB$,HB$...|
00000670: 9E 02 53 41 B2 C6 28 4C  42 24 AA C7 28 30 29 29  |..SA..(LB$..(0))|
00000680: AA 32 35 36 AC C6 28 48  42 24 AA C7 28 30 29 29  |.256..(HB$..(0))|
00000690: 00 97 0E A8 02 A0 38 00  B7 0E B2 02 46 24 28 49  |......8.....F$(I|
000006A0: 2C 35 29 B2 C9 28 22 20  20 20 20 20 20 22 AA C4  |,5)..("      "..|
000006B0: 28 53 41 29 2C 35 29 00  BD 0E BC 02 82 00 D9 0E  |(SA),5).........|
000006C0: C6 02 99 22 11 11 11 20  45 53 50 45 52 45 20 55  |..."... ESPERE U|
000006D0: 4E 20 4D 49 4E 55 54 4F  22 00 06 0F D0 02 99 C7  |N MINUTO".......|
000006E0: 28 32 38 29 3B A6 32 31  29 3B 3A 81 51 51 B2 31  |(28);.21);:.QQ.1|
000006F0: A4 31 34 3A 99 C7 28 31  36 33 29 3B 3A 82 3A 99  |.14:..(163);:.:.|
00000700: C7 28 33 30 29 3B 00 12  0F DA 02 99 3A 99 22 59  |.(30);......:."Y|
00000710: 22 3B 00 35 0F E4 02 8B  44 56 B2 34 A7 99 22 20  |";.5....DV.4.." |
00000720: 41 43 54 49 56 45 20 4C  41 20 49 4D 50 52 45 53  |ACTIVE LA IMPRES|
00000730: 4F 52 41 22 3B 00 4D 0F  EE 02 99 22 4F 50 52 49  |ORA";.M...."OPRI|
00000740: 4D 41 20 55 4E 41 20 54  45 43 4C 41 22 00 60 0F  |MA UNA TECLA".`.|
00000750: F8 02 A1 41 24 3A 8B 41  24 B2 22 22 A7 37 36 30  |...A$:.A$."".760|
00000760: 00 73 0F 02 03 8B 44 56  B3 B1 34 A7 99 C7 28 31  |.s....DV..4...(1|
00000770: 34 37 29 00 99 0F 0C 03  8B 44 56 B2 34 A7 8B 4E  |47)......DV.4..N|
00000780: 44 24 B2 22 22 A7 9F 36  2C 34 2C 36 3A 99 23 36  |D$.""..6,4,6:.#6|
00000790: 2C C7 28 32 31 29 3A A0  36 00 A3 0F 16 03 9F 34  |,.(21):.6......4|
000007A0: 2C 44 56 00 D5 0F 2A 03  98 34 2C 42 47 24 3B 22  |,DV...*..4,BG$;"|
000007B0: 20 22 3B 4E 24 3B 22 20  22 3B 49 44 24 3B 22 20  | ";N$;" ";ID$;" |
000007C0: 22 3B 4F 53 24 3B 22 20  22 3B 46 45 24 3B 22 20  |";OS$;" ";FE$;" |
000007D0: 22 3B 4E 44 24 00 0D 10  3E 03 98 34 2C 42 47 24  |";ND$...>..4,BG$|
000007E0: 3B 22 C2 4E 4F 4D 42 52  45 20 20 20 20 20 20 20  |;".NOMBRE       |
000007F0: 20 20 20 C2 54 49 50 C2  54 52 C2 53 43 C2 42 4C  |   .TIP.TR.SC.BL|
00000800: 4B C2 53 54 41 52 54 C2  22 3B 4E 44 24 00 19 10  |K.START.";ND$...|
00000810: 52 03 81 49 B2 31 A4 4E  4D 00 59 10 5C 03 46 4C  |R..I.1.NM.Y.\.FL|
00000820: 24 B2 46 24 28 49 2C 30  29 3A 54 59 24 B2 46 24  |$.F$(I,0):TY$.F$|
00000830: 28 49 2C 31 29 3A 54 52  24 B2 46 24 28 49 2C 32  |(I,1):TR$.F$(I,2|
00000840: 29 3A 53 43 24 B2 46 24  28 49 2C 33 29 3A 42 4C  |):SC$.F$(I,3):BL|
00000850: 24 B2 46 24 28 49 2C 34  29 00 6C 10 66 03 8B 54  |$.F$(I,4).l.f..T|
00000860: 59 24 B2 22 44 45 4C 22  A7 39 30 30 00 AD 10 70  |Y$."DEL".900...p|
00000870: 03 98 34 2C 42 47 24 3B  22 C2 22 3B 46 4C 24 3B  |..4,BG$;".";FL$;|
00000880: 22 C2 22 3B 54 59 24 3B  22 C2 22 3B 54 52 24 3B  |".";TY$;".";TR$;|
00000890: 22 C2 22 3B 53 43 24 3B  22 C2 22 3B 42 4C 24 3B  |".";SC$;".";BL$;|
000008A0: 22 C2 22 3B 46 24 3B 22  22 3B 4E 44 24 00 B3 10  |".";F$;"";ND$...|
000008B0: 84 03 82 00 BA 10 98 03  A0 34 00 C2 10 A2 03 A0  |.........4......|
000008C0: 31 35 00 E9 10 AC 03 8B  44 56 B2 34 A7 99 22 49  |15......DV.4.."I|
000008D0: 4D 50 52 49 4D 45 20 4E  55 45 56 41 4D 45 4E 54  |MPRIME NUEVAMENT|
000008E0: 45 20 28 53 2F 4E 29 3F  22 00 0D 11 B6 03 8B 44  |E (S/N)?"......D|
000008F0: 56 B2 33 A7 99 22 4F 54  52 4F 20 44 49 52 45 43  |V.3.."OTRO DIREC|
00000900: 54 4F 52 49 4F 20 28 53  2F 4E 29 3F 22 00 21 11  |TORIO (S/N)?".!.|
00000910: C0 03 A1 41 24 3A 8B 41  24 B2 22 53 22 A7 37 37  |...A$:.A$."S".77|
00000920: 30 00 32 11 CA 03 8B 41  24 B3 B1 22 4E 22 A7 39  |0.2....A$.."N".9|
00000930: 36 30 00 57 11 D4 03 99  C7 28 31 34 35 29 22 4E  |60.W.....(145)"N|
00000940: 55 45 56 4F 20 44 49 52  45 43 54 4F 52 49 4F 20  |UEVO DIRECTORIO |
00000950: 28 53 2F 4E 29 3F 22 00  69 11 DE 03 A1 41 24 3A  |(S/N)?".i....A$:|
00000960: 8B 41 24 B2 22 53 22 A7  8A 00 7C 11 E8 03 8B 41  |.A$."S"...|....A|
00000970: 24 B2 22 4E 22 A7 99 22  93 22 3A 80 00 85 11 F2  |$."N"..".":.....|
00000980: 03 89 39 39 30 00 A3 11  FC 03 84 31 35 2C 45 5A  |..990......15,EZ|
00000990: 2C 45 5A 24 2C 54 52 2C  53 45 3A 8B 45 5A B2 30  |,EZ$,TR,SE:.EZ.0|
000009A0: A7 20 8E 00 B7 11 06 04  54 24 B2 C7 28 31 35 37  |. ......T$..(157|
000009B0: 29 AA C7 28 33 32 29 00  D7 11 10 04 99 C7 28 31  |)..(32).......(1|
000009C0: 38 29 45 5A 3B 54 24 3B  45 5A 3B 45 5A 24 3B 54  |8)EZ;T$;EZ;EZ$;T|
000009D0: 52 3B 54 24 3B 53 45 00  E2 11 1A 04 A0 38 3A A0  |R;T$;SE......8:.|
000009E0: 31 35 00 00 00                                    |15...           |

......ND$.""./....FT$(5):.I.0.5:.A$:FT$(
I).A$:..L.(..DEL,SEQ,PRG,USR,REL,DEL.[.2
..F$(144,5).F.<.FE.664...F..G(147);G(30)
;G(17);"PANTALLA O IMPRESORA (P/I)"...P.
.A$:.A$."".80.C.Z.DV.3:.A$."I".DV.4.S.D.
.A$."P".140...N..G(17)"SIMPLE O DOBLE AN
CHO (S/D)"...X..A$:.A$."".120.-...BG$.G(
15):.A$."D".BG$.G(14).A....G(17)"COLOQUE
 EL DISCOY OPRIMA ALGUNA TECLA":..T....A
$:.A$."".150... ..G(145)"UN MOMENTO POR 
FAVOR,LEYENDO DIRECTORY".C....15,8,15:.1
5,"I":.1020.W....8,8,8,"$0,S,R"......102
0...H..I.1.142:.#8,A$:....R..I.143.160:.
#8,A$:N$.N$.A$:..;....I.161.162:.#8,A$:I
D$.ID$.A$:..E....#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.B
...CT.CT.1:.#8,A$,A$:FL.ST.Q."..FL..0.48
0...,..#8,A$:.A$."".A$.G(133)...6.FL.ST:
.FL..0.480...@.TY$.FT$((F(A$).191).128).
=.J..#8,A$:.A$."".A$."CHR$(0).X.T.TR$.I(
"  ".D(F(A$)),2).R.^..#8,A$:.A$."".A$.G(
0)...H.SC$.I("  ".D(F(A$)),2)...R.FL$.""
:.I.3.18:.#8,A$:FL$.FL$.A$:..J.|..I.19.2
7:.#8,A$:..Z....#8,LB$,HB$.....BL.F(LB$.
G(0)).256.F(HB$.G(0))......TY$.."DEL".FE
.FE.BL.1...BL$.I("     ".D(BL),3).C....T
R$." 0".480.....F$(NM,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)."-----".F.V..260.M... 8.W....1020.
.....F$(NM,0)."".NM.NM.1:.500.....FE$.I(
"    ".D(FE),3).J....G(145);"DIRECCION I
NICIAL:     ":.G(17);" 1) DE TODOS.O....
" 2) DE ALGUNOS":." 3) NINGUNO"......A$:
.E(A$).0.540...&..E(A$).2.770...0..".":.
A$."1".."UN MOMENTO"...:..I.1.NM.X.D..F$
(I,1).."PRG".700...N..A$."1".630...X..F$
(I,0);" (S/N)...B..A$:.A$."".610.(.L..A$
.."S"..".";:.700.8.V.SA$.F$(I,0).S....8,
8,8,"0:".SA$.",P,R".]....1020.M....#8,LB
$,HB$.....SA.F(LB$.G(0)).256.F(HB$.G(0))
..... 8.....F$(I,5).I("      ".D(SA),5).
......Y.F.."... ESPERE UN MINUTO"...P..G
(28);.21);:.QQ.1.14:.G(163);:.:.G(30);..
.Z..:."Y";.5....DV.4.." ACTIVE LA IMPRES
ORA";.M...."OPRIMA UNA TECLA".`....A$:.A
$."".760.S....DV..4..G(147)......DV.4..N
D$.""..6,4,6:.#6,G(21): 6......4,DV.U.*.
.4,BG$;" ";N$;" ";ID$;" ";OS$;" ";FE$;" 
";ND$...>..4,BG$;"BNOMBRE          BTIPB
TRBSCBBLKBSTARTB";ND$...R..I.1.NM.Y.\.FL
$.F$(I,0):TY$.F$(I,1):TR$.F$(I,2):SC$.F$
(I,3):BL$.F$(I,4).L.F..TY$."DEL".900...P
..4,BG$;"B";FL$;"B";TY$;"B";TR$;"B";SC$;
"B";BL$;"B";F$;"";ND$........... 4.B... 
15......DV.4.."IMPRIME NUEVAMENTE (S/N)?
"......DV.3.."OTRO DIRECTORIO (S/N)?".!.
...A$:.A$."S".770.2.J..A$.."N".960.W.T..
G(145)"NUEVO DIRECTORIO (S/N)?".I....A$:
.A$."S"...|....A$."N"..".":.......990...
...15,EZ,EZ$,TR,SE:.EZ.0. ......T$.G(157
).G(32).W....G(18)EZ;T$;EZ;EZ$;TR;T$;SE.
.... 8: 15...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL