BASICO
FILE INFORMATION
FILENAME(S): BASICO
FILE TYPE(S): PRG
FILE SIZE: 11.7K
FIRST SEEN: 2025-10-19 23:07:10
APPEARS ON: 1 disk(s)
FILE HASH
bcafcbc848f1783957961faab4e9394053f31fd812776abff8a6f35198580843
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| A04A | BASICO | PRG | Bugjam - Argentina | 5 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0C 08 00 00 8A 30 30 31 30 30 00 19 08 01 |.......00100....|
00000010: 00 8F 22 14 14 14 14 14 14 00 3C 08 02 00 8F 22 |..".......<...."|
00000020: 14 14 14 14 14 14 2A 2A 2A 20 31 39 38 35 20 53 |......*** 1985 S|
00000030: 4F 46 54 20 4C 41 4B 45 20 2A 2A 2A 00 49 08 03 |OFT LAKE ***.I..|
00000040: 00 8F 22 14 14 14 14 14 14 00 65 08 05 00 8F 20 |..".......e.... |
00000050: 53 41 56 45 22 42 41 53 49 43 2E 31 20 45 53 2E |SAVE"BASIC.1 ES.|
00000060: 4A 31 22 2C 38 00 85 08 64 00 97 35 33 32 38 31 |J1",8...d..53281|
00000070: 2C 31 35 3A 97 35 33 32 38 30 2C 36 3A 99 22 90 |,15:.53280,6:.".|
00000080: 22 3A 99 22 93 00 B5 08 65 00 99 22 1C B0 C0 C0 |":."....e.."....|
00000090: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000000A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000000B0: C0 C0 C0 AE 22 00 F9 08 66 00 99 22 DD 20 12 1F |...."...f..". ..|
000000C0: 20 20 20 20 20 20 41 4C 4C 20 42 4C 41 43 4B 53 | ALL BLACKS|
000000D0: 20 53 4F 46 54 57 41 52 45 20 20 20 20 20 20 20 | SOFTWARE |
000000E0: 20 20 20 1C 92 20 DD 22 3A 4D 53 24 B2 22 42 41 | .. .":MS$."BA|
000000F0: 53 49 43 20 49 20 20 20 22 00 2A 09 67 00 99 22 |SIC I ".*.g.."|
00000100: 1C AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000110: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000120: C0 C0 C0 C0 C0 C0 C0 BD 90 22 00 47 09 68 00 53 |.........".G.h.S|
00000130: 4E 24 B2 22 31 30 30 30 22 3A 8D 36 33 32 30 30 |N$."1000":.63200|
00000140: 3A 8D 36 33 36 30 30 00 60 09 69 00 8D 36 30 30 |:.63600.`.i..600|
00000150: 30 30 3A 8D 36 33 31 30 30 3A 8D 35 39 30 30 30 |00:.63100:.59000|
00000160: 00 6B 09 E8 03 8D 36 30 30 30 30 00 9F 09 ED 03 |.k....60000.....|
00000170: 99 22 93 11 1C 12 20 20 48 4F 4C 41 21 20 59 4F |.".... HOLA! YO|
00000180: 20 53 4F 59 20 55 4E 20 43 41 4C 43 55 4C 41 44 | SOY UN CALCULAD|
00000190: 4F 52 20 44 45 20 43 4C 41 53 45 20 20 20 22 00 |OR DE CLASE ".|
000001A0: CA 09 F2 03 99 22 11 1F 59 4F 20 50 55 45 44 4F |....."..YO PUEDO|
000001B0: 20 53 55 4D 41 52 3A 12 20 32 2B 32 3D 34 20 92 | SUMAR:. 2+2=4 .|
000001C0: 2C 20 52 45 53 54 41 52 2C 22 00 FB 09 1A 04 99 |, RESTAR,"......|
000001D0: 22 4D 55 4C 54 49 50 4C 49 43 41 52 3A 20 12 33 |"MULTIPLICAR: .3|
000001E0: 2A 31 37 3D 35 31 92 2C 20 44 49 56 49 44 49 52 |*17=51., DIVIDIR|
000001F0: 3A 12 34 2F 31 36 3D 2E 32 35 22 00 1E 0A 38 04 |:.4/16=.25"...8.|
00000200: 99 22 43 41 4C 43 55 4C 4F 20 53 45 4E 4F 53 20 |."CALCULO SENOS |
00000210: 59 20 4C 4F 47 41 52 49 54 4D 4F 53 2E 22 00 46 |Y LOGARITMOS.".F|
00000220: 0A 42 04 99 22 52 41 49 43 45 53 20 43 55 41 44 |.B.."RAICES CUAD|
00000230: 52 41 44 41 53 2C 20 41 52 43 4F 2D 54 41 4E 47 |RADAS, ARCO-TANG|
00000240: 45 4E 54 45 53 22 00 6D 0A 4C 04 99 22 59 20 45 |ENTES".m.L.."Y E|
00000250: 4C 45 56 4F 20 41 20 50 4F 54 45 4E 43 49 41 3A |LEVO A POTENCIA:|
00000260: 12 32 5E 28 2D 33 29 3D 2E 31 32 35 22 00 A4 0A |.2^(-3)=.125"...|
00000270: B0 04 99 22 11 45 53 43 52 49 42 41 3A 22 3A 99 |...".ESCRIBA:":.|
00000280: 22 12 3F 32 2A 53 49 4E 28 38 2F 33 29 2B 4C 4F |".?2*SIN(8/3)+LO|
00000290: 47 28 31 2E 32 5E 33 29 2D 53 51 52 28 34 2A 35 |G(1.2^3)-SQR(4*5|
000002A0: 2E 36 29 22 00 D0 0A 14 05 99 22 11 28 45 4C 20 |.6)"......".(EL |
000002B0: 3F 20 41 4C 20 50 52 49 4E 43 49 50 49 4F 20 53 |? AL PRINCIPIO S|
000002C0: 49 47 4E 49 46 49 43 41 20 50 52 49 4E 54 29 22 |IGNIFICA PRINT)"|
000002D0: 00 F5 0A 1E 05 99 22 20 20 20 1C 20 A3 20 20 20 |......" . . |
000002E0: 20 20 20 20 20 20 20 20 20 20 20 A3 A3 A3 A3 A3 | .....|
000002F0: A3 A3 A3 A3 22 00 2D 0B 28 05 99 22 1F 50 52 45 |....".-.(..".PRE|
00000300: 53 49 4F 4E 45 20 12 52 45 54 55 52 4E 92 20 59 |SIONE .RETURN. Y|
00000310: 20 59 4F 20 4D 4F 53 54 52 41 52 45 22 3A 99 22 | YO MOSTRARE":."|
00000320: 4C 41 20 52 45 53 50 55 45 53 54 41 22 00 5E 0B |LA RESPUESTA".^.|
00000330: 2D 05 99 22 11 12 45 4E 53 41 59 45 4C 4F 92 2E |-.."..ENSAYELO..|
00000340: 44 45 53 50 55 45 53 20 51 55 45 20 48 41 59 41 |DESPUES QUE HAYA|
00000350: 22 3A 99 22 54 45 52 4D 49 4E 41 44 4F 22 00 81 |":."TERMINADO"..|
00000360: 0B 32 05 99 22 20 20 20 11 1C 12 20 50 52 45 53 |.2.." ... PRES|
00000370: 49 4F 4E 45 20 40 20 92 20 5F C0 C0 C0 C0 C0 C0 |IONE @ . _......|
00000380: 22 00 9F 0B 34 05 4D 53 24 B2 22 12 40 5F 52 45 |"...4.MS$.".@_RE|
00000390: 43 55 45 52 44 45 92 22 3A 8D 36 33 31 30 30 00 |CUERDE.":.63100.|
000003A0: B6 0B 37 05 53 4E 24 B2 22 30 32 30 30 30 22 3A |..7.SN$."02000":|
000003B0: 89 36 33 33 30 30 00 E3 0B D0 07 99 22 93 22 3A |.63300......".":|
000003C0: 4D 53 24 B2 22 20 4D 55 59 20 42 49 45 4E 22 3A |MS$." MUY BIEN":|
000003D0: 8D 36 30 30 30 30 3A 8D 36 33 31 30 30 3A 99 22 |.60000:.63100:."|
000003E0: 93 22 3B 00 12 0C 34 08 99 22 93 1F 11 53 49 20 |.";...4.."...SI |
000003F0: 50 4F 52 20 45 52 52 4F 52 20 55 44 2E 20 45 53 |POR ERROR UD. ES|
00000400: 43 52 49 42 45 20 55 4E 20 43 41 52 41 43 54 45 |CRIBE UN CARACTE|
00000410: 52 22 00 40 0C 3E 08 99 22 4E 4F 20 44 45 53 45 |R".@.>.."NO DESE|
00000420: 41 44 4F 2C 2D 2D 55 53 54 45 44 20 50 4F 44 52 |ADO,--USTED PODR|
00000430: 41 20 1C 42 4F 52 52 41 52 4C 4F 1F 20 44 45 22 |A .BORRARLO. DE"|
00000440: 00 6F 0C 66 08 99 22 49 4E 4D 45 44 49 41 54 4F |.o.f.."INMEDIATO|
00000450: 20 41 50 4F 59 41 4E 44 4F 20 53 4F 42 52 45 20 | APOYANDO SOBRE |
00000460: 4C 41 20 54 45 43 4C 41 20 12 44 45 4C 92 22 00 |LA TECLA .DEL.".|
00000470: A3 0C 67 08 99 22 11 1E 12 20 20 20 20 20 20 20 |..g.."... |
00000480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000490: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004A0: 20 92 22 00 C1 0C 68 08 99 22 11 11 1C 20 20 20 | ."...h.."... |
000004B0: 20 20 20 20 20 20 20 20 20 D5 C3 C3 C3 C3 C3 C3 | .......|
000004C0: C9 00 DC 0C 69 08 99 22 20 20 20 20 20 20 20 20 |....i.." |
000004D0: 20 20 20 20 DD 20 20 20 20 20 20 DD 00 F7 0C 6A | . ....j|
000004E0: 08 99 22 20 20 20 20 20 20 20 20 20 20 20 20 DD |.." .|
000004F0: 20 49 4E 53 54 20 DD 00 12 0D 6B 08 99 22 20 20 | INST ....k.." |
00000500: 20 20 20 20 20 20 20 20 20 20 DD 20 20 20 20 20 | . |
00000510: 20 DD 00 2D 0D 6C 08 99 22 20 20 20 20 20 20 20 | ..-.l.." |
00000520: 20 20 20 20 20 DD 20 20 44 45 4C 20 DD 00 48 0D | . DEL ..H.|
00000530: 6D 08 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |m.." |
00000540: DD 20 20 20 20 20 20 DD 00 63 0D 6E 08 99 22 20 |. ..c.n.." |
00000550: 20 20 20 20 20 20 20 20 20 20 20 CA C3 C3 C3 C3 | .....|
00000560: C3 C3 CB 00 6E 0D 6F 08 8D 36 33 30 30 30 00 9C |....n.o..63000..|
00000570: 0D 7A 08 99 22 93 1F 53 55 50 4F 4E 47 41 20 51 |.z.."..SUPONGA Q|
00000580: 55 45 20 55 44 2E 20 48 41 20 45 53 43 52 49 54 |UE UD. HA ESCRIT|
00000590: 4F 20 32 53 49 4E 28 38 2F 33 29 2E 00 CC 0D 98 |O 2SIN(8/3).....|
000005A0: 08 99 22 11 50 41 52 41 20 49 4E 53 45 52 54 41 |..".PARA INSERTA|
000005B0: 52 20 55 4E 20 2A 20 45 4E 54 52 45 20 45 4C 20 |R UN * ENTRE EL |
000005C0: 32 20 59 20 53 49 4E 28 38 2F 33 29 00 F6 0D A2 |2 Y SIN(8/3)....|
000005D0: 08 99 22 91 50 41 52 41 20 49 4E 44 49 43 41 52 |..".PARA INDICAR|
000005E0: 20 55 4E 41 20 4D 55 4C 54 49 50 4C 49 43 41 43 | UNA MULTIPLICAC|
000005F0: 49 4F 4E 2E 2E 2E 00 22 0E FC 08 99 22 50 52 45 |ION...."...."PRE|
00000600: 53 49 4F 4E 45 20 41 4C 20 4D 49 53 4D 4F 20 54 |SIONE AL MISMO T|
00000610: 49 45 4D 50 4F 20 53 48 49 46 54 20 59 20 44 45 |IEMPO SHIFT Y DE|
00000620: 4C 21 00 4D 0E 60 09 99 22 20 20 20 20 20 20 20 |L!.M.`.." |
00000630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000640: 20 20 A3 A3 A3 A3 A3 20 B7 20 A3 A3 A3 00 75 0E | ..... . ....u.|
00000650: C4 09 99 22 48 41 47 41 20 45 53 54 4F 20 44 45 |..."HAGA ESTO DE|
00000660: 53 50 55 45 53 20 44 45 20 48 41 42 45 52 20 4D |SPUES DE HABER M|
00000670: 4F 56 49 44 4F 00 9C 0E CE 09 99 22 45 4C 20 43 |OVIDO......"EL C|
00000680: 55 52 53 4F 52 20 53 4F 42 52 45 20 4C 41 20 12 |URSOR SOBRE LA .|
00000690: 20 53 20 92 20 44 45 20 53 49 4E 2E 00 C3 0E 28 | S . DE SIN....(|
000006A0: 0A 99 22 11 1C 55 53 54 45 44 20 48 41 20 49 4E |.."..USTED HA IN|
000006B0: 53 45 52 54 41 44 4F 20 55 4E 20 45 53 50 41 43 |SERTADO UN ESPAC|
000006C0: 49 4F 2E 00 EB 0E BE 0A 99 22 11 1F 4C 55 45 47 |IO......."..LUEG|
000006D0: 4F 20 45 53 43 52 49 42 41 A0 27 2A 27 20 20 20 |O ESCRIBA.'*' |
000006E0: 90 20 50 52 55 45 42 45 4C 4F 2E 00 0A 0F F0 0A |. PRUEBELO......|
000006F0: 99 22 11 1C 12 20 44 45 53 50 55 45 53 20 50 52 |."... DESPUES PR|
00000700: 45 53 49 4F 4E 45 20 40 20 92 00 21 0F AE 0B 53 |ESIONE @ ..!...S|
00000710: 4E 24 B2 22 30 33 30 30 30 22 3A 89 36 33 33 30 |N$."03000":.6330|
00000720: 30 00 2C 0F B8 0B 8D 36 30 30 30 30 00 5C 0F BD |0.,....60000.\..|
00000730: 0B 99 22 93 1F 11 53 49 20 55 53 54 45 44 20 51 |.."...SI USTED Q|
00000740: 55 49 45 52 45 20 51 55 45 20 4D 45 20 12 1C 52 |UIERE QUE ME ..R|
00000750: 45 43 55 45 52 44 45 92 1F 20 45 4C 00 7C 0F C2 |ECUERDE.. EL.|..|
00000760: 0B 99 22 52 45 53 55 4C 54 41 44 4F 20 44 45 20 |.."RESULTADO DE |
00000770: 55 4E 20 43 41 4C 43 55 4C 4F 22 3B 00 9D 0F CC |UN CALCULO";....|
00000780: 0B 99 22 90 20 44 45 4C 45 20 55 4E 20 4E 4F 4D |..". DELE UN NOM|
00000790: 42 52 45 21 1F 20 45 53 43 52 49 42 41 00 B4 0F |BRE!. ESCRIBA...|
000007A0: D6 0B 99 22 12 50 45 44 52 4F 3D 32 2A 33 2F 34 |...".PEDRO=2*3/4|
000007B0: 2B 35 92 22 00 D7 0F E0 0B 99 22 11 59 20 59 4F |+5."......".Y YO|
000007C0: 20 4D 45 20 52 45 43 4F 52 44 41 52 45 20 44 45 | ME RECORDARE DE|
000007D0: 20 50 45 44 52 4F 2E 00 07 10 EA 0B 99 22 11 55 | PEDRO.......".U|
000007E0: 53 54 45 44 20 50 55 45 44 45 20 50 52 45 47 55 |STED PUEDE PREGU|
000007F0: 4E 54 41 52 20 54 41 4D 42 49 45 4E 20 12 1C 45 |NTAR TAMBIEN ..E|
00000800: 4C 20 56 41 4C 4F 52 00 22 10 FE 0B 99 22 1F 44 |L VALOR."....".D|
00000810: 45 20 50 45 44 52 4F 3B 90 20 45 53 43 52 49 42 |E PEDRO;. ESCRIB|
00000820: 41 1F 00 32 10 03 0C 99 22 12 3F 50 45 44 52 4F |A..2....".?PEDRO|
00000830: 20 92 00 5A 10 08 0C 99 22 11 4F 20 42 49 45 4E | ..Z....".O BIEN|
00000840: 20 55 53 54 45 44 20 50 55 45 44 45 20 45 53 43 | USTED PUEDE ESC|
00000850: 52 49 42 49 52 20 41 53 49 3A 00 7D 10 12 0C 99 |RIBIR ASI:.}....|
00000860: 22 12 4A 55 41 4E 3D 50 45 44 52 4F 5E 32 2B 53 |".JUAN=PEDRO^2+S|
00000870: 49 4E 28 FF 2A 50 45 44 52 4F 2F 33 29 00 8C 10 |IN(.*PEDRO/3)...|
00000880: 1C 0C 99 22 12 3F 4A 55 41 4E 92 22 00 B3 10 26 |...".?JUAN."...&|
00000890: 0C 99 22 11 59 20 59 4F 20 4D 4F 53 54 52 41 52 |..".Y YO MOSTRAR|
000008A0: 45 20 45 4C 20 56 41 4C 4F 52 20 44 45 20 4A 55 |E EL VALOR DE JU|
000008B0: 41 4E 2E 00 C4 10 2B 0C 99 22 11 90 45 4E 53 41 |AN....+.."..ENSA|
000008C0: 59 45 4C 4F 00 E2 10 30 0C 99 22 11 1C 20 44 45 |YELO...0..".. DE|
000008D0: 53 50 55 45 53 20 50 52 45 53 49 4F 4E 45 20 12 |SPUES PRESIONE .|
000008E0: 40 1F 00 F9 10 3A 0C 53 4E 24 B2 22 30 34 30 30 |@....:.SN$."0400|
000008F0: 30 22 3A 89 36 33 33 30 30 00 04 11 A0 0F 8D 36 |0":.63300......6|
00000900: 30 30 30 30 00 33 11 A5 0F 99 22 93 1F 53 49 20 |0000.3...."..SI |
00000910: 55 53 54 45 44 20 4D 45 20 44 41 20 44 45 20 41 |USTED ME DA DE A|
00000920: 4E 54 45 4D 41 4E 4F 20 4C 4F 53 20 56 41 4C 4F |NTEMANO LOS VALO|
00000930: 52 45 53 00 5D 11 04 10 99 22 44 45 20 41 2C 42 |RES.]...."DE A,B|
00000940: 20 59 20 43 3B 20 59 20 45 53 43 52 49 42 45 20 | Y C; Y ESCRIBE |
00000950: 45 53 54 41 20 46 4F 52 4D 55 4C 41 3A 00 81 11 |ESTA FORMULA:...|
00000960: 68 10 99 22 11 12 59 3D 28 2D 42 2B 53 51 52 28 |h.."..Y=(-B+SQR(|
00000970: 42 2A 42 2D 34 2A 41 2A 43 29 29 2F 28 32 2A 41 |B*B-4*A*C))/(2*A|
00000980: 29 00 A5 11 CC 10 99 22 12 3F 59 20 20 20 20 20 |)......".?Y |
00000990: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000009A0: 20 20 20 20 22 00 D2 11 30 11 99 22 11 59 4F 20 | "...0..".YO |
000009B0: 43 41 4C 43 55 4C 41 52 45 20 59 20 4D 4F 53 54 |CALCULARE Y MOST|
000009C0: 52 41 52 45 20 45 4C 20 52 45 53 55 4C 54 41 44 |RARE EL RESULTAD|
000009D0: 4F 2E 00 06 12 62 11 99 22 11 1C 12 20 20 20 20 |O....b.."... |
000009E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000009F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A00: 20 20 20 20 92 22 00 2C 12 94 11 99 22 11 1F 44 | .".,...."..D|
00000A10: 45 53 47 52 41 43 49 41 44 41 4D 45 4E 54 45 20 |ESGRACIADAMENTE |
00000A20: 53 49 20 55 44 2E 20 4D 45 20 44 41 00 4F 12 9E |SI UD. ME DA.O..|
00000A30: 11 99 22 56 41 4C 4F 52 45 53 20 4E 55 45 56 4F |.."VALORES NUEVO|
00000A40: 53 20 50 41 52 41 20 41 2C 42 20 59 20 43 22 00 |S PARA A,B Y C".|
00000A50: 7C 12 F8 11 99 22 2E 2E 2E 55 53 54 45 44 20 44 ||...."...USTED D|
00000A60: 45 42 45 52 41 20 52 45 45 53 43 52 49 42 49 52 |EBERA REESCRIBIR|
00000A70: 20 4C 41 20 46 4F 52 4D 55 4C 41 21 00 B3 12 C0 | LA FORMULA!....|
00000A80: 12 99 22 11 28 45 53 50 45 52 45 20 48 41 53 54 |..".(ESPERE HAST|
00000A90: 41 20 51 55 45 20 48 41 47 41 4D 4F 53 20 50 52 |A QUE HAGAMOS PR|
00000AA0: 4F 47 52 41 4D 41 53 20 20 20 20 20 4A 55 4E 54 |OGRAMAS JUNT|
00000AB0: 4F 53 29 00 D2 12 2E 13 99 22 90 11 51 55 49 45 |OS)......"..QUIE|
00000AC0: 52 45 20 55 53 54 45 44 20 45 4E 53 41 59 41 52 |RE USTED ENSAYAR|
00000AD0: 3F 1F 00 DA 12 4C 13 99 22 11 00 01 13 56 13 99 |?....L.."....V..|
00000AE0: 22 11 1C 12 50 52 45 53 49 4F 4E 45 20 40 92 20 |"...PRESIONE @. |
00000AF0: 50 41 52 41 20 43 4F 4E 54 49 4E 55 41 52 2E 1F |PARA CONTINUAR..|
00000B00: 22 00 1D 13 5B 13 4D 53 24 B2 22 40 5F C0 C0 C0 |"...[.MS$."@_...|
00000B10: C0 C0 C0 C0 C0 22 3A 8D 36 33 31 30 30 00 34 13 |.....":.63100.4.|
00000B20: 6A 13 53 4E 24 B2 22 30 35 30 30 30 22 3A 89 36 |j.SN$."05000":.6|
00000B30: 33 33 30 30 00 3F 13 88 13 8D 36 30 30 30 30 00 |3300.?....60000.|
00000B40: 6E 13 8D 13 99 22 93 1F 53 49 20 55 53 54 45 44 |n...."..SI USTED|
00000B50: 20 4D 41 20 44 41 20 4C 4F 53 20 56 41 4C 4F 52 | MA DA LOS VALOR|
00000B60: 45 53 20 44 45 20 41 2C 42 20 59 20 43 22 00 97 |ES DE A,B Y C"..|
00000B70: 13 B4 14 99 22 45 53 43 52 49 42 49 45 4E 44 4F |...."ESCRIBIENDO|
00000B80: 20 12 1C 41 3D 35 2E 33 3A 42 3D 2D 32 2E 31 3A | ..A=5.3:B=-2.1:|
00000B90: 43 3D 2E 30 31 31 22 00 C7 13 E6 14 99 22 1F 59 |C=.011"......".Y|
00000BA0: 4F 20 4D 45 20 41 43 4F 52 44 41 52 45 20 44 45 |O ME ACORDARE DE|
00000BB0: 20 45 53 54 4F 53 20 4E 55 45 56 4F 53 20 56 41 | ESTOS NUEVOS VA|
00000BC0: 4C 4F 52 45 53 2E 22 00 EC 13 18 15 99 22 11 28 |LORES."......".(|
00000BD0: 55 53 54 45 44 20 50 55 45 44 45 20 45 53 43 52 |USTED PUEDE ESCR|
00000BE0: 49 42 49 52 20 56 41 52 49 41 53 22 00 14 14 7C |IBIR VARIAS"...||
00000BF0: 15 99 22 49 4E 53 54 52 55 43 43 49 4F 4E 45 53 |.."INSTRUCCIONES|
00000C00: 20 45 4E 20 4C 41 20 4D 49 53 4D 41 20 4C 49 4E | EN LA MISMA LIN|
00000C10: 45 41 2C 22 00 35 14 E0 15 99 22 53 45 50 41 52 |EA,".5...."SEPAR|
00000C20: 41 44 41 53 20 50 4F 52 20 44 4F 53 20 50 55 4E |ADAS POR DOS PUN|
00000C30: 54 4F 53 29 22 00 68 14 44 16 99 22 11 12 20 20 |TOS)".h.D..".. |
00000C40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000C50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000C60: 20 20 20 20 20 20 92 22 00 8E 14 4E 16 99 22 11 | ."...N..".|
00000C70: 53 49 20 55 53 54 45 44 20 44 45 53 45 41 20 52 |SI USTED DESEA R|
00000C80: 45 43 41 4C 43 55 4C 41 52 20 27 59 27 22 00 B4 |ECALCULAR 'Y'"..|
00000C90: 14 A8 16 99 22 4D 55 45 56 41 20 45 4C 20 43 55 |...."MUEVA EL CU|
00000CA0: 52 53 4F 52 20 48 41 43 49 41 20 4C 41 20 4C 49 |RSOR HACIA LA LI|
00000CB0: 4E 45 41 22 00 D5 14 B2 16 99 22 51 55 45 20 44 |NEA"......"QUE D|
00000CC0: 45 46 49 4E 45 20 4C 41 20 49 4E 53 54 52 55 43 |EFINE LA INSTRUC|
00000CD0: 43 49 4F 4E 22 00 09 15 BC 16 99 22 11 41 4C 20 |CION"......".AL |
00000CE0: 50 52 45 53 49 4F 4E 41 52 20 27 52 45 54 55 52 |PRESIONAR 'RETUR|
00000CF0: 4E 27 20 59 4F 20 43 4F 4D 50 52 45 4E 44 45 52 |N' YO COMPRENDER|
00000D00: 45 20 51 55 45 20 4C 41 22 00 36 15 D0 16 99 22 |E QUE LA".6...."|
00000D10: 91 49 4E 53 54 52 55 43 43 49 4F 4E 20 48 41 20 |.INSTRUCCION HA |
00000D20: 53 49 44 4F 20 45 53 43 52 49 54 41 20 44 45 20 |SIDO ESCRITA DE |
00000D30: 4E 55 45 56 4F 22 00 5B 15 DA 16 99 22 4C 55 45 |NUEVO".[...."LUE|
00000D40: 47 4F 20 50 4F 44 52 41 20 55 44 2E 20 50 52 45 |GO PODRA UD. PRE|
00000D50: 47 55 4E 54 41 52 20 12 3F 59 22 00 85 15 E4 16 |GUNTAR .?Y".....|
00000D60: 99 22 90 11 11 20 45 4E 53 41 59 45 4C 4F 20 1C |."... ENSAYELO .|
00000D70: 44 45 53 50 55 45 53 20 12 50 52 45 53 49 4F 4E |DESPUES .PRESION|
00000D80: 45 20 40 1F 22 00 9C 15 6F 17 53 4E 24 B2 22 30 |E @."...o.SN$."0|
00000D90: 36 30 30 30 22 3A 89 36 33 33 30 30 00 A7 15 70 |6000":.63300...p|
00000DA0: 17 8D 36 30 30 30 30 00 C3 15 75 17 99 22 93 11 |..60000...u.."..|
00000DB0: 1F 20 20 20 20 20 12 20 50 52 4F 47 52 41 4D 41 |. . PROGRAMA|
00000DC0: 53 92 22 00 D8 15 7A 17 99 22 20 20 20 B8 B8 B8 |S."...z.." ...|
00000DD0: B8 B8 B8 B8 B8 B8 B8 22 00 EB 15 7B 17 4D 53 24 |......."...{.MS$|
00000DE0: B2 22 20 45 4A 45 4D 2E 2E 2E 22 00 31 16 84 17 |." EJEM...".1...|
00000DF0: 99 22 93 1F 53 49 20 55 53 54 45 44 20 4C 45 20 |."..SI USTED LE |
00000E00: 44 41 20 41 20 43 41 44 41 20 49 4E 53 54 52 55 |DA A CADA INSTRU|
00000E10: 43 43 49 4F 4E 20 55 4E 20 20 20 20 20 20 20 20 |CCION UN |
00000E20: 20 20 20 20 20 20 20 20 12 1C 4E 55 4D 45 52 4F | ..NUMERO|
00000E30: 22 00 59 16 8E 17 99 22 1F 59 4F 20 4D 45 20 52 |".Y....".YO ME R|
00000E40: 45 43 4F 52 44 41 52 45 20 4C 41 20 49 4E 53 54 |ECORDARE LA INST|
00000E50: 52 55 43 43 49 4F 4E 21 22 00 77 16 98 17 99 22 |RUCCION!".w...."|
00000E60: 11 50 4F 52 20 45 4A 45 4D 50 4C 4F 2C 20 45 53 |.POR EJEMPLO, ES|
00000E70: 43 52 49 42 41 3A 22 00 8C 16 A2 17 99 22 12 31 |CRIBA:"......".1|
00000E80: 30 20 59 3D 28 41 2B 42 29 2F 32 22 00 A1 16 AC |0 Y=(A+B)/2"....|
00000E90: 17 99 22 12 32 30 20 3F 59 20 20 20 20 20 20 20 |..".20 ?Y |
00000EA0: 22 00 D1 16 C0 17 99 22 11 23 31 30 20 53 49 47 |"......".#10 SIG|
00000EB0: 4E 49 46 49 43 41 3A 20 43 41 4C 43 55 4C 45 20 |NIFICA: CALCULE |
00000EC0: 45 4C 20 54 45 52 4D 49 4E 4F 20 4D 45 44 49 4F |EL TERMINO MEDIO|
00000ED0: 22 00 12 17 C5 17 99 22 20 20 20 20 44 45 20 4C |"......" DE L|
00000EE0: 4F 53 20 56 41 4C 4F 52 45 53 20 41 20 59 20 42 |OS VALORES A Y B|
00000EF0: 2E 20 20 20 20 4C 4C 41 4D 45 53 45 20 41 4C 20 |. LLAMESE AL |
00000F00: 20 20 20 20 52 45 53 55 4C 54 41 44 30 20 27 59 | RESULTAD0 'Y|
00000F10: 27 22 00 54 17 D4 17 99 22 11 23 32 30 20 53 49 |'".T....".#20 SI|
00000F20: 47 4E 49 46 49 43 41 3A 49 4D 50 52 49 4D 49 52 |GNIFICA:IMPRIMIR|
00000F30: 20 45 4E 20 4C 41 20 50 41 4E 54 41 4C 4C 41 20 | EN LA PANTALLA |
00000F40: 20 20 20 20 20 20 45 4C 20 56 41 4C 4F 52 20 44 | EL VALOR D|
00000F50: 45 20 59 22 00 80 17 E8 17 99 22 11 59 4F 20 4D |E Y"......".YO M|
00000F60: 45 20 52 45 43 4F 52 44 41 52 45 20 45 53 54 41 |E RECORDARE ESTA|
00000F70: 53 20 49 4E 53 54 52 55 43 43 49 4F 4E 45 53 22 |S INSTRUCCIONES"|
00000F80: 00 B0 17 F2 17 99 22 11 42 4F 52 52 45 20 4C 41 |......".BORRE LA|
00000F90: 20 50 41 4E 54 41 4C 4C 41 2C 20 45 53 43 52 49 | PANTALLA, ESCRI|
00000FA0: 42 41 20 12 41 3D 31 2E 35 3A 42 3D 2D 34 92 22 |BA .A=1.5:B=-4."|
00000FB0: 00 E6 17 FC 17 99 22 90 4C 55 45 47 4F 20 45 53 |......".LUEGO ES|
00000FC0: 43 52 49 42 41 1F 20 12 47 4F 54 4F 20 31 30 92 |CRIBA. .GOTO 10.|
00000FD0: 22 3A 99 22 11 20 20 59 20 59 4F 20 4F 42 45 44 |":.". Y YO OBED|
00000FE0: 45 43 45 52 45 22 00 11 18 06 18 99 22 90 11 45 |ECERE"......"..E|
00000FF0: 4E 53 41 59 45 4C 4F 21 22 3A 99 22 1C 44 45 53 |NSAYELO!":.".DES|
00001000: 50 55 45 53 20 12 50 52 45 53 49 4F 4E 45 20 40 |PUES .PRESIONE @|
00001010: 22 00 2C 18 10 18 4D 53 24 B2 22 20 20 47 4F 54 |".,...MS$." GOT|
00001020: 4F 20 31 30 22 3A 8D 36 33 31 30 30 00 43 18 1A |O 10":.63100.C..|
00001030: 18 53 4E 24 B2 22 30 37 30 30 30 22 3A 89 36 33 |.SN$."07000":.63|
00001040: 33 30 30 00 4E 18 58 1B 8D 36 30 30 30 30 00 7D |300.N.X..60000.}|
00001050: 18 5D 1B 99 22 93 1F 53 49 20 55 53 54 45 44 20 |.].."..SI USTED |
00001060: 44 45 53 45 41 20 45 4C 20 56 41 4C 4F 52 20 44 |DESEA EL VALOR D|
00001070: 45 20 59 20 4D 4F 53 54 52 41 44 4F 22 00 AB 18 |E Y MOSTRADO"...|
00001080: 62 1B 99 22 11 45 4E 20 45 4C 20 43 45 4E 54 52 |b..".EN EL CENTR|
00001090: 4F 20 44 45 20 4C 41 20 50 41 4E 54 41 4C 4C 41 |O DE LA PANTALLA|
000010A0: 20 90 45 53 43 52 49 42 41 3A 22 00 C1 18 8A 1B | .ESCRIBA:".....|
000010B0: 99 22 11 1C 12 31 35 3F 20 20 20 20 20 20 20 20 |."...15? |
000010C0: 22 00 D5 18 94 1B 99 22 12 31 36 3F 53 50 43 28 |"......".16?SPC(|
000010D0: 32 30 29 3B 22 00 11 19 9E 1B 99 22 11 1F 23 31 |20);"......"..#1|
000010E0: 35 20 53 49 47 4E 49 46 49 43 41 20 49 4D 50 52 |5 SIGNIFICA IMPR|
000010F0: 49 4D 49 52 2E 2E 2E 55 4E 41 20 4C 49 4E 45 41 |IMIR...UNA LINEA|
00001100: 20 45 4E 20 20 20 20 20 20 20 42 4C 41 4E 43 4F | EN BLANCO|
00001110: 22 00 40 19 B2 1B 99 22 11 23 31 36 20 53 49 47 |".@....".#16 SIG|
00001120: 4E 49 46 49 43 41 20 32 30 20 45 53 50 41 43 49 |NIFICA 20 ESPACI|
00001130: 4F 53 20 41 20 4C 41 20 44 45 52 45 43 48 41 22 |OS A LA DERECHA"|
00001140: 00 73 19 B7 1B 99 22 11 12 20 20 20 20 20 20 20 |.s....".. |
00001150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001170: 20 92 22 00 9E 19 BC 1B 99 22 11 45 4C 20 50 55 | ."......".EL PU|
00001180: 4E 54 4F 20 59 20 43 4F 4D 41 20 44 45 53 50 55 |NTO Y COMA DESPU|
00001190: 45 53 20 44 45 4C 20 53 50 43 28 32 30 29 00 CA |ES DEL SPC(20)..|
000011A0: 19 C6 1B 99 22 53 49 47 4E 49 46 49 43 41 3A 20 |...."SIGNIFICA: |
000011B0: 44 45 4A 45 20 45 4C 20 43 55 52 53 4F 52 20 44 |DEJE EL CURSOR D|
000011C0: 4F 4E 44 45 20 45 53 54 41 21 00 F4 19 D0 1B 99 |ONDE ESTA!......|
000011D0: 22 55 53 54 45 44 20 53 41 42 45 2C 20 59 4F 20 |"USTED SABE, YO |
000011E0: 44 45 56 55 45 4C 56 4F 20 4E 4F 52 4D 41 4C 4D |DEVUELVO NORMALM|
000011F0: 45 4E 54 45 00 17 1A D5 1B 99 22 45 4C 20 43 55 |ENTE......"EL CU|
00001200: 52 53 4F 52 20 41 4C 20 4C 41 44 4F 20 49 5A 51 |RSOR AL LADO IZQ|
00001210: 55 49 45 52 44 4F 2E 00 3D 1A DA 1B 99 22 11 1C |UIERDO..=...."..|
00001220: 41 20 4D 45 4E 4F 53 1F 20 51 55 45 20 55 53 54 |A MENOS. QUE UST|
00001230: 45 44 20 45 53 43 52 49 42 41 20 12 3B 00 48 1A |ED ESCRIBA .;.H.|
00001240: E4 1B 8D 36 33 30 30 30 00 7D 1A E9 1B 99 22 93 |...63000.}....".|
00001250: 11 11 1F 50 4F 43 4F 20 49 4D 50 4F 52 54 41 20 |...POCO IMPORTA |
00001260: 45 4C 20 4F 52 44 45 4E 11 1C 9D 9D 9D 9D 9D B8 |EL ORDEN........|
00001270: B8 B8 B8 B8 91 20 1F 44 45 20 4C 41 53 00 A3 1A |..... .DE LAS...|
00001280: EA 1B 99 22 49 4E 53 54 52 55 43 43 49 4F 4E 45 |..."INSTRUCCIONE|
00001290: 53 20 51 55 45 20 55 53 54 45 44 20 45 53 43 52 |S QUE USTED ESCR|
000012A0: 49 42 45 00 CD 1A EB 1B 99 22 11 28 59 4F 20 4D |IBE......".(YO M|
000012B0: 45 20 52 45 43 55 45 52 44 4F 20 53 45 47 55 4E |E RECUERDO SEGUN|
000012C0: 20 53 55 53 20 4E 55 4D 45 52 4F 53 29 00 E8 1A | SUS NUMEROS)...|
000012D0: EE 1B 99 22 11 90 53 49 20 55 53 54 45 44 20 45 |..."..SI USTED E|
000012E0: 53 43 52 49 42 45 3A 1F 00 FB 1A F8 1B 99 22 11 |SCRIBE:.......".|
000012F0: 31 30 59 3D 28 41 2B 42 29 2F 32 00 0E 1B F9 1B |10Y=(A+B)/2.....|
00001300: 99 22 32 30 3F 59 20 20 20 20 20 20 20 22 00 21 |."20?Y ".!|
00001310: 1B FA 1B 99 22 31 35 3F 20 20 20 20 20 20 20 20 |...."15? |
00001320: 22 00 37 1B FB 1B 99 22 31 36 3F 53 50 43 28 22 |".7...."16?SPC("|
00001330: 57 32 24 22 29 3B 22 00 51 1B 02 1C 99 22 11 90 |W2$");".Q...."..|
00001340: 59 4F 20 4D 45 20 52 45 43 55 45 52 44 4F 3A 1F |YO ME RECUERDO:.|
00001350: 22 00 67 1B 03 1C 99 22 11 20 31 30 20 59 3D 28 |".g....". 10 Y=(|
00001360: 41 2B 42 29 2F 32 22 00 78 1B 04 1C 99 22 20 31 |A+B)/2".x...." 1|
00001370: 35 20 50 52 49 4E 54 22 00 93 1B 05 1C 99 22 20 |5 PRINT"......" |
00001380: 31 36 20 50 52 49 4E 54 53 50 43 28 22 57 32 24 |16 PRINTSPC("W2$|
00001390: 22 29 3B 00 A5 1B 06 1C 99 22 20 32 30 20 50 52 |");......" 20 PR|
000013A0: 49 4E 54 59 22 00 D6 1B 0C 1C 99 22 90 11 20 45 |INTY"......".. E|
000013B0: 4E 53 41 59 45 4C 4F 21 2E 1C 20 50 52 45 53 49 |NSAYELO!.. PRESI|
000013C0: 4F 4E 45 20 12 40 92 20 50 41 52 41 20 43 4F 4E |ONE .@. PARA CON|
000013D0: 54 49 4E 55 41 52 00 ED 1B 5C 1C 53 4E 24 B2 22 |TINUAR...\.SN$."|
000013E0: 30 38 30 30 30 22 3A 89 36 33 33 30 30 00 F8 1B |08000":.63300...|
000013F0: 40 1F 8D 36 30 30 30 30 00 16 1C 4A 1F 99 22 93 |@..60000...J..".|
00001400: 20 31 30 20 59 3D 28 41 2B 42 29 2F 32 20 20 20 | 10 Y=(A+B)/2 |
00001410: 20 20 90 20 A6 22 00 3C 1C 54 1F 99 22 1F 20 31 | . .".<.T..". 1|
00001420: 35 20 50 52 49 4E 54 20 20 20 20 20 20 20 20 20 |5 PRINT |
00001430: 90 20 A6 1C 20 4E 55 45 53 54 52 4F 00 63 1C 5E |. .. NUESTRO.c.^|
00001440: 1F 99 22 1F 20 31 36 20 50 52 49 4E 54 53 50 43 |..". 16 PRINTSPC|
00001450: 28 32 30 29 3B 20 90 20 A6 1C 20 50 52 4F 47 52 |(20); . .. PROGR|
00001460: 41 4D 41 00 80 1C 68 1F 99 22 1F 20 32 30 20 50 |AMA...h..". 20 P|
00001470: 52 49 4E 54 59 20 20 20 20 20 20 20 20 90 20 A6 |RINTY . .|
00001480: 00 AA 1C 7C 1F 99 22 11 1F 50 41 52 41 20 51 55 |...|.."..PARA QU|
00001490: 45 20 53 45 20 43 4F 4E 56 45 4E 5A 41 20 51 55 |E SE CONVENZA QU|
000014A0: 45 20 59 4F 20 54 45 4E 47 4F 00 D3 1C 86 1F 99 |E YO TENGO......|
000014B0: 22 54 4F 44 41 53 20 53 55 53 20 49 4E 53 54 52 |"TODAS SUS INSTR|
000014C0: 55 43 43 49 4F 4E 45 53 20 45 4E 20 4F 52 44 45 |UCCIONES EN ORDE|
000014D0: 4E 2E 2E 00 EF 1C 9A 1F 99 22 90 11 45 53 43 52 |N........"..ESCR|
000014E0: 49 42 41 3A 12 4C 49 53 54 31 30 2D 32 30 1F 00 |IBA:.LIST10-20..|
000014F0: 1C 1D AE 1F 99 22 11 59 20 59 4F 20 4C 41 53 20 |.....".Y YO LAS |
00001500: 56 4F 59 20 41 20 4D 4F 53 54 52 41 52 20 54 4F |VOY A MOSTRAR TO|
00001510: 44 41 53 3A 31 30 20 41 20 32 30 2E 00 4A 1D B8 |DAS:10 A 20..J..|
00001520: 1F 99 22 11 1C 55 53 54 45 44 20 50 55 45 44 45 |.."..USTED PUEDE|
00001530: 20 43 41 4D 42 49 41 52 20 4C 41 53 20 49 4E 53 | CAMBIAR LAS INS|
00001540: 54 52 55 43 43 49 4F 4E 45 53 00 7D 1D BD 1F 99 |TRUCCIONES.}....|
00001550: 22 45 4E 20 4C 41 20 50 41 4E 54 41 4C 4C 41 20 |"EN LA PANTALLA |
00001560: 90 45 53 43 52 49 42 41 1C 20 12 4C 49 53 54 92 |.ESCRIBA. .LIST.|
00001570: 2C 20 4D 55 45 56 41 20 4C 55 45 47 4F 00 A5 1D |, MUEVA LUEGO...|
00001580: CC 1F 99 22 91 45 4C 20 43 55 52 53 4F 52 2C 20 |...".EL CURSOR, |
00001590: 4C 55 45 47 4F 20 12 49 4E 53 54 2F 44 45 4C 92 |LUEGO .INST/DEL.|
000015A0: 20 45 54 43 2E 00 D0 1D D6 1F 99 22 11 1F 50 41 | ETC......."..PA|
000015B0: 52 41 20 56 45 52 49 46 49 43 41 52 20 4C 4F 53 |RA VERIFICAR LOS|
000015C0: 20 43 41 4D 42 49 4F 53 20 45 53 43 52 49 42 41 | CAMBIOS ESCRIBA|
000015D0: 00 E5 1D D8 1F 99 22 44 45 20 4E 55 45 56 4F 20 |......"DE NUEVO |
000015E0: 12 4C 49 53 54 00 16 1E DB 1F 99 22 90 11 20 44 |.LIST......".. D|
000015F0: 45 53 45 41 20 45 4E 53 41 59 41 52 3F 1C 20 28 |ESEA ENSAYAR?. (|
00001600: 44 45 53 50 55 45 53 20 50 52 45 53 49 4F 4E 45 |DESPUES PRESIONE|
00001610: 20 12 40 92 29 1F 00 2D 1E E0 1F 53 4E 24 B2 22 | .@.)..-...SN$."|
00001620: 30 39 30 30 30 22 3A 89 36 33 33 30 30 00 38 1E |09000":.63300.8.|
00001630: 28 23 8D 36 30 30 30 30 00 55 1E 2D 23 4D 53 24 |(#.60000.U.-#MS$|
00001640: B2 22 1F 20 43 4F 4E 53 45 4A 4F 53 20 22 3A 8D |.". CONSEJOS ":.|
00001650: 36 33 31 30 30 00 87 1E 32 23 99 22 1F 93 11 50 |63100...2#."...P|
00001660: 41 52 41 20 12 1C 43 41 4D 42 49 41 52 1F 92 20 |ARA ..CAMBIAR.. |
00001670: 55 4E 41 20 49 4E 53 54 52 55 43 43 49 4F 4E 20 |UNA INSTRUCCION |
00001680: 45 53 43 52 49 42 41 00 AF 1E 3C 23 99 22 45 4C |ESCRIBA...<#."EL|
00001690: 20 4E 55 4D 45 52 4F 20 59 20 4C 41 20 4E 55 45 | NUMERO Y LA NUE|
000016A0: 56 41 20 49 4E 53 54 52 55 43 43 49 4F 4E 2E 00 |VA INSTRUCCION..|
000016B0: DC 1E 46 23 99 22 28 4D 45 20 4F 4C 56 49 44 41 |..F#."(ME OLVIDA|
000016C0: 52 45 20 4C 41 20 49 4E 53 54 52 55 43 43 49 4F |RE LA INSTRUCCIO|
000016D0: 4E 20 41 4E 54 45 52 49 4F 52 29 2E 00 03 1F 50 |N ANTERIOR)....P|
000016E0: 23 99 22 11 50 41 52 41 20 12 1C 42 4F 52 52 41 |#.".PARA ..BORRA|
000016F0: 52 1F 92 20 55 4E 41 20 49 4E 53 54 52 55 43 43 |R.. UNA INSTRUCC|
00001700: 49 4F 4E 00 30 1F 5A 23 99 22 45 53 43 52 49 42 |ION.0.Z#."ESCRIB|
00001710: 41 20 45 4C 20 4E 55 4D 45 52 4F 20 59 20 50 52 |A EL NUMERO Y PR|
00001720: 45 53 49 4F 4E 45 20 27 52 45 54 55 52 4E 27 21 |ESIONE 'RETURN'!|
00001730: 00 64 1F 64 23 99 22 11 1C 12 20 20 20 20 20 20 |.d.d#."... |
00001740: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001760: 20 20 92 22 00 8D 1F 82 23 99 22 4D 55 43 48 4F | ."....#."MUCHO|
00001770: 20 43 55 49 44 41 44 4F 21 20 20 55 53 54 45 44 | CUIDADO! USTED|
00001780: 20 50 4F 44 52 41 20 42 4F 52 52 41 52 00 B0 1F | PODRA BORRAR...|
00001790: 8C 23 99 22 55 4E 41 20 49 4E 53 54 52 55 43 43 |.#."UNA INSTRUCC|
000017A0: 49 4F 4E 20 50 4F 52 20 45 52 52 4F 52 2E 2E 2E |ION POR ERROR...|
000017B0: 00 CA 1F 96 23 99 22 53 49 4E 20 44 41 52 53 45 |....#."SIN DARSE|
000017C0: 20 43 55 45 4E 54 41 2E 2E 2E 00 ED 1F 9B 23 99 | CUENTA.......#.|
000017D0: 22 11 1C 53 49 20 55 53 54 45 44 20 45 53 43 52 |"..SI USTED ESCR|
000017E0: 49 42 45 20 55 4E 20 4E 55 4D 45 52 4F 00 09 20 |IBE UN NUMERO.. |
000017F0: A0 23 99 22 2E 2E 59 20 44 45 53 50 55 45 53 20 |.#."..Y DESPUES |
00001800: 27 52 45 54 55 52 4E 27 2E 00 3D 20 AA 23 99 22 |'RETURN'..= .#."|
00001810: 11 1F 12 20 20 20 20 20 20 20 20 20 20 20 20 20 |... |
00001820: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001830: 20 20 20 20 20 20 20 20 20 20 20 92 22 00 69 20 | .".i |
00001840: B4 23 99 22 1F 55 53 54 45 44 20 50 4F 44 52 41 |.#.".USTED PODRA|
00001850: 20 55 53 41 52 20 54 41 4D 42 49 45 4E 20 45 4C | USAR TAMBIEN EL|
00001860: 20 12 20 3F 20 20 20 92 22 00 95 20 B9 23 99 22 | . ? .".. .#."|
00001870: 11 59 20 59 4F 20 4D 45 20 52 45 43 4F 52 44 41 |.Y YO ME RECORDA|
00001880: 52 45 20 45 53 54 4F 20 43 4F 4D 4F 20 12 50 52 |RE ESTO COMO .PR|
00001890: 49 4E 54 92 2E 00 A0 20 C8 23 8D 36 33 30 30 30 |INT.... .#.63000|
000018A0: 00 CE 20 C9 23 99 22 93 11 59 4F 20 4D 45 20 52 |.. .#."..YO ME R|
000018B0: 45 43 55 45 52 44 4F 20 53 4F 4C 41 4D 45 4E 54 |ECUERDO SOLAMENT|
000018C0: 45 20 44 45 20 4C 4F 53 20 1C 12 44 4F 53 00 FE |E DE LOS ..DOS..|
000018D0: 20 CA 23 99 22 11 1F 50 52 49 4D 45 52 4F 53 20 | .#."..PRIMEROS |
000018E0: 43 41 52 41 43 54 45 52 45 53 20 44 45 20 4C 4F |CARACTERES DE LO|
000018F0: 53 20 12 1C 4E 4F 4D 42 52 45 53 92 20 22 00 0D |S ..NOMBRES. "..|
00001900: 21 CB 23 99 22 11 1F 53 41 4D 3D 31 30 00 1B 21 |!.#."..SAM=10..!|
00001910: CC 23 99 22 53 41 55 4C 3D 32 30 00 4F 21 CD 23 |.#."SAUL=20.O!.#|
00001920: 99 22 11 50 41 52 41 20 4D 49 20 12 1C 20 4C 4F |.".PARA MI .. LO|
00001930: 53 20 44 4F 53 20 92 1F 20 54 49 45 4E 45 4E 20 |S DOS .. TIENEN |
00001940: 45 4C 20 4D 49 53 4D 4F 20 4E 4F 4D 42 52 45 00 |EL MISMO NOMBRE.|
00001950: 69 21 CE 23 99 22 11 51 55 45 20 45 53 3A 20 20 |i!.#.".QUE ES: |
00001960: 12 1C 20 53 41 20 92 21 1F 00 93 21 CF 23 99 22 |.. SA .!...!.#."|
00001970: 11 11 4C 55 45 47 4F 20 53 41 3D 31 30 20 53 45 |..LUEGO SA=10 SE|
00001980: 47 55 49 44 4F 20 44 45 20 53 41 3D 32 30 20 48 |GUIDO DE SA=20 H|
00001990: 41 43 45 00 A8 21 D0 23 99 22 11 53 41 4D 3D 53 |ACE..!.#.".SAM=S|
000019A0: 41 55 4C 3D 32 30 2E 22 00 C3 21 D2 23 4D 53 24 |AUL=20."..!.#MS$|
000019B0: B2 22 53 41 4D 3D 53 41 55 4C 3F 22 3A 8D 36 33 |."SAM=SAUL?":.63|
000019C0: 31 30 30 00 CE 21 D3 23 8D 36 33 30 30 30 00 D4 |100..!.#.63000..|
000019D0: 21 10 27 3A 00 08 22 19 27 99 22 93 1C 12 20 4D |!.':..".'."... M|
000019E0: 41 4E 49 50 55 4C 41 43 49 4F 4E 20 44 45 20 43 |ANIPULACION DE C|
000019F0: 41 44 45 4E 41 53 20 44 45 20 43 41 52 41 43 54 |ADENAS DE CARACT|
00001A00: 45 52 45 53 20 20 1F 22 00 34 22 24 27 99 22 11 |ERES .".4"$'.".|
00001A10: 1F 44 45 20 4C 41 20 4D 49 53 4D 41 20 4D 41 4E |.DE LA MISMA MAN|
00001A20: 45 52 41 20 43 4F 4D 4F 20 53 45 20 4C 41 20 44 |ERA COMO SE LA D|
00001A30: 41 20 55 4E 00 61 22 2E 27 99 22 4E 4F 4D 42 52 |A UN.a".'."NOMBR|
00001A40: 45 20 41 20 55 4E 20 4E 55 4D 45 52 4F 2C 20 41 |E A UN NUMERO, A|
00001A50: 20 53 41 42 45 52 20 58 2C 59 20 4F 20 53 41 4D | SABER X,Y O SAM|
00001A60: 2C 00 89 22 38 27 99 22 55 53 54 45 44 20 50 4F |,.."8'."USTED PO|
00001A70: 44 52 41 20 41 53 49 47 4E 41 52 4C 45 20 55 4E |DRA ASIGNARLE UN|
00001A80: 20 4E 4F 4D 42 52 45 20 41 00 BB 22 42 27 99 22 | NOMBRE A.."B'."|
00001A90: 11 12 20 20 20 20 20 20 20 55 4E 41 20 43 41 44 |.. UNA CAD|
00001AA0: 45 4E 41 20 44 45 20 43 41 52 41 43 54 45 52 45 |ENA DE CARACTERE|
00001AB0: 53 2E 20 20 20 20 20 20 20 20 92 00 D8 22 4C 27 |S. ..."L'|
00001AC0: 99 22 11 59 20 50 41 52 41 20 4E 4F 20 43 4F 4E |.".Y PARA NO CON|
00001AD0: 46 55 4E 44 49 52 4D 45 00 00 23 56 27 99 22 59 |FUNDIRME..#V'."Y|
00001AE0: 4F 20 44 45 42 4F 20 53 41 42 45 52 20 53 49 20 |O DEBO SABER SI |
00001AF0: 32 2A 33 20 45 53 20 55 4E 20 4E 55 4D 45 52 4F |2*3 ES UN NUMERO|
00001B00: 00 26 23 60 27 99 22 4F 20 55 4E 41 20 43 41 44 |.&#`'."O UNA CAD|
00001B10: 45 4E 41 20 44 45 20 54 52 45 53 20 43 41 52 41 |ENA DE TRES CARA|
00001B20: 43 54 45 52 45 53 00 5A 23 65 27 99 22 11 9C 12 |CTERES.Z#e'."...|
00001B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001B40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001B50: 20 20 20 20 20 20 20 20 92 22 00 86 23 6A 27 99 | ."..#j'.|
00001B60: 22 11 1F 50 4F 52 20 45 53 4F 20 44 45 42 4F 20 |"..POR ESO DEBO |
00001B70: 49 4E 53 49 53 54 49 52 20 51 55 45 20 45 4C 20 |INSISTIR QUE EL |
00001B80: 4E 4F 4D 42 52 45 00 AC 23 74 27 99 22 54 45 52 |NOMBRE..#t'."TER|
00001B90: 4D 49 4E 45 20 43 4F 4E 20 55 4E 20 20 24 20 2E |MINE CON UN $ .|
00001BA0: 2E 53 49 20 53 45 20 54 52 41 54 41 00 D6 23 7E |.SI SE TRATA..#~|
00001BB0: 27 99 22 44 45 20 55 4E 41 20 43 41 44 45 4E 41 |'."DE UNA CADENA|
00001BC0: 20 2E 2E 2E 43 4F 4D 4F 20 58 24 2C 59 24 20 4F | ...COMO X$,Y$ O|
00001BD0: 20 53 41 4D 24 2E 00 E1 23 83 27 8D 36 33 30 30 | SAM$...#.'.6300|
00001BE0: 30 00 15 24 88 27 99 22 93 1C 12 20 20 20 20 20 |0..$.'."... |
00001BF0: 20 20 41 48 4F 52 41 20 55 53 54 45 44 20 50 55 | AHORA USTED PU|
00001C00: 45 44 45 20 45 4E 53 41 59 41 52 3A 20 20 20 20 |EDE ENSAYAR: |
00001C10: 20 20 20 1F 22 00 25 24 92 27 99 22 11 45 53 43 | .".%$.'.".ESC|
00001C20: 52 49 42 41 3A 00 31 24 9C 27 99 22 58 3D 32 2B |RIBA:.1$.'."X=2+|
00001C30: 33 00 4B 24 A6 27 99 22 58 24 3D 22 C7 28 33 34 |3.K$.'."X$=".(34|
00001C40: 29 22 32 2B 33 22 C7 28 33 34 29 00 59 24 B0 27 |)"2+3".(34).Y$.'|
00001C50: 99 22 11 11 3F 58 2C 58 24 00 88 24 C4 27 99 22 |."..?X,X$..$.'."|
00001C60: 11 11 12 2E 2E 56 45 41 20 4C 4F 53 20 52 45 53 |.....VEA LOS RES|
00001C70: 55 4C 54 41 44 4F 53 20 20 20 20 20 20 20 20 20 |ULTADOS |
00001C80: 20 20 20 20 20 20 20 92 00 BF 24 D3 27 99 22 11 | ...$.'.".|
00001C90: 11 1C 44 45 53 50 55 45 53 20 12 40 92 20 50 41 |..DESPUES .@. PA|
00001CA0: 52 41 20 43 4F 4E 54 49 4E 55 41 52 22 3A 4D 53 |RA CONTINUAR":MS|
00001CB0: 24 B2 22 20 20 20 3F 3F 3F 3F 20 20 20 22 3A 00 |$." ???? ":.|
00001CC0: CA 24 D5 27 8D 36 33 31 30 30 00 E1 24 D8 27 53 |.$.'.63100..$.'S|
00001CD0: 4E 24 B2 22 31 31 30 30 30 22 3A 89 36 33 33 30 |N$."11000":.6330|
00001CE0: 30 00 EC 24 F8 2A 8D 36 30 30 30 30 00 0A 25 02 |0..$.*.60000..%.|
00001CF0: 2B 99 22 93 11 12 1C 20 55 53 54 45 44 20 48 41 |+.".... USTED HA|
00001D00: 20 41 44 49 56 49 4E 41 44 4F 00 24 25 0C 2B 99 | ADIVINADO.$%.+.|
00001D10: 22 1F 11 20 59 4F 20 56 4F 59 20 41 20 4D 4F 53 |".. YO VOY A MOS|
00001D20: 54 52 41 52 00 2F 25 16 2B 99 3A 99 22 20 35 00 |TRAR./%.+.:." 5.|
00001D30: 3D 25 20 2B 99 22 11 32 2B 33 22 3A 99 00 48 25 |=% +.".2+3":..H%|
00001D40: 25 2B 8D 36 33 30 30 30 00 7B 25 2A 2B 99 22 93 |%+.63000.{%*+.".|
00001D50: 12 1C 20 20 20 20 20 20 59 20 41 48 4F 52 41 20 |.. Y AHORA |
00001D60: 51 55 45 20 53 49 47 4E 49 46 49 43 41 20 58 24 |QUE SIGNIFICA X$|
00001D70: 2B 59 24 20 3F 20 20 20 20 20 22 00 93 25 34 2B |+Y$ ? "..%4+|
00001D80: 99 22 1F 45 53 43 52 49 42 41 20 43 4F 4E 4D 49 |.".ESCRIBA CONMI|
00001D90: 47 4F 3A 00 AD 25 3E 2B 99 22 1C 41 24 3D 22 C7 |GO:..%>+.".A$=".|
00001DA0: 28 33 34 29 22 59 4F 22 C7 28 33 34 29 00 CB 25 |(34)"YO".(34)..%|
00001DB0: 48 2B 99 22 11 11 42 24 3D 22 C7 28 33 34 29 22 |H+."..B$=".(34)"|
00001DC0: 55 53 54 45 44 22 C7 28 33 34 29 00 EF 25 52 2B |USTED".(34)..%R+|
00001DD0: 99 22 11 11 59 24 3D 22 C7 28 33 34 29 22 53 4F |."..Y$=".(34)"SO|
00001DE0: 59 20 47 52 41 4E 44 45 21 22 C7 28 33 34 29 00 |Y GRANDE!".(34).|
00001DF0: 14 26 5C 2B 99 22 11 11 5A 24 3D 22 C7 28 33 34 |.&\+."..Z$=".(34|
00001E00: 29 22 20 45 53 20 54 41 4D 42 49 45 4E 3F 22 C7 |)" ES TAMBIEN?".|
00001E10: 28 33 34 29 00 2A 26 66 2B 99 22 11 1F 59 20 50 |(34).*&f+."..Y P|
00001E20: 52 45 47 55 4E 54 45 4D 45 3A 00 38 26 70 2B 99 |REGUNTEME:.8&p+.|
00001E30: 22 1C 3F 41 24 2B 59 24 00 4C 26 7A 2B 99 22 11 |".?A$+Y$.L&z+.".|
00001E40: 11 11 20 3F 42 24 2B 5A 24 05 3A 22 00 73 26 84 |.. ?B$+Z$.:".s&.|
00001E50: 2B 99 22 1C 11 1F 45 4E 53 41 59 45 4C 4F 21 20 |+."...ENSAYELO! |
00001E60: 4C 55 45 47 4F 20 50 52 45 53 49 4F 4E 45 20 12 |LUEGO PRESIONE .|
00001E70: 40 1F 22 00 8F 26 89 2B 4D 53 24 B2 22 47 52 41 |@."..&.+MS$."GRA|
00001E80: 4E 44 49 4F 53 4F 21 22 3A 8D 36 33 31 30 30 00 |NDIOSO!":.63100.|
00001E90: 9A 26 8B 2B 99 22 13 11 11 22 00 B1 26 8E 2B 53 |.&.+."..."..&.+S|
00001EA0: 4E 24 B2 22 31 32 30 30 30 22 3A 89 36 33 33 30 |N$."12000":.6330|
00001EB0: 30 00 BC 26 E0 2E 8D 36 30 30 30 30 00 E6 26 E5 |0..&...60000..&.|
00001EC0: 2E 99 22 1F 93 11 42 49 45 4E 20 2E 2E 2E 20 53 |.."...BIEN ... S|
00001ED0: 49 20 55 53 54 45 44 20 48 49 5A 4F 20 45 4C 20 |I USTED HIZO EL |
00001EE0: 45 4E 53 41 59 4F 00 0F 27 EA 2E 99 22 11 55 53 |ENSAYO..'...".US|
00001EF0: 54 45 44 20 48 41 42 52 41 20 4E 4F 54 41 44 4F |TED HABRA NOTADO|
00001F00: 20 51 55 45 20 41 24 20 52 45 54 49 45 4E 45 00 | QUE A$ RETIENE.|
00001F10: 34 27 EC 2E 99 22 11 20 20 12 20 54 4F 44 4F 20 |4'...". . TODO |
00001F20: 92 20 45 4E 54 52 45 20 4C 41 53 20 43 4F 4D 49 |. ENTRE LAS COMI|
00001F30: 4C 4C 41 53 00 68 27 EF 2E 99 22 11 1E 12 20 20 |LLAS.h'..."... |
00001F40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001F50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001F60: 20 20 20 20 20 20 92 22 00 8A 27 F4 2E 99 22 11 | ."..'...".|
00001F70: 1F 53 49 20 55 53 54 45 44 20 44 45 53 45 41 20 |.SI USTED DESEA |
00001F80: 55 4E 20 45 53 50 41 43 49 4F 00 B9 27 FE 2E 99 |UN ESPACIO..'...|
00001F90: 22 11 44 45 53 50 55 45 53 20 44 45 20 27 59 4F |".DESPUES DE 'YO|
00001FA0: 27 2C 20 45 53 20 4E 45 43 45 53 41 52 49 4F 20 |', ES NECESARIO |
00001FB0: 49 4E 43 4C 55 49 52 4C 4F 00 CF 27 08 2F 99 22 |INCLUIRLO..'./."|
00001FC0: 20 20 20 20 20 20 20 20 20 20 20 20 A3 A3 22 00 | ..".|
00001FD0: EB 27 0D 2F 99 22 11 11 41 24 3D 22 C7 28 33 34 |.'./."..A$=".(34|
00001FE0: 29 22 59 4F 20 22 C7 28 33 34 29 00 FA 27 0E 2F |)"YO ".(34)..'./|
00001FF0: 99 22 20 20 20 20 20 20 5E 22 00 1A 28 0F 2F 99 |." ^"..(./.|
00002000: 22 1C 11 20 20 20 20 20 48 41 20 56 49 53 54 4F |".. HA VISTO|
00002010: 3F 1F 22 3A 8D 36 33 30 30 30 00 3C 28 20 4E 99 |?.":.63000.<( N.|
00002020: 22 93 20 50 45 52 4D 49 54 41 20 51 55 45 20 4C |". PERMITA QUE L|
00002030: 45 20 50 52 45 53 45 4E 54 45 20 41 00 65 28 2A |E PRESENTE A.e(*|
00002040: 4E 99 22 11 1F 4D 49 20 41 4D 49 47 4F 20 22 C7 |N."..MI AMIGO ".|
00002050: 28 33 34 29 22 43 55 52 53 4F 52 20 22 C7 28 33 |(34)"CURSOR ".(3|
00002060: 34 29 22 2E 22 00 75 28 2F 4E 81 49 B2 31 A4 31 |4)".".u(/N.I.1.1|
00002070: 30 30 30 3A 82 00 A1 28 30 4E 57 44 B2 38 30 3A |000:...(0NWD.80:|
00002080: 97 33 32 37 36 38 AA 31 30 32 34 2C 39 36 3A 8B |.32768.1024,96:.|
00002090: C2 28 33 32 37 36 38 29 B2 39 36 A7 57 44 B2 34 |.(32768).96.WD.4|
000020A0: 30 00 CC 28 34 4E 99 22 50 45 52 4F 20 4C 45 20 |0..(4N."PERO LE |
000020B0: 4C 4C 41 4D 41 4E 20 12 43 52 53 52 92 20 50 41 |LLAMAN .CRSR. PA|
000020C0: 52 41 20 41 42 52 45 56 49 41 52 22 00 DC 28 39 |RA ABREVIAR"..(9|
000020D0: 4E 81 49 B2 31 A4 31 35 30 30 3A 82 00 FF 28 3E |N.I.1.1500:...(>|
000020E0: 4E 99 22 11 56 41 4D 4F 53 20 43 52 53 52 2E 2E |N.".VAMOS CRSR..|
000020F0: 4E 4F 20 53 45 41 53 20 54 49 4D 49 44 4F 22 00 |NO SEAS TIMIDO".|
00002100: 0F 29 48 4E 81 49 B2 31 A4 32 30 30 30 3A 82 00 |.)HN.I.1.2000:..|
00002110: 1B 29 52 4E 81 49 B2 31 A4 31 30 00 27 29 5C 4E |.)RN.I.1.10.')\N|
00002120: 99 22 11 22 3B 3A 82 00 32 29 66 4E 99 A6 31 34 |.".";:..2)fN..14|
00002130: 29 3B 00 47 29 70 4E 81 49 B2 31 A4 38 3A 81 54 |);.G)pN.I.1.8:.T|
00002140: B2 31 A4 35 30 3A 82 00 59 29 7A 4E 99 22 20 9D |.1.50:..Y)zN." .|
00002150: 91 12 20 92 9D 22 3B 3A 82 00 68 29 84 4E 81 49 |.. ..";:..h).N.I|
00002160: B2 31 A4 35 30 30 3A 82 00 7C 29 8E 4E 99 22 1D |.1.500:..|).N.".|
00002170: 20 5F 45 53 54 45 20 45 53 20 45 4C 00 AE 29 98 | _ESTE ES EL..).|
00002180: 4E 43 53 52 B2 33 32 37 36 38 AA 38 AC 57 44 AA |NCSR.32768.8.WD.|
00002190: 31 34 3A 81 49 B2 31 A4 31 30 30 3A 97 43 53 52 |14:.I.1.100:.CSR|
000021A0: 2C 33 32 3A 97 43 53 52 2C 31 36 30 3A 82 00 D6 |,32:.CSR,160:...|
000021B0: 29 A2 4E 99 22 11 54 41 4D 42 49 45 4E 20 54 45 |).N.".TAMBIEN TE|
000021C0: 4E 45 4D 4F 53 20 41 20 43 52 53 52 2D 49 5A 51 |NEMOS A CRSR-IZQ|
000021D0: 55 49 45 52 44 4F 00 EE 29 AC 4E 99 22 20 20 20 |UIERDO..).N." |
000021E0: 22 C7 28 33 34 29 22 9D 22 C7 28 33 34 29 00 FF |".(34)".".(34)..|
000021F0: 29 AD 4E 81 49 B2 31 A4 35 30 30 3A 82 3A 99 00 |).N.I.1.500:.:..|
00002200: 18 2A B6 4E 99 22 59 20 41 20 43 52 53 52 2D 44 |.*.N."Y A CRSR-D|
00002210: 45 52 45 43 48 4F 22 3B 00 32 2A C0 4E 99 22 20 |ERECHO";.2*.N." |
00002220: 20 20 20 20 22 C7 28 33 34 29 22 1D 22 C7 28 33 | ".(34)".".(3|
00002230: 34 29 00 43 2A C1 4E 81 49 B2 31 A4 35 30 30 3A |4).C*.N.I.1.500:|
00002240: 82 3A 99 00 59 2A CA 4E 99 22 59 20 41 20 43 52 |.:..Y*.N."Y A CR|
00002250: 53 52 2D 41 52 52 49 42 41 00 73 2A D4 4E 99 22 |SR-ARRIBA.s*.N."|
00002260: 20 20 20 20 20 22 C7 28 33 34 29 22 91 22 C7 28 | ".(34)".".(|
00002270: 33 34 29 00 84 2A D5 4E 81 49 B2 31 A4 35 30 30 |34)..*.N.I.1.500|
00002280: 3A 82 3A 99 00 99 2A DE 4E 99 22 59 20 41 20 43 |:.:...*.N."Y A C|
00002290: 52 53 52 2D 41 42 41 4A 4F 00 B3 2A E8 4E 99 22 |RSR-ABAJO..*.N."|
000022A0: 20 20 20 20 20 22 C7 28 33 34 29 22 11 22 C7 28 | ".(34)".".(|
000022B0: 33 34 29 00 C5 2A E9 4E 81 49 B2 31 A4 31 35 30 |34)..*.N.I.1.150|
000022C0: 30 3A 82 3A 99 00 EB 2A F2 4E 99 22 28 54 4F 44 |0:.:...*.N."(TOD|
000022D0: 4F 53 20 48 45 52 4D 41 4E 4F 53 2C 20 50 4F 52 |OS HERMANOS, POR|
000022E0: 20 53 55 50 55 45 53 54 4F 29 2E 00 FD 2A F7 4E | SUPUESTO)...*.N|
000022F0: 81 49 B2 31 A4 31 30 30 30 3A 82 3A 99 00 23 2B |.I.1.1000:.:..#+|
00002300: FC 4E 99 22 54 45 4E 45 4D 4F 53 20 54 41 4D 42 |.N."TENEMOS TAMB|
00002310: 49 45 4E 20 4F 52 49 47 45 4E 20 28 48 4F 4D 45 |IEN ORIGEN (HOME|
00002320: 29 22 3B 00 3C 2B 06 4F 99 22 20 20 20 20 22 C7 |)";.<+.O." ".|
00002330: 28 33 34 29 22 13 22 C7 28 33 34 29 00 4B 2B 07 |(34)".".(34).K+.|
00002340: 4F 81 49 B2 31 A4 32 30 30 3A 82 00 69 2B 10 4F |O.I.1.200:..i+.O|
00002350: 99 22 2E 2E 59 20 42 4F 52 52 41 44 4F 52 20 28 |."..Y BORRADOR (|
00002360: 43 4C 52 29 2E 2E 2E 22 3B 00 82 2B 1A 4F 99 22 |CLR)...";..+.O."|
00002370: 20 20 20 20 22 C7 28 33 34 29 22 93 22 C7 28 33 | ".(34)".".(3|
00002380: 34 29 00 91 2B 1B 4F 81 49 B2 31 A4 32 30 30 3A |4)..+.O.I.1.200:|
00002390: 82 00 C1 2B 24 4F 99 22 2E 2E 54 41 4D 42 49 45 |...+$O."..TAMBIE|
000023A0: 4E 20 49 4E 56 45 52 53 4F 52 20 28 52 56 53 29 |N INVERSOR (RVS)|
000023B0: 20 20 20 22 C7 28 33 34 29 22 12 22 C7 28 33 34 | ".(34)".".(34|
000023C0: 29 00 D0 2B 25 4F 81 49 B2 31 A4 32 30 30 3A 82 |)..+%O.I.1.200:.|
000023D0: 00 0B 2C 2E 4F 99 22 2E 2E 59 20 45 4C 49 4D 49 |..,.O."..Y ELIMI|
000023E0: 4E 41 44 4F 52 20 44 45 20 49 4E 56 45 52 53 49 |NADOR DE INVERSI|
000023F0: 4F 4E 20 28 52 56 53 2D 4F 46 46 29 20 22 C7 28 |ON (RVS-OFF) ".(|
00002400: 33 34 29 22 92 22 C7 28 33 34 29 00 1C 2C 38 4F |34)".".(34)..,8O|
00002410: 81 49 B2 31 A4 35 30 30 3A 82 3A 99 00 3D 2C 42 |.I.1.500:.:..=,B|
00002420: 4F 99 22 3E 3E 3E 20 41 50 52 45 4E 44 41 53 45 |O.">>> APRENDASE|
00002430: 4C 4F 53 20 42 49 45 4E 20 3C 3C 3C 22 00 4E 2C |LOS BIEN <<<".N,|
00002440: 47 4F 81 49 B2 31 A4 32 30 30 3A 82 3A 99 00 85 |GO.I.1.200:.:...|
00002450: 2C 4C 4F 99 22 45 53 43 52 49 54 4F 53 20 45 4E |,LO."ESCRITOS EN|
00002460: 54 52 45 20 43 4F 4D 49 4C 4C 41 53 20 45 46 45 |TRE COMILLAS EFE|
00002470: 43 54 55 41 4E 22 3A 99 22 53 55 20 54 52 41 42 |CTUAN":."SU TRAB|
00002480: 41 4A 4F 2E 22 00 96 2C B0 4F 81 49 B2 31 A4 35 |AJO."..,.O.I.1.5|
00002490: 30 30 3A 82 3A 99 00 A1 2C 0C 76 8D 36 33 30 30 |00:.:...,.v.6300|
000024A0: 30 00 CB 2C 16 76 99 22 93 22 3A 4D 53 24 B2 22 |0..,.v.".":MS$."|
000024B0: 12 20 20 41 44 49 4F 53 21 20 20 92 22 3A 8D 36 |. ADIOS! .":.6|
000024C0: 33 31 30 30 3A 8D 36 33 35 30 30 00 E1 2C 20 76 |3100:.63500.., v|
000024D0: 81 49 B2 31 A4 35 3A 8D 36 33 36 35 30 3A 82 3A |.I.1.5:.63650:.:|
000024E0: 80 00 EA 2C 78 E6 99 22 93 22 00 13 2D 82 E6 99 |...,x.."."..-...|
000024F0: 22 13 1F 11 D1 44 55 52 41 4E 54 45 20 4C 41 20 |"....DURANTE LA |
00002500: 4C 45 43 43 49 4F 4E 20 50 4F 44 52 41 20 55 53 |LECCION PODRA US|
00002510: 54 45 44 00 3A 2D 83 E6 99 22 20 45 4E 53 41 59 |TED.:-..." ENSAY|
00002520: 41 52 20 4C 41 53 20 49 4E 53 54 52 55 43 43 49 |AR LAS INSTRUCCI|
00002530: 4F 4E 45 53 20 59 20 4C 4F 53 00 64 2D 84 E6 99 |ONES Y LOS.d-...|
00002540: 22 20 50 52 4F 47 52 41 4D 41 53 20 45 53 43 52 |" PROGRAMAS ESCR|
00002550: 49 54 4F 53 20 45 4E 20 4C 41 20 50 41 4E 54 41 |ITOS EN LA PANTA|
00002560: 4C 4C 41 2E 00 8D 2D 8C E6 99 22 11 D1 54 41 4D |LLA...-..."..TAM|
00002570: 42 49 45 4E 20 50 4F 44 52 41 20 55 53 54 45 44 |BIEN PODRA USTED|
00002580: 20 45 53 43 52 49 42 49 52 20 53 55 53 00 B4 2D | ESCRIBIR SUS..-|
00002590: 91 E6 99 22 20 50 52 4F 50 49 4F 53 20 50 52 4F |..." PROPIOS PRO|
000025A0: 47 52 41 4D 41 53 20 59 20 45 4A 45 43 55 54 41 |GRAMAS Y EJECUTA|
000025B0: 52 4C 4F 53 00 D9 2D 93 E6 99 22 20 45 53 43 52 |RLOS..-..." ESCR|
000025C0: 49 42 49 45 4E 44 4F 20 27 52 55 4E 27 20 28 2B |IBIENDO 'RUN' (+|
000025D0: 20 52 45 54 55 52 4E 29 2E 00 09 2E 96 E6 99 22 | RETURN)......."|
000025E0: 11 D1 45 53 54 4F 20 45 53 20 50 4F 53 49 42 4C |..ESTO ES POSIBL|
000025F0: 45 20 50 4F 52 51 55 45 20 48 45 4D 4F 53 1C 20 |E PORQUE HEMOS. |
00002600: 44 49 56 49 44 49 44 4F 22 00 2D 2E 98 E6 99 22 |DIVIDIDO".-...."|
00002610: 20 1F 4C 41 20 4D 45 4D 4F 52 49 41 20 44 45 4C | .LA MEMORIA DEL|
00002620: 20 43 2D 36 34 20 45 4E 20 44 4F 53 3A 00 50 2E | C-64 EN DOS:.P.|
00002630: 99 E6 99 22 20 55 4E 41 20 50 41 52 54 45 20 50 |..." UNA PARTE P|
00002640: 41 52 41 20 45 4C 20 50 52 4F 47 52 41 4D 41 2C |ARA EL PROGRAMA,|
00002650: 00 74 2E 9A E6 99 22 20 4C 41 20 4F 54 52 41 20 |.t...." LA OTRA |
00002660: 50 41 52 41 20 53 55 53 20 45 4A 45 52 43 49 43 |PARA SUS EJERCIC|
00002670: 49 4F 53 2E 00 9B 2E A0 E6 99 22 11 D1 41 4C 20 |IOS......."..AL |
00002680: 50 52 45 53 49 4F 4E 41 52 20 12 1C 20 4C 41 20 |PRESIONAR .. LA |
00002690: 54 45 43 4C 41 20 40 20 1F 92 2C 00 C5 2E A5 E6 |TECLA @ ..,.....|
000026A0: 99 22 20 55 53 54 45 44 20 56 4F 4C 56 45 52 41 |." USTED VOLVERA|
000026B0: 20 41 4C 20 50 52 4F 47 52 41 4D 41 20 54 55 54 | AL PROGRAMA TUT|
000026C0: 4F 52 49 41 4C 00 F0 2E AA E6 99 22 11 D1 1C 41 |ORIAL......"...A|
000026D0: 20 56 45 43 45 53 2C 1F 20 50 52 45 53 49 4F 4E | VECES,. PRESION|
000026E0: 41 4E 44 4F 20 4C 41 20 54 45 43 4C 41 20 1C 40 |ANDO LA TECLA .@|
000026F0: 00 17 2F B4 E6 99 22 20 1F 50 4F 44 52 41 20 54 |../..." .PODRA T|
00002700: 41 4D 42 49 45 4E 20 56 4F 4C 56 45 52 20 55 4E |AMBIEN VOLVER UN|
00002710: 41 20 4F 20 44 4F 53 00 33 2F B9 E6 99 22 20 50 |A O DOS.3/..." P|
00002720: 41 47 49 4E 41 53 20 48 41 43 49 41 20 41 54 52 |AGINAS HACIA ATR|
00002730: 41 53 2E 00 58 2F DC E6 8D 36 33 30 30 30 3A 4D |AS..X/...63000:M|
00002740: 53 24 B2 22 12 40 92 5F 52 45 43 55 45 52 44 45 |S$.".@._RECUERDE|
00002750: 22 3A 8D 36 33 31 30 30 00 65 2F E6 E6 8D 36 33 |":.63100.e/...63|
00002760: 30 30 30 3A 8E 00 70 2F 60 EA 97 32 30 34 2C 31 |000:..p/`..204,1|
00002770: 00 92 2F 61 EA 42 54 24 B2 22 13 22 3A 81 49 B2 |../a.BT$.".":.I.|
00002780: 31 A4 32 34 3A 42 54 24 B2 42 54 24 AA 22 11 22 |1.24:BT$.BT$."."|
00002790: 3A 82 00 DC 2F 62 EA 50 54 24 B2 22 1C B0 C0 C0 |:.../b.PT$."....|
000027A0: C0 C0 C0 C0 C0 C0 C0 C0 AE 11 9D 9D 9D 9D 9D 9D |................|
000027B0: 9D 9D 9D 9D 9D 9D DD 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000027C0: 1D DD 11 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D AD |................|
000027D0: B2 C0 C0 C0 C0 C0 C0 C0 C0 B2 BD 22 00 24 30 63 |...........".$0c|
000027E0: EA 50 54 24 B2 50 54 24 AA 22 11 9D 9D 9D 9D 9D |.PT$.PT$."......|
000027F0: 9D 9D 9D 9D 9D 9D 9D 9D CE A3 A3 A3 A3 A3 A3 A3 |................|
00002800: A3 A3 A3 A3 A3 CD 11 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00002810: 9D 9D 9D 9D 9D A5 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |......==========|
00002820: 3D 3D A7 22 00 60 30 64 EA 50 54 24 B2 50 54 24 |==.".`0d.PT$.PT$|
00002830: AA 22 11 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |."..............|
00002840: 9D D0 CF A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 D0 CF 91 |................|
00002850: 91 91 91 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 |..............."|
00002860: 00 97 30 65 EA 50 54 24 B2 42 54 24 AA 22 91 91 |..0e.PT$.BT$."..|
00002870: 91 91 91 91 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00002880: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 AA |..............".|
00002890: 50 54 24 AA 22 90 22 00 C7 30 67 EA 4D 4C 24 B2 |PT$."."..0g.ML$.|
000028A0: 22 13 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D |"...............|
000028B0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000028C0: 1D 1D 1D 1D 1D 1D 22 00 E2 30 68 EA 57 44 B2 34 |......"..0h.WD.4|
000028D0: 30 3A 43 52 54 B2 31 30 32 34 3A 99 C7 28 31 34 |0:CRT.1024:..(14|
000028E0: 32 29 00 06 31 69 EA 57 32 B2 57 44 AD 32 3A 57 |2)..1i.W2.WD.2:W|
000028F0: 33 B2 57 44 AB 31 3A 57 31 24 B2 CA 28 C4 28 57 |3.WD.1:W1$..(.(W|
00002900: 44 29 2C 32 29 3A 00 28 31 6A EA 57 32 24 B2 CA |D),2):.(1j.W2$..|
00002910: 28 C4 28 57 32 29 2C 32 29 3A 57 33 24 B2 CA 28 |(.(W2),2):W3$..(|
00002920: C4 28 57 33 29 2C 32 29 00 49 31 74 EA 99 22 93 |.(W3),2).I1t..".|
00002930: 22 3A 97 35 33 32 38 31 2C 31 35 3A 97 35 33 32 |":.53281,15:.532|
00002940: 38 30 2C 36 3A 99 22 90 22 00 77 31 46 EE 8B C2 |80,6:.".".w1F...|
00002950: 28 37 38 39 29 B3 B1 37 AC 31 36 AA 31 35 A7 9E |(789)..7.16.15..|
00002960: 28 37 AC 34 30 39 36 AA 31 35 AC 32 35 36 AA 31 |(7.4096.15.256.1|
00002970: 32 AC 31 36 AA 33 29 00 7D 31 47 EE 8E 00 83 31 |2.16.3).}1G....1|
00002980: 48 EE 3A 00 9D 31 49 EE 4D B2 37 AC 34 30 39 36 |H.:..1I.M.7.4096|
00002990: AA 31 35 AC 32 35 36 AA 31 35 AC 31 36 00 A3 31 |.15.256.15.16..1|
000029A0: 4A EE 8C 00 BB 31 4B EE 81 49 B2 4D A4 4D AA 31 |J....1K..I.M.M.1|
000029B0: 35 3A 87 4B 3A 97 49 2C 4B 3A 82 00 D5 31 4C EE |5:.K:.I,K:...1L.|
000029C0: 83 20 31 2C 39 36 2C 33 2C 39 36 2C 33 2C 39 36 |. 1,96,3,96,3,96|
000029D0: 2C 33 2C 39 36 00 F3 31 4D EE 83 20 31 34 34 2C |,3,96..1M.. 144,|
000029E0: 31 32 37 2C 30 2C 30 2C 31 34 34 2C 31 32 37 2C |127,0,0,144,127,|
000029F0: 30 2C 30 00 10 32 4E EE 4D B2 36 AC 34 30 39 36 |0,0..2N.M.6.4096|
00002A00: 3A 81 49 B2 30 A4 32 3A 97 4D AA 49 2C 30 3A 82 |:.I.0.2:.M.I,0:.|
00002A10: 00 16 32 4F EE 8E 00 58 32 18 F6 99 22 13 11 11 |..2O...X2..."...|
00002A20: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00002A30: 11 11 11 11 11 11 50 52 45 53 49 4F 4E 45 20 12 |......PRESIONE .|
00002A40: 52 45 54 55 52 4E 92 20 50 41 52 41 20 43 4F 4E |RETURN. PARA CON|
00002A50: 54 49 4E 55 41 52 22 3B 00 6E 32 19 F6 A1 41 24 |TINUAR";.n2...A$|
00002A60: 3A 8B 41 24 B3 B1 22 22 A7 36 33 30 30 31 00 83 |:.A$.."".63001..|
00002A70: 32 1A F6 A1 41 24 3A 8B 41 24 B2 22 22 A7 36 33 |2...A$:.A$."".63|
00002A80: 30 30 32 00 89 32 1B F6 8E 00 A4 32 7C F6 8D 36 |002..2.....2|..6|
00002A90: 33 36 35 30 3A 81 54 B2 31 A4 35 3A 99 50 54 24 |3650:.T.1.5:.PT$|
00002AA0: 4D 53 24 3B 00 BA 32 7D F6 99 50 54 24 22 20 20 |MS$;..2}..PT$" |
00002AB0: 20 20 20 20 20 20 20 20 22 3B 00 C9 32 7E F6 99 | ";..2~..|
00002AC0: 50 54 24 4D 53 24 3B 3A 82 00 D1 32 7F F6 99 3A |PT$MS$;:...2...:|
00002AD0: 8E 00 F6 32 E0 F6 97 35 36 2C 39 36 3A 97 35 32 |...2...56,96:.52|
00002AE0: 2C 39 36 3A 97 35 35 2C 30 3A 97 35 31 2C 30 3A |,96:.55,0:.51,0:|
00002AF0: 8D 36 31 30 30 30 00 08 33 E1 F6 57 44 B2 34 30 |.61000..3..WD.40|
00002B00: 3A 99 C7 28 31 34 32 29 00 21 33 E2 F6 4D B2 37 |:..(142).!3..M.7|
00002B10: AC 34 30 39 36 AA 31 35 AC 32 35 36 AA 39 AC 31 |.4096.15.256.9.1|
00002B20: 36 00 39 33 E3 F6 81 49 B2 4D A4 4D AA 39 31 3A |6.93...I.M.M.91:|
00002B30: 87 4B 3A 97 49 2C 4B 3A 82 00 80 33 E4 F6 83 31 |.K:.I,K:...3...1|
00002B40: 36 35 2C 32 30 33 2C 32 30 31 2C 34 36 2C 32 30 |65,203,201,46,20|
00002B50: 38 2C 38 33 2C 33 32 2C 31 39 35 2C 31 32 37 2C |8,83,32,195,127,|
00002B60: 31 36 35 2C 34 34 2C 32 30 31 2C 38 2C 32 34 30 |165,44,201,8,240|
00002B70: 2C 33 2C 33 32 2C 31 37 37 2C 31 32 37 2C 33 32 |,3,32,177,127,32|
00002B80: 00 C5 33 E5 F6 83 31 34 32 2C 31 36 36 2C 31 36 |..3...142,166,16|
00002B90: 35 2C 34 34 2C 32 30 31 2C 38 2C 32 34 30 2C 33 |5,44,201,8,240,3|
00002BA0: 2C 37 36 2C 31 32 38 2C 31 36 34 2C 37 36 2C 31 |,76,128,164,76,1|
00002BB0: 37 34 2C 31 36 37 2C 31 36 32 2C 31 36 2C 31 38 |74,167,162,16,18|
00002BC0: 39 2C 32 33 39 00 0E 34 E6 F6 83 31 32 37 2C 37 |9,239..4...127,7|
00002BD0: 32 2C 31 38 31 2C 34 32 2C 31 35 37 2C 32 33 39 |2,181,42,157,239|
00002BE0: 2C 31 32 37 2C 31 30 34 2C 31 34 39 2C 34 32 2C |,127,104,149,42,|
00002BF0: 32 30 32 2C 32 30 38 2C 32 34 31 2C 39 36 2C 31 |202,208,241,96,1|
00002C00: 32 30 2C 31 37 33 2C 32 33 38 2C 31 32 37 00 53 |20,173,238,127.S|
00002C10: 34 E7 F6 83 37 37 2C 32 30 2C 33 2C 31 34 31 2C |4...77,20,3,141,|
00002C20: 32 30 2C 33 2C 31 37 33 2C 32 33 39 2C 31 32 37 |20,3,173,239,127|
00002C30: 2C 37 37 2C 32 31 2C 33 2C 31 34 31 2C 32 31 2C |,77,21,3,141,21,|
00002C40: 33 2C 38 38 2C 39 36 2C 31 37 33 2C 32 30 2C 33 |3,88,96,173,20,3|
00002C50: 2C 37 33 00 92 34 E8 F6 83 31 34 34 2C 31 34 31 |,73..4...144,141|
00002C60: 2C 32 33 38 2C 31 32 37 2C 31 37 33 2C 32 31 2C |,238,127,173,21,|
00002C70: 33 2C 37 33 2C 31 32 37 2C 31 34 31 2C 32 33 39 |3,73,127,141,239|
00002C80: 2C 31 32 37 2C 39 36 2C 37 36 2C 32 35 35 2C 32 |,127,96,76,255,2|
00002C90: 35 35 00 B0 34 F0 F6 97 4D AA 39 30 2C C2 28 37 |55..4...M.90,.(7|
00002CA0: 38 38 29 3A 97 4D AA 39 31 2C C2 28 37 38 39 29 |88):.M.91,.(789)|
00002CB0: 00 CE 34 F4 F6 4B 45 59 B2 37 AC 34 30 39 36 AA |..4..KEY.7.4096.|
00002CC0: 31 35 AC 32 35 36 AA 31 33 AC 31 36 AA 38 00 D9 |15.256.13.16.8..|
00002CD0: 34 F5 F6 9E 28 4B 45 59 29 00 DF 34 43 F7 8E 00 |4...(KEY)..4C...|
00002CE0: E5 34 44 F7 3A 00 F0 34 45 F7 8D 36 33 36 30 30 |.4D.:..4E..63600|
00002CF0: 00 FB 34 46 F7 8D 36 31 30 30 30 00 06 35 47 F7 |..4F..61000..5G.|
00002D00: 89 36 33 34 30 33 00 0C 35 A8 F7 3A 00 17 35 A9 |.63403..5..:..5.|
00002D10: F7 8D 36 33 36 30 30 00 37 35 AB F7 53 57 54 43 |..63600.75..SWTC|
00002D20: 48 B2 37 AC 34 30 39 36 AA 31 35 AC 32 35 36 AA |H.7.4096.15.256.|
00002D30: 39 AC 31 36 AA 31 35 00 44 35 AC F7 9E 28 53 57 |9.16.15.D5...(SW|
00002D40: 54 43 48 29 00 51 35 AD F7 97 32 30 34 2C 32 3A |TCH).Q5...204,2:|
00002D50: 80 00 57 35 0C F8 3A 00 6C 35 0D F8 53 4E 24 B2 |..W5..:.l5..SN$.|
00002D60: 22 31 30 30 22 3A 8D 36 33 36 30 30 00 9B 35 0E |"100":.63600..5.|
00002D70: F8 4D B2 37 AC 34 30 39 36 AA 31 35 AC 32 35 36 |.M.7.4096.15.256|
00002D80: AA 31 32 AC 31 36 AA 33 3A 8B C2 28 37 38 39 29 |.12.16.3:..(789)|
00002D90: B2 37 AC 31 36 AA 31 35 A7 9E 4D 00 A1 35 0F F8 |.7.16.15..M..5..|
00002DA0: 8E 00 A7 35 70 F8 3A 00 C2 35 71 F8 4D B2 32 30 |...5p.:..5q.M.20|
00002DB0: 35 39 3A 53 4E 24 B2 22 30 30 30 30 30 22 AA 53 |59:SN$."00000".S|
00002DC0: 4E 24 00 E2 35 72 F8 81 49 B2 31 A4 35 3A 97 4D |N$..5r..I.1.5:.M|
00002DD0: AB 49 2C C6 28 C9 28 53 4E 24 2C 49 29 29 3A 82 |.I,.(.(SN$,I)):.|
00002DE0: 3A 8E 00 19 36 A2 F8 97 35 34 32 39 36 2C 31 35 |:...6...54296,15|
00002DF0: 3A 97 35 34 32 37 38 2C 32 34 30 3A 97 35 34 32 |:.54278,240:.542|
00002E00: 37 36 2C 31 37 3A 97 35 34 32 37 33 2C 31 30 30 |76,17:.54273,100|
00002E10: AA 31 30 30 AC BB 28 30 29 00 3D 36 A4 F8 81 49 |.100..(0).=6...I|
00002E20: 58 B2 31 A4 31 30 30 3A 82 3A 97 35 34 32 37 33 |X.1.100:.:.54273|
00002E30: 2C 30 3A 97 35 34 32 39 36 2C 30 3A 8E 00 6B 36 |,0:.54296,0:..k6|
00002E40: D4 F8 97 35 34 32 39 36 2C 31 35 3A 97 35 34 32 |...54296,15:.542|
00002E50: 37 38 2C 32 34 30 3A 97 35 34 32 37 36 2C 31 37 |78,240:.54276,17|
00002E60: 3A 97 35 34 32 37 33 2C 31 34 31 00 80 36 D5 F8 |:.54273,141..6..|
00002E70: A1 58 24 3A 8B 58 24 B2 22 22 A7 36 33 37 30 31 |.X$:.X$."".63701|
00002E80: 00 B4 36 D6 F8 97 35 34 32 37 33 2C 30 3A 99 22 |..6...54273,0:."|
00002E90: 93 53 41 56 45 22 C7 28 33 34 29 22 42 41 53 49 |.SAVE".(34)"BASI|
00002EA0: 43 20 31 22 C7 28 33 34 29 22 3A 47 4F 54 4F 36 |C 1".(34)":GOTO6|
00002EB0: 33 37 30 30 00 00 00 |3700... |
.......00100......".......<...."......**
* 1985 SOFT LAKE ***.I....".......E....
SAVE"BASIC.1 ES.J1",8...D..53281,15:.532
80,6:.".":."....E.."....................
...................."...F..". .. AL
L BLACKS SOFTWARE .. .":MS$."BA
SIC I ".*.G.."........................
.................".G.H.SN$."1000":.63200
:.63600.`.I..60000:.63100:.59000.K....60
000......".... HOLA! YO SOY UN CALCULAD
OR DE CLASE ".J...."..YO PUEDO SUMAR:.
2+2=4 ., RESTAR,"......"MULTIPLICAR: .3
*17=51., DIVIDIR:.4/16=.25"...8.."CALCUL
O SENOS Y LOGARITMOS.".F.B.."RAICES CUAD
RADAS, ARCO-TANGENTES".M.L.."Y ELEVO A P
OTENCIA:.2^(-3)=.125"......".ESCRIBA:":.
".?2*SIN(8/3)+LOG(1.2^3)-SQR(4*5.6)".P..
..".(EL ? AL PRINCIPIO SIGNIFICA PRINT)"
......" . . .........".-.
(..".PRESIONE .RETURN. Y YO MOSTRARE":."
LA RESPUESTA".^.-.."..ENSAYELO..DESPUES
QUE HAYA":."TERMINADO"...2.." ... PRES
IONE @ . _......"...4.MS$.".@_RECUERDE."
:.63100...7.SN$."02000":.63300...P..".":
MS$." MUY BIEN":.60000:.63100:.".";...4.
."...SI POR ERROR UD. ESCRIBE UN CARACTE
R".@.>.."NO DESEADO,--USTED PODRA .BORRA
RLO. DE".O.F.."INMEDIATO APOYANDO SOBRE
LA TECLA .DEL."...G.."...
.".A.H.."...
UCCCCCCI...I.." .
....J.." . INST ....K.."
. ..-.L.." .
DEL ..H.M.." . ..C.N.."
JCCCCCCK.N.O..63000...Z.."..S
UPONGA QUE UD. HA ESCRITO 2SIN(8/3)..L..
..".PARA INSERTAR UN * ENTRE EL 2 Y SIN(
8/3)......".PARA INDICAR UNA MULTIPLICAC
ION...."...."PRESIONE AL MISMO TIEMPO SH
IFT Y DEL!.M.`.."
..... . ....U.D.."HAGA ESTO DESPUES DE
HABER MOVIDO...N.."EL CURSOR SOBRE LA .
S . DE SIN..C.(.."..USTED HA INSERTADO
UN ESPACIO......."..LUEGO ESCRIBA '*'
. PRUEBELO......."... DESPUES PRESIONE @
..!...SN$."03000":.63300.,....60000.\..
.."...SI USTED QUIERE QUE ME ..RECUERDE.
. EL.|.B.."RESULTADO DE UN CALCULO";...L
..". DELE UN NOMBRE!. ESCRIBA...V..".PED
RO=2*3/4+5.".W....".Y YO ME RECORDARE DE
PEDRO.......".USTED PUEDE PREGUNTAR TAM
BIEN ..EL VALOR."....".DE PEDRO;. ESCRIB
A..2....".?PEDRO ..Z....".O BIEN USTED P
UEDE ESCRIBIR ASI:.}....".JUAN=PEDRO^2+S
IN(.*PEDRO/3)......".?JUAN."...&..".Y YO
MOSTRARE EL VALOR DE JUAN..D.+.."..ENSA
YELO...0..".. DESPUES PRESIONE .@....:.S
N$."04000":.63300... ..60000.3...."..SI
USTED ME DA DE ANTEMANO LOS VALORES.]...
."DE A,B Y C; Y ESCRIBE ESTA FORMULA:...
H.."..Y=(-B+SQR(B*B-4*A*C))/(2*A)...L.."
.?Y ".R.0..".YO
CALCULARE Y MOSTRARE EL RESULTADO....B..
"...
.".,...."..DESGRACIADAMENTE SI UD. M
E DA.O...."VALORES NUEVOS PARA A,B Y C".
|...."...USTED DEBERA REESCRIBIR LA FORM
ULA!......".(ESPERE HASTA QUE HAGAMOS PR
OGRAMAS JUNTOS).R...."..QUIERE USTED
ENSAYAR?..Z.L.."....V.."...PRESIONE @.
PARA CONTINUAR.."...[.MS$."@_........":.
63100.4.J.SN$."05000":.63300.?....60000.
N...."..SI USTED MA DA LOS VALORES DE A,
B Y C"......"ESCRIBIENDO ..A=5.3:B=-2.1:
C=.011".G....".YO ME ACORDARE DE ESTOS N
UEVOS VALORES."......".(USTED PUEDE ESCR
IBIR VARIAS"...|.."INSTRUCCIONES EN LA M
ISMA LINEA,".5...."SEPARADAS POR DOS PUN
TOS)".H.D.."..
."...N..".SI USTED DESEA R
ECALCULAR 'Y'"......"MUEVA EL CURSOR HAC
IA LA LINEA".U...."QUE DEFINE LA INSTRUC
CION"......".AL PRESIONAR 'RETURN' YO CO
MPRENDERE QUE LA".6.P..".INSTRUCCION HA
SIDO ESCRITA DE NUEVO".[.Z.."LUEGO PODRA
UD. PREGUNTAR .?Y"......"... ENSAYELO .
DESPUES .PRESIONE @."...O.SN$."06000":.6
3300...P..60000.C.U.."... . PROGRAMA
S.".X.Z.." .........."...{.MS$." EJEM.
..".1...."..SI USTED LE DA A CADA INSTRU
CCION UN ..NUMERO".Y...."
.YO ME RECORDARE LA INSTRUCCION!".W...."
.POR EJEMPLO, ESCRIBA:"......".10 Y=(A+B
)/2"......".20 ?Y ".Q....".#10 SIG
NIFICA: CALCULE EL TERMINO MEDIO"...E.."
DE LOS VALORES A Y B. LLAMESE AL
RESULTAD0 'Y'".T.T..".#20 SIGNIFICA:
IMPRIMIR EN LA PANTALLA EL VALOR D
E Y"......".YO ME RECORDARE ESTAS INSTRU
CCIONES"......".BORRE LA PANTALLA, ESCRI
BA .A=1.5:B=-4."......".LUEGO ESCRIBA. .
GOTO 10.":.". Y YO OBEDECERE"......"..E
NSAYELO!":.".DESPUES .PRESIONE @".,...MS
$." GOTO 10":.63100.C...SN$."07000":.63
300.N.X..60000.}.].."..SI USTED DESEA EL
VALOR DE Y MOSTRADO"...B..".EN EL CENTR
O DE LA PANTALLA .ESCRIBA:".A...."...15?
".U....".16?SPC(20);"......"..#1
5 SIGNIFICA IMPRIMIR...UNA LINEA EN
BLANCO".@....".#16 SIGNIFICA 20 ESPACI
OS A LA DERECHA".S...."..
."......".EL PU
NTO Y COMA DESPUES DEL SPC(20).J.F.."SIG
NIFICA: DEJE EL CURSOR DONDE ESTA!...P..
"USTED SABE, YO DEVUELVO NORMALMENTE...U
.."EL CURSOR AL LADO IZQUIERDO..=.Z.."..
A MENOS. QUE USTED ESCRIBA .;.H....63000
.}...."....POCO IMPORTA EL ORDEN........
..... .DE LAS......"INSTRUCCIONES QUE US
TED ESCRIBE.M....".(YO ME RECUERDO SEGUN
SUS NUMEROS)......"..SI USTED ESCRIBE:.
......".10Y=(A+B)/2......"20?Y ".!
...."15? ".7...."16?SPC("W2$");".
Q...."..YO ME RECUERDO:.".G....". 10 Y=(
A+B)/2".X...." 15 PRINT"......" 16 PRINT
SPC("W2$");......" 20 PRINTY".V....".. E
NSAYELO!.. PRESIONE .@. PARA CONTINUAR..
.\.SN$."08000":.63300...@..60000...J..".
10 Y=(A+B)/2 . .".<.T..". 15 PRINT
. .. NUESTRO.C.^..". 16 PRINTSPC
(20); . .. PROGRAMA...H..". 20 PRINTY
. ....|.."..PARA QUE SE CONVENZA QU
E YO TENGO.S...."TODAS SUS INSTRUCCIONES
EN ORDEN........"..ESCRIBA:.LIST10-20..
.....".Y YO LAS VOY A MOSTRAR TODAS:10 A
20..J...."..USTED PUEDE CAMBIAR LAS INS
TRUCCIONES.}...."EN LA PANTALLA .ESCRIBA
. .LIST., MUEVA LUEGO...L..".EL CURSOR,
LUEGO .INST/DEL. ETC..P.V.."..PARA VERIF
ICAR LOS CAMBIOS ESCRIBA...X.."DE NUEVO
.LIST......".. DESEA ENSAYAR?. (DESPUES
PRESIONE .@.)..-...SN$."09000":.63300.8.
(#.60000.U.-#MS$.". CONSEJOS ":.63100...
2#."...PARA ..CAMBIAR.. UNA INSTRUCCION
ESCRIBA...<#."EL NUMERO Y LA NUEVA INSTR
UCCION....F#."(ME OLVIDARE LA INSTRUCCIO
N ANTERIOR)....P#.".PARA ..BORRAR.. UNA
INSTRUCCION.0.Z#."ESCRIBA EL NUMERO Y PR
ESIONE 'RETURN'!.D.D#."...
."....#."MUCHO
CUIDADO! USTED PODRA BORRAR....#."UNA
INSTRUCCION POR ERROR....J..#."SIN DARSE
CUENTA.......#."..SI USTED ESCRIBE UN N
UMERO.. #."..Y DESPUES 'RETURN'..= .#."
...
.".I .#.".USTED PODRA USAR TAMBIEN EL
. ? .".. .#.".Y YO ME RECORDARE ESTO
COMO .PRINT... H#.63000.N I#."..YO ME R
ECUERDO SOLAMENTE DE LOS ..DOS.. J#."..P
RIMEROS CARACTERES DE LOS ..NOMBRES. "..
!K#."..SAM=10..!L#."SAUL=20.O!M#.".PARA
MI .. LOS DOS .. TIENEN EL MISMO NOMBRE.
I!N#.".QUE ES: .. SA .!...!O#."..LUEGO
SA=10 SEGUIDO DE SA=20 HACE..!P#.".SAM=S
AUL=20.".C!R#MS$."SAM=SAUL?":.63100.N!S#
.63000.T!.':..".'."... MANIPULACION DE C
ADENAS DE CARACTERES .".4"$'."..DE LA M
ISMA MANERA COMO SE LA DA UN.A".'."NOMBR
E A UN NUMERO, A SABER X,Y O SAM,.."8'."
USTED PODRA ASIGNARLE UN NOMBRE A.."B'."
.. UNA CADENA DE CARACTERES.
..X"L'.".Y PARA NO CONFUNDIRME..#V'."Y
O DEBO SABER SI 2*3 ES UN NUMERO.&#`'."O
UNA CADENA DE TRES CARACTERES.Z#E'."...
."..#J'."..POR ESO DEBO INSISTIR QUE EL
NOMBRE..#T'."TERMINE CON UN $ ..SI SE T
RATA.V#~'."DE UNA CADENA ...COMO X$,Y$ O
SAM$...#.'.63000..$.'."... AHORA
USTED PUEDE ENSAYAR: .".%$.'.".ESC
RIBA:.1$.'."X=2+3.K$.'."X$="G(34)"2+3"G(
34).Y$.'."..?X,X$..$D'.".....VEA LOS RES
ULTADOS ...$S'."...DESPUE
S .@. PARA CONTINUAR":MS$." ???? ":.
J$U'.63100..$X'SN$."11000":.63300..$.*.6
0000..%.+.".... USTED HA ADIVINADO.$%.+.
".. YO VOY A MOSTRAR./%.+.:." 5.=% +.".2
+3":..H%%+.63000.{%*+."... Y AHORA
QUE SIGNIFICA X$+Y$ ? "..%4+.".ESCRI
BA CONMIGO:..%>+.".A$="G(34)"YO"G(34).K%
H+."..B$="G(34)"USTED"G(34)..%R+."..Y$="
G(34)"SOY GRANDE!"G(34)..&\+."..Z$="G(34
)" ES TAMBIEN?"G(34).*&F+."..Y PREGUNTEM
E:.8&P+.".?A$+Y$.L&Z+."... ?B$+Z$.:".S&.
+."...ENSAYELO! LUEGO PRESIONE .@."..&.+
MS$."GRANDIOSO!":.63100..&.+."..."..&.+S
N$."12000":.63300..&...60000..&..."...BI
EN ... SI USTED HIZO EL ENSAYO..'...".US
TED HABRA NOTADO QUE A$ RETIENE.4'...".
. TODO . ENTRE LAS COMILLAS.H'..."...
."
..'..."..SI USTED DESEA UN ESPACIO..'...
".DESPUES DE 'YO', ES NECESARIO INCLUIRL
O.O'./." .."..'./."..A$="G(34
)"YO "G(34)..'./." ^"..(./."..
HA VISTO?.":.63000.<( N.". PERMITA QUE L
E PRESENTE A.E(*N."..MI AMIGO "G(34)"CUR
SOR "G(34)".".U(/N.I.1.1000:...(0NWD.80:
.32768.1024,96:.B(32768).96.WD.40.L(4N."
PERO LE LLAMAN .CRSR. PARA ABREVIAR"..(9
N.I.1.1500:...(>N.".VAMOS CRSR..NO SEAS
TIMIDO"..)HN.I.1.2000:...)RN.I.1.10.')\N
.".";:..2)FN..14);.G)PN.I.1.8:.T.1.50:..
Y)ZN." ... ..";:..H).N.I.1.500:..|).N.".
_ESTE ES EL..).NCSR.32768.8.WD.14:.I.1.
100:.CSR,32:.CSR,160:..V).N.".TAMBIEN TE
NEMOS A CRSR-IZQUIERDO..).N." "G(34)".
"G(34)..).N.I.1.500:.:...*.N."Y A CRSR-D
ERECHO";.2*.N." "G(34)"."G(34).C*AN.
I.1.500:.:..Y*JN."Y A CRSR-ARRIBA.S*TN."
"G(34)"."G(34)..*UN.I.1.500:.:...*.
N."Y A CRSR-ABAJO..*.N." "G(34)"."G(
34).E*.N.I.1.1500:.:...*.N."(TODOS HERMA
NOS, POR SUPUESTO)...*.N.I.1.1000:.:..#+
.N."TENEMOS TAMBIEN ORIGEN (HOME)";.<+.O
." "G(34)"."G(34).K+.O.I.1.200:..I+.O
."..Y BORRADOR (CLR)...";..+.O." "G(3
4)"."G(34)..+.O.I.1.200:..A+$O."..TAMBIE
N INVERSOR (RVS) "G(34)"."G(34).P+%O.I
.1.200:...,.O."..Y ELIMINADOR DE INVERSI
ON (RVS-OFF) "G(34)"."G(34)..,8O.I.1.500
:.:..=,BO.">>> APRENDASELOS BIEN <<<".N,
GO.I.1.200:.:...,LO."ESCRITOS ENTRE COMI
LLAS EFECTUAN":."SU TRABAJO."..,.O.I.1.5
00:.:...,.V.63000.K,.V.".":MS$.". ADIOS
! .":.63100:.63500.., V.I.1.5:.63650:.:
...,X.."."..-..."...QDURANTE LA LECCION
PODRA USTED.:-..." ENSAYAR LAS INSTRUCCI
ONES Y LOS.D-..." PROGRAMAS ESCRITOS EN
LA PANTALLA...-...".QTAMBIEN PODRA USTED
ESCRIBIR SUS..-..." PROPIOS PROGRAMAS Y
EJECUTARLOS.Y-..." ESCRIBIENDO 'RUN' (+
RETURN).......".QESTO ES POSIBLE PORQUE
HEMOS. DIVIDIDO".-...." .LA MEMORIA DEL
C-64 EN DOS:.P...." UNA PARTE PARA EL P
ROGRAMA,.T...." LA OTRA PARA SUS EJERCIC
IOS.... ..".QAL PRESIONAR .. LA TECLA @
..,.E...." USTED VOLVERA AL PROGRAMA TUT
ORIAL......".Q.A VECES,. PRESIONANDO LA
TECLA .@../..." .PODRA TAMBIEN VOLVER UN
A O DOS.3/..." PAGINAS HACIA ATRAS..X/..
.63000:MS$.".@._RECUERDE":.63100.E/...63
000:..P/`..204,1../A.BT$.".":.I.1.24:BT$
.BT$.".":.../B.PT$."....................
........................................
...".$0C.PT$.PT$."..............N.......
.....M................============.".`0D
.PT$.PT$."...............PO..........PO.
..............."..0E.PT$.BT$."..........
......................".PT$.".".G0G.ML$.
".....................................".
.0H.WD.40:CRT.1024:.G(142)..1I.W2.WD.2:W
3.WD.1:W1$.J(D(WD),2):.(1J.W2$.J(D(W2),2
):W3$.J(D(W3),2).I1T..".":.53281,15:.532
80,6:.".".W1F..B(789)..7.16.15..(7.4096.
15.256.12.16.3).}1G....1H.:..1I.M.7.4096
.15.256.15.16..1J....1K..I.M.M.15:.K:.I,
K:..U1L.. 1,96,3,96,3,96,3,96..1M.. 144,
127,0,0,144,127,0,0..2N.M.6.4096:.I.0.2:
.M.I,0:...2O...X2..."...................
......PRESIONE .RETURN. PARA CONTINUAR";
.N2...A$:.A$.."".63001..2...A$:.A$."".63
002..2.....2|..63650:.T.1.5:.PT$MS$;..2}
..PT$" ";.I2~..PT$MS$;:..Q2..:
...2...56,96:.52,96:.55,0:.51,0:.61000..
3..WD.40:.G(142).!3..M.7.4096.15.256.9.1
6.93...I.M.M.91:.K:.I,K:...3...165,203,2
01,46,208,83,32,195,127,165,44,201,8,240
,3,32,177,127,32.E3...142,166,165,44,201
,8,240,3,76,128,164,76,174,167,162,16,18
9,239..4...127,72,181,42,157,239,127,104
,149,42,202,208,241,96,120,173,238,127.S
4...77,20,3,141,20,3,173,239,127,77,21,3
,141,21,3,88,96,173,20,3,73..4...144,141
,238,127,173,21,3,73,127,141,239,127,96,
76,255,255..4...M.90,B(788):.M.91,B(789)
.N4..KEY.7.4096.15.256.13.16.8.Y4...(KEY
)..4C....4D.:..4E..63600..4F..61000..5G.
.63403..5..:..5...63600.75..SWTCH.7.4096
.15.256.9.16.15.D5...(SWTCH).Q5...204,2:
..W5..:.L5..SN$."100":.63600..5..M.7.409
6.15.256.12.16.3:.B(789).7.16.15..M..5..
...5P.:.B5Q.M.2059:SN$."00000".SN$..5R..
I.1.5:.M.I,F(I(SN$,I)):.:...6...54296,15
:.54278,240:.54276,17:.54273,100.100..(0
).=6...IX.1.100:.:.54273,0:.54296,0:..K6
T..54296,15:.54278,240:.54276,17:.54273,
141..6U..X$:.X$."".63701..6V..54273,0:."
.SAVE"G(34)"BASIC 1"G(34)":GOTO63700...
> CLICK IMAGE PREVIEW FOR FULL MODAL