CM4
FILE INFORMATION
FILENAME(S): CM4
FILE TYPE(S): DEL
FILE SIZE: 16.6K
FIRST SEEN: 2025-11-30 21:29:11
APPEARS ON: 1 disk(s)
FILE HASH
3500e4dae183a989e8c59e34ceeb660b5b4193cc0e29e121c88726f53570e8f9
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SOUL CRYSTAL | CM4 | DEL | DuncanTwain | 28 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 08 23 08 00 00 8F 22 14 14 14 14 14 14 28 43 |..#...."......(C|
00000010: 29 31 39 38 33 20 48 4F 52 41 20 53 4F 46 54 57 |)1983 HORA SOFTW|
00000020: 41 52 45 00 30 08 01 00 8F 22 14 14 14 14 14 14 |ARE.0...."......|
00000030: 00 48 08 05 00 8F 20 53 41 56 45 22 4D 4C 34 2E |.H.... SAVE"ML4.|
00000040: 45 53 2E 4A 31 22 2C 38 00 65 08 09 00 97 35 33 |ES.J1",8.e....53|
00000050: 32 38 31 2C 31 35 3A 97 35 33 32 38 30 2C 31 32 |281,15:.53280,12|
00000060: 3A 99 22 90 22 00 84 08 0A 00 99 22 93 20 20 20 |:."."......". |
00000070: 20 20 20 20 20 20 20 20 20 20 20 48 4F 52 44 41 | HORDA|
00000080: 43 20 36 34 00 B4 08 0F 00 99 22 1C B0 C0 C0 C0 |C 64......".....|
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 AE 22 00 F8 08 14 00 99 22 DD 20 12 1F 20 |..."......". .. |
000000C0: 20 20 20 20 20 4D 41 53 20 4C 45 4E 47 55 41 4A | MAS LENGUAJ|
000000D0: 45 20 44 45 20 4D 41 51 49 4E 41 53 20 20 20 20 |E DE MAQINAS |
000000E0: 20 20 1C 92 20 DD 22 3A 4D 53 24 B2 22 42 49 45 | .. .":MS$."BIE|
000000F0: 4E 56 45 4E 49 44 4F 22 00 29 09 19 00 99 22 1C |NVENIDO".)....".|
00000100: AD C0 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 BD 90 22 00 42 09 23 00 8D 36 |........".B.#..6|
00000130: 30 30 30 30 3A 8D 36 33 31 30 30 3A 8D 36 33 30 |0000:.63100:.630|
00000140: 30 30 00 75 09 28 00 99 22 93 1C 12 20 56 45 41 |00.u.(.."... VEA|
00000150: 4D 4F 53 20 43 4F 4D 4F 20 45 4C 20 42 41 53 49 |MOS COMO EL BASI|
00000160: 43 20 4C 49 4D 50 49 41 20 4C 41 20 50 41 4E 54 |C LIMPIA LA PANT|
00000170: 41 4C 4C 41 22 00 A0 09 32 00 99 22 11 1F 41 48 |ALLA"...2.."..AH|
00000180: 4F 52 41 20 4F 43 55 50 41 52 45 4D 4F 53 20 4F |ORA OCUPAREMOS O|
00000190: 54 52 41 20 49 4E 53 54 52 55 43 43 49 4F 4E 22 |TRA INSTRUCCION"|
000001A0: 00 BD 09 37 00 99 22 11 44 45 4C 20 4D 4C 4D 20 |...7..".DEL MLM |
000001B0: 3A 20 44 45 53 41 53 45 4D 42 4C 41 52 00 E8 09 |: DESASEMBLAR...|
000001C0: 3C 00 99 22 11 1F 56 41 4D 4F 53 20 41 20 12 44 |<.."..VAMOS A .D|
000001D0: 45 53 41 53 45 4D 42 4C 41 52 92 20 45 4C 20 50 |ESASEMBLAR. EL P|
000001E0: 52 4F 47 52 41 4D 41 22 00 03 0A 41 00 99 22 11 |ROGRAMA"...A..".|
000001F0: 45 4E 20 4C 45 4E 47 55 41 4A 45 20 4D 41 51 55 |EN LENGUAJE MAQU|
00000200: 49 4E 41 00 2A 0A 46 00 99 22 11 28 41 53 55 4D |INA.*.F..".(ASUM|
00000210: 49 45 4E 44 4F 20 51 55 45 20 45 53 54 41 20 45 |IENDO QUE ESTA E|
00000220: 4E 20 24 45 30 36 42 29 2E 22 00 50 0A 50 00 99 |N $E06B).".P.P..|
00000230: 22 11 11 55 4E 41 20 56 45 5A 20 45 4E 20 45 4C |"..UNA VEZ EN EL|
00000240: 20 4D 4C 4D 20 53 45 20 45 53 43 52 49 42 45 3A | MLM SE ESCRIBE:|
00000250: 00 60 0A 5A 00 99 22 11 2E 44 20 45 30 36 42 22 |.`.Z.."..D E06B"|
00000260: 00 86 0A 5F 00 99 22 11 11 11 1C 20 20 20 20 20 |..._..".... |
00000270: 20 20 20 59 20 41 50 41 52 45 43 45 3A 1F 22 3A | Y APARECE:.":|
00000280: 8D 36 33 30 30 30 00 A7 0A 64 00 99 22 93 2E 2C |.63000...d.."..,|
00000290: 20 45 30 36 38 20 41 39 20 32 30 20 20 20 20 4C | E068 A9 20 L|
000002A0: 44 41 20 23 24 32 33 00 CA 0A 65 00 99 22 2E 2C |DA #$23...e..".,|
000002B0: 20 45 30 36 41 20 39 44 20 30 30 20 38 30 20 53 | E06A 9D 00 80 S|
000002C0: 54 41 20 24 30 34 30 30 2C 58 00 ED 0A 66 00 99 |TA $0400,X...f..|
000002D0: 22 2E 2C 20 45 30 36 44 20 39 44 20 30 30 20 38 |"., E06D 9D 00 8|
000002E0: 31 20 53 54 41 20 24 30 35 30 30 2C 58 00 10 0B |1 STA $0500,X...|
000002F0: 67 00 99 22 2E 2C 20 45 30 37 30 20 39 44 20 30 |g.."., E070 9D 0|
00000300: 30 20 38 32 20 53 54 41 20 24 30 36 30 30 2C 58 |0 82 STA $0600,X|
00000310: 00 33 0B 68 00 99 22 2E 2C 20 45 30 37 33 20 39 |.3.h.."., E073 9|
00000320: 44 20 30 30 20 38 33 20 53 54 41 20 24 30 37 30 |D 00 83 STA $070|
00000330: 30 2C 58 00 4E 0B 69 00 99 22 2E 2C 20 45 30 37 |0,X.N.i.."., E07|
00000340: 36 20 43 41 20 20 20 20 20 20 20 44 45 58 00 77 |6 CA DEX.w|
00000350: 0B 6A 00 99 22 2E 2C 20 45 30 37 37 20 44 30 20 |.j.."., E077 D0 |
00000360: 46 31 20 20 20 20 42 4E 45 20 24 45 30 36 41 22 |F1 BNE $E06A"|
00000370: 3A 8D 36 33 30 30 30 00 9E 0B 6E 00 99 22 13 2E |:.63000...n.."..|
00000380: 2C 20 45 30 36 38 20 41 39 20 32 30 20 20 20 20 |, E068 A9 20 |
00000390: 12 1C 4C 44 41 20 23 24 32 33 20 20 20 22 00 C5 |..LDA #$23 "..|
000003A0: 0B 6F 00 99 22 1F 2E 2C 20 45 30 36 41 20 39 44 |.o..".., E06A 9D|
000003B0: 20 30 30 20 38 30 20 12 1C 53 54 41 20 24 30 34 | 00 80 ..STA $04|
000003C0: 30 30 2C 58 22 00 EC 0B 70 00 99 22 1F 2E 2C 20 |00,X"...p..".., |
000003D0: 45 30 36 44 20 39 44 20 30 30 20 38 31 20 12 1C |E06D 9D 00 81 ..|
000003E0: 53 54 41 20 24 30 35 30 30 2C 58 22 00 13 0C 71 |STA $0500,X"...q|
000003F0: 00 99 22 1F 2E 2C 20 45 30 37 30 20 39 44 20 30 |..".., E070 9D 0|
00000400: 30 20 38 32 20 12 1C 53 54 41 20 24 30 36 30 30 |0 82 ..STA $0600|
00000410: 2C 58 22 00 3A 0C 72 00 99 22 1F 2E 2C 20 45 30 |,X".:.r..".., E0|
00000420: 37 33 20 39 44 20 30 30 20 38 33 20 12 1C 53 54 |73 9D 00 83 ..ST|
00000430: 41 20 24 30 37 30 30 2C 58 22 00 61 0C 73 00 99 |A $0700,X".a.s..|
00000440: 22 1F 2E 2C 20 45 30 37 36 20 43 41 20 20 20 20 |".., E076 CA |
00000450: 20 20 20 12 1C 44 45 58 20 20 20 20 20 20 20 20 | ..DEX |
00000460: 22 00 88 0C 74 00 99 22 1F 2E 2C 20 45 30 37 37 |"...t..".., E077|
00000470: 20 44 30 20 46 31 20 20 20 20 12 1C 42 4E 45 20 | D0 F1 ..BNE |
00000480: 24 45 30 36 41 20 20 22 00 D0 0C 78 00 99 22 11 |$E06A "...x..".|
00000490: D1 1F 52 45 43 4F 4E 4F 43 45 20 4C 41 53 20 49 |..RECONOCE LAS I|
000004A0: 4E 53 54 52 55 43 43 49 4F 4E 45 53 20 44 45 4C |NSTRUCCIONES DEL|
000004B0: 20 20 20 20 20 20 20 20 20 20 12 45 4E 53 41 4D | .ENSAM|
000004C0: 42 4C 41 44 4F 52 92 3F 22 3A 8D 36 33 30 30 30 |BLADOR.?":.63000|
000004D0: 00 F9 0C 82 00 99 22 13 2E 2C 20 45 30 36 38 20 |......".., E068 |
000004E0: 12 1C 41 39 20 32 30 20 20 20 20 92 1F 4C 44 41 |..A9 20 ..LDA|
000004F0: 20 23 24 32 33 20 20 20 22 00 21 0D 83 00 99 22 | #$23 ".!...."|
00000500: 2E 2C 20 45 30 36 41 20 12 1C 39 44 20 30 30 20 |., E06A ..9D 00 |
00000510: 38 30 20 92 1F 53 54 41 20 24 30 34 30 30 2C 58 |80 ..STA $0400,X|
00000520: 22 00 49 0D 84 00 99 22 2E 2C 20 45 30 36 44 20 |".I...."., E06D |
00000530: 12 1C 39 44 20 30 30 20 38 31 20 92 1F 53 54 41 |..9D 00 81 ..STA|
00000540: 20 24 30 35 30 30 2C 58 22 00 71 0D 85 00 99 22 | $0500,X".q...."|
00000550: 2E 2C 20 45 30 37 30 20 12 1C 39 44 20 30 30 20 |., E070 ..9D 00 |
00000560: 38 32 20 92 1F 53 54 41 20 24 30 36 30 30 2C 58 |82 ..STA $0600,X|
00000570: 22 00 99 0D 86 00 99 22 2E 2C 20 45 30 37 33 20 |"......"., E073 |
00000580: 12 1C 39 44 20 30 30 20 38 33 20 92 1F 53 54 41 |..9D 00 83 ..STA|
00000590: 20 24 30 37 30 30 2C 58 22 00 C1 0D 87 00 99 22 | $0700,X"......"|
000005A0: 2E 2C 20 45 30 37 36 20 12 1C 43 41 20 20 20 20 |., E076 ..CA |
000005B0: 20 20 20 92 1F 44 45 58 20 20 20 20 20 20 20 20 | ..DEX |
000005C0: 22 00 E9 0D 88 00 99 22 2E 2C 20 45 30 37 37 20 |"......"., E077 |
000005D0: 12 1C 44 30 20 46 31 20 20 20 20 92 1F 42 4E 45 |..D0 F1 ..BNE|
000005E0: 20 24 45 30 36 41 20 20 22 00 19 0E 8C 00 99 22 | $E06A "......"|
000005F0: 11 11 11 11 11 1C D1 1F 45 53 54 4F 53 20 53 4F |........ESTOS SO|
00000600: 4E 20 4C 4F 53 20 42 59 54 45 53 20 28 45 4E 20 |N LOS BYTES (EN |
00000610: 48 45 58 29 20 51 55 45 22 00 44 0E 96 00 99 22 |HEX) QUE".D...."|
00000620: 20 53 45 20 45 4E 43 55 45 4E 54 52 41 4E 20 45 | SE ENCUENTRAN E|
00000630: 4E 20 4C 41 20 4D 45 4D 4F 52 49 41 22 3A 8D 36 |N LA MEMORIA":.6|
00000640: 33 30 30 30 00 69 0E A0 00 99 22 13 2E 2C 20 12 |3000.i....".., .|
00000650: 1C 45 30 36 38 20 92 1F 41 39 20 32 30 20 20 20 |.E068 ..A9 20 |
00000660: 20 4C 44 41 20 23 24 32 33 00 90 0E A1 00 99 22 | LDA #$23......"|
00000670: 2E 2C 20 12 1C 45 30 36 41 20 92 1F 39 44 20 30 |., ..E06A ..9D 0|
00000680: 30 20 38 30 20 53 54 41 20 24 30 34 30 30 2C 58 |0 80 STA $0400,X|
00000690: 00 B7 0E A2 00 99 22 2E 2C 20 12 1C 45 30 36 44 |......"., ..E06D|
000006A0: 20 92 1F 39 44 20 30 30 20 38 31 20 53 54 41 20 | ..9D 00 81 STA |
000006B0: 24 30 35 30 30 2C 58 00 DE 0E A3 00 99 22 2E 2C |$0500,X......".,|
000006C0: 20 12 1C 45 30 37 30 20 92 1F 39 44 20 30 30 20 | ..E070 ..9D 00 |
000006D0: 38 32 20 53 54 41 20 24 30 36 30 30 2C 58 00 05 |82 STA $0600,X..|
000006E0: 0F A4 00 99 22 2E 2C 20 12 1C 45 30 37 33 20 92 |...."., ..E073 .|
000006F0: 1F 39 44 20 30 30 20 38 33 20 53 54 41 20 24 30 |.9D 00 83 STA $0|
00000700: 37 30 30 2C 58 00 24 0F A5 00 99 22 2E 2C 20 12 |700,X.$...."., .|
00000710: 1C 45 30 37 36 20 92 1F 43 41 20 20 20 20 20 20 |.E076 ..CA |
00000720: 20 44 45 58 00 49 0F A6 00 99 22 2E 2C 20 12 1C | DEX.I...."., ..|
00000730: 45 30 37 37 20 92 1F 44 30 20 46 31 20 20 20 20 |E077 ..D0 F1 |
00000740: 42 4E 45 20 24 45 30 36 41 00 7C 0F AA 00 99 22 |BNE $E06A.|...."|
00000750: 11 11 11 11 11 11 11 11 11 1C D1 1F 45 53 54 41 |............ESTA|
00000760: 53 20 53 4F 4E 20 4C 41 53 20 44 49 52 45 43 43 |S SON LAS DIRECC|
00000770: 49 4F 4E 45 53 20 45 4E 20 4C 41 22 00 A3 0F B4 |IONES EN LA"....|
00000780: 00 99 22 20 4D 45 4D 4F 52 49 41 20 51 55 45 20 |.." MEMORIA QUE |
00000790: 43 4F 4E 54 49 45 4E 45 4E 20 45 4C 20 43 4F 44 |CONTIENEN EL COD|
000007A0: 49 47 4F 00 C6 0F B5 00 99 22 20 45 4E 20 4C 45 |IGO......" EN LE|
000007B0: 4E 47 55 41 4A 45 20 4D 41 51 55 49 4E 41 22 3A |NGUAJE MAQUINA":|
000007C0: 8D 36 33 30 30 30 00 E2 0F B6 00 4D 53 24 B2 22 |.63000.....MS$."|
000007D0: 20 41 44 45 4C 41 4E 54 45 20 22 3A 8D 36 33 31 | ADELANTE ":.631|
000007E0: 30 30 00 15 10 B9 00 99 22 93 1C 12 20 20 20 20 |00......"... |
000007F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4E 45 | NE|
00000800: 57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |W |
00000810: 20 20 20 20 22 00 56 10 BA 00 99 22 1F D1 56 45 | ".V...."..VE|
00000820: 41 4D 4F 53 20 51 55 45 20 50 41 53 41 20 41 4C |AMOS QUE PASA AL|
00000830: 20 45 4A 45 43 55 54 41 52 20 4C 41 20 20 20 20 | EJECUTAR LA |
00000840: 20 20 20 20 20 20 49 4E 53 54 52 55 43 43 49 4F | INSTRUCCIO|
00000850: 4E 20 4E 45 57 22 00 8F 10 BB 00 99 22 11 D1 4C |N NEW"......"..L|
00000860: 41 20 43 4F 44 49 46 49 43 41 43 49 4F 4E 20 45 |A CODIFICACION E|
00000870: 53 54 41 20 44 45 53 44 45 20 24 41 36 34 34 20 |STA DESDE $A644 |
00000880: 20 20 20 20 20 20 20 41 20 24 41 36 35 37 2E 00 | A $A657..|
00000890: BD 10 BC 00 99 22 11 1C D1 1F 52 45 43 4F 52 44 |....."....RECORD|
000008A0: 45 4D 4F 53 20 51 55 45 20 4C 4F 53 20 33 20 50 |EMOS QUE LOS 3 P|
000008B0: 52 49 4D 45 52 4F 53 20 42 59 54 45 53 00 07 11 |RIMEROS BYTES...|
000008C0: BD 00 99 22 20 51 55 45 20 53 45 20 45 4E 43 55 |..." QUE SE ENCU|
000008D0: 45 4E 54 52 41 4E 20 45 4E 20 24 30 38 30 30 2F |ENTRAN EN $0800/|
000008E0: 24 30 38 30 31 2F 24 30 38 30 32 20 20 54 49 45 |$0801/$0802 TIE|
000008F0: 4E 45 4E 20 51 55 45 20 53 45 52 20 12 30 30 20 |NEN QUE SER .00 |
00000900: 30 30 20 30 30 92 2E 00 34 11 BE 00 99 22 11 D1 |00 00...4...."..|
00000910: 43 4F 4D 4F 20 24 30 38 30 30 20 54 49 45 4E 20 |COMO $0800 TIEN |
00000920: 44 45 20 54 4F 44 41 53 20 4D 41 4E 45 52 41 53 |DE TODAS MANERAS|
00000930: 20 12 30 30 00 61 11 BF 00 99 22 20 53 4F 4C 4F | .00.a...." SOLO|
00000940: 20 4C 4C 45 4E 41 52 45 4D 4F 53 20 24 30 38 30 | LLENAREMOS $080|
00000950: 31 2F 24 30 38 30 32 20 43 4F 4E 20 12 30 30 92 |1/$0802 CON .00.|
00000960: 2E 00 91 11 C0 00 99 22 11 1C D1 1F 45 4C 20 50 |......."....EL P|
00000970: 55 4E 54 45 52 4F 20 44 45 4C 20 12 43 4F 4D 49 |UNTERO DEL .COMI|
00000980: 45 4E 5A 4F 20 44 45 20 42 41 53 49 43 92 20 53 |ENZO DE BASIC. S|
00000990: 45 00 BE 11 C1 00 99 22 20 45 4E 43 55 45 4E 54 |E......" ENCUENT|
000009A0: 52 41 20 45 4E 20 24 32 42 2F 24 32 43 20 59 20 |RA EN $2B/$2C Y |
000009B0: 45 4C 20 50 55 4E 54 45 52 4F 20 44 45 4C 00 F2 |EL PUNTERO DEL..|
000009C0: 11 C2 00 99 22 20 12 46 49 4E 20 44 45 4C 20 42 |...." .FIN DEL B|
000009D0: 41 53 49 43 92 2C 20 53 45 20 45 53 54 41 20 45 |ASIC., SE ESTA E|
000009E0: 4E 20 24 32 44 2F 24 32 45 2C 22 3A 8D 36 33 30 |N $2D/$2E,":.630|
000009F0: 30 30 00 02 12 C4 00 99 22 93 11 11 11 11 11 11 |00......".......|
00000A00: 22 3B 00 30 12 DC 00 99 22 13 11 11 11 11 11 11 |";.0....".......|
00000A10: 2E 2C 20 41 36 34 34 20 41 39 20 30 30 20 20 20 |., A644 A9 00 |
00000A20: 20 12 4C 44 41 20 23 24 30 30 20 20 20 92 5F 22 | .LDA #$00 ._"|
00000A30: 00 57 12 DD 00 99 22 2E 2C 20 41 36 34 36 20 41 |.W...."., A646 A|
00000A40: 38 20 20 20 20 20 20 20 12 54 41 59 20 20 20 20 |8 .TAY |
00000A50: 20 20 20 20 92 5F 22 00 87 12 E6 00 8D 36 33 34 | ._"......634|
00000A60: 30 30 3A 99 22 4C 4F 53 20 52 45 47 49 53 54 52 |00:."LOS REGISTR|
00000A70: 4F 53 20 12 41 92 20 59 20 12 59 92 20 53 45 20 |OS .A. Y .Y. SE |
00000A80: 4C 4C 45 4E 41 4E 22 00 AE 12 F0 00 99 22 11 43 |LLENAN"......".C|
00000A90: 4F 4E 20 23 24 12 30 30 92 2E 2E 41 4C 20 45 4D |ON #$.00...AL EM|
00000AA0: 50 45 5A 41 52 2E 22 3A 8D 36 33 30 30 30 00 E8 |PEZAR.":.63000..|
00000AB0: 12 FA 00 99 22 13 11 11 11 11 11 11 11 11 2E 2C |...."..........,|
00000AC0: 20 41 36 34 37 20 39 31 20 32 42 20 20 20 20 12 | A647 91 2B .|
00000AD0: 53 54 41 20 28 24 32 42 29 2C 59 92 91 91 20 11 |STA ($2B),Y... .|
00000AE0: 9D 20 11 9D 1C 5F 1F 22 00 1B 13 04 01 8D 36 33 |. ..._."......63|
00000AF0: 34 30 30 3A 99 22 13 43 4F 4D 4F 20 12 24 32 42 |400:.".COMO .$2B|
00000B00: 92 20 43 4F 4E 54 49 45 4E 45 20 4C 41 20 44 49 |. CONTIENE LA DI|
00000B10: 52 45 43 43 49 4F 4E 20 44 45 4C 00 49 13 0E 01 |RECCION DEL.I...|
00000B20: 99 22 11 43 4F 4D 49 45 4E 5A 4F 20 44 45 20 42 |.".COMIENZO DE B|
00000B30: 41 53 49 43 2C 28 47 45 4E 45 52 41 4C 4D 45 4E |ASIC,(GENERALMEN|
00000B40: 54 45 20 24 30 38 30 31 29 00 79 13 18 01 99 22 |TE $0801).y...."|
00000B50: 11 23 24 12 30 30 92 20 45 53 20 41 4C 4D 41 43 |.#$.00. ES ALMAC|
00000B60: 45 4E 41 44 4F 20 45 4E 20 28 24 32 42 29 2B 59 |ENADO EN ($2B)+Y|
00000B70: 2E 22 3A 8D 36 33 30 30 30 00 AF 13 22 01 8D 36 |.":.63000..."..6|
00000B80: 33 34 30 30 3A 99 22 41 48 4F 52 41 20 43 4F 4E |3400:."AHORA CON|
00000B90: 20 12 49 4E 59 92 20 4E 4F 53 20 50 52 45 50 41 | .INY. NOS PREPA|
00000BA0: 52 41 4D 4F 53 20 41 20 47 55 41 52 44 41 52 00 |RAMOS A GUARDAR.|
00000BB0: DB 13 2C 01 99 22 11 23 24 12 30 30 92 20 45 4E |..,..".#$.00. EN|
00000BC0: 20 45 4C 20 53 45 47 55 4E 44 4F 20 42 59 54 45 | EL SEGUNDO BYTE|
00000BD0: 20 44 45 20 27 42 41 53 49 43 27 00 F9 13 36 01 | DE 'BASIC'...6.|
00000BE0: 99 22 11 47 45 4E 45 52 41 4C 4D 45 4E 54 45 20 |.".GENERALMENTE |
00000BF0: 45 4E 20 24 30 38 30 32 2E 00 37 14 40 01 99 22 |EN $0802..7.@.."|
00000C00: 13 11 11 11 11 11 11 11 11 11 2E 2C 20 41 36 34 |..........., A64|
00000C10: 39 20 43 38 20 20 20 20 20 20 20 12 49 4E 59 20 |9 C8 .INY |
00000C20: 20 20 20 20 20 20 20 92 91 20 11 9D 1C 5F 1F 22 | .. ..._."|
00000C30: 3A 8D 36 33 30 30 30 00 6F 14 4A 01 99 22 13 11 |:.63000.o.J.."..|
00000C40: 11 11 11 11 11 11 11 11 11 2E 2C 20 41 36 34 41 |.........., A64A|
00000C50: 20 39 31 20 32 42 20 20 20 20 12 53 54 41 20 28 | 91 2B .STA (|
00000C60: 24 32 42 29 2C 59 92 91 20 11 9D 1C 5F 1F 22 00 |$2B),Y.. ..._.".|
00000C70: 8F 14 54 01 8D 36 33 34 30 30 3A 99 22 1C 41 4C |..T..63400:.".AL|
00000C80: 4C 41 20 56 41 21 1F 22 3A 8D 36 33 30 30 30 00 |LA VA!.":.63000.|
00000C90: BD 14 5E 01 8D 36 33 34 30 30 3A 99 22 45 4C 20 |..^..63400:."EL |
00000CA0: 12 46 49 4E 92 20 44 45 4C 20 42 41 53 49 43 20 |.FIN. DEL BASIC |
00000CB0: 54 49 45 4E 45 20 51 55 45 20 53 45 52 00 EC 14 |TIENE QUE SER...|
00000CC0: 68 01 99 22 11 43 41 4D 42 49 41 44 4F 20 41 48 |h..".CAMBIADO AH|
00000CD0: 4F 52 41 20 50 4F 52 20 12 24 30 38 30 33 92 20 |ORA POR .$0803. |
00000CE0: 59 20 45 4C 20 50 55 4E 54 45 52 4F 00 14 15 72 |Y EL PUNTERO...r|
00000CF0: 01 99 22 11 41 4C 4D 41 43 45 4E 41 44 4F 20 45 |..".ALMACENADO E|
00000D00: 4E 20 12 24 32 44 2F 24 32 45 92 2E 22 3A 8D 36 |N .$2D/$2E..":.6|
00000D10: 33 30 30 30 00 4D 15 73 01 99 22 13 11 11 11 11 |3000.M.s..".....|
00000D20: 11 11 11 11 11 11 11 2E 2C 20 41 36 34 43 20 41 |........, A64C A|
00000D30: 35 20 32 42 20 20 20 20 12 4C 44 41 20 24 32 42 |5 2B .LDA $2B|
00000D40: 20 20 20 20 92 91 20 11 9D 1C 5F 1F 22 00 77 15 | .. ..._.".w.|
00000D50: 7C 01 8D 36 33 34 30 30 3A 99 22 43 4F 4E 20 12 ||..63400:."CON .|
00000D60: 4C 44 41 20 24 32 42 92 20 4E 4F 53 20 50 52 45 |LDA $2B. NOS PRE|
00000D70: 50 41 52 41 4D 4F 53 00 92 15 86 01 99 22 11 41 |PARAMOS......".A|
00000D80: 20 53 55 4D 41 52 20 32 2E 2E 22 3A 8D 36 33 30 | SUMAR 2..":.630|
00000D90: 30 30 00 CB 15 90 01 8D 36 33 34 30 30 3A 99 22 |00......63400:."|
00000DA0: 50 45 52 4F 20 52 45 43 55 45 52 44 45 20 44 45 |PERO RECUERDE DE|
00000DB0: 20 48 41 43 45 52 20 41 4E 54 45 53 20 12 43 4C | HACER ANTES .CL|
00000DC0: 43 92 21 22 3A 8D 36 33 30 30 30 00 0C 16 9A 01 |C.!":.63000.....|
00000DD0: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 2E |."..............|
00000DE0: 2C 20 41 36 34 45 20 31 38 20 20 20 20 20 20 20 |, A64E 18 |
00000DF0: 12 43 4C 43 20 20 20 20 20 20 20 20 92 91 20 11 |.CLC .. .|
00000E00: 9D 1C 5F 1F 22 3A 8D 36 33 30 30 30 00 47 16 A4 |.._.":.63000.G..|
00000E10: 01 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
00000E20: 11 2E 2C 20 41 43 34 46 20 36 39 20 30 32 20 20 |.., AC4F 69 02 |
00000E30: 20 20 12 41 44 43 20 23 24 30 32 20 20 20 92 91 | .ADC #$02 ..|
00000E40: 20 11 9D 1C 5F 1F 22 00 8A 16 AE 01 8D 36 33 34 | ..._."......634|
00000E50: 30 30 3A 99 22 56 45 41 2E 2E 53 55 4D 41 4D 4F |00:."VEA..SUMAMO|
00000E60: 53 20 32 2E 22 3A 99 22 11 59 20 44 45 53 50 55 |S 2.":.".Y DESPU|
00000E70: 45 53 20 47 55 41 52 44 41 4D 4F 53 20 45 53 54 |ES GUARDAMOS EST|
00000E80: 45 20 4C 4F 2D 42 59 54 45 22 00 A1 16 B8 01 99 |E LO-BYTE"......|
00000E90: 22 11 45 4E 20 24 32 44 2E 22 3A 8D 36 33 30 30 |".EN $2D.":.6300|
00000EA0: 30 00 E4 16 C2 01 99 22 13 11 11 11 11 11 11 11 |0......"........|
00000EB0: 11 11 11 11 11 11 11 2E 2C 20 41 36 35 31 20 38 |........, A651 8|
00000EC0: 35 20 32 44 20 20 20 20 12 53 54 41 20 24 32 44 |5 2D .STA $2D|
00000ED0: 20 20 20 20 92 91 20 11 9D 1C 5F 1F 22 3A 8D 36 | .. ..._.":.6|
00000EE0: 33 30 30 30 00 19 17 CC 01 8D 36 33 34 30 30 3A |3000......63400:|
00000EF0: 99 22 41 48 4F 52 41 20 48 41 59 20 51 55 45 20 |."AHORA HAY QUE |
00000F00: 50 4F 4E 45 52 20 45 4C 20 48 49 2D 42 59 54 45 |PONER EL HI-BYTE|
00000F10: 20 45 4E 20 24 32 45 2E 22 00 52 17 D6 01 99 22 | EN $2E.".R...."|
00000F20: 11 53 45 20 50 52 45 50 41 52 41 20 12 4C 44 41 |.SE PREPARA .LDA|
00000F30: 20 24 32 43 92 20 51 55 45 20 4C 55 45 47 4F 20 | $2C. QUE LUEGO |
00000F40: 49 52 41 20 41 20 24 32 45 2E 22 3A 8D 36 33 30 |IRA A $2E.":.630|
00000F50: 30 30 00 96 17 E0 01 99 22 13 11 11 11 11 11 11 |00......".......|
00000F60: 11 11 11 11 11 11 11 11 11 2E 2C 20 41 36 35 33 |.........., A653|
00000F70: 20 41 35 20 32 43 20 20 20 20 12 4C 44 41 20 24 | A5 2C .LDA $|
00000F80: 32 43 20 20 20 20 92 91 20 11 9D 1C 5F 1F 22 3A |2C .. ..._.":|
00000F90: 8D 36 33 30 30 30 00 C9 17 EA 01 8D 36 33 34 30 |.63000......6340|
00000FA0: 30 3A 99 22 50 45 52 4F 2C 20 53 49 20 50 4F 52 |0:."PERO, SI POR|
00000FB0: 20 53 49 20 41 43 41 53 4F 20 48 41 59 20 55 4E | SI ACASO HAY UN|
00000FC0: 20 12 43 41 52 52 59 92 22 00 F8 17 F4 01 99 22 | .CARRY."......"|
00000FD0: 11 44 45 4A 41 44 4F 20 50 4F 52 20 12 41 44 43 |.DEJADO POR .ADC|
00000FE0: 20 23 24 30 32 92 20 48 41 43 45 4D 4F 53 2E 2E | #$02. HACEMOS..|
00000FF0: 22 3A 8D 36 33 30 30 30 00 3D 18 FE 01 99 22 13 |":.63000.=....".|
00001000: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001010: 2E 2C 20 41 36 35 35 20 36 39 20 30 30 20 20 20 |., A655 69 00 |
00001020: 20 12 41 44 43 20 23 24 30 30 20 20 20 92 91 20 | .ADC #$00 .. |
00001030: 11 9D 1C 5F 1F 22 3A 8D 36 33 30 30 30 00 6F 18 |..._.":.63000.o.|
00001040: 08 02 8D 36 33 34 30 30 3A 99 22 12 1C 41 48 4F |...63400:."..AHO|
00001050: 52 41 1F 20 50 4F 44 45 4D 4F 53 20 43 4F 4C 4F |RA. PODEMOS COLO|
00001060: 43 41 52 20 45 4C 20 48 49 2D 42 59 54 45 22 00 |CAR EL HI-BYTE".|
00001070: 8D 18 12 02 99 22 11 44 45 4E 54 52 4F 20 44 45 |.....".DENTRO DE|
00001080: 20 24 32 45 2E 22 3A 8D 36 33 30 30 30 00 D3 18 | $2E.":.63000...|
00001090: 1C 02 99 22 13 11 11 11 11 11 11 11 11 11 11 11 |..."............|
000010A0: 11 11 11 11 11 11 2E 2C 20 41 36 35 37 20 38 35 |......., A657 85|
000010B0: 20 32 45 20 20 20 20 12 53 54 41 20 24 32 45 20 | 2E .STA $2E |
000010C0: 20 20 20 92 91 20 11 9D 1C 5F 1F 22 3A 8D 36 33 | .. ..._.":.63|
000010D0: 30 30 30 00 FF 18 26 02 8D 36 33 34 30 30 3A 4D |000...&..63400:M|
000010E0: 53 24 B2 22 12 20 51 55 45 20 4C 49 4E 44 4F 92 |S$.". QUE LINDO.|
000010F0: 22 3A 8D 36 33 31 30 30 3A 8D 36 33 30 30 30 00 |":.63100:.63000.|
00001100: 32 19 30 02 99 22 93 12 1C 20 20 20 20 20 20 20 |2.0.."... |
00001110: 20 20 20 20 20 20 45 4E 43 41 44 45 4E 41 4D 49 | ENCADENAMI|
00001120: 45 4E 54 4F 20 20 20 20 20 20 20 20 20 20 20 20 |ENTO |
00001130: 20 22 00 59 19 35 02 99 22 11 1F D1 41 48 4F 52 | ".Y.5.."...AHOR|
00001140: 41 20 56 45 52 45 4D 4F 53 20 43 4F 4D 4F 20 53 |A VEREMOS COMO S|
00001150: 45 20 48 41 43 45 20 45 4E 00 82 19 37 02 99 22 |E HACE EN...7.."|
00001160: 20 42 41 53 49 43 20 45 4C 20 45 4E 43 41 44 45 | BASIC EL ENCADE|
00001170: 4E 41 4D 49 45 4E 54 4F 20 45 4E 54 52 45 20 55 |NAMIENTO ENTRE U|
00001180: 4E 41 00 A5 19 39 02 99 22 20 49 4E 53 54 52 55 |NA...9.." INSTRU|
00001190: 43 43 49 4F 4E 20 59 20 4C 41 20 53 49 47 55 49 |CCION Y LA SIGUI|
000011A0: 45 4E 54 45 2E 00 CF 19 3A 02 99 22 11 11 D1 4C |ENTE....:.."...L|
000011B0: 41 53 20 49 4E 53 54 52 55 43 43 49 4F 4E 45 53 |AS INSTRUCCIONES|
000011C0: 20 45 4E 20 42 41 53 49 43 20 45 53 54 41 4E 00 | EN BASIC ESTAN.|
000011D0: E3 19 3B 02 99 22 20 45 53 4C 41 42 4F 4E 41 44 |..;.." ESLABONAD|
000011E0: 41 53 2E 00 10 1A 3C 02 99 22 20 43 41 44 41 20 |AS....<.." CADA |
000011F0: 56 45 5A 20 51 55 45 20 49 4E 53 45 52 54 41 4D |VEZ QUE INSERTAM|
00001200: 4F 53 20 4F 20 4D 4F 44 49 46 49 43 41 4D 4F 53 |OS O MODIFICAMOS|
00001210: 00 4E 1A 3D 02 99 22 20 55 4E 41 20 4C 49 4E 45 |.N.=.." UNA LINE|
00001220: 41 2C 20 45 53 54 4F 53 20 45 53 4C 41 42 4F 4E |A, ESTOS ESLABON|
00001230: 45 53 20 54 49 45 4E 45 4E 20 51 55 45 20 20 20 |ES TIENEN QUE |
00001240: 53 45 52 20 52 45 43 52 45 41 44 4F 53 22 00 77 |SER RECREADOS".w|
00001250: 1A 3E 02 99 22 20 45 53 54 4F 20 53 45 20 4C 4C |.>.." ESTO SE LL|
00001260: 41 4D 41 20 12 90 45 4E 43 41 44 45 4E 41 4D 49 |AMA ..ENCADENAMI|
00001270: 45 4E 54 4F 92 2E 22 00 A6 1A 44 02 99 22 1F 11 |ENTO.."...D.."..|
00001280: 11 D1 52 45 43 55 45 52 44 45 20 51 55 45 20 4C |..RECUERDE QUE L|
00001290: 41 53 20 49 4E 53 54 52 55 43 43 49 4F 4E 45 53 |AS INSTRUCCIONES|
000012A0: 20 42 41 53 49 43 00 EB 1A 4E 02 99 22 20 45 53 | BASIC...N.." ES|
000012B0: 54 41 4E 20 41 4C 4D 41 43 45 4E 41 44 41 53 20 |TAN ALMACENADAS |
000012C0: 44 45 53 44 45 20 1C 24 30 38 30 31 1F 20 45 4E |DESDE .$0801. EN|
000012D0: 20 45 4C 20 20 20 20 20 53 49 47 55 49 45 4E 54 | EL SIGUIENT|
000012E0: 45 20 46 4F 52 4D 41 54 4F 3A 22 00 FB 1A 53 02 |E FORMATO:"...S.|
000012F0: 8D 36 33 30 30 30 3A 99 22 93 22 00 32 1B 58 02 |.63000:.".".2.X.|
00001300: 42 41 24 B2 22 B2 C0 C0 C0 C0 B2 C0 C0 C0 C0 B2 |BA$."...........|
00001310: C0 C0 C0 C0 B2 C0 C0 C0 C0 B2 C0 C0 C0 C0 B2 C0 |................|
00001320: 20 B2 C0 C0 C0 C0 B2 C0 C0 C0 C0 22 AA C7 28 31 | .........."..(1|
00001330: 33 29 00 69 1B 62 02 5A 24 B2 22 DD 20 20 20 20 |3).i.b.Z$.". |
00001340: DD 20 A0 A0 A0 DD A0 A0 20 A0 DD A0 20 A0 A0 DD |. ...... ... ...|
00001350: 20 A0 A0 A0 DD 2D 2D DD 20 20 20 20 DD 20 20 20 | ....--. . |
00001360: 20 DD 22 AA C7 28 31 33 29 00 B5 1B 6C 02 42 41 | ."..(13)...l.BA|
00001370: 24 B2 42 41 24 AA 5A 24 AA 5A 24 AA 5A 24 AA 22 |$.BA$.Z$.Z$.Z$."|
00001380: B1 C0 C0 C0 C0 B1 C0 C0 C0 C0 B1 C0 C0 C0 C0 B1 |................|
00001390: C0 C0 C0 C0 B1 C0 C0 C0 C0 B1 C0 20 B1 C0 C0 C0 |........... ....|
000013A0: C0 B1 C0 C0 C0 C0 22 AA C7 28 31 33 29 AA 22 1D |......"..(13).".|
000013B0: 91 91 91 91 22 00 F2 1B 76 02 99 42 54 24 22 91 |...."...v..BT$".|
000013C0: 91 91 91 91 91 91 22 42 41 24 AA 22 4C 49 4E 4B |......"BA$."LINK|
000013D0: 20 4C 49 4E 4B 20 4E 55 4D 2E 20 4E 55 4D 2E 20 | LINK NUM. NUM. |
000013E0: 41 52 45 41 20 20 20 20 42 59 54 45 20 4C 49 4E |AREA BYTE LIN|
000013F0: 4B 22 00 1F 1C 80 02 99 22 20 42 59 54 45 20 42 |K"......" BYTE B|
00001400: 59 54 45 20 49 4E 53 54 20 49 4E 53 54 20 54 45 |YTE INST INST TE|
00001410: 58 54 4F 20 20 20 43 45 52 4F 20 42 59 54 45 00 |XTO CERO BYTE.|
00001420: 4C 1C 8A 02 99 22 20 42 41 4A 4F 20 41 4C 54 4F |L...." BAJO ALTO|
00001430: 20 42 41 4A 41 20 41 4C 54 41 20 42 41 53 49 43 | BAJA ALTA BASIC|
00001440: 20 20 20 3D 46 49 4E 20 42 41 4A 4F 00 92 1C 94 | =FIN BAJO....|
00001450: 02 4D 31 24 B2 42 54 24 AA 22 91 91 20 12 1C 5E |.M1$.BT$.".. ..^|
00001460: 5E 5E 5E 20 5E 5E 5E 5E 1F 92 22 3A 99 4D 31 24 |^^^ ^^^^..":.M1$|
00001470: 3A 99 22 13 11 1C D1 1F 45 53 54 41 20 45 4C 20 |:.".....ESTA EL |
00001480: 4C 41 20 44 49 52 45 43 43 49 4F 4E 20 44 45 20 |LA DIRECCION DE |
00001490: 4C 41 00 BC 1C 9E 02 99 22 20 50 52 4F 58 49 4D |LA......" PROXIM|
000014A0: 41 20 49 4E 53 54 52 55 43 43 49 4F 4E 20 42 41 |A INSTRUCCION BA|
000014B0: 53 49 43 2E 22 3A 8D 36 33 30 30 30 00 EA 1C A8 |SIC.":.63000....|
000014C0: 02 4D 32 24 B2 42 54 24 AA 22 91 91 20 20 20 20 |.M2$.BT$.".. |
000014D0: 20 20 20 20 20 20 20 12 1C 5E 5E 5E 5E 20 5E 5E | ..^^^^ ^^|
000014E0: 5E 5E 1F 92 22 3A 99 4D 32 24 00 1F 1D B2 02 99 |^^..":.M2$......|
000014F0: 22 13 11 11 11 11 1C D1 1F 45 53 54 45 20 45 53 |"........ESTE ES|
00001500: 20 45 4C 20 4E 55 4D 45 52 4F 20 44 45 20 4C 41 | EL NUMERO DE LA|
00001510: 20 4C 49 4E 45 41 20 44 45 20 42 41 53 49 43 00 | LINEA DE BASIC.|
00001520: 53 1D BC 02 99 22 20 50 52 49 4D 45 52 4F 20 42 |S...." PRIMERO B|
00001530: 59 54 45 20 42 41 4A 4F 20 44 45 53 50 55 45 53 |YTE BAJO DESPUES|
00001540: 20 42 59 54 45 20 41 4C 54 4F 2E 22 3A 8D 36 33 | BYTE ALTO.":.63|
00001550: 30 30 30 00 88 1D C6 02 4D 33 24 B2 42 54 24 AA |000.....M3$.BT$.|
00001560: 22 91 91 20 20 20 20 20 20 20 20 20 20 20 20 20 |".. |
00001570: 20 20 20 20 20 20 20 20 12 1C 5E 5E 5E 5E 5E 5E | ..^^^^^^|
00001580: 92 1F 22 3A 99 4D 33 24 00 BC 1D D0 02 99 22 13 |..":.M3$......".|
00001590: 11 11 11 11 11 11 11 1C D1 1F 45 53 54 45 20 45 |..........ESTE E|
000015A0: 53 20 45 4C 20 54 45 58 54 4F 20 45 4E 20 42 41 |S EL TEXTO EN BA|
000015B0: 53 49 43 2E 22 3A 8D 36 33 30 30 30 00 F7 1D E4 |SIC.":.63000....|
000015C0: 02 4D 34 24 B2 42 54 24 AA 22 91 91 20 20 20 20 |.M4$.BT$.".. |
000015D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000015E0: 20 20 20 20 20 20 20 20 20 12 1C 5E 5E 5E 5E 1F | ..^^^^.|
000015F0: 92 22 3A 99 4D 34 24 00 29 1E EE 02 99 22 13 11 |.":.M4$.)...."..|
00001600: 11 11 11 11 11 11 11 11 1C D1 1F 46 49 4E 20 44 |...........FIN D|
00001610: 45 20 4C 41 20 49 4E 53 54 52 55 43 43 49 4F 4E |E LA INSTRUCCION|
00001620: 2E 22 3A 8D 36 33 30 30 30 00 69 1E F8 02 4D 35 |.":.63000.i...M5|
00001630: 24 B2 42 54 24 AA 22 91 91 20 20 20 20 20 20 20 |$.BT$.".. |
00001640: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001650: 20 20 20 20 20 20 20 20 20 20 20 12 1C 5E 5E 5E | ..^^^|
00001660: 5E 1F 92 22 3A 99 4D 35 24 00 9A 1E 02 03 99 22 |^..":.M5$......"|
00001670: 13 11 11 11 11 11 11 11 11 11 11 11 1C D1 1F 45 |...............E|
00001680: 4C 20 50 52 4F 58 49 4D 4F 20 45 53 4C 41 42 4F |L PROXIMO ESLABO|
00001690: 4E 2E 22 3A 8D 36 33 30 30 30 00 B4 1E 07 03 99 |N.":.63000......|
000016A0: 4D 35 24 22 9D 9D 9D 9D 20 20 20 20 22 3A 8D 33 |M5$".... ":.3|
000016B0: 39 30 30 30 00 FE 1E 0C 03 99 22 11 D1 50 41 52 |9000......"..PAR|
000016C0: 41 20 45 4E 43 4F 4E 54 52 41 52 20 45 4C 20 43 |A ENCONTRAR EL C|
000016D0: 4F 4D 49 45 4E 5A 4F 20 44 45 4C 20 42 41 53 49 |OMIENZO DEL BASI|
000016E0: 43 20 20 20 20 28 47 45 4E 45 52 41 4C 45 4D 45 |C (GENERALEME|
000016F0: 4E 54 45 20 45 4E 20 24 30 38 30 31 29 22 00 2A |NTE EN $0801)".*|
00001700: 1F 16 03 99 22 20 4D 49 52 41 52 45 4D 4F 53 20 |...." MIRAREMOS |
00001710: 45 4E 20 24 32 42 2F 24 32 43 20 50 41 52 41 20 |EN $2B/$2C PARA |
00001720: 4F 42 54 45 4E 45 52 20 45 4C 00 6F 1F 20 03 99 |OBTENER EL.o. ..|
00001730: 22 20 50 55 4E 54 45 52 4F 20 41 4C 20 50 52 49 |" PUNTERO AL PRI|
00001740: 4D 45 52 20 45 53 4C 41 42 4F 4E 20 28 42 59 54 |MER ESLABON (BYT|
00001750: 45 20 42 41 4A 4F 29 2E 22 3A 99 4D 31 24 22 9D |E BAJO).":.M1$".|
00001760: 9D 9D 9D 20 20 20 20 22 3A 8D 36 33 30 30 30 00 |... ":.63000.|
00001770: A4 1F 2A 03 99 22 13 11 11 11 11 11 11 1C D1 1F |..*.."..........|
00001780: 44 45 53 50 55 45 53 20 49 52 45 4D 4F 53 20 48 |DESPUES IREMOS H|
00001790: 41 53 54 41 20 45 4C 20 46 49 4E 41 4C 20 44 45 |ASTA EL FINAL DE|
000017A0: 20 4C 41 22 00 CF 1F 34 03 99 22 20 50 52 49 4D | LA"...4.." PRIM|
000017B0: 45 52 41 20 49 4E 53 54 52 55 43 43 49 4F 4E 20 |ERA INSTRUCCION |
000017C0: 42 41 53 49 43 2E 2E 2E 2E 22 3A 99 4D 34 24 00 |BASIC....":.M4$.|
000017D0: 07 20 3E 03 8D 36 33 30 30 30 3A 99 22 13 11 11 |. >..63000:."...|
000017E0: 11 11 11 11 11 11 20 59 20 41 4C 4D 41 43 45 4E |...... Y ALMACEN|
000017F0: 41 52 45 4D 4F 53 20 4C 41 20 44 49 52 45 43 43 |AREMOS LA DIRECC|
00001800: 49 4F 4E 20 44 45 4C 00 48 20 48 03 99 4D 35 24 |ION DEL.H H..M5$|
00001810: 3A 8D 36 33 30 30 30 3A 99 22 13 11 11 11 11 11 |:.63000:."......|
00001820: 11 11 11 11 11 20 45 53 4C 41 42 4F 4E 20 53 49 |..... ESLABON SI|
00001830: 47 55 49 45 4E 54 45 20 45 4E 20 24 30 38 30 31 |GUIENTE EN $0801|
00001840: 2F 24 30 38 30 32 2E 22 00 68 20 52 03 99 4D 35 |/$0802.".h R..M5|
00001850: 24 22 9D 9D 9D 9D 20 20 20 20 22 3A 99 4D 31 24 |$".... ":.M1$|
00001860: 3B 3A 8D 36 33 30 30 30 00 82 20 5C 03 8D 33 39 |;:.63000.. \..39|
00001870: 30 30 30 3A 99 4D 31 24 22 9D 9D 9D 9D 20 20 20 |000:.M1$".... |
00001880: 20 22 00 B3 20 66 03 99 22 13 11 11 1C D1 1F 55 | ".. f.."......U|
00001890: 4E 41 20 56 45 5A 20 45 53 54 41 4E 44 4F 20 45 |NA VEZ ESTANDO E|
000018A0: 4E 20 45 4C 20 42 59 54 45 20 42 41 4A 4F 20 44 |N EL BYTE BAJO D|
000018B0: 45 4C 22 00 E1 20 70 03 99 22 20 45 53 4C 41 42 |EL".. p.." ESLAB|
000018C0: 4F 4E 20 50 4F 44 45 4D 4F 53 20 53 41 4C 54 41 |ON PODEMOS SALTA|
000018D0: 52 20 1C 50 4F 52 20 4C 4F 20 4D 45 4E 4F 53 2D |R .POR LO MENOS-|
000018E0: 22 00 0E 21 7A 03 99 22 20 35 20 42 59 54 45 53 |"..!z.." 5 BYTES|
000018F0: 1F 20 41 4E 54 45 53 20 44 45 20 45 4D 50 45 5A |. ANTES DE EMPEZ|
00001900: 41 52 20 41 20 42 55 53 43 41 52 20 45 4C 00 3F |AR A BUSCAR EL.?|
00001910: 21 7F 03 99 22 20 42 59 54 45 20 1C 12 30 30 92 |!..." BYTE ..00.|
00001920: 1F 20 51 55 45 20 49 4E 44 49 43 41 20 45 4C 20 |. QUE INDICA EL |
00001930: 1C 46 49 4E 41 4C 1F 20 44 45 4C 20 4C 41 22 00 |.FINAL. DEL LA".|
00001940: 6A 21 84 03 99 22 20 49 4E 53 54 52 55 43 43 49 |j!..." INSTRUCCI|
00001950: 4F 4E 20 42 41 53 49 43 20 45 4E 20 43 55 52 53 |ON BASIC EN CURS|
00001960: 4F 2E 22 3A 8D 36 33 30 30 30 00 99 21 8E 03 81 |O.":.63000..!...|
00001970: 54 B2 31 A4 32 30 30 3A 82 3A 99 4D 32 24 3A 81 |T.1.200:.:.M2$:.|
00001980: 54 B2 31 A4 32 30 30 3A 82 3A 99 4D 33 24 3A 81 |T.1.200:.:.M3$:.|
00001990: 54 B2 31 A4 32 30 30 3A 82 00 A9 21 93 03 99 4D |T.1.200:...!...M|
000019A0: 34 24 3A 8D 36 33 30 30 30 00 CF 21 98 03 99 22 |4$:.63000..!..."|
000019B0: 93 2E 2C 20 42 34 42 36 20 41 35 20 32 42 20 20 |.., B4B6 A5 2B |
000019C0: 20 20 12 4C 44 41 20 24 32 42 20 20 20 20 22 00 | .LDA $2B ".|
000019D0: F4 21 99 03 99 22 2E 2C 20 42 34 42 38 20 41 34 |.!..."., B4B8 A4|
000019E0: 20 32 43 20 20 20 20 12 4C 44 59 20 24 32 43 20 | 2C .LDY $2C |
000019F0: 20 20 20 22 00 19 22 9A 03 99 22 2E 2C 20 42 34 | ".."..."., B4|
00001A00: 42 41 20 38 35 20 32 32 20 20 20 20 12 53 54 41 |BA 85 22 .STA|
00001A10: 20 24 32 32 20 20 20 20 22 00 3E 22 9B 03 99 22 | $22 ".>"..."|
00001A20: 2E 2C 20 42 34 42 43 20 38 34 20 32 33 20 20 20 |., B4BC 84 23 |
00001A30: 20 12 53 54 59 20 24 32 33 20 20 20 20 22 00 6D | .STY $23 ".m|
00001A40: 22 A2 03 99 22 11 1C D1 1F 4C 41 20 44 49 52 45 |"..."....LA DIRE|
00001A50: 43 43 49 4F 4E 20 51 55 45 20 49 4E 44 49 43 41 |CCION QUE INDICA|
00001A60: 20 45 4C 20 43 4F 4D 49 45 4E 5A 4F 22 00 AA 22 | EL COMIENZO".."|
00001A70: AC 03 99 22 20 53 45 20 4F 42 54 49 45 4E 45 20 |..." SE OBTIENE |
00001A80: 45 4E 20 24 32 42 2F 24 32 43 20 59 20 53 45 20 |EN $2B/$2C Y SE |
00001A90: 47 55 41 52 44 41 20 20 20 20 20 20 20 45 4E 1C |GUARDA EN.|
00001AA0: 20 24 32 32 2F 24 32 33 2E 22 00 D3 22 D4 03 99 | $22/$23.".."...|
00001AB0: 22 11 D1 1F 45 4E 20 24 32 32 2F 24 32 33 20 45 |"...EN $22/$23 E|
00001AC0: 53 54 41 52 41 20 44 45 50 4F 53 49 54 41 44 4F |STARA DEPOSITADO|
00001AD0: 20 45 4C 00 FF 22 DE 03 99 22 20 45 53 4C 41 42 | EL.."..." ESLAB|
00001AE0: 4F 4E 20 12 42 59 54 45 20 42 41 4A 4F 92 20 44 |ON .BYTE BAJO. D|
00001AF0: 55 52 41 4E 54 45 20 4E 55 45 53 54 52 41 22 00 |URANTE NUESTRA".|
00001B00: 2B 23 E8 03 99 22 20 4D 41 52 43 48 41 20 41 20 |+#..." MARCHA A |
00001B10: 54 52 41 56 45 53 20 44 45 20 4C 41 53 20 49 4E |TRAVES DE LAS IN|
00001B20: 53 54 55 43 43 49 4F 4E 45 53 2E 00 53 23 EA 03 |STUCCIONES..S#..|
00001B30: 99 22 11 1C D1 1F 45 4E 20 45 53 54 41 20 44 49 |."....EN ESTA DI|
00001B40: 52 45 43 43 49 4F 4E 20 48 41 52 45 4D 4F 53 20 |RECCION HAREMOS |
00001B50: 4C 41 53 00 75 23 EC 03 99 22 20 4D 4F 44 49 46 |LAS.u#..." MODIF|
00001B60: 49 43 41 43 49 4F 4E 45 53 20 4E 45 43 45 53 41 |ICACIONES NECESA|
00001B70: 52 49 41 53 2E 00 A3 23 F2 03 99 22 11 1C D1 1F |RIAS...#..."....|
00001B80: 41 4C 20 45 4D 50 45 5A 41 52 20 43 4F 4E 54 49 |AL EMPEZAR CONTI|
00001B90: 45 4E 45 1C 20 24 30 38 30 31 2E 22 3A 8D 36 33 |ENE. $0801.":.63|
00001BA0: 30 30 30 00 C9 23 FC 03 99 22 93 1F 2E 2C 20 42 |000..#..."..., B|
00001BB0: 34 42 45 20 31 38 20 20 20 20 20 20 20 12 43 4C |4BE 18 .CL|
00001BC0: 43 20 20 20 20 20 20 20 22 00 F1 23 06 04 99 22 |C "..#..."|
00001BD0: 11 11 48 41 43 45 4D 4F 53 20 55 4E 20 12 43 4C |..HACEMOS UN .CL|
00001BE0: 43 92 20 50 41 52 41 20 50 52 45 50 41 52 41 52 |C. PARA PREPARAR|
00001BF0: 22 00 15 24 10 04 99 22 11 55 4E 20 12 41 44 43 |"..$...".UN .ADC|
00001C00: 92 20 50 4F 53 54 45 52 49 4F 52 2E 2E 22 3A 8D |. POSTERIOR..":.|
00001C10: 36 33 30 30 30 00 3B 24 1A 04 99 22 93 2E 2C 20 |63000.;$...".., |
00001C20: 42 34 42 46 20 41 30 20 30 31 20 20 20 20 12 4C |B4BF A0 01 .L|
00001C30: 44 59 20 23 24 30 31 20 20 20 22 00 60 24 24 04 |DY #$01 ".`$$.|
00001C40: 99 22 2E 2C 20 42 34 43 31 20 42 31 20 32 32 20 |."., B4C1 B1 22 |
00001C50: 20 20 20 12 4C 44 41 20 28 24 32 32 29 2C 59 22 | .LDA ($22),Y"|
00001C60: 00 8F 24 2E 04 99 22 11 11 11 1C D1 1F 41 48 4F |..$..."......AHO|
00001C70: 52 41 20 45 4C 20 41 43 55 4D 55 4C 41 44 4F 52 |RA EL ACUMULADOR|
00001C80: 20 54 49 45 4E 45 20 45 4C 20 42 59 54 45 22 00 | TIENE EL BYTE".|
00001C90: AC 24 38 04 99 22 20 41 4C 4D 41 43 45 4E 41 44 |.$8.." ALMACENAD|
00001CA0: 4F 20 45 4E 20 24 30 38 30 32 2E 22 00 DA 24 42 |O EN $0802."..$B|
00001CB0: 04 99 22 11 1C D1 1F 45 53 45 20 45 53 20 45 4C |.."....ESE ES EL|
00001CC0: 20 12 45 53 4C 41 42 4F 4E 20 42 59 54 45 20 41 | .ESLABON BYTE A|
00001CD0: 4C 54 4F 92 20 41 20 4C 41 22 00 FD 24 4C 04 99 |LTO. A LA"..$L..|
00001CE0: 22 20 50 52 4F 58 49 4D 41 20 49 4E 53 54 52 55 |" PROXIMA INSTRU|
00001CF0: 43 43 49 4F 4E 20 42 41 53 49 43 2E 22 00 2A 25 |CCION BASIC.".*%|
00001D00: 60 04 99 22 11 1C D1 1F 53 49 20 53 55 20 56 41 |`.."....SI SU VA|
00001D10: 4C 4F 52 20 45 53 20 1C 12 30 30 92 1F 20 49 4E |LOR ES ..00.. IN|
00001D20: 44 49 43 41 52 41 20 45 4C 22 00 44 25 6A 04 99 |DICARA EL".D%j..|
00001D30: 22 20 46 49 4E 20 44 45 4C 20 50 52 4F 47 52 41 |" FIN DEL PROGRA|
00001D40: 4D 41 21 22 00 8C 25 74 04 99 22 11 1C D1 1F 52 |MA!"..%t.."....R|
00001D50: 45 43 55 45 52 44 45 20 51 48 45 20 45 4C 20 46 |ECUERDE QHE EL F|
00001D60: 49 4E 20 44 45 4C 20 50 52 4F 47 52 41 4D 41 20 |IN DEL PROGRAMA |
00001D70: 20 20 20 20 20 20 20 54 49 45 4E 45 20 12 30 30 | TIENE .00|
00001D80: 92 20 12 30 30 92 20 12 30 30 92 22 00 C6 25 7E |. .00. .00."..%~|
00001D90: 04 99 22 20 4C 4F 20 51 55 45 20 49 4D 50 4C 49 |.." LO QUE IMPLI|
00001DA0: 43 41 20 55 4E 20 45 53 4C 41 42 4F 4E 20 42 59 |CA UN ESLABON BY|
00001DB0: 54 45 20 41 4C 54 4F 20 1C 12 30 30 92 2E 22 3A |TE ALTO ..00..":|
00001DC0: 8D 36 33 30 30 30 00 EE 25 88 04 99 22 13 11 11 |.63000..%..."...|
00001DD0: 2E 2C 20 42 34 43 33 20 46 30 20 31 43 20 20 20 |., B4C3 F0 1C |
00001DE0: 20 12 42 45 51 20 24 42 34 45 31 20 20 22 00 2F | .BEQ $B4E1 "./|
00001DF0: 26 92 04 81 54 B2 31 A4 32 30 3A 99 43 4C 24 3A |&...T.1.20:.CL$:|
00001E00: 82 3A 99 22 13 11 11 11 11 11 2E 2E 50 4F 52 20 |.:."........POR |
00001E10: 4C 4F 20 54 41 4E 54 4F 20 43 4F 4D 50 52 4F 42 |LO TANTO COMPROB|
00001E20: 41 4D 4F 53 20 53 49 20 45 53 20 43 45 52 4F 00 |AMOS SI ES CERO.|
00001E30: 5A 26 9C 04 99 22 11 43 4F 4E 20 12 42 45 51 92 |Z&...".CON .BEQ.|
00001E40: 20 41 20 24 42 34 45 31 20 51 55 45 20 45 53 20 | A $B4E1 QUE ES |
00001E50: 4C 41 20 53 41 4C 49 44 41 22 00 73 26 A6 04 99 |LA SALIDA".s&...|
00001E60: 22 11 44 45 20 45 53 54 41 20 52 55 54 49 4E 41 |".DE ESTA RUTINA|
00001E70: 21 1F 22 00 89 26 A8 04 99 22 11 11 11 11 22 43 |!."..&..."...."C|
00001E80: 4C 24 3A 8D 36 33 30 30 30 00 A9 26 B0 04 99 22 |L$:.63000..&..."|
00001E90: 93 2E 2C 20 42 34 42 36 20 41 35 20 32 42 20 20 |.., B4B6 A5 2B |
00001EA0: 20 20 4C 44 41 20 24 32 42 00 C8 26 B1 04 99 22 | LDA $2B..&..."|
00001EB0: 2E 2C 20 42 34 42 38 20 41 34 20 32 43 20 20 20 |., B4B8 A4 2C |
00001EC0: 20 4C 44 59 20 24 32 43 00 E7 26 B2 04 99 22 2E | LDY $2C..&...".|
00001ED0: 2C 20 42 34 42 41 20 38 35 20 32 32 20 20 20 20 |, B4BA 85 22 |
00001EE0: 53 54 41 20 24 32 32 00 06 27 B3 04 99 22 2E 2C |STA $22..'...".,|
00001EF0: 20 42 34 42 43 20 38 34 20 32 33 20 20 20 20 53 | B4BC 84 23 S|
00001F00: 54 59 20 24 32 33 00 21 27 B4 04 99 22 2E 2C 20 |TY $23.!'..."., |
00001F10: 42 34 42 45 20 31 38 20 20 20 20 20 20 20 43 4C |B4BE 18 CL|
00001F20: 43 00 41 27 B5 04 99 22 2E 2C 20 42 34 42 46 20 |C.A'..."., B4BF |
00001F30: 41 30 20 30 31 20 20 20 20 4C 44 59 20 23 24 30 |A0 01 LDY #$0|
00001F40: 31 00 64 27 B6 04 99 22 2E 2C 20 42 34 43 31 20 |1.d'..."., B4C1 |
00001F50: 42 31 20 32 32 20 20 20 20 4C 44 41 20 28 24 32 |B1 22 LDA ($2|
00001F60: 32 29 2C 59 00 85 27 B7 04 99 22 2E 2C 20 42 34 |2),Y..'..."., B4|
00001F70: 43 33 20 46 30 20 31 43 20 20 20 20 42 45 51 20 |C3 F0 1C BEQ |
00001F80: 24 42 34 45 31 00 C0 27 BA 04 99 22 11 1C D1 1F |$B4E1..'..."....|
00001F90: 45 53 54 4F 20 45 53 20 4C 4F 20 51 55 45 20 54 |ESTO ES LO QUE T|
00001FA0: 45 4E 45 4D 4F 53 20 48 41 53 54 41 20 45 4C 20 |ENEMOS HASTA EL |
00001FB0: 20 20 20 20 20 20 20 20 4D 4F 4D 45 4E 54 4F 22 | MOMENTO"|
00001FC0: 00 EC 27 C4 04 99 22 11 1C D1 1F 53 41 4C 54 41 |..'..."....SALTA|
00001FD0: 52 45 4D 4F 53 20 41 48 4F 52 41 20 35 20 42 59 |REMOS AHORA 5 BY|
00001FE0: 54 45 53 20 41 44 45 4C 41 4E 54 45 00 16 28 CE |TES ADELANTE..(.|
00001FF0: 04 99 22 20 50 41 52 41 20 43 4F 4D 45 4E 5A 41 |.." PARA COMENZA|
00002000: 52 20 41 20 50 52 4F 42 52 41 52 20 43 41 44 41 |R A PROBRAR CADA|
00002010: 20 42 59 54 45 22 00 4F 28 D8 04 99 22 20 53 49 | BYTE".O(..." SI|
00002020: 20 43 4F 4E 54 49 45 4E 45 20 45 4C 1C 20 12 30 | CONTIENE EL. .0|
00002030: 30 92 1F 20 46 49 4E 20 44 45 20 49 4E 53 54 52 |0.. FIN DE INSTR|
00002040: 55 43 43 49 4F 4E 2E 22 3A 8D 36 33 30 30 30 00 |UCCION.":.63000.|
00002050: 76 28 E2 04 99 22 1F 93 2E 2C 20 42 34 43 35 20 |v(..."..., B4C5 |
00002060: 41 30 20 30 34 20 20 20 20 12 4C 44 59 20 23 24 |A0 04 .LDY #$|
00002070: 30 34 20 20 20 22 00 9D 28 EC 04 99 22 2E 2C 20 |04 "..(..."., |
00002080: 1C 42 34 43 37 1F 20 43 38 20 20 20 20 20 20 20 |.B4C7. C8 |
00002090: 12 49 4E 59 20 20 20 20 20 20 20 20 22 00 C2 28 |.INY "..(|
000020A0: F6 04 99 22 2E 2C 20 42 34 43 38 20 42 31 20 32 |..."., B4C8 B1 2|
000020B0: 32 20 20 20 20 12 4C 44 41 20 28 24 32 32 29 2C |2 .LDA ($22),|
000020C0: 59 22 00 E7 28 00 05 99 22 2E 2C 20 42 34 43 41 |Y"..(..."., B4CA|
000020D0: 20 44 30 20 46 42 20 20 20 20 12 42 4E 45 20 24 | D0 FB .BNE $|
000020E0: 42 34 43 37 20 20 22 00 18 29 0A 05 99 22 11 1C |B4C7 "..)..."..|
000020F0: D1 1F 48 41 43 45 4D 4F 53 20 41 51 55 49 20 1C |..HACEMOS AQUI .|
00002100: 4C 44 59 20 23 24 30 34 20 1F 59 20 4C 55 45 47 |LDY #$04 .Y LUEG|
00002110: 4F 20 12 49 4E 59 92 22 00 46 29 14 05 99 22 20 |O .INY.".F)..." |
00002120: 59 20 48 41 43 45 20 51 55 45 20 12 24 28 32 32 |Y HACE QUE .$(22|
00002130: 29 2C 59 92 20 52 45 53 55 4C 54 45 20 35 20 42 |),Y. RESULTE 5 B|
00002140: 59 54 45 53 20 22 00 67 29 1E 05 99 22 20 44 45 |YTES ".g)..." DE|
00002150: 53 50 55 45 53 20 44 45 20 4E 55 45 53 54 52 41 |SPUES DE NUESTRA|
00002160: 20 1C 42 41 53 45 1F 00 96 29 28 05 99 22 11 1C | .BASE...)(.."..|
00002170: D1 1F 4D 49 52 41 4D 4F 53 20 53 49 20 45 4C 20 |..MIRAMOS SI EL |
00002180: 43 4F 4E 54 45 4E 49 44 4F 20 44 45 20 45 53 54 |CONTENIDO DE EST|
00002190: 45 20 42 59 54 45 00 C2 29 3C 05 99 22 20 45 53 |E BYTE..)<.." ES|
000021A0: 20 1C 30 30 1F 20 50 41 52 41 20 56 45 52 20 53 | .00. PARA VER S|
000021B0: 49 20 45 53 20 45 4C 20 46 49 4E 20 44 45 20 4C |I ES EL FIN DE L|
000021C0: 41 22 00 D5 29 41 05 99 22 20 49 4E 53 54 55 43 |A"..)A.." INSTUC|
000021D0: 43 49 4F 4E 2E 00 05 2A 46 05 99 22 11 1C D1 1F |CION...*F.."....|
000021E0: 4C 41 20 49 4E 53 54 52 55 43 43 49 4F 4E 20 12 |LA INSTRUCCION .|
000021F0: 42 92 52 41 4E 43 48 20 12 4E 92 4F 54 20 12 45 |B.RANCH .N.OT .E|
00002200: 92 51 55 41 4C 00 2B 2A 50 05 99 22 20 51 55 45 |.QUAL.+*P.." QUE|
00002210: 20 45 53 20 4C 41 20 43 4F 4D 50 52 4F 42 41 43 | ES LA COMPROBAC|
00002220: 49 4F 4E 20 44 45 20 43 45 52 4F 00 57 2A 5A 05 |ION DE CERO.W*Z.|
00002230: 99 22 20 4E 4F 53 20 43 4F 4E 45 43 54 41 20 45 |." NOS CONECTA E|
00002240: 4E 20 45 53 54 45 20 43 41 53 4F 20 48 41 43 49 |N ESTE CASO HACI|
00002250: 41 20 41 54 52 41 53 00 85 2A 5C 05 99 22 20 41 |A ATRAS..*\.." A|
00002260: 4C 20 4C 55 47 41 52 20 45 4E 20 4C 41 20 4D 45 |L LUGAR EN LA ME|
00002270: 4D 4F 52 49 41 20 1C 42 34 43 37 1F 20 44 4F 4E |MORIA .B4C7. DON|
00002280: 44 45 20 53 45 00 AB 2A 5E 05 99 22 20 45 4E 43 |DE SE..*^.." ENC|
00002290: 55 45 4E 54 52 41 20 4C 41 20 49 4E 53 54 52 55 |UENTRA LA INSTRU|
000022A0: 43 43 49 4F 4E 20 20 1C 49 4E 59 00 D6 2A 60 05 |CCION .INY..*`.|
000022B0: 99 22 11 1C D1 1F 4E 4F 53 20 51 55 45 44 41 4D |."....NOS QUEDAM|
000022C0: 4F 53 20 45 4E 20 45 53 54 45 20 42 55 43 4C 45 |OS EN ESTE BUCLE|
000022D0: 20 48 41 53 54 41 00 F6 2A 64 05 99 22 20 45 4E | HASTA..*d.." EN|
000022E0: 43 4F 4E 54 52 41 52 20 45 4C 20 1C 30 30 22 3A |CONTRAR EL .00":|
000022F0: 8D 36 33 30 30 30 00 2A 2B 6E 05 99 22 93 11 1C |.63000.*+n.."...|
00002300: D1 1F 45 56 45 4E 54 55 41 4C 4D 45 4E 54 45 20 |..EVENTUALMENTE |
00002310: 45 4E 43 4F 4E 54 52 41 52 45 4D 4F 53 20 45 4C |ENCONTRAREMOS EL|
00002320: 20 42 59 54 45 1C 20 30 30 22 00 5A 2B 78 05 99 | BYTE. 00".Z+x..|
00002330: 22 11 D1 1F 41 48 4F 52 41 20 54 45 4E 45 4D 4F |"...AHORA TENEMO|
00002340: 53 20 51 55 45 20 42 55 53 43 41 52 20 4C 41 20 |S QUE BUSCAR LA |
00002350: 44 49 52 45 43 43 49 4F 4E 22 00 85 2B 82 05 99 |DIRECCION"..+...|
00002360: 22 20 44 45 4C 20 1C 50 52 4F 58 49 4D 4F 1F 20 |" DEL .PROXIMO. |
00002370: 12 45 53 4C 41 42 4F 4E 20 42 59 54 45 20 42 41 |.ESLABON BYTE BA|
00002380: 4A 4F 92 2E 22 00 B3 2B 8C 05 99 22 11 1C D1 1F |JO.."..+..."....|
00002390: 55 4E 41 20 56 45 5A 20 44 45 54 45 52 4D 49 4E |UNA VEZ DETERMIN|
000023A0: 41 44 41 20 45 53 54 41 20 44 49 52 45 43 43 49 |ADA ESTA DIRECCI|
000023B0: 4F 4E 22 00 D3 2B 8E 05 99 22 20 48 41 52 45 4D |ON"..+..." HAREM|
000023C0: 4F 53 20 44 4F 53 20 4F 50 45 52 41 43 49 4F 4E |OS DOS OPERACION|
000023D0: 45 53 3A 00 FF 2B 96 05 99 22 11 1C D1 20 31 1F |ES:..+..."... 1.|
000023E0: 3A 53 45 52 41 20 41 4C 4D 41 43 45 4E 41 44 41 |:SERA ALMACENADA|
000023F0: 20 45 4E 20 45 4C 20 45 53 4C 41 42 4F 4E 22 00 | EN EL ESLABON".|
00002400: 2E 2C A0 05 99 22 20 20 41 4E 54 45 52 49 4F 52 |.,..." ANTERIOR|
00002410: 20 28 4F 52 49 47 49 4E 41 4C 4D 45 4E 54 45 20 | (ORIGINALMENTE |
00002420: 24 30 38 30 31 2F 24 30 38 30 32 29 2E 22 00 5D |$0801/$0802).".]|
00002430: 2C AA 05 99 22 11 1C D1 20 32 1F 3A 43 41 4D 42 |,..."... 2.:CAMB|
00002440: 49 41 52 45 4D 4F 53 20 45 4C 20 50 55 4E 54 45 |IAREMOS EL PUNTE|
00002450: 52 4F 20 45 4E 20 4E 55 45 53 54 52 41 00 8C 2C |RO EN NUESTRA..,|
00002460: B4 05 99 22 20 20 42 41 53 45 20 24 32 32 2F 32 |..." BASE $22/2|
00002470: 33 2C 20 51 55 45 20 41 4C 20 50 52 49 4E 43 49 |3, QUE AL PRINCI|
00002480: 50 49 4F 20 49 4E 44 49 43 41 42 41 00 B9 2C BE |PIO INDICABA..,.|
00002490: 05 99 22 20 20 91 24 30 38 30 31 2C 20 50 41 52 |.." .$0801, PAR|
000024A0: 41 20 51 55 45 20 49 4E 44 49 51 55 45 20 41 48 |A QUE INDIQUE AH|
000024B0: 4F 52 41 20 48 41 43 49 41 00 D4 2C C0 05 99 22 |ORA HACIA..,..."|
000024C0: 20 20 45 53 54 45 20 4E 55 45 56 4F 20 45 53 4C | ESTE NUEVO ESL|
000024D0: 41 42 4F 4E 00 FE 2C C3 05 99 22 11 1C D1 1F 45 |ABON..,..."....E|
000024E0: 4E 20 45 53 54 45 20 4D 4F 4D 45 4E 54 4F 20 4E |N ESTE MOMENTO N|
000024F0: 4F 53 20 45 4E 43 4F 4E 54 52 41 4D 4F 53 00 43 |OS ENCONTRAMOS.C|
00002500: 2D C4 05 99 22 20 28 59 29 42 59 54 45 53 20 44 |-..." (Y)BYTES D|
00002510: 45 53 50 55 45 53 20 44 45 20 4C 41 20 44 49 52 |ESPUES DE LA DIR|
00002520: 45 43 43 49 4F 4E 20 20 20 20 20 20 20 20 49 4E |ECCION IN|
00002530: 44 49 43 41 44 41 20 45 4E 20 24 32 32 2F 24 32 |DICADA EN $22/$2|
00002540: 33 2E 22 00 7A 2D C8 05 99 22 11 11 12 41 56 41 |3.".z-..."...AVA|
00002550: 4E 43 45 4D 4F 53 92 2E 2E 2E 22 3A 4D 53 24 B2 |NCEMOS....":MS$.|
00002560: 22 44 41 4C 45 2D 44 41 4C 45 22 3A 20 8D 36 33 |"DALE-DALE": .63|
00002570: 30 30 30 3A 8D 36 33 31 30 30 00 A0 2D D2 05 99 |000:.63100..-...|
00002580: 22 93 2E 2C 20 42 34 43 43 20 43 38 20 20 20 20 |".., B4CC C8 |
00002590: 20 20 20 12 49 4E 59 20 20 20 20 20 20 20 20 22 | .INY "|
000025A0: 00 D1 2D DC 05 99 53 44 24 22 1C D1 1F 12 49 4E |..-...SD$"....IN|
000025B0: 59 92 20 41 56 41 4E 5A 41 20 31 20 42 59 54 45 |Y. AVANZA 1 BYTE|
000025C0: 20 50 41 53 41 44 4F 20 45 4C 20 12 1C 30 30 92 | PASADO EL ..00.|
000025D0: 22 00 F7 2D E6 05 99 22 20 1F 51 55 45 20 49 4E |"..-..." .QUE IN|
000025E0: 44 49 43 41 20 46 49 4E 20 44 45 20 49 4E 53 54 |DICA FIN DE INST|
000025F0: 52 55 43 43 49 4F 4E 00 22 2E E8 05 99 22 20 48 |RUCCION."...." H|
00002600: 41 43 49 41 20 45 4C 20 50 52 4F 58 49 4D 4F 20 |ACIA EL PROXIMO |
00002610: 45 53 4C 41 42 4F 4E 20 12 4C 49 4E 4B 20 42 41 |ESLABON .LINK BA|
00002620: 4A 4F 00 50 2E F0 05 99 22 11 1C D1 1F 41 48 4F |JO.P...."....AHO|
00002630: 52 41 20 20 12 28 24 32 32 29 2C 59 92 20 20 49 |RA .($22),Y. I|
00002640: 4E 44 49 43 41 20 45 4C 20 50 52 4F 58 49 4D 4F |NDICA EL PROXIMO|
00002650: 00 7D 2E FA 05 99 22 20 12 4C 49 4E 4B 20 42 41 |.}...." .LINK BA|
00002660: 4A 4F 92 20 50 4F 52 20 4C 4F 20 54 41 4E 54 4F |JO. POR LO TANTO|
00002670: 20 48 41 52 45 4D 4F 53 20 4C 41 53 22 00 AF 2E | HAREMOS LAS"...|
00002680: 04 06 99 22 20 44 4F 53 20 4F 50 45 52 41 43 49 |..." DOS OPERACI|
00002690: 4F 4E 45 53 20 43 4F 4E 20 45 53 54 41 20 44 49 |ONES CON ESTA DI|
000026A0: 52 45 43 43 49 4F 4E 22 3A 8D 36 33 30 30 30 00 |RECCION":.63000.|
000026B0: D5 2E 05 06 99 22 13 11 2E 2C 20 42 34 43 44 20 |....."..., B4CD |
000026C0: 39 38 20 20 20 20 20 20 20 54 59 41 20 20 20 20 |98 TYA |
000026D0: 20 20 20 20 22 00 F9 2E 06 06 99 22 2E 2C 20 42 | "......"., B|
000026E0: 34 43 45 20 36 35 20 32 32 20 20 20 20 41 44 43 |4CE 65 22 ADC|
000026F0: 20 24 32 32 20 20 20 20 22 00 1D 2F 07 06 99 22 | $22 "../..."|
00002700: 2E 2C 20 42 34 44 30 20 41 41 20 20 20 20 20 20 |., B4D0 AA |
00002710: 20 54 41 58 20 20 20 20 20 20 20 20 22 00 41 2F | TAX ".A/|
00002720: 08 06 99 22 2E 2C 20 42 34 44 31 20 41 30 20 30 |..."., B4D1 A0 0|
00002730: 30 20 20 20 20 4C 44 59 20 23 24 30 30 20 20 20 |0 LDY #$00 |
00002740: 22 00 65 2F 09 06 99 22 2E 2C 20 42 34 44 33 20 |".e/..."., B4D3 |
00002750: 39 31 20 32 32 20 20 20 20 53 54 41 20 28 24 32 |91 22 STA ($2|
00002760: 32 29 2C 59 22 00 7E 2F 0E 06 99 53 44 24 3B 3A |2),Y".~/...SD$;:|
00002770: 81 54 B2 31 A4 31 30 3A 99 43 4C 24 3A 82 00 AB |.T.1.10:.CL$:...|
00002780: 2F 18 06 99 53 44 24 22 1C D1 1F 4C 41 20 44 49 |/...SD$"...LA DI|
00002790: 52 45 43 43 49 4F 4E 20 51 55 45 20 45 53 54 41 |RECCION QUE ESTA|
000027A0: 20 45 4E 20 12 24 32 32 20 53 45 00 D6 2F 1D 06 | EN .$22 SE../..|
000027B0: 99 22 20 53 55 4D 41 20 41 4C 20 56 41 4C 4F 52 |." SUMA AL VALOR|
000027C0: 20 44 45 20 12 59 92 20 50 4F 52 20 49 4E 54 45 | DE .Y. POR INTE|
000027D0: 52 4D 45 44 49 4F 00 F0 2F 1F 06 99 22 20 4C 41 |RMEDIO../..." LA|
000027E0: 20 4F 50 45 52 41 43 49 4F 4E 20 12 41 44 43 92 | OPERACION .ADC.|
000027F0: 00 1F 30 22 06 99 22 11 1C D1 1F 50 45 52 4F 20 |..0".."....PERO |
00002800: 43 4F 4D 4F 20 12 41 44 43 92 20 46 55 4E 43 49 |COMO .ADC. FUNCI|
00002810: 4F 4E 41 20 53 4F 4C 4F 20 43 4F 4E 20 45 4C 00 |ONA SOLO CON EL.|
00002820: 4C 30 27 06 99 22 20 52 45 47 49 53 54 52 4F 20 |L0'.." REGISTRO |
00002830: 12 41 92 20 28 41 43 55 4D 55 4C 41 44 4F 52 29 |.A. (ACUMULADOR)|
00002840: 20 54 45 4E 45 4D 4F 53 20 51 55 45 00 8C 30 29 | TENEMOS QUE..0)|
00002850: 06 99 22 20 54 52 41 4E 53 46 45 52 49 52 20 50 |.." TRANSFERIR P|
00002860: 52 49 4D 45 52 4F 20 45 4C 20 56 41 4C 4F 52 20 |RIMERO EL VALOR |
00002870: 44 45 20 1C 59 1F 20 20 20 20 20 20 20 20 41 4C |DE .Y. AL|
00002880: 20 41 43 55 4D 55 4C 41 44 4F 52 2E 00 BD 30 2B | ACUMULADOR...0+|
00002890: 06 99 22 11 1C D1 1F 45 53 54 4F 20 53 45 20 48 |.."....ESTO SE H|
000028A0: 41 43 45 20 43 4F 4E 20 12 54 59 41 92 20 59 20 |ACE CON .TYA. Y |
000028B0: 53 4F 4C 4F 20 45 4E 54 4F 4E 43 45 53 00 EE 30 |SOLO ENTONCES..0|
000028C0: 2C 06 99 22 20 48 41 52 45 4D 4F 53 20 4C 41 20 |,.." HAREMOS LA |
000028D0: 41 44 49 43 49 4F 4E 20 43 4F 4E 20 12 41 44 43 |ADICION CON .ADC|
000028E0: 20 24 32 32 92 2E 22 3A 8D 36 33 30 30 30 00 16 | $22..":.63000..|
000028F0: 31 2D 06 99 22 13 11 2E 2C 20 42 34 43 44 20 39 |1-.."..., B4CD 9|
00002900: 38 20 20 20 20 20 20 20 12 1C 54 59 41 20 20 20 |8 ..TYA |
00002910: 20 20 20 20 20 22 00 44 31 2E 06 99 22 1F 2E 2C | ".D1..."..,|
00002920: 20 42 34 43 45 20 36 35 20 32 32 20 20 20 20 12 | B4CE 65 22 .|
00002930: 1F 41 44 43 20 24 32 32 20 20 20 20 22 3A 8D 36 |.ADC $22 ":.6|
00002940: 33 30 30 30 00 75 31 3B 06 99 53 44 24 22 1C D1 |3000.u1;..SD$"..|
00002950: 1F 41 48 4F 52 41 20 54 45 4E 45 4D 4F 53 20 45 |.AHORA TENEMOS E|
00002960: 4E 20 12 41 92 20 45 4C 20 42 59 54 45 20 42 41 |N .A. EL BYTE BA|
00002970: 4A 4F 20 44 45 00 BD 31 40 06 99 22 20 4C 41 20 |JO DE..1@.." LA |
00002980: 4E 55 45 56 41 20 44 49 52 43 43 49 4F 4E 20 27 |NUEVA DIRCCION '|
00002990: 42 41 53 45 27 2C 20 45 53 20 44 45 43 49 52 2C |BASE', ES DECIR,|
000029A0: 20 20 20 20 20 45 4C 20 50 52 4F 58 49 4D 4F 20 | EL PROXIMO |
000029B0: 12 4C 49 4E 4B 20 42 41 4A 4F 92 2E 22 00 E5 31 |.LINK BAJO.."..1|
000029C0: 45 06 99 22 20 1C 47 55 41 52 44 41 52 45 4D 4F |E.." .GUARDAREMO|
000029D0: 53 20 45 53 54 45 20 42 59 54 45 20 45 4E 20 27 |S ESTE BYTE EN '|
000029E0: 58 27 2E 2E 22 00 FF 31 46 06 81 49 B2 31 A4 38 |X'.."..1F..I.1.8|
000029F0: 3A 99 43 4C 24 3B 3A 82 3A 8D 36 33 30 30 30 00 |:.CL$;:.:.63000.|
00002A00: 2F 32 47 06 99 22 13 11 11 11 2E 2C 20 42 34 44 |/2G.."....., B4D|
00002A10: 30 20 41 41 20 20 20 20 20 20 20 12 54 41 58 20 |0 AA .TAX |
00002A20: 20 20 20 20 20 20 20 22 3A 8D 36 33 30 30 30 00 | ":.63000.|
00002A30: 5F 32 4A 06 99 53 44 24 22 11 11 11 11 11 D1 1F |_2J..SD$".......|
00002A40: 41 48 4F 52 41 20 50 4F 4E 45 4D 4F 53 20 45 53 |AHORA PONEMOS ES|
00002A50: 54 45 20 56 41 4C 4F 52 20 45 4E 20 4C 41 22 00 |TE VALOR EN LA".|
00002A60: 86 32 54 06 99 22 20 44 49 52 45 43 43 49 4F 4E |.2T.." DIRECCION|
00002A70: 20 51 55 45 20 45 53 54 41 20 45 4E 20 24 32 32 | QUE ESTA EN $22|
00002A80: 2F 24 32 33 2E 22 00 AE 32 59 06 99 22 91 20 28 |/$23."..2Y..". (|
00002A90: 51 55 45 20 4D 4F 4D 45 4E 54 41 4E 45 41 4D 45 |QUE MOMENTANEAME|
00002AA0: 4E 54 45 20 45 53 20 24 30 38 30 31 29 22 00 DB |NTE ES $0801)"..|
00002AB0: 32 5E 06 99 22 20 59 20 48 41 43 45 4D 4F 53 20 |2^.." Y HACEMOS |
00002AC0: 45 53 54 4F 20 43 4F 4E 20 12 53 54 41 92 20 45 |ESTO CON .STA. E|
00002AD0: 4E 20 12 28 24 32 32 29 2C 30 22 00 25 33 63 06 |N .($22),0".%3c.|
00002AE0: 99 22 1C D1 1F 50 45 52 4F 20 45 53 54 4F 20 52 |."...PERO ESTO R|
00002AF0: 45 51 55 49 45 52 45 20 27 59 3D 30 27 20 50 41 |EQUIERE 'Y=0' PA|
00002B00: 52 41 20 4C 4F 20 20 20 20 20 20 20 20 43 55 41 |RA LO CUA|
00002B10: 4C 20 48 41 43 45 4D 4F 53 20 12 4C 44 59 20 23 |L HACEMOS .LDY #|
00002B20: 24 30 30 92 22 20 54 33 68 06 99 22 1C 11 D1 41 |$00." T3h.."...A|
00002B30: 48 4F 52 41 20 1F 48 41 52 45 4D 4F 53 20 12 53 |HORA .HAREMOS .S|
00002B40: 54 41 20 28 24 32 32 29 2C 59 92 21 22 3A 8D 36 |TA ($22),Y.!":.6|
00002B50: 33 30 30 30 00 7E 33 69 06 99 22 13 11 11 11 11 |3000.~3i..".....|
00002B60: 2E 2C 20 42 34 44 31 20 41 30 20 30 30 20 20 20 |., B4D1 A0 00 |
00002B70: 20 12 4C 44 59 20 23 24 30 30 20 20 20 22 00 AA | .LDY #$00 "..|
00002B80: 33 6A 06 99 22 2E 2C 20 42 34 44 33 20 39 31 20 |3j.."., B4D3 91 |
00002B90: 32 32 20 20 20 20 12 53 54 41 20 28 24 32 32 29 |22 .STA ($22)|
00002BA0: 2C 59 22 3A 8D 36 33 30 30 30 00 C4 33 72 06 99 |,Y":.63000..3r..|
00002BB0: 53 44 24 3B 3A 81 49 B2 31 A4 31 35 3A 99 43 4C |SD$;:.I.1.15:.CL|
00002BC0: 24 3B 3A 82 00 E8 33 77 06 4D 53 24 B2 22 12 20 |$;:...3w.MS$.". |
00002BD0: 56 41 4D 4F 53 21 20 20 92 22 3A 8D 36 33 31 30 |VAMOS! .":.6310|
00002BE0: 30 3A 8D 36 33 30 30 30 00 02 34 7C 06 99 53 44 |0:.63000..4|..SD|
00002BF0: 24 3B 3A 81 49 B2 31 A4 31 36 3A 99 43 4C 24 3B |$;:.I.1.16:.CL$;|
00002C00: 3A 82 00 2D 34 7D 06 99 22 13 11 11 11 11 11 11 |:..-4}..".......|
00002C10: 2E 2C 20 42 34 44 35 20 39 38 20 20 20 20 20 20 |., B4D5 98 |
00002C20: 20 54 59 41 20 20 20 20 20 20 20 20 22 00 52 34 | TYA ".R4|
00002C30: 7E 06 99 22 2E 2C 20 42 34 44 36 20 36 35 20 32 |~.."., B4D6 65 2|
00002C40: 33 20 20 20 20 41 44 43 20 24 32 33 20 20 20 20 |3 ADC $23 |
00002C50: 20 22 00 77 34 7F 06 99 22 2E 2C 20 42 34 44 38 | ".w4..."., B4D8|
00002C60: 20 43 38 20 20 20 20 20 20 20 49 4E 59 20 20 20 | C8 INY |
00002C70: 20 20 20 20 20 20 22 00 9B 34 80 06 99 22 2E 2C | "..4...".,|
00002C80: 20 42 34 44 39 20 39 31 20 32 32 20 20 20 20 53 | B4D9 91 22 S|
00002C90: 54 41 20 28 24 32 32 29 2C 59 22 00 C9 34 86 06 |TA ($22),Y"..4..|
00002CA0: 99 53 44 24 22 11 11 11 11 11 11 48 45 4D 4F 53 |.SD$"......HEMOS|
00002CB0: 20 41 52 52 45 47 4C 41 44 4F 20 45 4C 20 4C 49 | ARREGLADO EL LI|
00002CC0: 4E 4B 20 42 41 4A 4F 2E 22 00 FD 34 90 06 99 22 |NK BAJO."..4..."|
00002CD0: 11 41 48 4F 52 41 20 4C 45 20 54 4F 43 41 20 45 |.AHORA LE TOCA E|
00002CE0: 4C 20 54 55 52 4E 4F 20 41 4C 20 4C 49 4E 4B 20 |L TURNO AL LINK |
00002CF0: 41 4C 54 4F 2E 22 3A 8D 36 33 30 30 30 00 1E 35 |ALTO.":.63000..5|
00002D00: 9A 06 99 53 44 24 22 11 11 11 11 11 11 22 3B 3A |...SD$"......";:|
00002D10: 81 49 B2 31 A4 38 3A 99 43 4C 24 3B 3A 82 00 4C |.I.1.8:.CL$;:..L|
00002D20: 35 A4 06 99 53 44 24 22 11 11 11 1C D1 1F 41 4C |5...SD$"......AL|
00002D30: 20 48 41 43 45 52 20 54 59 41 20 45 4C 20 41 43 | HACER TYA EL AC|
00002D40: 55 4D 55 4C 41 44 4F 52 20 53 45 22 00 79 35 AE |UMULADOR SE".y5.|
00002D50: 06 99 22 20 43 41 52 47 41 20 43 4F 4E 20 30 20 |.." CARGA CON 0 |
00002D60: 12 1C 53 49 4E 92 1F 20 54 4F 43 41 52 20 45 4C |..SIN.. TOCAR EL|
00002D70: 20 41 43 41 52 52 45 4F 22 00 AA 35 B8 06 99 22 | ACARREO"..5..."|
00002D80: 91 20 44 45 4A 41 44 4F 20 44 45 20 45 4C 20 12 |. DEJADO DE EL .|
00002D90: 41 44 43 20 24 32 32 92 20 41 4E 54 45 52 49 4F |ADC $22. ANTERIO|
00002DA0: 52 2E 22 3A 8D 36 33 30 30 30 00 DD 35 B9 06 99 |R.":.63000..5...|
00002DB0: 22 13 11 11 11 11 11 11 2E 2C 20 42 34 44 35 20 |"........, B4D5 |
00002DC0: 39 38 20 20 20 20 20 20 20 12 54 59 41 20 20 20 |98 .TYA |
00002DD0: 20 20 20 20 20 22 3A 8D 36 33 30 30 30 00 0D 36 | ":.63000..6|
00002DE0: C2 06 99 53 44 24 22 11 11 11 11 11 11 11 1C D1 |...SD$".........|
00002DF0: 1F 4C 55 45 47 4F 20 53 55 4D 41 4D 4F 53 20 43 |.LUEGO SUMAMOS C|
00002E00: 4F 4E 20 12 41 44 43 20 24 32 33 92 22 00 37 36 |ON .ADC $23.".76|
00002E10: CC 06 99 22 20 49 4E 43 4C 55 59 45 4E 44 4F 20 |..." INCLUYENDO |
00002E20: 45 4C 20 41 43 41 52 52 45 4F 20 28 53 49 20 48 |EL ACARREO (SI H|
00002E30: 41 42 49 41 21 29 22 00 5D 36 D6 06 99 22 91 20 |ABIA!)".]6...". |
00002E40: 41 4C 20 42 59 54 45 20 41 4C 54 4F 20 44 45 20 |AL BYTE ALTO DE |
00002E50: 4E 55 45 53 54 52 41 20 4E 55 45 56 41 00 81 36 |NUESTRA NUEVA..6|
00002E60: E0 06 99 22 20 44 49 52 45 43 43 49 4F 4E 20 44 |..." DIRECCION D|
00002E70: 45 20 42 41 53 45 20 45 4E 20 24 32 32 2F 24 32 |E BASE EN $22/$2|
00002E80: 33 00 8C 36 F4 06 8D 36 33 30 30 30 00 C0 36 F5 |3..6...63000..6.|
00002E90: 06 99 22 13 11 11 11 11 11 11 11 2E 2C 20 42 34 |.."........., B4|
00002EA0: 44 36 20 36 35 20 32 30 20 20 20 20 12 41 44 43 |D6 65 20 .ADC|
00002EB0: 20 24 32 33 20 20 20 20 22 3A 8D 36 33 30 30 30 | $23 ":.63000|
00002EC0: 00 E2 36 FE 06 99 53 44 24 22 11 11 11 11 11 11 |..6...SD$"......|
00002ED0: 22 3B 3A 81 49 B2 31 A4 31 30 3A 99 43 4C 24 3B |";:.I.1.10:.CL$;|
00002EE0: 3A 82 00 15 37 08 07 99 53 44 24 22 11 11 11 1C |:...7...SD$"....|
00002EF0: D1 1F 45 4C 20 42 59 54 45 20 41 4C 54 4F 20 44 |..EL BYTE ALTO D|
00002F00: 45 20 4C 41 20 4E 55 45 56 41 20 44 49 52 45 43 |E LA NUEVA DIREC|
00002F10: 43 49 4F 4E 22 00 40 37 12 07 99 22 20 4C 49 4E |CION".@7..." LIN|
00002F20: 4B 20 42 41 4A 4F 20 51 55 45 20 45 53 54 41 20 |K BAJO QUE ESTA |
00002F30: 45 4E 20 45 4C 20 41 43 55 4D 55 4C 41 44 4F 52 |EN EL ACUMULADOR|
00002F40: 00 6D 37 1C 07 99 22 91 20 48 41 59 20 51 55 45 |.m7...". HAY QUE|
00002F50: 20 43 4F 4C 4F 43 41 52 4C 4F 20 45 4E 20 24 30 | COLOCARLO EN $0|
00002F60: 38 30 32 20 51 55 45 20 51 55 45 44 41 00 8E 37 |802 QUE QUEDA..7|
00002F70: 26 07 99 22 20 55 4E 20 42 59 54 45 20 44 45 53 |&.." UN BYTE DES|
00002F80: 50 55 45 53 20 44 45 20 24 30 38 30 31 2E 00 99 |PUES DE $0801...|
00002F90: 37 30 07 8D 36 33 30 30 30 00 B6 37 3A 07 4D 53 |70..63000..7:.MS|
00002FA0: 24 B2 22 20 12 20 41 59 41 59 41 59 21 92 22 3A |$." . AYAYAY!.":|
00002FB0: 8D 36 33 31 30 30 00 E4 37 3B 07 99 22 13 11 11 |.63100..7;.."...|
00002FC0: 11 11 11 11 11 11 2E 2C 20 42 34 44 38 20 43 38 |......., B4D8 C8|
00002FD0: 20 20 20 20 20 20 20 12 49 4E 59 20 20 20 20 20 | .INY |
00002FE0: 20 20 20 22 00 10 38 3C 07 99 22 2E 2C 20 42 34 | "..8<.."., B4|
00002FF0: 44 39 20 39 31 20 32 32 20 20 20 20 12 53 54 41 |D9 91 22 .STA|
00003000: 20 28 24 32 32 29 2C 59 22 3A 8D 36 33 30 30 30 | ($22),Y":.63000|
00003010: 00 30 38 62 07 99 22 93 2E 2C 20 42 34 42 36 20 |.08b..".., B4B6 |
00003020: 41 35 20 32 42 20 20 20 20 4C 44 41 20 24 32 42 |A5 2B LDA $2B|
00003030: 00 4F 38 63 07 99 22 2E 2C 20 42 34 42 38 20 41 |.O8c.."., B4B8 A|
00003040: 34 20 32 43 20 20 20 20 4C 44 59 20 24 32 43 00 |4 2C LDY $2C.|
00003050: 6E 38 64 07 99 22 2E 2C 20 42 34 42 41 20 38 35 |n8d.."., B4BA 85|
00003060: 20 32 32 20 20 20 20 53 54 41 20 24 32 32 00 8D | 22 STA $22..|
00003070: 38 65 07 99 22 2E 2C 20 42 34 42 43 20 38 34 20 |8e.."., B4BC 84 |
00003080: 32 33 20 20 20 20 53 54 59 20 24 32 33 00 A8 38 |23 STY $23..8|
00003090: 66 07 99 22 2E 2C 20 42 34 42 45 20 31 38 20 20 |f.."., B4BE 18 |
000030A0: 20 20 20 20 20 43 4C 43 00 C8 38 67 07 99 22 2E | CLC..8g..".|
000030B0: 2C 20 42 34 42 46 20 41 30 20 30 31 20 20 20 20 |, B4BF A0 01 |
000030C0: 4C 44 59 20 23 24 30 31 00 EB 38 68 07 99 22 2E |LDY #$01..8h..".|
000030D0: 2C 20 42 34 43 31 20 42 31 20 32 32 20 20 20 20 |, B4C1 B1 22 |
000030E0: 4C 44 41 20 28 24 32 32 29 2C 59 00 0C 39 69 07 |LDA ($22),Y..9i.|
000030F0: 99 22 2E 2C 20 42 34 43 33 20 46 30 20 31 43 20 |."., B4C3 F0 1C |
00003100: 20 20 20 42 45 51 20 24 42 34 45 31 00 2C 39 6A | BEQ $B4E1.,9j|
00003110: 07 99 22 2E 2C 20 42 34 43 35 20 41 30 20 30 34 |.."., B4C5 A0 04|
00003120: 20 20 20 20 4C 44 59 20 23 24 30 34 00 47 39 6B | LDY #$04.G9k|
00003130: 07 99 22 2E 2C 20 42 34 43 37 20 43 38 20 20 20 |.."., B4C7 C8 |
00003140: 20 20 20 20 49 4E 59 00 6A 39 6C 07 99 22 2E 2C | INY.j9l..".,|
00003150: 20 42 34 43 38 20 42 31 20 32 32 20 20 20 20 4C | B4C8 B1 22 L|
00003160: 44 41 20 28 24 32 32 29 2C 59 00 8B 39 6D 07 99 |DA ($22),Y..9m..|
00003170: 22 2E 2C 20 42 34 43 41 20 44 30 20 46 42 20 20 |"., B4CA D0 FB |
00003180: 20 20 42 4E 45 20 24 42 34 43 37 00 A6 39 6E 07 | BNE $B4C7..9n.|
00003190: 99 22 2E 2C 20 42 34 43 43 20 43 38 20 20 20 20 |."., B4CC C8 |
000031A0: 20 20 20 49 4E 59 00 C1 39 6F 07 99 22 2E 2C 20 | INY..9o.."., |
000031B0: 42 34 43 44 20 39 38 20 20 20 20 20 20 20 54 59 |B4CD 98 TY|
000031C0: 41 00 E0 39 70 07 99 22 2E 2C 20 42 34 43 45 20 |A..9p.."., B4CE |
000031D0: 36 35 20 32 32 20 20 20 20 41 44 43 20 24 32 32 |65 22 ADC $22|
000031E0: 00 FB 39 71 07 99 22 2E 2C 20 42 34 44 30 20 41 |..9q.."., B4D0 A|
000031F0: 41 20 20 20 20 20 20 20 54 41 58 00 1B 3A 72 07 |A TAX..:r.|
00003200: 99 22 2E 2C 20 42 34 44 31 20 41 30 20 30 30 20 |."., B4D1 A0 00 |
00003210: 20 20 20 4C 44 59 20 23 24 30 30 00 3E 3A 73 07 | LDY #$00.>:s.|
00003220: 99 22 2E 2C 20 42 34 44 33 20 39 31 20 32 32 20 |."., B4D3 91 22 |
00003230: 20 20 20 53 54 41 20 28 24 32 32 29 2C 59 00 59 | STA ($22),Y.Y|
00003240: 3A 74 07 99 22 2E 2C 20 42 34 44 35 20 39 38 20 |:t.."., B4D5 98 |
00003250: 20 20 20 20 20 20 54 59 41 00 78 3A 75 07 99 22 | TYA.x:u.."|
00003260: 2E 2C 20 42 34 44 36 20 36 35 20 32 33 20 20 20 |., B4D6 65 23 |
00003270: 20 41 44 43 20 24 32 33 00 93 3A 76 07 99 22 2E | ADC $23..:v..".|
00003280: 2C 20 42 34 44 38 20 43 38 20 20 20 20 20 20 20 |, B4D8 C8 |
00003290: 49 4E 59 00 B6 3A 80 07 99 22 2E 2C 20 42 34 44 |INY..:..."., B4D|
000032A0: 39 20 39 31 20 32 32 20 20 20 20 53 54 41 20 28 |9 91 22 STA (|
000032B0: 24 32 32 29 2C 59 00 E7 3A 8A 07 99 42 54 24 22 |$22),Y..:...BT$"|
000032C0: 91 91 12 1C 51 55 45 20 4E 4F 53 20 51 55 45 44 |....QUE NOS QUED|
000032D0: 41 20 50 4F 52 20 48 41 43 45 52 3F 3F 3F 92 22 |A POR HACER???."|
000032E0: 3A 8D 36 33 30 30 30 00 1B 3B 94 07 99 22 93 11 |:.63000..;..."..|
000032F0: 1C D1 1F 48 45 4D 4F 53 20 43 41 4D 42 49 41 44 |...HEMOS CAMBIAD|
00003300: 4F 20 4C 4F 53 20 42 59 54 45 53 20 45 4E 20 24 |O LOS BYTES EN $|
00003310: 30 38 30 31 2F 24 30 38 30 32 22 00 49 3B 9E 07 |0801/$0802".I;..|
00003320: 99 22 91 20 51 55 45 20 41 20 53 55 20 56 45 5A |.". QUE A SU VEZ|
00003330: 20 49 4E 44 49 43 41 4E 20 4C 41 20 44 49 52 45 | INDICAN LA DIRE|
00003340: 43 43 49 4F 4E 20 44 45 4C 00 6A 3B A3 07 99 22 |CCION DEL.j;..."|
00003350: 20 50 52 4F 58 49 4D 4F 20 45 53 4C 41 42 4F 4E | PROXIMO ESLABON|
00003360: 20 42 59 54 45 20 42 41 4A 4F 00 A3 3B A8 07 99 | BYTE BAJO..;...|
00003370: 22 11 1C D1 1F 43 4F 4E 20 45 53 54 4F 20 43 4F |"....CON ESTO CO|
00003380: 4D 50 4C 45 54 41 4D 4F 53 20 4E 55 45 53 54 52 |MPLETAMOS NUESTR|
00003390: 41 20 50 52 49 4D 45 52 41 20 20 20 20 54 41 52 |A PRIMERA TAR|
000033A0: 45 41 22 00 D4 3B B2 07 99 22 11 1C D1 41 48 4F |EA"..;..."...AHO|
000033B0: 52 41 20 1F 4E 4F 53 20 51 55 45 44 41 20 41 4C |RA .NOS QUEDA AL|
000033C0: 4D 41 43 45 4E 41 52 20 4C 41 20 44 49 52 45 43 |MACENAR LA DIREC|
000033D0: 43 49 4F 4E 00 FC 3B BC 07 99 22 20 44 45 4C 20 |CION..;..." DEL |
000033E0: 50 52 4F 58 49 4D 4F 20 4C 49 4E 4B 20 42 41 4A |PROXIMO LINK BAJ|
000033F0: 4F 20 45 4E 20 24 32 32 2F 24 32 33 00 27 3C C6 |O EN $22/$23.'<.|
00003400: 07 99 22 11 1C D1 1F 55 4E 41 20 56 45 5A 20 48 |.."....UNA VEZ H|
00003410: 45 43 48 4F 20 45 53 54 4F 20 54 45 4E 44 52 45 |ECHO ESTO TENDRE|
00003420: 4D 4F 53 20 55 4E 41 00 4C 3C D0 07 99 22 20 4E |MOS UNA.L<..." N|
00003430: 55 45 56 41 20 42 41 53 45 20 59 20 50 4F 44 52 |UEVA BASE Y PODR|
00003440: 45 4D 4F 53 20 45 4D 50 45 5A 41 52 00 62 3C D3 |EMOS EMPEZAR.b<.|
00003450: 07 99 22 20 54 4F 44 4F 20 44 45 20 4E 55 45 56 |.." TODO DE NUEV|
00003460: 4F 2E 00 90 3C D5 07 99 22 11 1C 20 28 41 20 4D |O...<...".. (A M|
00003470: 45 4E 4F 53 20 51 55 45 20 45 4E 43 4F 4E 54 52 |ENOS QUE ENCONTR|
00003480: 45 4D 4F 53 20 12 30 30 20 30 30 20 30 30 92 22 |EMOS .00 00 00."|
00003490: 00 C0 3C DA 07 99 22 20 51 55 45 20 53 49 47 4E |..<..." QUE SIGN|
000034A0: 49 46 49 43 41 20 46 49 4E 2D 44 45 4C 2D 50 52 |IFICA FIN-DEL-PR|
000034B0: 4F 47 52 41 4D 41 29 2E 22 3A 8D 36 33 30 30 30 |OGRAMA).":.63000|
000034C0: 00 E7 3C E4 07 99 22 93 51 55 49 5A 41 53 20 4E |..<...".QUIZAS N|
000034D0: 4F 20 53 45 20 48 41 20 44 41 44 4F 20 43 55 45 |O SE HA DADO CUE|
000034E0: 4E 54 41 2E 2E 2E 22 00 13 3D EE 07 99 22 20 11 |NTA..."..=..." .|
000034F0: D1 1F 50 45 52 4F 20 54 45 4E 45 4D 4F 53 20 4C |..PERO TENEMOS L|
00003500: 41 20 44 49 52 45 43 43 49 4F 4E 20 44 45 20 45 |A DIRECCION DE E|
00003510: 53 54 41 00 3C 3D F3 07 99 22 20 4E 55 45 56 41 |STA.<=..." NUEVA|
00003520: 20 42 41 53 45 20 28 45 4C 20 50 52 4F 58 49 4D | BASE (EL PROXIM|
00003530: 4F 20 4C 49 4E 4B 20 42 41 4A 4F 29 00 55 3D F8 |O LINK BAJO).U=.|
00003540: 07 99 22 11 45 4E 20 12 58 92 20 59 20 45 4E 20 |..".EN .X. Y EN |
00003550: 12 41 92 2E 22 00 98 3D 02 08 99 22 11 1C 58 1F |.A.."..=..."..X.|
00003560: 20 54 49 45 4E 45 20 45 4C 1C 20 42 59 54 45 20 | TIENE EL. BYTE |
00003570: 42 41 4A 4F 20 1F 20 21 22 3A 99 22 11 1C 41 1F |BAJO . !":."..A.|
00003580: 20 54 49 45 4E 45 20 45 4C 1C 20 42 59 54 45 20 | TIENE EL. BYTE |
00003590: 41 4C 54 4F 20 1F 20 21 00 BA 3D 0C 08 4D 53 24 |ALTO . !..=..MS$|
000035A0: B2 22 54 41 4C 45 4E 54 4F 53 4F 22 3A 8D 36 33 |."TALENTOSO":.63|
000035B0: 30 30 30 3A 8D 36 33 31 30 30 00 ED 3D 16 08 99 |000:.63100..=...|
000035C0: 22 93 1C 56 45 41 4D 4F 53 20 54 4F 44 4F 20 41 |"..VEAMOS TODO A|
000035D0: 48 4F 52 41 20 2E 2E 2E 20 45 53 54 45 20 41 54 |HORA ... ESTE AT|
000035E0: 45 4E 54 4F 21 22 3A 8D 36 33 30 30 30 00 0E 3E |ENTO!":.63000..>|
000035F0: 17 08 99 22 1F 93 2E 2C 20 42 34 42 36 20 41 35 |..."..., B4B6 A5|
00003600: 20 32 42 20 20 20 20 4C 44 41 20 24 32 42 00 34 | 2B LDA $2B.4|
00003610: 3E 18 08 8D 36 33 30 30 32 3A 99 22 2E 2C 20 42 |>...63002:."., B|
00003620: 34 42 38 20 41 34 20 32 43 20 20 20 20 4C 44 59 |4B8 A4 2C LDY|
00003630: 20 24 32 43 00 5A 3E 19 08 8D 36 33 30 30 32 3A | $2C.Z>...63002:|
00003640: 99 22 2E 2C 20 42 34 42 41 20 38 35 20 32 32 20 |."., B4BA 85 22 |
00003650: 20 20 20 53 54 41 20 24 32 32 00 80 3E 1A 08 8D | STA $22..>...|
00003660: 36 33 30 30 32 3A 99 22 2E 2C 20 42 34 42 43 20 |63002:."., B4BC |
00003670: 38 34 20 32 33 20 20 20 20 53 54 59 20 24 32 33 |84 23 STY $23|
00003680: 00 A2 3E 1B 08 8D 36 33 30 30 32 3A 99 22 2E 2C |..>...63002:.".,|
00003690: 20 42 34 42 45 20 31 38 20 20 20 20 20 20 20 43 | B4BE 18 C|
000036A0: 4C 43 00 C9 3E 1C 08 8D 36 33 30 30 32 3A 99 22 |LC..>...63002:."|
000036B0: 2E 2C 20 42 34 42 46 20 41 30 20 30 31 20 20 20 |., B4BF A0 01 |
000036C0: 20 4C 44 59 20 23 24 30 31 00 F3 3E 1D 08 8D 36 | LDY #$01..>...6|
000036D0: 33 30 30 32 3A 99 22 2E 2C 20 42 34 43 31 20 42 |3002:."., B4C1 B|
000036E0: 31 20 32 32 20 20 20 20 4C 44 41 20 28 24 32 32 |1 22 LDA ($22|
000036F0: 29 2C 59 00 1B 3F 1E 08 8D 36 33 30 30 32 3A 99 |),Y..?...63002:.|
00003700: 22 2E 2C 20 42 34 43 33 20 46 30 20 31 43 20 20 |"., B4C3 F0 1C |
00003710: 20 20 42 45 51 20 24 42 34 45 31 00 42 3F 1F 08 | BEQ $B4E1.B?..|
00003720: 8D 36 33 30 30 32 3A 99 22 2E 2C 20 42 34 43 35 |.63002:."., B4C5|
00003730: 20 41 30 20 30 34 20 20 20 20 4C 44 59 20 23 24 | A0 04 LDY #$|
00003740: 30 34 00 64 3F 20 08 8D 36 33 30 30 32 3A 99 22 |04.d? ..63002:."|
00003750: 2E 2C 20 42 34 43 37 20 43 38 20 20 20 20 20 20 |., B4C7 C8 |
00003760: 20 49 4E 59 00 8E 3F 21 08 8D 36 33 30 30 32 3A | INY..?!..63002:|
00003770: 99 22 2E 2C 20 42 34 43 38 20 42 31 20 32 32 20 |."., B4C8 B1 22 |
00003780: 20 20 20 4C 44 41 20 28 24 32 32 29 2C 59 00 B6 | LDA ($22),Y..|
00003790: 3F 22 08 8D 36 33 30 30 32 3A 99 22 2E 2C 20 42 |?"..63002:."., B|
000037A0: 34 43 41 20 44 30 20 46 42 20 20 20 20 42 4E 45 |4CA D0 FB BNE|
000037B0: 20 24 42 34 43 37 00 D8 3F 23 08 8D 36 33 30 30 | $B4C7..?#..6300|
000037C0: 32 3A 99 22 2E 2C 20 42 34 43 43 20 43 38 20 20 |2:."., B4CC C8 |
000037D0: 20 20 20 20 20 49 4E 59 00 FA 3F 24 08 8D 36 33 | INY..?$..63|
000037E0: 30 30 32 3A 99 22 2E 2C 20 42 34 43 44 20 39 38 |002:."., B4CD 98|
000037F0: 20 20 20 20 20 20 20 54 59 41 00 20 40 25 08 8D | TYA. @%..|
00003800: 36 33 30 30 32 3A 99 22 2E 2C 20 42 34 43 45 20 |63002:."., B4CE |
00003810: 36 35 20 32 32 20 20 20 20 41 44 43 20 24 32 32 |65 22 ADC $22|
00003820: 00 42 40 26 08 8D 36 33 30 30 32 3A 99 22 2E 2C |.B@&..63002:.".,|
00003830: 20 42 34 44 30 20 41 41 20 20 20 20 20 20 20 54 | B4D0 AA T|
00003840: 41 58 00 69 40 27 08 8D 36 33 30 30 32 3A 99 22 |AX.i@'..63002:."|
00003850: 2E 2C 20 42 34 44 31 20 41 30 20 30 30 20 20 20 |., B4D1 A0 00 |
00003860: 20 4C 44 59 20 23 24 30 30 00 93 40 28 08 8D 36 | LDY #$00..@(..6|
00003870: 33 30 30 32 3A 99 22 2E 2C 20 42 34 44 33 20 39 |3002:."., B4D3 9|
00003880: 31 20 32 32 20 20 20 20 53 54 41 20 28 24 32 32 |1 22 STA ($22|
00003890: 29 2C 59 00 B5 40 29 08 8D 36 33 30 30 32 3A 99 |),Y..@)..63002:.|
000038A0: 22 2E 2C 20 42 34 44 35 20 39 38 20 20 20 20 20 |"., B4D5 98 |
000038B0: 20 20 54 59 41 00 DB 40 2A 08 8D 36 33 30 30 32 | TYA..@*..63002|
000038C0: 3A 99 22 2E 2C 20 42 34 44 36 20 36 35 20 32 33 |:."., B4D6 65 23|
000038D0: 20 20 20 20 41 44 43 20 24 32 33 00 FD 40 34 08 | ADC $23..@4.|
000038E0: 8D 36 33 30 30 32 3A 99 22 2E 2C 20 42 34 44 38 |.63002:."., B4D8|
000038F0: 20 43 38 20 20 20 20 20 20 20 49 4E 59 00 27 41 | C8 INY.'A|
00003900: 35 08 8D 36 33 30 30 32 3A 99 22 2E 2C 20 42 34 |5..63002:."., B4|
00003910: 44 39 20 39 31 20 32 32 20 20 20 20 53 54 41 20 |D9 91 22 STA |
00003920: 28 24 32 32 29 2C 59 00 51 41 36 08 8D 36 33 30 |($22),Y.QA6..630|
00003930: 30 32 3A 99 22 2E 2C 20 42 34 44 42 20 38 36 20 |02:."., B4DB 86 |
00003940: 32 32 20 20 20 20 12 53 54 58 20 24 32 32 20 20 |22 .STX $22 |
00003950: 22 00 7B 41 37 08 8D 36 33 30 30 32 3A 99 22 2E |".{A7..63002:.".|
00003960: 2C 20 42 34 44 44 20 38 35 20 32 33 20 20 20 20 |, B4DD 85 23 |
00003970: 12 53 54 41 20 24 32 33 20 20 22 00 B3 41 38 08 |.STA $23 "..A8.|
00003980: 8D 36 33 30 30 32 3A 99 22 2E 2C 20 42 34 44 46 |.63002:."., B4DF|
00003990: 20 39 30 20 44 45 20 20 20 20 12 42 43 43 20 24 | 90 DE .BCC $|
000039A0: 42 34 42 46 92 5F 56 55 45 4C 56 41 20 41 54 52 |B4BF._VUELVA ATR|
000039B0: 41 53 22 00 DF 41 39 08 99 22 20 20 20 20 20 20 |AS"..A9.." |
000039C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000039D0: 20 20 20 20 20 41 20 1C 24 42 34 42 46 1F 22 00 | A .$B4BF.".|
000039E0: 0B 42 3A 08 99 22 20 20 20 20 20 20 20 20 20 20 |.B:.." |
000039F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003A00: 20 59 20 52 45 50 49 54 41 21 22 00 37 42 87 13 | Y REPITA!".7B..|
00003A10: 99 3A 8D 36 33 30 30 30 3A 99 22 93 22 3A 4D 53 |.:.63000:.".":MS|
00003A20: 24 B2 22 12 41 55 20 52 45 56 4F 49 52 21 92 22 |$.".AU REVOIR!."|
00003A30: 3A 8D 36 33 31 30 30 00 4D 42 88 13 81 49 B2 31 |:.63100.MB...I.1|
00003A40: A4 35 3A 8D 36 33 36 30 30 3A 82 3A 80 00 6E 42 |.5:.63600:.:..nB|
00003A50: 58 98 99 22 13 22 3B 3A 81 49 B2 31 A4 31 36 3A |X..".";:.I.1.16:|
00003A60: 99 43 4C 24 3A 82 3A 99 22 13 22 3B 3A 8E 00 98 |.CL$:.:.".";:...|
00003A70: 42 A2 9C 97 41 28 30 29 2C 33 32 3A 81 54 54 B2 |B...A(0),32:.TT.|
00003A80: 31 A4 50 50 3A 82 3A 81 49 B2 30 A4 36 3A 97 41 |1.PP:.:.I.0.6:.A|
00003A90: 28 49 AA 31 29 2C 33 32 00 CC 42 A3 9C 97 41 28 |(I.1),32..B...A(|
00003AA0: 49 29 2C C5 28 CA 28 4E 24 2C 49 AA 31 2C 31 29 |I),.(.(N$,I.1,1)|
00003AB0: 29 AA 34 38 3A 81 54 54 B2 31 A4 50 50 3A 82 3A |).48:.TT.1.PP:.:|
00003AC0: 82 3A 97 41 28 37 29 2C 34 38 3A 8E 00 EC 42 AE |.:.A(7),48:...B.|
00003AD0: 9C 81 49 B2 30 A4 37 3A 97 41 28 49 29 2C 31 36 |..I.0.7:.A(I),16|
00003AE0: 30 3A 81 54 54 B2 31 A4 50 50 3A 82 00 0C 43 AF |0:.TT.1.PP:...C.|
00003AF0: 9C 97 41 28 49 29 2C C5 28 CA 28 4E 24 2C 49 AA |..A(I),.(.(N$,I.|
00003B00: 31 2C 31 29 29 AA 34 38 3A 82 3A 8E 00 2C 43 B8 |1,1)).48:.:..,C.|
00003B10: 9C 81 49 B2 30 A4 37 3A 97 50 28 49 29 2C 31 36 |..I.0.7:.P(I),16|
00003B20: 30 3A 81 54 54 B2 31 A4 50 50 3A 82 00 4C 43 B9 |0:.TT.1.PP:..LC.|
00003B30: 9C 97 50 28 49 29 2C C5 28 CA 28 4E 24 2C 49 AA |..P(I),.(.(N$,I.|
00003B40: 31 2C 31 29 29 AA 34 38 3A 82 3A 8E 00 6C 43 C2 |1,1)).48:.:..lC.|
00003B50: 9C 81 49 B2 30 A4 37 3A 97 58 28 49 29 2C 31 36 |..I.0.7:.X(I),16|
00003B60: 30 3A 81 54 54 B2 31 A4 50 50 3A 82 00 8C 43 C3 |0:.TT.1.PP:...C.|
00003B70: 9C 97 58 28 49 29 2C C5 28 CA 28 4E 24 2C 49 AA |..X(I),.(.(N$,I.|
00003B80: 31 2C 31 29 29 AA 34 38 3A 82 3A 8E 00 AC 43 CC |1,1)).48:.:...C.|
00003B90: 9C 81 49 B2 30 A4 37 3A 97 59 28 49 29 2C 31 36 |..I.0.7:.Y(I),16|
00003BA0: 30 3A 81 54 54 B2 31 A4 50 50 3A 82 00 CC 43 CD |0:.TT.1.PP:...C.|
00003BB0: 9C 97 59 28 49 29 2C C5 28 CA 28 4E 24 2C 49 AA |..Y(I),.(.(N$,I.|
00003BC0: 31 2C 31 29 29 AA 34 38 3A 82 3A 8E 00 EC 43 E0 |1,1)).48:.:...C.|
00003BD0: 9C 81 49 B2 30 A4 37 3A 97 4D 28 49 29 2C 31 36 |..I.0.7:.M(I),16|
00003BE0: 30 3A 81 54 54 B2 31 A4 50 50 3A 82 00 0C 44 E1 |0:.TT.1.PP:...D.|
00003BF0: 9C 97 4D 28 49 29 2C C5 28 CA 28 4E 24 2C 49 AA |..M(I),.(.(N$,I.|
00003C00: 31 2C 31 29 29 AA 34 38 3A 82 3A 8E 00 2C 44 A0 |1,1)).48:.:..,D.|
00003C10: A0 81 49 B2 30 A4 37 3A 97 50 28 49 29 2C 31 36 |..I.0.7:.P(I),16|
00003C20: 30 3A 81 54 54 B2 31 A4 50 50 3A 82 00 42 44 A1 |0:.TT.1.PP:..BD.|
00003C30: A0 97 50 28 49 29 2C C2 28 41 28 49 29 29 3A 82 |..P(I),.(A(I)):.|
00003C40: 3A 8E 00 62 44 AA A0 81 49 B2 30 A4 37 3A 97 58 |:..bD...I.0.7:.X|
00003C50: 28 49 29 2C 31 36 30 3A 81 54 54 B2 31 A4 50 50 |(I),160:.TT.1.PP|
00003C60: 3A 82 00 78 44 AB A0 97 58 28 49 29 2C C2 28 41 |:..xD...X(I),.(A|
00003C70: 28 49 29 29 3A 82 3A 8E 00 98 44 B4 A0 81 49 B2 |(I)):.:...D...I.|
00003C80: 30 A4 37 3A 97 59 28 49 29 2C 31 36 30 3A 81 54 |0.7:.Y(I),160:.T|
00003C90: 54 B2 31 A4 50 50 3A 82 00 AE 44 B5 A0 97 59 28 |T.1.PP:...D...Y(|
00003CA0: 49 29 2C C2 28 41 28 49 29 29 3A 82 3A 8E 00 CE |I),.(A(I)):.:...|
00003CB0: 44 C8 A0 81 49 B2 30 A4 37 3A 97 4D 28 49 29 2C |D...I.0.7:.M(I),|
00003CC0: 31 36 30 3A 81 54 54 B2 31 A4 50 50 3A 82 00 E4 |160:.TT.1.PP:...|
00003CD0: 44 C9 A0 97 4D 28 49 29 2C C2 28 41 28 49 29 29 |D...M(I),.(A(I))|
00003CE0: 3A 82 3A 8E 00 04 45 7C A1 81 49 B2 30 A4 37 3A |:.:...E|..I.0.7:|
00003CF0: 97 41 28 49 29 2C 31 36 30 3A 81 54 54 B2 31 A4 |.A(I),160:.TT.1.|
00003D00: 50 50 3A 82 00 1A 45 7D A1 97 41 28 49 29 2C C2 |PP:...E}..A(I),.|
00003D10: 28 58 28 49 29 29 3A 82 3A 8E 00 3A 45 90 A1 81 |(X(I)):.:..:E...|
00003D20: 49 B2 30 A4 37 3A 97 4D 28 49 29 2C 31 36 30 3A |I.0.7:.M(I),160:|
00003D30: 81 54 54 B2 31 A4 50 50 3A 82 00 50 45 91 A1 97 |.TT.1.PP:..PE...|
00003D40: 4D 28 49 29 2C C2 28 58 28 49 29 29 3A 82 3A 8E |M(I),.(X(I)):.:.|
00003D50: 00 70 45 C2 A1 81 49 B2 30 A4 37 3A 97 41 28 49 |.pE...I.0.7:.A(I|
00003D60: 29 2C 31 36 30 3A 81 54 54 B2 31 A4 50 50 3A 82 |),160:.TT.1.PP:.|
00003D70: 00 86 45 C3 A1 97 41 28 49 29 2C C2 28 59 28 49 |..E...A(I),.(Y(I|
00003D80: 29 29 3A 82 3A 8E 00 A6 45 F4 A1 81 49 B2 30 A4 |)):.:...E...I.0.|
00003D90: 37 3A 97 4D 28 49 29 2C 31 36 30 3A 81 54 54 B2 |7:.M(I),160:.TT.|
00003DA0: 31 A4 50 50 3A 82 00 BC 45 F5 A1 97 4D 28 49 29 |1.PP:...E...M(I)|
00003DB0: 2C C2 28 59 28 49 29 29 3A 82 3A 8E 00 C2 45 60 |,.(Y(I)):.:...E`|
00003DC0: EA 3A 00 E4 45 61 EA 42 54 24 B2 22 13 22 3A 81 |.:..Ea.BT$.".":.|
00003DD0: 49 B2 31 A4 32 34 3A 42 54 24 B2 42 54 24 AA 22 |I.1.24:BT$.BT$."|
00003DE0: 11 22 3A 82 00 2E 46 62 EA 50 54 24 B2 22 1C B0 |.":...Fb.PT$."..|
00003DF0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 11 9D 9D 9D 9D |................|
00003E00: 9D 9D 9D 9D 9D 9D 9D 9D DD 1D 1D 1D 1D 1D 1D 1D |................|
00003E10: 1D 1D 1D DD 11 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00003E20: 9D AD B2 C0 C0 C0 C0 C0 C0 C0 C0 B2 BD 22 00 76 |.............".v|
00003E30: 46 63 EA 50 54 24 B2 50 54 24 AA 22 11 9D 9D 9D |Fc.PT$.PT$."....|
00003E40: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D CE A3 A3 A3 A3 A3 |................|
00003E50: A3 A3 A3 A3 A3 A3 A3 CD 11 9D 9D 9D 9D 9D 9D 9D |................|
00003E60: 9D 9D 9D 9D 9D 9D 9D A5 3D 3D 3D 3D 3D 3D 3D 3D |........========|
00003E70: 3D 3D 3D 3D A7 22 00 B2 46 64 EA 50 54 24 B2 50 |====."..Fd.PT$.P|
00003E80: 54 24 AA 22 11 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |T$."............|
00003E90: 9D 9D 9D D0 CF A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 D0 |................|
00003EA0: CF 91 91 91 91 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00003EB0: 9D 22 00 E9 46 65 EA 50 54 24 B2 42 54 24 AA 22 |."..Fe.PT$.BT$."|
00003EC0: 91 91 91 91 91 91 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00003ED0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00003EE0: 22 AA 50 54 24 AA 22 1F 22 00 19 47 67 EA 4D 4C |".PT$."."..Gg.ML|
00003EF0: 24 B2 22 13 11 11 11 11 11 11 11 11 11 1D 1D 1D |$.".............|
00003F00: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00003F10: 1D 1D 1D 1D 1D 1D 1D 1D 22 00 34 47 68 EA 57 44 |........".4Gh.WD|
00003F20: B2 34 30 3A 43 52 54 B2 31 30 32 34 3A 99 C7 28 |.40:CRT.1024:..(|
00003F30: 31 34 32 29 00 58 47 69 EA 57 32 B2 57 44 AD 32 |142).XGi.W2.WD.2|
00003F40: 3A 57 33 B2 57 44 AB 31 3A 57 31 24 B2 CA 28 C4 |:W3.WD.1:W1$..(.|
00003F50: 28 57 44 29 2C 32 29 3A 00 7A 47 6A EA 57 32 24 |(WD),2):.zGj.W2$|
00003F60: B2 CA 28 C4 28 57 32 29 2C 32 29 3A 57 33 24 B2 |..(.(W2),2):W3$.|
00003F70: CA 28 C4 28 57 33 29 2C 32 29 00 AE 47 73 EA 53 |.(.(W3),2)..Gs.S|
00003F80: 44 24 B2 22 13 11 11 11 11 11 11 11 11 11 22 3A |D$."..........":|
00003F90: 43 4C 24 B2 22 22 3A 81 49 B2 31 A4 57 44 AB 31 |CL$."":.I.1.WD.1|
00003FA0: 3A 43 4C 24 B2 43 4C 24 AA 22 20 22 3A 82 00 B4 |:CL$.CL$." ":...|
00003FB0: 47 74 EA 8E 00 C1 47 18 F6 99 42 54 24 43 4C 24 |Gt....G...BT$CL$|
00003FC0: 3B 00 E4 47 19 F6 99 42 54 24 22 12 52 45 54 55 |;..G...BT$".RETU|
00003FD0: 52 4E 92 20 50 41 52 41 20 43 4F 4E 54 49 4E 55 |RN. PARA CONTINU|
00003FE0: 41 52 22 3B 00 FA 47 1A F6 A1 5A 24 3A 8B 5A 24 |AR";..G...Z$:.Z$|
00003FF0: B3 B1 22 22 A7 36 33 30 30 32 00 0F 48 1B F6 A1 |.."".63002..H...|
00004000: 5A 24 3A 8B 5A 24 B2 22 22 A7 36 33 30 30 33 00 |Z$:.Z$."".63003.|
00004010: 15 48 1C F6 8E 00 2D 48 22 F6 99 42 54 24 43 4C |.H....-H"..BT$CL|
00004020: 24 3B 3A 81 54 54 B2 31 A4 35 30 3A 82 00 6D 48 |$;:.TT.1.50:..mH|
00004030: 23 F6 99 42 54 24 22 20 12 1C 20 20 20 20 20 20 |#..BT$" .. |
00004040: 52 45 54 55 52 4E 20 50 41 52 41 20 56 45 52 20 |RETURN PARA VER |
00004050: 4C 41 20 41 43 43 49 4F 4E 20 20 20 20 20 20 20 |LA ACCION |
00004060: 22 3B 3A 81 54 54 B2 31 A4 35 30 3A 82 00 83 48 |";:.TT.1.50:...H|
00004070: 24 F6 A1 5A 24 3A 8B 5A 24 B3 B1 22 22 A7 36 33 |$..Z$:.Z$.."".63|
00004080: 30 31 32 00 98 48 25 F6 A1 5A 24 3A 8B 5A 24 B2 |012..H%..Z$:.Z$.|
00004090: 22 22 A7 36 33 30 31 33 00 9E 48 26 F6 8E 00 B9 |"".63013..H&....|
000040A0: 48 7C F6 8D 36 33 36 30 30 3A 81 54 B2 31 A4 35 |H|..63600:.T.1.5|
000040B0: 3A 99 50 54 24 4D 53 24 3B 00 CF 48 7D F6 99 50 |:.PT$MS$;..H}..P|
000040C0: 54 24 22 20 20 20 20 20 20 20 20 20 20 22 3B 00 |T$" ";.|
000040D0: DE 48 7E F6 99 50 54 24 4D 53 24 3B 3A 82 00 E4 |.H~..PT$MS$;:...|
000040E0: 48 7F F6 8E 00 EF 48 E0 F6 8D 36 33 30 30 30 00 |H.....H...63000.|
000040F0: 10 49 E1 F6 99 53 44 24 3B 3A 81 54 B2 31 A4 31 |.I...SD$;:.T.1.1|
00004100: 35 3A 99 43 4C 24 3A 82 3A 99 53 44 24 3B 3A 8E |5:.CL$:.:.SD$;:.|
00004110: 00 24 49 44 F7 8D 36 33 31 30 30 3A 8D 36 33 30 |.$ID..63100:.630|
00004120: 31 30 3A 8E 00 44 49 A8 F7 99 22 13 22 3B 3A 81 |10:..DI...".";:.|
00004130: 49 B2 31 A4 35 3A 99 43 4C 24 3A 82 3A 99 22 13 |I.1.5:.CL$:.:.".|
00004140: 22 3B 3A 8E 00 7B 49 70 F8 97 35 34 32 39 36 2C |";:..{Ip..54296,|
00004150: 31 35 3A 97 35 34 32 37 38 2C 32 34 30 3A 97 35 |15:.54278,240:.5|
00004160: 34 32 37 36 2C 31 37 3A 97 35 34 32 37 33 2C 31 |4276,17:.54273,1|
00004170: 30 30 AA 31 30 30 AC BB 28 30 29 00 9F 49 72 F8 |00.100..(0)..Ir.|
00004180: 81 49 58 B2 31 A4 31 30 30 3A 82 3A 97 35 34 32 |.IX.1.100:.:.542|
00004190: 37 33 2C 30 3A 97 35 34 32 39 36 2C 30 3A 8E 00 |73,0:.54296,0:..|
000041A0: CD 49 D4 F8 97 35 34 32 39 36 2C 31 35 3A 97 35 |.I...54296,15:.5|
000041B0: 34 32 37 38 2C 32 34 30 3A 97 35 34 32 37 36 2C |4278,240:.54276,|
000041C0: 31 37 3A 97 35 34 32 37 33 2C 31 34 31 00 E2 49 |17:.54273,141..I|
000041D0: D5 F8 A1 58 24 3A 8B 58 24 B2 22 22 A7 36 33 37 |...X$:.X$."".637|
000041E0: 30 31 00 1D 4A D6 F8 97 35 34 32 37 33 2C 30 3A |01..J...54273,0:|
000041F0: 99 22 93 53 41 56 45 22 C7 28 33 34 29 22 43 2E |.".SAVE".(34)"C.|
00004200: 4D 41 51 55 49 4E 41 20 34 22 C7 28 33 34 29 22 |MAQUINA 4".(34)"|
00004210: 3A 47 4F 54 4F 36 33 37 30 30 22 3A 80 00 33 4A |:GOTO63700":..3J|
00004220: FF F9 8D 36 30 30 30 30 3A 99 22 93 22 3A 89 32 |...60000:.".":.2|
00004230: 30 32 30 00 00 00 41 |020...A |
..#...."......(C)1983 HORA SOFTWARE.0...
.".......H.... SAVE"ML4.ES.J1",8.E....53
281,15:.53280,12:."."......".
HORDAC 64......".....................
..................."......". .. MAS
LENGUAJE DE MAQINAS .. .":MS$."BIE
NVENIDO".)....".........................
................".B.#..60000:.63100:.630
00.U.(.."... VEAMOS COMO EL BASIC LIMPIA
LA PANTALLA". .2.."..AHORA OCUPAREMOS O
TRA INSTRUCCION"...7..".DEL MLM : DESASE
MBLAR...<.."..VAMOS A .DESASEMBLAR. EL P
ROGRAMA"...A..".EN LENGUAJE MAQUINA.*.F.
.".(ASUMIENDO QUE ESTA EN $E06B).".P.P..
"..UNA VEZ EN EL MLM SE ESCRIBE:.`.Z..".
.D E06B"..._..".... Y APARECE:.":
.63000...D..".., E068 A9 20 LDA #$23.
J.E.."., E06A 9D 00 80 STA $0400,X...F..
"., E06D 9D 00 81 STA $0500,X...G.."., E
070 9D 00 82 STA $0600,X.3.H.."., E073 9
D 00 83 STA $0700,X.N.I.."., E076 CA
DEX.W.J.."., E077 D0 F1 BNE $E06A"
:.63000...N..".., E068 A9 20 ..LDA #$
23 ".E.O..".., E06A 9D 00 80 ..STA $04
00,X"...P..".., E06D 9D 00 81 ..STA $050
0,X"...Q..".., E070 9D 00 82 ..STA $0600
,X".:.R..".., E073 9D 00 83 ..STA $0700,
X".A.S..".., E076 CA ..DEX
"...T..".., E077 D0 F1 ..BNE $E06A "
.P.X..".Q.RECONOCE LAS INSTRUCCIONES DEL
.ENSAMBLADOR.?":.63000......".
., E068 ..A9 20 ..LDA #$23 ".!...."
., E06A ..9D 00 80 ..STA $0400,X".I...."
., E06D ..9D 00 81 ..STA $0500,X".Q...."
., E070 ..9D 00 82 ..STA $0600,X"......"
., E073 ..9D 00 83 ..STA $0700,X".A...."
., E076 ..CA ..DEX "......"
., E077 ..D0 F1 ..BNE $E06A "......"
......Q.ESTOS SON LOS BYTES (EN HEX) QUE
".D...." SE ENCUENTRAN EN LA MEMORIA":.6
3000.I. ..".., ..E068 ..A9 20 LDA #$2
3......"., ..E06A ..9D 00 80 STA $0400,X
......"., ..E06D ..9D 00 81 STA $0500,X.
....."., ..E070 ..9D 00 82 STA $0600,X..
...."., ..E073 ..9D 00 83 STA $0700,X.$.
..."., ..E076 ..CA DEX.I...."., ..
E077 ..D0 F1 BNE $E06A.|...."........
..Q.ESTAS SON LAS DIRECCIONES EN LA"....
.." MEMORIA QUE CONTIENEN EL CODIGO.F...
." EN LENGUAJE MAQUINA":.63000.....MS$."
ADELANTE ":.63100......"...
NEW ".V....".QVE
AMOS QUE PASA AL EJECUTAR LA IN
STRUCCION NEW"......".QLA CODIFICACION E
STA DESDE $A644 A $A657......."..
Q.RECORDEMOS QUE LOS 3 PRIMEROS BYTES...
..." QUE SE ENCUENTRAN EN $0800/$0801/$0
802 TIENEN QUE SER .00 00 00...4....".Q
COMO $0800 TIEN DE TODAS MANERAS .00.A..
.." SOLO LLENAREMOS $0801/$0802 CON .00.
......."..Q.EL PUNTERO DEL .COMIENZO DE
BASIC. SE...A.." ENCUENTRA EN $2B/$2C Y
EL PUNTERO DEL...B.." .FIN DEL BASIC., S
E ESTA EN $2D/$2E,":.63000...D..".......
";.0...."........, A644 A9 00 .LDA #$
00 ._".W...."., A646 A8 .TAY
._"......63400:."LOS REGISTROS .A. Y
.Y. SE LLENAN"......".CON #$.00...AL EM
PEZAR.":.63000......".........., A647 91
2B .STA ($2B),Y... .. ..._."......63
400:.".COMO .$2B. CONTIENE LA DIRECCION
DEL.I....".COMIENZO DE BASIC,(GENERALMEN
TE $0801).Y....".#$.00. ES ALMACENADO EN
($2B)+Y.":.63000..."..63400:."AHORA CON
.INY. NOS PREPARAMOS A GUARDAR...,..".#
$.00. EN EL SEGUNDO BYTE DE 'BASIC'...6.
.".GENERALMENTE EN $0802..7.@.."........
..., A649 C8 .INY .. ..._."
:.63000.O.J.."............, A64A 91 2B
.STA ($2B),Y.. ..._."...T..63400:.".AL
LA VA!.":.63000...^..63400:."EL .FIN. DE
L BASIC TIENE QUE SER...H..".CAMBIADO AH
ORA POR .$0803. Y EL PUNTERO...R..".ALMA
CENADO EN .$2D/$2E..":.63000.M.S..".....
........, A64C A5 2B .LDA $2B .. .
.._.".W.|..63400:."CON .LDA $2B. NOS PRE
PARAMOS......".A SUMAR 2..":.63000.K....
63400:."PERO RECUERDE DE HACER ANTES .CL
C.!":.63000......".............., A64E 1
8 .CLC .. ..._.":.63000.G..
.."..............., AC4F 69 02 .ADC #
$02 .. ..._."......63400:."VEA..SUMAMO
S 2.":.".Y DESPUES GUARDAMOS ESTE LO-BYT
E"......".EN $2D.":.63000...B.."........
........, A651 85 2D .STA $2D .. .
.._.":.63000...L..63400:."AHORA HAY QUE
PONER EL HI-BYTE EN $2E.".R.V..".SE PREP
ARA .LDA $2C. QUE LUEGO IRA A $2E.":.630
00......"................., A653 A5 2C
.LDA $2C .. ..._.":.63000.I....6340
0:."PERO, SI POR SI ACASO HAY UN .CARRY.
"......".DEJADO POR .ADC #$02. HACEMOS..
":.63000.=....".................., A655
69 00 .ADC #$00 .. ..._.":.63000.O.
...63400:."..AHORA. PODEMOS COLOCAR EL H
I-BYTE"......".DENTRO DE $2E.":.63000.S.
..."..................., A657 85 2E .
STA $2E .. ..._.":.63000...&..63400:M
S$.". QUE LINDO.":.63100:.63000.2.0.."..
. ENCADENAMIENTO
".Y.5.."..QAHORA VEREMOS COMO SE HACE E
N...7.." BASIC EL ENCADENAMIENTO ENTRE U
NA...9.." INSTRUCCION Y LA SIGUIENTE..O.
:.."..QLAS INSTRUCCIONES EN BASIC ESTAN.
..;.." ESLABONADAS....<.." CADA VEZ QUE
INSERTAMOS O MODIFICAMOS.N.=.." UNA LINE
A, ESTOS ESLABONES TIENEN QUE SER RECR
EADOS".W.>.." ESTO SE LLAMA ..ENCADENAMI
ENTO.."...D.."...QRECUERDE QUE LAS INSTR
UCCIONES BASIC...N.." ESTAN ALMACENADAS
DESDE .$0801. EN EL SIGUIENTE FORMAT
O:"...S..63000:.".".2.X.BA$."...........
................ ..........".G(13).I.B.Z
$.". . . . . .--. .
.".G(13)...L.BA$.BA$.Z$.Z$.Z$."........
................... ..........".G(13).".
...."...V..BT$"......."BA$."LINK LINK NU
M. NUM. AREA BYTE LINK"......" BYTE B
YTE INST INST TEXTO CERO BYTE.L...." B
AJO ALTO BAJA ALTA BASIC =FIN BAJO....
.M1$.BT$.".. ..^^^^ ^^^^..":.M1$:."...Q.
ESTA EL LA DIRECCION DE LA......" PROXIM
A INSTRUCCION BASIC.":.63000.....M2$.BT$
.".. ..^^^^ ^^^^..":.M2$......
"......Q.ESTE ES EL NUMERO DE LA LINEA D
E BASIC.S...." PRIMERO BYTE BAJO DESPUES
BYTE ALTO.":.63000...F.M3$.BT$."..
..^^^^^^..":.M3$...P..".
........Q.ESTE ES EL TEXTO EN BASIC.":.6
3000.....M4$.BT$."..
..^^^^..":.M4$.)...."..........
.Q.FIN DE LA INSTRUCCION.":.63000.I...M5
$.BT$."..
..^^^^..":.M5$......".............Q.E
L PROXIMO ESLABON.":.63000......M5$"....
":.39000......".QPARA ENCONTRAR EL C
OMIENZO DEL BASIC (GENERALEMENTE EN $
0801)".*...." MIRAREMOS EN $2B/$2C PARA
OBTENER EL.O. .." PUNTERO AL PRIMER ESLA
BON (BYTE BAJO).":.M1$".... ":.63000.
..*.."........Q.DESPUES IREMOS HASTA EL
FINAL DE LA".O.4.." PRIMERA INSTRUCCION
BASIC....":.M4$.. >..63000:."......... Y
ALMACENAREMOS LA DIRECCION DEL.H H..M5$
:.63000:."........... ESLABON SIGUIENTE
EN $0801/$0802.".H R..M5$".... ":.M1$
;:.63000.. \..39000:.M1$".... ".. F..
"....Q.UNA VEZ ESTANDO EN EL BYTE BAJO D
EL".. P.." ESLABON PODEMOS SALTAR .POR L
O MENOS-"..!Z.." 5 BYTES. ANTES DE EMPEZ
AR A BUSCAR EL.?!.." BYTE ..00.. QUE IN
DICA EL .FINAL. DEL LA".J!..." INSTRUCCI
ON BASIC EN CURSO.":.63000..!...T.1.200:
.:.M2$:.T.1.200:.:.M3$:.T.1.200:...!...M
4$:.63000.O!...".., B4B6 A5 2B .LDA $
2B "..!..."., B4B8 A4 2C .LDY $2C
".."..."., B4BA 85 22 .STA $22
".>"..."., B4BC 84 23 .STY $23 ".M
"..."..Q.LA DIRECCION QUE INDICA EL COMI
ENZO".."..." SE OBTIENE EN $2B/$2C Y SE
GUARDA EN. $22/$23.".S"T..".Q.EN $
22/$23 ESTARA DEPOSITADO EL.."..." ESLAB
ON .BYTE BAJO. DURANTE NUESTRA".+#..." M
ARCHA A TRAVES DE LAS INSTUCCIONES..S#..
."..Q.EN ESTA DIRECCION HAREMOS LAS.U#..
." MODIFICACIONES NECESARIAS...#..."..Q.
AL EMPEZAR CONTIENE. $0801.":.63000.I#..
."..., B4BE 18 .CLC "..#..."
..HACEMOS UN .CLC. PARA PREPARAR"..$..."
.UN .ADC. POSTERIOR..":.63000.;$..."..,
B4BF A0 01 .LDY #$01 ".`$$.."., B4C
1 B1 22 .LDA ($22),Y"..$..."....Q.AHO
RA EL ACUMULADOR TIENE EL BYTE"..$8.." A
LMACENADO EN $0802.".Z$B.."..Q.ESE ES EL
.ESLABON BYTE ALTO. A LA"..$L.." PROXIM
A INSTRUCCION BASIC.".*%`.."..Q.SI SU VA
LOR ES ..00.. INDICARA EL".D%J.." FIN DE
L PROGRAMA!"..%T.."..Q.RECUERDE QHE EL F
IN DEL PROGRAMA TIENE .00. .00. .
00.".F%~.." LO QUE IMPLICA UN ESLABON BY
TE ALTO ..00..":.63000..%..."...., B4C3
F0 1C .BEQ $B4E1 "./&...T.1.20:.CL$:
.:."........POR LO TANTO COMPROBAMOS SI
ES CERO.Z&...".CON .BEQ. A $B4E1 QUE ES
LA SALIDA".S&...".DE ESTA RUTINA!."..&..
."...."CL$:.63000..&...".., B4B6 A5 2B
LDA $2B.H&..."., B4B8 A4 2C LDY $2C
..&..."., B4BA 85 22 STA $22..'...".,
B4BC 84 23 STY $23.!'..."., B4BE 18
CLC.A'..."., B4BF A0 01 LDY #$0
1.D'..."., B4C1 B1 22 LDA ($22),Y..'.
.."., B4C3 F0 1C BEQ $B4E1..'..."..Q.
ESTO ES LO QUE TENEMOS HASTA EL
MOMENTO"..'D.."..Q.SALTAREMOS AHORA 5 BY
TES ADELANTE..(N.." PARA COMENZAR A PROB
RAR CADA BYTE".O(X.." SI CONTIENE EL. .0
0.. FIN DE INSTRUCCION.":.63000.V(..."..
., B4C5 A0 04 .LDY #$04 "..(...".,
.B4C7. C8 .INY ".B(..."., B
4C8 B1 22 .LDA ($22),Y"..(..."., B4CA
D0 FB .BNE $B4C7 "..)..."..Q.HACEMO
S AQUI .LDY #$04 .Y LUEGO .INY.".F)..."
Y HACE QUE .$(22),Y. RESULTE 5 BYTES ".G
)..." DESPUES DE NUESTRA .BASE...)(.."..
Q.MIRAMOS SI EL CONTENIDO DE ESTE BYTE.B
)<.." ES .00. PARA VER SI ES EL FIN DE L
A".U)A.." INSTUCCION...*F.."..Q.LA INSTR
UCCION .B.RANCH .N.OT .E.QUAL.+*P.." QUE
ES LA COMPROBACION DE CERO.W*Z.." NOS C
ONECTA EN ESTE CASO HACIA ATRAS..*\.." A
L LUGAR EN LA MEMORIA .B4C7. DONDE SE..*
^.." ENCUENTRA LA INSTRUCCION .INY.V*`.
."..Q.NOS QUEDAMOS EN ESTE BUCLE HASTA..
*D.." ENCONTRAR EL .00":.63000.*+N.."...
Q.EVENTUALMENTE ENCONTRAREMOS EL BYTE. 0
0".Z+X..".Q.AHORA TENEMOS QUE BUSCAR LA
DIRECCION"..+..." DEL .PROXIMO. .ESLABON
BYTE BAJO.."..+..."..Q.UNA VEZ DETERMIN
ADA ESTA DIRECCION".S+..." HAREMOS DOS O
PERACIONES:..+..."..Q 1.:SERA ALMACENADA
EN EL ESLABON".., .." ANTERIOR (ORIGIN
ALMENTE $0801/$0802).".],..."..Q 2.:CAMB
IAREMOS EL PUNTERO EN NUESTRA..,..." BA
SE $22/23, QUE AL PRINCIPIO INDICABA..,.
.." .$0801, PARA QUE INDIQUE AHORA HACI
A.T,..." ESTE NUEVO ESLABON..,C.."..Q.E
N ESTE MOMENTO NOS ENCONTRAMOS.C-D.." (Y
)BYTES DESPUES DE LA DIRECCION IN
DICADA EN $22/$23.".Z-H.."...AVANCEMOS..
..":MS$."DALE-DALE": .63000:.63100. -R..
".., B4CC C8 .INY ".Q-...SD
$".Q..INY. AVANZA 1 BYTE PASADO EL ..00.
"..-..." .QUE INDICA FIN DE INSTRUCCION.
"...." HACIA EL PROXIMO ESLABON .LINK BA
JO.P...."..Q.AHORA .($22),Y. INDICA EL
PROXIMO.}...." .LINK BAJO. POR LO TANTO
HAREMOS LAS"......" DOS OPERACIONES CON
ESTA DIRECCION":.63000.U...."..., B4CD
98 TYA "......"., B4CE 65 2
2 ADC $22 "../..."., B4D0 AA
TAX ".A/..."., B4D1 A0 00 LDY
#$00 ".E/..."., B4D3 91 22 STA ($2
2),Y".~/...SD$;:.T.1.10:.CL$:.../...SD$"
.Q.LA DIRECCION QUE ESTA EN .$22 SE.V/..
." SUMA AL VALOR DE .Y. POR INTERMEDIO..
/..." LA OPERACION .ADC...0".."..Q.PERO
COMO .ADC. FUNCIONA SOLO CON EL.L0'.." R
EGISTRO .A. (ACUMULADOR) TENEMOS QUE..0)
.." TRANSFERIR PRIMERO EL VALOR DE .Y.
AL ACUMULADOR...0+.."..Q.ESTO SE H
ACE CON .TYA. Y SOLO ENTONCES..0,.." HAR
EMOS LA ADICION CON .ADC $22..":.63000..
1-.."..., B4CD 98 ..TYA ".D
1...".., B4CE 65 22 ..ADC $22 ":.6
3000.U1;..SD$".Q.AHORA TENEMOS EN .A. EL
BYTE BAJO DE..1@.." LA NUEVA DIRCCION '
BASE', ES DECIR, EL PROXIMO .LINK BA
JO.."..1E.." .GUARDAREMOS ESTE BYTE EN '
X'.."..1F..I.1.8:.CL$;:.:.63000./2G.."..
..., B4D0 AA .TAX ":.63000.
_2J..SD$".....Q.AHORA PONEMOS ESTE VALOR
EN LA"..2T.." DIRECCION QUE ESTA EN $22
/$23."..2Y..". (QUE MOMENTANEAMENTE ES $
0801)"..2^.." Y HACEMOS ESTO CON .STA. E
N .($22),0".%3C..".Q.PERO ESTO REQUIERE
'Y=0' PARA LO CUAL HACEMOS .LDY #
$00." T3H.."..QAHORA .HAREMOS .STA ($22)
,Y.!":.63000.~3I.."......, B4D1 A0 00
.LDY #$00 "..3J.."., B4D3 91 22 .S
TA ($22),Y":.63000.D3R..SD$;:.I.1.15:.CL
$;:...3W.MS$.". VAMOS! .":.63100:.63000
..4|..SD$;:.I.1.16:.CL$;:..-4}..".......
., B4D5 98 TYA ".R4~.."., B
4D6 65 23 ADC $23 ".W4.."., B4D8
C8 INY "..4..."., B4D9 91
22 STA ($22),Y".I4...SD$"......HEMOS
ARREGLADO EL LINK BAJO."..4...".AHORA L
E TOCA EL TURNO AL LINK ALTO.":.63000..5
...SD$"......";:.I.1.8:.CL$;:..L5...SD$"
....Q.AL HACER TYA EL ACUMULADOR SE".Y5.
.." CARGA CON 0 ..SIN.. TOCAR EL ACARREO
"..5...". DEJADO DE EL .ADC $22. ANTERIO
R.":.63000..5..."........, B4D5 98
.TYA ":.63000..6B..SD$"........Q
.LUEGO SUMAMOS CON .ADC $23.".76L.." INC
LUYENDO EL ACARREO (SI HABIA!)".]6V..".
AL BYTE ALTO DE NUESTRA NUEVA..6..." DIR
ECCION DE BASE EN $22/$23..6...63000..6.
.."........., B4D6 65 20 .ADC $23
":.63000..6...SD$"......";:.I.1.10:.CL$;
:...7...SD$"....Q.EL BYTE ALTO DE LA NUE
VA DIRECCION".@7..." LINK BAJO QUE ESTA
EN EL ACUMULADOR.M7...". HAY QUE COLOCAR
LO EN $0802 QUE QUEDA..7&.." UN BYTE DES
PUES DE $0801...70..63000..7:.MS$." . AY
AYAY!.":.63100..7;..".........., B4D8 C8
.INY "..8<.."., B4D9 91 22
.STA ($22),Y":.63000.08B..".., B4B6
A5 2B LDA $2B.O8C.."., B4B8 A4 2C
LDY $2C.N8D.."., B4BA 85 22 STA $22..
8E.."., B4BC 84 23 STY $23..8F.."., B
4BE 18 CLC.H8G.."., B4BF A0 01
LDY #$01..8H.."., B4C1 B1 22 LDA ($22
),Y..9I.."., B4C3 F0 1C BEQ $B4E1.,9J
.."., B4C5 A0 04 LDY #$04.G9K.."., B4
C7 C8 INY.J9L.."., B4C8 B1 22 L
DA ($22),Y..9M.."., B4CA D0 FB BNE $B
4C7..9N.."., B4CC C8 INY.A9O..".,
B4CD 98 TYA..9P.."., B4CE 65 22
ADC $22..9Q.."., B4D0 AA TAX..:R.
."., B4D1 A0 00 LDY #$00.>:S.."., B4D
3 91 22 STA ($22),Y.Y:T.."., B4D5 98
TYA.X:U.."., B4D6 65 23 ADC $23
..:V.."., B4D8 C8 INY..:..."., B4D
9 91 22 STA ($22),Y..:...BT$"....QUE
NOS QUEDA POR HACER???.":.63000..;..."..
.Q.HEMOS CAMBIADO LOS BYTES EN $0801/$08
02".I;...". QUE A SU VEZ INDICAN LA DIRE
CCION DEL.J;..." PROXIMO ESLABON BYTE BA
JO..;..."..Q.CON ESTO COMPLETAMOS NUESTR
A PRIMERA TAREA".T;..."..QAHORA .NOS
QUEDA ALMACENAR LA DIRECCION..;..." DEL
PROXIMO LINK BAJO EN $22/$23.'<F.."..Q.U
NA VEZ HECHO ESTO TENDREMOS UNA.L<P.." N
UEVA BASE Y PODREMOS EMPEZAR.B<S.." TODO
DE NUEVO...<U..".. (A MENOS QUE ENCONTR
EMOS .00 00 00."..<Z.." QUE SIGNIFICA FI
N-DEL-PROGRAMA).":.63000..<...".QUIZAS N
O SE HA DADO CUENTA..."..=..." .Q.PERO T
ENEMOS LA DIRECCION DE ESTA.<=..." NUEVA
BASE (EL PROXIMO LINK BAJO).U=...".EN .
X. Y EN .A.."..=..."..X. TIENE EL. BYTE
BAJO . !":."..A. TIENE EL. BYTE ALTO . !
..=..MS$."TALENTOSO":.63000:.63100..=...
"..VEAMOS TODO AHORA ... ESTE ATENTO!":.
63000..>..."..., B4B6 A5 2B LDA $2B.4
>...63002:."., B4B8 A4 2C LDY $2C.Z>.
..63002:."., B4BA 85 22 STA $22..>...
63002:."., B4BC 84 23 STY $23..>...63
002:."., B4BE 18 CLC.I>...63002:."
., B4BF A0 01 LDY #$01..>...63002:.".
, B4C1 B1 22 LDA ($22),Y..?...63002:.
"., B4C3 F0 1C BEQ $B4E1.B?...63002:.
"., B4C5 A0 04 LDY #$04.D? ..63002:."
., B4C7 C8 INY..?!..63002:."., B4C
8 B1 22 LDA ($22),Y..?"..63002:."., B
4CA D0 FB BNE $B4C7.X?#..63002:."., B
4CC C8 INY..?$..63002:."., B4CD 98
TYA. @%..63002:."., B4CE 65 22
ADC $22.B@&..63002:."., B4D0 AA T
AX.I@'..63002:."., B4D1 A0 00 LDY #$0
0..@(..63002:."., B4D3 91 22 STA ($22
),Y..@)..63002:."., B4D5 98 TYA..@
*..63002:."., B4D6 65 23 ADC $23..@4.
.63002:."., B4D8 C8 INY.'A5..63002
:."., B4D9 91 22 STA ($22),Y.QA6..630
02:."., B4DB 86 22 .STX $22 ".{A7..6
3002:."., B4DD 85 23 .STA $23 "..A8.
.63002:."., B4DF 90 DE .BCC $B4BF._VU
ELVA ATRAS"..A9.."
A .$B4BF."..B:.."
Y REPITA!".7B...:.63000:.".":MS
$.".AU REVOIR!.":.63100.MB...I.1.5:.6360
0:.:..NBX..".";:.I.1.16:.CL$:.:.".";:...
B...A(0),32:.TT.1.PP:.:.I.0.6:.A(I.1),32
.LB...A(I),E(J(N$,I.1,1)).48:.TT.1.PP:.:
.:.A(7),48:...B...I.0.7:.A(I),160:.TT.1.
PP:...C...A(I),E(J(N$,I.1,1)).48:.:..,C.
..I.0.7:.P(I),160:.TT.1.PP:..LC...P(I),E
(J(N$,I.1,1)).48:.:..LCB..I.0.7:.X(I),16
0:.TT.1.PP:...CC..X(I),E(J(N$,I.1,1)).48
:.:...CL..I.0.7:.Y(I),160:.TT.1.PP:..LCM
..Y(I),E(J(N$,I.1,1)).48:.:...C...I.0.7:
.M(I),160:.TT.1.PP:...D...M(I),E(J(N$,I.
1,1)).48:.:..,D .I.0.7:.P(I),160:.TT.1.
PP:..BD. .P(I),B(A(I)):.:..BD. .I.0.7:.X
(I),160:.TT.1.PP:..XD. .X(I),B(A(I)):.:.
..D. .I.0.7:.Y(I),160:.TT.1.PP:...D. .Y(
I),B(A(I)):.:..NDH .I.0.7:.M(I),160:.TT.
1.PP:...DI .M(I),B(A(I)):.:...E|..I.0.7:
.A(I),160:.TT.1.PP:...E}..A(I),B(X(I)):.
:..:E...I.0.7:.M(I),160:.TT.1.PP:..PE...
M(I),B(X(I)):.:..PEB..I.0.7:.A(I),160:.T
T.1.PP:...EC..A(I),B(Y(I)):.:...E...I.0.
7:.M(I),160:.TT.1.PP:...E...M(I),B(Y(I))
:.:..BE`.:..EA.BT$.".":.I.1.24:BT$.BT$."
.":...FB.PT$."..........................
.....................................".V
FC.PT$.PT$."..............N............M
................============."..FD.PT$.P
T$."...............PO..........PO.......
........."..FE.PT$.BT$."................
................".PT$."."..GG.ML$.".....
................................".4GH.WD
.40:CRT.1024:.G(142).XGI.W2.WD.2:W3.WD.1
:W1$.J(D(WD),2):.ZGJ.W2$.J(D(W2),2):W3$.
J(D(W3),2)..GS.SD$."..........":CL$."":.
I.1.WD.1:CL$.CL$." ":...GT...AG...BT$CL$
;..G...BT$".RETURN. PARA CONTINUAR";..G.
..Z$:.Z$.."".63002..H...Z$:.Z$."".63003.
.H....-H"..BT$CL$;:.TT.1.50:..MH#..BT$"
.. RETURN PARA VER LA ACCION
";:.TT.1.50:...H$..Z$:.Z$.."".63012..H%.
.Z$:.Z$."".63013..H&....H|..63600:.T.1.5
:.PT$MS$;.OH}..PT$" ";..H~..PT$
MS$;:...H....H...63000..I...SD$;:.T.1.1
5:.CL$:.:.SD$;:..$ID..63100:.63010:..DI.
..".";:.I.1.5:.CL$:.:.".";:..{IP..54296,
15:.54278,240:.54276,17:.54273,100.100..
(0)..IR..IX.1.100:.:.54273,0:.54296,0:..
MIT..54296,15:.54278,240:.54276,17:.5427
3,141..IU..X$:.X$."".63701..JV..54273,0:
.".SAVE"G(34)"C.MAQUINA 4"G(34)":GOTO637
00":..3J...60000:.".":.2020...A
> CLICK IMAGE PREVIEW FOR FULL MODAL