jens/vhdl
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
Files
881893fda3b4dee5e62a136681b619ccb49d3f67
vhdl/projects/cpu/src/systest/vga_test_irom_ld.vhdl
T
jens ea60299d26 - added 
git-svn-id: http://moon:8086/svn/vhdl/trunk@1414 cc03376c-175c-47c8-b038-4cd826a8556b
2021-03-21 10:47:01 +00:00

1182 lines
41 KiB
VHDL
Raw Blame History

-------------------------------------------------------------------------
-- Project: JCPU, a portable 8-bit RISC CPU written in VHDL
-- This file: loadable ROM
--
-- Copyright (C) 2007 J. Ahrensfeld
--
-- This program is free software: you can redistribute it and/or modify
-- it under the terms of the GNU General Public License as published by
-- the Free Software Foundation, either version 3 of the License, or
-- (at your option) any later version.
--
-- This program is distributed in the hope that it will be useful,
-- but WITHOUT ANY WARRANTY; without even the implied warranty of
-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-- GNU General Public License for more details.
--
-- You should have received a copy of the GNU General Public License
-- along with this program. If not, see <http://www.gnu.org/licenses/>.
--
-- For questions and ideas, please contact the author at jens@jayfield.org
--
--------------------------------------------------------------------------
LIBRARY ieee;
use IEEE.STD_LOGIC_1164.ALL;
USE ieee.numeric_std.ALL;
library UNISIM;
use UNISIM.VComponents.all;
library work;
use work.cpu_pkg.all;
ENTITY irom IS
Port (
clk : in STD_LOGIC;
ce : in STD_LOGIC;
addr : in inst_addr_t;
dout : out inst_t
);
END irom;
ARCHITECTURE loadable OF irom IS
-- JASM_ROM_INSERT_HERE
-- Assembled from vga_test.jsm
type imem_rom_t is array (0 to 1023) of inst_t;
signal imem_rom : imem_rom_t :=
(
"110000" & X"02D", -- 0x000: JMP 0x02D
"111100" & X"000", -- 0x001: PUSH R00
"111100" & X"001", -- 0x002: PUSH R01
"101000" & X"061", -- 0x003: XIN R01, (0x06)
"011001" & X"101", -- 0x004: AND R01, 0x10
"110001" & X"015", -- 0x005: JZ 0x015
"101000" & X"020", -- 0x006: XIN R00, (0x02)
"001010" & X"5F1", -- 0x007: MOVC R01, (0x5F)
"001011" & X"010", -- 0x008: MOVC (R00), R01
"010001" & X"011", -- 0x009: INC R01
"001111" & X"5E1", -- 0x00A: CMP R01, 0x5E
"111010" & X"00D", -- 0x00B: JNE 0x00D
"000011" & X"1E1", -- 0x00C: MOV R01, 0x1E
"001101" & X"5F1", -- 0x00D: MOVC (0x5F), R01
"001010" & X"5E0", -- 0x00E: MOVC R00, (0x5E)
"001110" & X"010", -- 0x00F: CMP R00, R01
"111010" & X"003", -- 0x010: JNE 0x003
"101000" & X"040", -- 0x011: XIN R00, (0x04)
"011011" & X"200", -- 0x012: OR R00, 0x20
"100100" & X"040", -- 0x013: XOUT (0x04), R00
"110000" & X"003", -- 0x014: JMP 0x003
"111011" & X"019", -- 0x015: CALL 0x019
"111101" & X"001", -- 0x016: POP R01
"111101" & X"000", -- 0x017: POP R00
"111111" & X"000", -- 0x018: RETI
"101000" & X"000", -- 0x019: XIN R00, (0x00)
"011001" & X"010", -- 0x01A: AND R00, 0x01
"110001" & X"023", -- 0x01B: JZ 0x023
"000011" & X"140", -- 0x01C: MOV R00, 0x14
"100101" & X"000", -- 0x01D: XOUT (R00), 0x00
"010001" & X"010", -- 0x01E: INC R00
"100101" & X"000", -- 0x01F: XOUT (R00), 0x00
"010001" & X"010", -- 0x020: INC R00
"100101" & X"000", -- 0x021: XOUT (R00), 0x00
"110000" & X"02C", -- 0x022: JMP 0x02C
"101000" & X"000", -- 0x023: XIN R00, (0x00)
"011001" & X"020", -- 0x024: AND R00, 0x02
"110001" & X"02C", -- 0x025: JZ 0x02C
"000011" & X"140", -- 0x026: MOV R00, 0x14
"100101" & X"000", -- 0x027: XOUT (R00), 0x00
"010001" & X"010", -- 0x028: INC R00
"100101" & X"000", -- 0x029: XOUT (R00), 0x00
"010001" & X"010", -- 0x02A: INC R00
"100101" & X"200", -- 0x02B: XOUT (R00), 0x20
"111110" & X"000", -- 0x02C: RET
"111011" & X"1C6", -- 0x02D: CALL 0x1C6
"111011" & X"1FB", -- 0x02E: CALL 0x1FB
"000011" & X"000", -- 0x02F: MOV R00, 0x00
"100100" & X"010", -- 0x030: XOUT (0x01), R00
"000011" & X"040", -- 0x031: MOV R00, 0x04
"100100" & X"040", -- 0x032: XOUT (0x04), R00
"101000" & X"040", -- 0x033: XIN R00, (0x04)
"011011" & X"020", -- 0x034: OR R00, 0x02
"100100" & X"040", -- 0x035: XOUT (0x04), R00
"000011" & X"030", -- 0x036: MOV R00, 0x03
"100110" & X"030", -- 0x037: COUT (0x03), R00
"000011" & X"010", -- 0x038: MOV R00, 0x01
"111011" & X"218", -- 0x039: CALL 0x218
"000011" & X"000", -- 0x03A: MOV R00, 0x00
"000011" & X"C01", -- 0x03B: MOV R01, 0xC0
"100100" & X"101", -- 0x03C: XOUT (0x10), R01
"100100" & X"111", -- 0x03D: XOUT (0x11), R01
"100100" & X"121", -- 0x03E: XOUT (0x12), R01
"111011" & X"28C", -- 0x03F: CALL 0x28C
"111011" & X"271", -- 0x040: CALL 0x271
"000011" & X"031", -- 0x041: MOV R01, 0x03
"111011" & X"21D", -- 0x042: CALL 0x21D
"000011" & X"031", -- 0x043: MOV R01, 0x03
"111011" & X"27D", -- 0x044: CALL 0x27D
"000011" & X"001", -- 0x045: MOV R01, 0x00
"111011" & X"289", -- 0x046: CALL 0x289
"101000" & X"040", -- 0x047: XIN R00, (0x04)
"011001" & X"CF0", -- 0x048: AND R00, 0xCF
"100100" & X"040", -- 0x049: XOUT (0x04), R00
"000011" & X"000", -- 0x04A: MOV R00, 0x00
"001101" & X"010", -- 0x04B: MOVC (0x01), R00
"111011" & X"080", -- 0x04C: CALL 0x080
"111011" & X"0D9", -- 0x04D: CALL 0x0D9
"111011" & X"10D", -- 0x04E: CALL 0x10D
"001010" & X"010", -- 0x04F: MOVC R00, (0x01)
"010001" & X"010", -- 0x050: INC R00
"001101" & X"010", -- 0x051: MOVC (0x01), R00
"110000" & X"04D", -- 0x052: JMP 0x04D
"000011" & X"010", -- 0x053: MOV R00, 0x01
"111011" & X"218", -- 0x054: CALL 0x218
"000011" & X"0E1", -- 0x055: MOV R01, 0x0E
"111011" & X"21D", -- 0x056: CALL 0x21D
"000011" & X"0E1", -- 0x057: MOV R01, 0x0E
"111011" & X"286", -- 0x058: CALL 0x286
"000011" & X"001", -- 0x059: MOV R01, 0x00
"111011" & X"289", -- 0x05A: CALL 0x289
"000011" & X"000", -- 0x05B: MOV R00, 0x00
"000011" & X"001", -- 0x05C: MOV R01, 0x00
"000011" & X"002", -- 0x05D: MOV R02, 0x00
"111011" & X"16A", -- 0x05E: CALL 0x16A
"000011" & X"800", -- 0x05F: MOV R00, 0x80
"000011" & X"08F", -- 0x060: MOV R15, 0x08
"000111" & X"000", -- 0x061: MOVX (R00), 0x00
"010001" & X"010", -- 0x062: INC R00
"010101" & X"01F", -- 0x063: DEC R15
"110010" & X"061", -- 0x064: JNZ 0x061
"000011" & X"082", -- 0x065: MOV R02, 0x08
"101000" & X"070", -- 0x066: XIN R00, (0x07)
"100100" & X"010", -- 0x067: XOUT (0x01), R00
"011001" & X"040", -- 0x068: AND R00, 0x04
"110010" & X"066", -- 0x069: JNZ 0x066
"000011" & X"100", -- 0x06A: MOV R00, 0x10
"100100" & X"070", -- 0x06B: XOUT (0x07), R00
"010101" & X"022", -- 0x06C: SUB R02, 0x02
"110010" & X"066", -- 0x06D: JNZ 0x066
"111011" & X"147", -- 0x06E: CALL 0x147
"000011" & X"060", -- 0x06F: MOV R00, 0x06
"100100" & X"070", -- 0x070: XOUT (0x07), R00
"101000" & X"080", -- 0x071: XIN R00, (0x08)
"001111" & X"F80", -- 0x072: CMP R00, 0xF8
"111010" & X"07A", -- 0x073: JNE 0x07A
"101000" & X"090", -- 0x074: XIN R00, (0x09)
"001111" & X"FF0", -- 0x075: CMP R00, 0xFF
"111010" & X"07A", -- 0x076: JNE 0x07A
"101000" & X"0A0", -- 0x077: XIN R00, (0x0A)
"001111" & X"FF0", -- 0x078: CMP R00, 0xFF
"111001" & X"07D", -- 0x079: JEQ 0x07D
"000011" & X"080", -- 0x07A: MOV R00, 0x08
"111011" & X"16E", -- 0x07B: CALL 0x16E
"110000" & X"065", -- 0x07C: JMP 0x065
"111011" & X"18E", -- 0x07D: CALL 0x18E
"111011" & X"292", -- 0x07E: CALL 0x292
"111110" & X"000", -- 0x07F: RET
"000011" & X"010", -- 0x080: MOV R00, 0x01
"111011" & X"218", -- 0x081: CALL 0x218
"000011" & X"391", -- 0x082: MOV R01, 0x39
"111011" & X"21D", -- 0x083: CALL 0x21D
"000011" & X"391", -- 0x084: MOV R01, 0x39
"111011" & X"286", -- 0x085: CALL 0x286
"000011" & X"001", -- 0x086: MOV R01, 0x00
"111011" & X"289", -- 0x087: CALL 0x289
"000011" & X"F80", -- 0x088: MOV R00, 0xF8
"000011" & X"FF1", -- 0x089: MOV R01, 0xFF
"000011" & X"132", -- 0x08A: MOV R02, 0x13
"111011" & X"16A", -- 0x08B: CALL 0x16A
"000011" & X"00F", -- 0x08C: MOV R15, 0x00
"111011" & X"1D2", -- 0x08D: CALL 0x1D2
"110011" & X"080", -- 0x08E: JC 0x080
"010001" & X"01F", -- 0x08F: INC R15
"001111" & X"0AF", -- 0x090: CMP R15, 0x0A
"111010" & X"08D", -- 0x091: JNE 0x08D
"111011" & X"1D2", -- 0x092: CALL 0x1D2
"110011" & X"080", -- 0x093: JC 0x080
"010001" & X"01F", -- 0x094: INC R15
"001101" & X"020", -- 0x095: MOVC (0x02), R00
"111011" & X"1D2", -- 0x096: CALL 0x1D2
"110011" & X"080", -- 0x097: JC 0x080
"010001" & X"01F", -- 0x098: INC R15
"001101" & X"030", -- 0x099: MOVC (0x03), R00
"111011" & X"1D2", -- 0x09A: CALL 0x1D2
"110011" & X"080", -- 0x09B: JC 0x080
"010001" & X"01F", -- 0x09C: INC R15
"001101" & X"040", -- 0x09D: MOVC (0x04), R00
"111011" & X"1D2", -- 0x09E: CALL 0x1D2
"110011" & X"080", -- 0x09F: JC 0x080
"010001" & X"01F", -- 0x0A0: INC R15
"001101" & X"050", -- 0x0A1: MOVC (0x05), R00
"001010" & X"021", -- 0x0A2: MOVC R01, (0x02)
"111011" & X"1D2", -- 0x0A3: CALL 0x1D2
"110011" & X"080", -- 0x0A4: JC 0x080
"010001" & X"01F", -- 0x0A5: INC R15
"001110" & X"01F", -- 0x0A6: CMP R15, R01
"111010" & X"0A3", -- 0x0A7: JNE 0x0A3
"000011" & X"08F", -- 0x0A8: MOV R15, 0x08
"000011" & X"1D1", -- 0x0A9: MOV R01, 0x1D
"000011" & X"032", -- 0x0AA: MOV R02, 0x03
"010101" & X"012", -- 0x0AB: DEC R02
"000010" & X"013", -- 0x0AC: MOV R03, R01
"111011" & X"1D2", -- 0x0AD: CALL 0x1D2
"110011" & X"0D7", -- 0x0AE: JC 0x0D7
"010100" & X"023", -- 0x0AF: SUB R03, R02
"001011" & X"030", -- 0x0B0: MOVC (R00), R03
"001111" & X"002", -- 0x0B1: TST R02
"110010" & X"0AB", -- 0x0B2: JNZ 0x0AB
"010101" & X"031", -- 0x0B3: SUB R01, 0x03
"010101" & X"01F", -- 0x0B4: DEC R15
"110010" & X"0AA", -- 0x0B5: JNZ 0x0AA
"000011" & X"082", -- 0x0B6: MOV R02, 0x08
"000011" & X"061", -- 0x0B7: MOV R01, 0x06
"000011" & X"803", -- 0x0B8: MOV R03, 0x80
"001001" & X"010", -- 0x0B9: MOVC R00, (R01)
"000110" & X"030", -- 0x0BA: MOVX (R00), R03
"010001" & X"011", -- 0x0BB: INC R01
"010001" & X"013", -- 0x0BC: INC R03
"001111" & X"863", -- 0x0BD: CMP R03, 0x86
"111010" & X"0B9", -- 0x0BE: JNE 0x0B9
"101000" & X"070", -- 0x0BF: XIN R00, (0x07)
"100100" & X"010", -- 0x0C0: XOUT (0x01), R00
"011001" & X"040", -- 0x0C1: AND R00, 0x04
"110010" & X"0BF", -- 0x0C2: JNZ 0x0BF
"000011" & X"100", -- 0x0C3: MOV R00, 0x10
"100100" & X"070", -- 0x0C4: XOUT (0x07), R00
"010101" & X"022", -- 0x0C5: SUB R02, 0x02
"110010" & X"0B8", -- 0x0C6: JNZ 0x0B8
"111011" & X"147", -- 0x0C7: CALL 0x147
"000011" & X"060", -- 0x0C8: MOV R00, 0x06
"100100" & X"070", -- 0x0C9: XOUT (0x07), R00
"111011" & X"18E", -- 0x0CA: CALL 0x18E
"101000" & X"080", -- 0x0CB: XIN R00, (0x08)
"001111" & X"000", -- 0x0CC: TST R00
"110010" & X"0D4", -- 0x0CD: JNZ 0x0D4
"101000" & X"090", -- 0x0CE: XIN R00, (0x09)
"001111" & X"000", -- 0x0CF: TST R00
"110010" & X"0D4", -- 0x0D0: JNZ 0x0D4
"101000" & X"0A0", -- 0x0D1: XIN R00, (0x0A)
"001111" & X"000", -- 0x0D2: TST R00
"110001" & X"0D7", -- 0x0D3: JZ 0x0D7
"000011" & X"080", -- 0x0D4: MOV R00, 0x08
"111011" & X"17E", -- 0x0D5: CALL 0x17E
"110000" & X"0A8", -- 0x0D6: JMP 0x0A8
"111011" & X"292", -- 0x0D7: CALL 0x292
"111110" & X"000", -- 0x0D8: RET
"000011" & X"010", -- 0x0D9: MOV R00, 0x01
"111011" & X"218", -- 0x0DA: CALL 0x218
"000011" & X"1D1", -- 0x0DB: MOV R01, 0x1D
"111011" & X"21D", -- 0x0DC: CALL 0x21D
"000011" & X"1D1", -- 0x0DD: MOV R01, 0x1D
"111011" & X"286", -- 0x0DE: CALL 0x286
"000011" & X"001", -- 0x0DF: MOV R01, 0x00
"111011" & X"289", -- 0x0E0: CALL 0x289
"000011" & X"000", -- 0x0E1: MOV R00, 0x00
"000011" & X"001", -- 0x0E2: MOV R01, 0x00
"000011" & X"202", -- 0x0E3: MOV R02, 0x20
"111011" & X"16A", -- 0x0E4: CALL 0x16A
"001010" & X"010", -- 0x0E5: MOVC R00, (0x01)
"001101" & X"000", -- 0x0E6: MOVC (0x00), R00
"000011" & X"082", -- 0x0E7: MOV R02, 0x08
"001010" & X"001", -- 0x0E8: MOVC R01, (0x00)
"000011" & X"800", -- 0x0E9: MOV R00, 0x80
"000011" & X"08F", -- 0x0EA: MOV R15, 0x08
"000110" & X"001", -- 0x0EB: MOVX (R01), R00
"010001" & X"010", -- 0x0EC: INC R00
"010001" & X"011", -- 0x0ED: INC R01
"010101" & X"01F", -- 0x0EE: DEC R15
"110010" & X"0EB", -- 0x0EF: JNZ 0x0EB
"101000" & X"070", -- 0x0F0: XIN R00, (0x07)
"100100" & X"010", -- 0x0F1: XOUT (0x01), R00
"011001" & X"040", -- 0x0F2: AND R00, 0x04
"110010" & X"0F0", -- 0x0F3: JNZ 0x0F0
"000011" & X"100", -- 0x0F4: MOV R00, 0x10
"100100" & X"070", -- 0x0F5: XOUT (0x07), R00
"001010" & X"000", -- 0x0F6: MOVC R00, (0x00)
"010001" & X"010", -- 0x0F7: INC R00
"001101" & X"000", -- 0x0F8: MOVC (0x00), R00
"010101" & X"022", -- 0x0F9: SUB R02, 0x02
"110010" & X"0E8", -- 0x0FA: JNZ 0x0E8
"111011" & X"147", -- 0x0FB: CALL 0x147
"000011" & X"060", -- 0x0FC: MOV R00, 0x06
"100100" & X"070", -- 0x0FD: XOUT (0x07), R00
"101000" & X"080", -- 0x0FE: XIN R00, (0x08)
"001111" & X"F80", -- 0x0FF: CMP R00, 0xF8
"111010" & X"107", -- 0x100: JNE 0x107
"101000" & X"090", -- 0x101: XIN R00, (0x09)
"001111" & X"FF0", -- 0x102: CMP R00, 0xFF
"111010" & X"107", -- 0x103: JNE 0x107
"101000" & X"0A0", -- 0x104: XIN R00, (0x0A)
"001111" & X"FF0", -- 0x105: CMP R00, 0xFF
"111001" & X"10A", -- 0x106: JEQ 0x10A
"000011" & X"080", -- 0x107: MOV R00, 0x08
"111011" & X"16E", -- 0x108: CALL 0x16E
"110000" & X"0E7", -- 0x109: JMP 0x0E7
"111011" & X"18E", -- 0x10A: CALL 0x18E
"111011" & X"292", -- 0x10B: CALL 0x292
"111110" & X"000", -- 0x10C: RET
"000011" & X"010", -- 0x10D: MOV R00, 0x01
"111011" & X"218", -- 0x10E: CALL 0x218
"000011" & X"2B1", -- 0x10F: MOV R01, 0x2B
"111011" & X"21D", -- 0x110: CALL 0x21D
"000011" & X"2B1", -- 0x111: MOV R01, 0x2B
"111011" & X"286", -- 0x112: CALL 0x286
"000011" & X"001", -- 0x113: MOV R01, 0x00
"111011" & X"289", -- 0x114: CALL 0x289
"000011" & X"000", -- 0x115: MOV R00, 0x00
"000011" & X"001", -- 0x116: MOV R01, 0x00
"000011" & X"202", -- 0x117: MOV R02, 0x20
"111011" & X"16A", -- 0x118: CALL 0x16A
"001010" & X"010", -- 0x119: MOVC R00, (0x01)
"001101" & X"000", -- 0x11A: MOVC (0x00), R00
"101000" & X"070", -- 0x11B: XIN R00, (0x07)
"100100" & X"010", -- 0x11C: XOUT (0x01), R00
"011001" & X"200", -- 0x11D: AND R00, 0x20
"110010" & X"122", -- 0x11E: JNZ 0x122
"000011" & X"200", -- 0x11F: MOV R00, 0x20
"100100" & X"070", -- 0x120: XOUT (0x07), R00
"110000" & X"11B", -- 0x121: JMP 0x11B
"111011" & X"147", -- 0x122: CALL 0x147
"000011" & X"050", -- 0x123: MOV R00, 0x05
"100100" & X"070", -- 0x124: XOUT (0x07), R00
"000011" & X"083", -- 0x125: MOV R03, 0x08
"101000" & X"070", -- 0x126: XIN R00, (0x07)
"100100" & X"010", -- 0x127: XOUT (0x01), R00
"011001" & X"200", -- 0x128: AND R00, 0x20
"110010" & X"126", -- 0x129: JNZ 0x126
"001010" & X"001", -- 0x12A: MOVC R01, (0x00)
"000011" & X"800", -- 0x12B: MOV R00, 0x80
"000011" & X"08F", -- 0x12C: MOV R15, 0x08
"000100" & X"002", -- 0x12D: MOVX R02, (R00)
"001110" & X"012", -- 0x12E: CMP R02, R01
"111010" & X"15A", -- 0x12F: JNE 0x15A
"010001" & X"010", -- 0x130: INC R00
"010001" & X"011", -- 0x131: INC R01
"010101" & X"01F", -- 0x132: DEC R15
"110010" & X"12D", -- 0x133: JNZ 0x12D
"000011" & X"200", -- 0x134: MOV R00, 0x20
"100100" & X"070", -- 0x135: XOUT (0x07), R00
"001010" & X"000", -- 0x136: MOVC R00, (0x00)
"010001" & X"010", -- 0x137: INC R00
"001101" & X"000", -- 0x138: MOVC (0x00), R00
"010101" & X"023", -- 0x139: SUB R03, 0x02
"110010" & X"126", -- 0x13A: JNZ 0x126
"101000" & X"080", -- 0x13B: XIN R00, (0x08)
"001111" & X"F80", -- 0x13C: CMP R00, 0xF8
"111010" & X"144", -- 0x13D: JNE 0x144
"101000" & X"090", -- 0x13E: XIN R00, (0x09)
"001111" & X"FF0", -- 0x13F: CMP R00, 0xFF
"111010" & X"144", -- 0x140: JNE 0x144
"101000" & X"0A0", -- 0x141: XIN R00, (0x0A)
"001111" & X"FF0", -- 0x142: CMP R00, 0xFF
"111001" & X"14E", -- 0x143: JEQ 0x14E
"000011" & X"080", -- 0x144: MOV R00, 0x08
"111011" & X"16E", -- 0x145: CALL 0x16E
"110000" & X"122", -- 0x146: JMP 0x122
"111100" & X"000", -- 0x147: PUSH R00
"101000" & X"070", -- 0x148: XIN R00, (0x07)
"100100" & X"010", -- 0x149: XOUT (0x01), R00
"011001" & X"010", -- 0x14A: AND R00, 0x01
"110010" & X"148", -- 0x14B: JNZ 0x148
"111101" & X"000", -- 0x14C: POP R00
"111110" & X"000", -- 0x14D: RET
"000011" & X"010", -- 0x14E: MOV R00, 0x01
"111011" & X"218", -- 0x14F: CALL 0x218
"000011" & X"481", -- 0x150: MOV R01, 0x48
"111011" & X"21D", -- 0x151: CALL 0x21D
"000011" & X"C00", -- 0x152: MOV R00, 0xC0
"111011" & X"218", -- 0x153: CALL 0x218
"111011" & X"199", -- 0x154: CALL 0x199
"000011" & X"481", -- 0x155: MOV R01, 0x48
"111011" & X"286", -- 0x156: CALL 0x286
"000011" & X"001", -- 0x157: MOV R01, 0x00
"111011" & X"289", -- 0x158: CALL 0x289
"110000" & X"168", -- 0x159: JMP 0x168
"000011" & X"010", -- 0x15A: MOV R00, 0x01
"111011" & X"218", -- 0x15B: CALL 0x218
"000011" & X"521", -- 0x15C: MOV R01, 0x52
"111011" & X"21D", -- 0x15D: CALL 0x21D
"111011" & X"199", -- 0x15E: CALL 0x199
"111011" & X"1B1", -- 0x15F: CALL 0x1B1
"000011" & X"521", -- 0x160: MOV R01, 0x52
"111011" & X"286", -- 0x161: CALL 0x286
"000011" & X"001", -- 0x162: MOV R01, 0x00
"111011" & X"289", -- 0x163: CALL 0x289
"101000" & X"040", -- 0x164: XIN R00, (0x04)
"011011" & X"100", -- 0x165: OR R00, 0x10
"100100" & X"040", -- 0x166: XOUT (0x04), R00
"110000" & X"168", -- 0x167: JMP 0x168
"111011" & X"292", -- 0x168: CALL 0x292
"111110" & X"000", -- 0x169: RET
"100100" & X"080", -- 0x16A: XOUT (0x08), R00
"100100" & X"091", -- 0x16B: XOUT (0x09), R01
"100100" & X"0A2", -- 0x16C: XOUT (0x0A), R02
"111110" & X"000", -- 0x16D: RET
"111100" & X"001", -- 0x16E: PUSH R01
"111100" & X"002", -- 0x16F: PUSH R02
"111100" & X"003", -- 0x170: PUSH R03
"101000" & X"081", -- 0x171: XIN R01, (0x08)
"101000" & X"092", -- 0x172: XIN R02, (0x09)
"101000" & X"0A3", -- 0x173: XIN R03, (0x0A)
"010000" & X"001", -- 0x174: ADD R01, R00
"010011" & X"002", -- 0x175: ADDC R02, 0x00
"010011" & X"003", -- 0x176: ADDC R03, 0x00
"100100" & X"081", -- 0x177: XOUT (0x08), R01
"100100" & X"092", -- 0x178: XOUT (0x09), R02
"100100" & X"0A3", -- 0x179: XOUT (0x0A), R03
"111101" & X"003", -- 0x17A: POP R03
"111101" & X"002", -- 0x17B: POP R02
"111101" & X"001", -- 0x17C: POP R01
"111110" & X"000", -- 0x17D: RET
"111100" & X"001", -- 0x17E: PUSH R01
"111100" & X"002", -- 0x17F: PUSH R02
"111100" & X"003", -- 0x180: PUSH R03
"101000" & X"081", -- 0x181: XIN R01, (0x08)
"101000" & X"092", -- 0x182: XIN R02, (0x09)
"101000" & X"0A3", -- 0x183: XIN R03, (0x0A)
"010100" & X"001", -- 0x184: SUB R01, R00
"010111" & X"002", -- 0x185: SUBC R02, 0x00
"010111" & X"003", -- 0x186: SUBC R03, 0x00
"100100" & X"081", -- 0x187: XOUT (0x08), R01
"100100" & X"092", -- 0x188: XOUT (0x09), R02
"100100" & X"0A3", -- 0x189: XOUT (0x0A), R03
"111101" & X"003", -- 0x18A: POP R03
"111101" & X"002", -- 0x18B: POP R02
"111101" & X"001", -- 0x18C: POP R01
"111110" & X"000", -- 0x18D: RET
"000011" & X"C00", -- 0x18E: MOV R00, 0xC0
"111011" & X"218", -- 0x18F: CALL 0x218
"111011" & X"199", -- 0x190: CALL 0x199
"111110" & X"000", -- 0x191: RET
"111100" & X"001", -- 0x192: PUSH R01
"111011" & X"1F4", -- 0x193: CALL 0x1F4
"111011" & X"22F", -- 0x194: CALL 0x22F
"000010" & X"010", -- 0x195: MOV R00, R01
"111011" & X"22F", -- 0x196: CALL 0x22F
"111101" & X"001", -- 0x197: POP R01
"111110" & X"000", -- 0x198: RET
"111100" & X"000", -- 0x199: PUSH R00
"101000" & X"0A0", -- 0x19A: XIN R00, (0x0A)
"111011" & X"192", -- 0x19B: CALL 0x192
"101000" & X"090", -- 0x19C: XIN R00, (0x09)
"111011" & X"192", -- 0x19D: CALL 0x192
"101000" & X"080", -- 0x19E: XIN R00, (0x08)
"111011" & X"192", -- 0x19F: CALL 0x192
"111101" & X"000", -- 0x1A0: POP R00
"111110" & X"000", -- 0x1A1: RET
"111100" & X"000", -- 0x1A2: PUSH R00
"010001" & X"031", -- 0x1A3: ADD R01, 0x03
"001001" & X"010", -- 0x1A4: MOVC R00, (R01)
"111011" & X"192", -- 0x1A5: CALL 0x192
"010101" & X"011", -- 0x1A6: DEC R01
"001001" & X"010", -- 0x1A7: MOVC R00, (R01)
"111011" & X"192", -- 0x1A8: CALL 0x192
"010101" & X"011", -- 0x1A9: DEC R01
"001001" & X"010", -- 0x1AA: MOVC R00, (R01)
"111011" & X"192", -- 0x1AB: CALL 0x192
"010101" & X"011", -- 0x1AC: DEC R01
"001001" & X"010", -- 0x1AD: MOVC R00, (R01)
"111011" & X"192", -- 0x1AE: CALL 0x192
"111101" & X"000", -- 0x1AF: POP R00
"111110" & X"000", -- 0x1B0: RET
"111100" & X"000", -- 0x1B1: PUSH R00
"000011" & X"C00", -- 0x1B2: MOV R00, 0xC0
"111011" & X"218", -- 0x1B3: CALL 0x218
"000101" & X"870", -- 0x1B4: MOVX R00, (0x87)
"111011" & X"192", -- 0x1B5: CALL 0x192
"000101" & X"860", -- 0x1B6: MOVX R00, (0x86)
"111011" & X"192", -- 0x1B7: CALL 0x192
"000101" & X"850", -- 0x1B8: MOVX R00, (0x85)
"111011" & X"192", -- 0x1B9: CALL 0x192
"000101" & X"840", -- 0x1BA: MOVX R00, (0x84)
"111011" & X"192", -- 0x1BB: CALL 0x192
"000101" & X"830", -- 0x1BC: MOVX R00, (0x83)
"111011" & X"192", -- 0x1BD: CALL 0x192
"000101" & X"820", -- 0x1BE: MOVX R00, (0x82)
"111011" & X"192", -- 0x1BF: CALL 0x192
"000101" & X"810", -- 0x1C0: MOVX R00, (0x81)
"111011" & X"192", -- 0x1C1: CALL 0x192
"000101" & X"800", -- 0x1C2: MOVX R00, (0x80)
"111011" & X"192", -- 0x1C3: CALL 0x192
"111101" & X"000", -- 0x1C4: POP R00
"111110" & X"000", -- 0x1C5: RET
"111100" & X"000", -- 0x1C6: PUSH R00
"000011" & X"0D0", -- 0x1C7: MOV R00, 0x0D
"100100" & X"130", -- 0x1C8: XOUT (0x13), R00
"000011" & X"1E0", -- 0x1C9: MOV R00, 0x1E
"001101" & X"5E0", -- 0x1CA: MOVC (0x5E), R00
"001101" & X"5F0", -- 0x1CB: MOVC (0x5F), R00
"000011" & X"E80", -- 0x1CC: MOV R00, 0xE8
"001101" & X"600", -- 0x1CD: MOVC (0x60), R00
"000011" & X"030", -- 0x1CE: MOV R00, 0x03
"001101" & X"610", -- 0x1CF: MOVC (0x61), R00
"111101" & X"000", -- 0x1D0: POP R00
"111110" & X"000", -- 0x1D1: RET
"111100" & X"001", -- 0x1D2: PUSH R01
"111100" & X"002", -- 0x1D3: PUSH R02
"111100" & X"003", -- 0x1D4: PUSH R03
"001010" & X"602", -- 0x1D5: MOVC R02, (0x60)
"001010" & X"613", -- 0x1D6: MOVC R03, (0x61)
"001010" & X"5E1", -- 0x1D7: MOVC R01, (0x5E)
"001010" & X"5F0", -- 0x1D8: MOVC R00, (0x5F)
"001110" & X"010", -- 0x1D9: CMP R00, R01
"111001" & X"1E6", -- 0x1DA: JEQ 0x1E6
"001001" & X"010", -- 0x1DB: MOVC R00, (R01)
"010001" & X"011", -- 0x1DC: INC R01
"001111" & X"5E1", -- 0x1DD: CMP R01, 0x5E
"111010" & X"1E0", -- 0x1DE: JNE 0x1E0
"000011" & X"1E1", -- 0x1DF: MOV R01, 0x1E
"001101" & X"5E1", -- 0x1E0: MOVC (0x5E), R01
"010101" & X"000", -- 0x1E1: CLRC
"111101" & X"003", -- 0x1E2: POP R03
"111101" & X"002", -- 0x1E3: POP R02
"111101" & X"001", -- 0x1E4: POP R01
"111110" & X"000", -- 0x1E5: RET
"111011" & X"2A7", -- 0x1E6: CALL 0x2A7
"010101" & X"012", -- 0x1E7: DEC R02
"010111" & X"003", -- 0x1E8: SUBC R03, 0x00
"110010" & X"1D8", -- 0x1E9: JNZ 0x1D8
"001111" & X"002", -- 0x1EA: TST R02
"110010" & X"1D8", -- 0x1EB: JNZ 0x1D8
"101011" & X"000", -- 0x1EC: SETC
"110000" & X"1E2", -- 0x1ED: JMP 0x1E2
"011001" & X"0F0", -- 0x1EE: AND R00, 0x0F
"001111" & X"0A0", -- 0x1EF: CMP R00, 0x0A
"110101" & X"1F2", -- 0x1F0: JLT 0x1F2
"010001" & X"070", -- 0x1F1: ADD R00, 0x07
"010001" & X"300", -- 0x1F2: ADD R00, 0x30
"111110" & X"000", -- 0x1F3: RET
"111100" & X"000", -- 0x1F4: PUSH R00
"111011" & X"1EE", -- 0x1F5: CALL 0x1EE
"000010" & X"001", -- 0x1F6: MOV R01, R00
"111101" & X"000", -- 0x1F7: POP R00
"101010" & X"000", -- 0x1F8: SWAP R00
"111011" & X"1EE", -- 0x1F9: CALL 0x1EE
"111110" & X"000", -- 0x1FA: RET
"000011" & X"002", -- 0x1FB: MOV R02, 0x00
"000011" & X"030", -- 0x1FC: MOV R00, 0x03
"111011" & X"247", -- 0x1FD: CALL 0x247
"111011" & X"2A0", -- 0x1FE: CALL 0x2A0
"000011" & X"002", -- 0x1FF: MOV R02, 0x00
"000011" & X"030", -- 0x200: MOV R00, 0x03
"111011" & X"247", -- 0x201: CALL 0x247
"111011" & X"2A0", -- 0x202: CALL 0x2A0
"000011" & X"002", -- 0x203: MOV R02, 0x00
"000011" & X"020", -- 0x204: MOV R00, 0x02
"111011" & X"247", -- 0x205: CALL 0x247
"111011" & X"2A7", -- 0x206: CALL 0x2A7
"000011" & X"280", -- 0x207: MOV R00, 0x28
"111011" & X"218", -- 0x208: CALL 0x218
"000011" & X"0C0", -- 0x209: MOV R00, 0x0C
"111011" & X"218", -- 0x20A: CALL 0x218
"000011" & X"060", -- 0x20B: MOV R00, 0x06
"111011" & X"218", -- 0x20C: CALL 0x218
"000011" & X"010", -- 0x20D: MOV R00, 0x01
"111011" & X"218", -- 0x20E: CALL 0x218
"111110" & X"000", -- 0x20F: RET
"111100" & X"000", -- 0x210: PUSH R00
"111011" & X"23B", -- 0x211: CALL 0x23B
"011001" & X"800", -- 0x212: AND R00, 0x80
"110001" & X"216", -- 0x213: JZ 0x216
"111011" & X"2BE", -- 0x214: CALL 0x2BE
"110000" & X"211", -- 0x215: JMP 0x211
"111101" & X"000", -- 0x216: POP R00
"111110" & X"000", -- 0x217: RET
"111100" & X"002", -- 0x218: PUSH R02
"000011" & X"002", -- 0x219: MOV R02, 0x00
"111011" & X"234", -- 0x21A: CALL 0x234
"111101" & X"002", -- 0x21B: POP R02
"111110" & X"000", -- 0x21C: RET
"111100" & X"000", -- 0x21D: PUSH R00
"000100" & X"010", -- 0x21E: MOVX R00, (R01)
"010001" & X"011", -- 0x21F: INC R01
"001111" & X"000", -- 0x220: TST R00
"110001" & X"224", -- 0x221: JZ 0x224
"111011" & X"22F", -- 0x222: CALL 0x22F
"110000" & X"21E", -- 0x223: JMP 0x21E
"111101" & X"000", -- 0x224: POP R00
"111110" & X"000", -- 0x225: RET
"111100" & X"000", -- 0x226: PUSH R00
"001001" & X"010", -- 0x227: MOVC R00, (R01)
"010001" & X"011", -- 0x228: INC R01
"001111" & X"000", -- 0x229: TST R00
"110001" & X"22D", -- 0x22A: JZ 0x22D
"111011" & X"22F", -- 0x22B: CALL 0x22F
"110000" & X"227", -- 0x22C: JMP 0x227
"111101" & X"000", -- 0x22D: POP R00
"111110" & X"000", -- 0x22E: RET
"111100" & X"002", -- 0x22F: PUSH R02
"000011" & X"402", -- 0x230: MOV R02, 0x40
"111011" & X"234", -- 0x231: CALL 0x234
"111101" & X"002", -- 0x232: POP R02
"111110" & X"000", -- 0x233: RET
"111011" & X"210", -- 0x234: CALL 0x210
"111100" & X"000", -- 0x235: PUSH R00
"101010" & X"000", -- 0x236: SWAP R00
"111011" & X"247", -- 0x237: CALL 0x247
"111101" & X"000", -- 0x238: POP R00
"111011" & X"247", -- 0x239: CALL 0x247
"111110" & X"000", -- 0x23A: RET
"111100" & X"002", -- 0x23B: PUSH R02
"000011" & X"002", -- 0x23C: MOV R02, 0x00
"111011" & X"240", -- 0x23D: CALL 0x240
"111101" & X"002", -- 0x23E: POP R02
"111110" & X"000", -- 0x23F: RET
"111011" & X"25A", -- 0x240: CALL 0x25A
"101010" & X"000", -- 0x241: SWAP R00
"111100" & X"000", -- 0x242: PUSH R00
"111011" & X"25A", -- 0x243: CALL 0x25A
"111101" & X"002", -- 0x244: POP R02
"011010" & X"020", -- 0x245: OR R00, R02
"111110" & X"000", -- 0x246: RET
"111100" & X"001", -- 0x247: PUSH R01
"011001" & X"0F0", -- 0x248: AND R00, 0x0F
"000010" & X"001", -- 0x249: MOV R01, R00
"011010" & X"021", -- 0x24A: OR R01, R02
"100100" & X"031", -- 0x24B: XOUT (0x03), R01
"111011" & X"2BE", -- 0x24C: CALL 0x2BE
"000010" & X"001", -- 0x24D: MOV R01, R00
"011010" & X"021", -- 0x24E: OR R01, R02
"011011" & X"801", -- 0x24F: OR R01, 0x80
"100100" & X"031", -- 0x250: XOUT (0x03), R01
"111011" & X"2BE", -- 0x251: CALL 0x2BE
"000010" & X"001", -- 0x252: MOV R01, R00
"011010" & X"021", -- 0x253: OR R01, R02
"100100" & X"031", -- 0x254: XOUT (0x03), R01
"111011" & X"2BE", -- 0x255: CALL 0x2BE
"011011" & X"201", -- 0x256: OR R01, 0x20
"100100" & X"031", -- 0x257: XOUT (0x03), R01
"111101" & X"001", -- 0x258: POP R01
"111110" & X"000", -- 0x259: RET
"111100" & X"001", -- 0x25A: PUSH R01
"000011" & X"201", -- 0x25B: MOV R01, 0x20
"011010" & X"021", -- 0x25C: OR R01, R02
"100100" & X"031", -- 0x25D: XOUT (0x03), R01
"111011" & X"2BE", -- 0x25E: CALL 0x2BE
"000011" & X"201", -- 0x25F: MOV R01, 0x20
"011010" & X"021", -- 0x260: OR R01, R02
"011011" & X"801", -- 0x261: OR R01, 0x80
"100100" & X"031", -- 0x262: XOUT (0x03), R01
"111011" & X"2BE", -- 0x263: CALL 0x2BE
"101000" & X"030", -- 0x264: XIN R00, (0x03)
"011001" & X"0F0", -- 0x265: AND R00, 0x0F
"000011" & X"201", -- 0x266: MOV R01, 0x20
"011010" & X"021", -- 0x267: OR R01, R02
"100100" & X"031", -- 0x268: XOUT (0x03), R01
"111011" & X"2BE", -- 0x269: CALL 0x2BE
"111101" & X"001", -- 0x26A: POP R01
"111110" & X"000", -- 0x26B: RET
"111100" & X"000", -- 0x26C: PUSH R00
"000011" & X"020", -- 0x26D: MOV R00, 0x02
"100100" & X"0E0", -- 0x26E: XOUT (0x0E), R00
"111101" & X"000", -- 0x26F: POP R00
"111110" & X"000", -- 0x270: RET
"111100" & X"000", -- 0x271: PUSH R00
"000011" & X"010", -- 0x272: MOV R00, 0x01
"100100" & X"0E0", -- 0x273: XOUT (0x0E), R00
"111101" & X"000", -- 0x274: POP R00
"111110" & X"000", -- 0x275: RET
"111011" & X"28C", -- 0x276: CALL 0x28C
"100100" & X"0C1", -- 0x277: XOUT (0x0C), R01
"100100" & X"0B0", -- 0x278: XOUT (0x0B), R00
"111110" & X"000", -- 0x279: RET
"111011" & X"28C", -- 0x27A: CALL 0x28C
"100100" & X"0D0", -- 0x27B: XOUT (0x0D), R00
"111110" & X"000", -- 0x27C: RET
"111100" & X"000", -- 0x27D: PUSH R00
"000100" & X"010", -- 0x27E: MOVX R00, (R01)
"010001" & X"011", -- 0x27F: INC R01
"001111" & X"000", -- 0x280: TST R00
"110001" & X"284", -- 0x281: JZ 0x284
"111011" & X"27A", -- 0x282: CALL 0x27A
"110000" & X"27E", -- 0x283: JMP 0x27E
"111101" & X"000", -- 0x284: POP R00
"111110" & X"000", -- 0x285: RET
"111011" & X"26C", -- 0x286: CALL 0x26C
"111011" & X"27D", -- 0x287: CALL 0x27D
"111110" & X"000", -- 0x288: RET
"111011" & X"27D", -- 0x289: CALL 0x27D
"111011" & X"26C", -- 0x28A: CALL 0x26C
"111110" & X"000", -- 0x28B: RET
"111100" & X"000", -- 0x28C: PUSH R00
"101000" & X"0E0", -- 0x28D: XIN R00, (0x0E)
"011001" & X"020", -- 0x28E: AND R00, 0x02
"110001" & X"28D", -- 0x28F: JZ 0x28D
"111101" & X"000", -- 0x290: POP R00
"111110" & X"000", -- 0x291: RET
"111100" & X"00F", -- 0x292: PUSH R15
"000011" & X"0AF", -- 0x293: MOV R15, 0x0A
"111011" & X"299", -- 0x294: CALL 0x299
"010101" & X"01F", -- 0x295: DEC R15
"110010" & X"294", -- 0x296: JNZ 0x294
"111101" & X"00F", -- 0x297: POP R15
"111110" & X"000", -- 0x298: RET
"111100" & X"00F", -- 0x299: PUSH R15
"000011" & X"0AF", -- 0x29A: MOV R15, 0x0A
"111011" & X"2A0", -- 0x29B: CALL 0x2A0
"010101" & X"01F", -- 0x29C: DEC R15
"110010" & X"29B", -- 0x29D: JNZ 0x29B
"111101" & X"00F", -- 0x29E: POP R15
"111110" & X"000", -- 0x29F: RET
"111100" & X"00F", -- 0x2A0: PUSH R15
"000011" & X"0AF", -- 0x2A1: MOV R15, 0x0A
"111011" & X"2A7", -- 0x2A2: CALL 0x2A7
"010101" & X"01F", -- 0x2A3: DEC R15
"110010" & X"2A2", -- 0x2A4: JNZ 0x2A2
"111101" & X"00F", -- 0x2A5: POP R15
"111110" & X"000", -- 0x2A6: RET
"111100" & X"00F", -- 0x2A7: PUSH R15
"000011" & X"0AF", -- 0x2A8: MOV R15, 0x0A
"111011" & X"2AE", -- 0x2A9: CALL 0x2AE
"010101" & X"01F", -- 0x2AA: DEC R15
"110010" & X"2A9", -- 0x2AB: JNZ 0x2A9
"111101" & X"00F", -- 0x2AC: POP R15
"111110" & X"000", -- 0x2AD: RET
"111100" & X"00F", -- 0x2AE: PUSH R15
"000011" & X"0AF", -- 0x2AF: MOV R15, 0x0A
"111011" & X"2B5", -- 0x2B0: CALL 0x2B5
"010101" & X"01F", -- 0x2B1: DEC R15
"110010" & X"2B0", -- 0x2B2: JNZ 0x2B0
"111101" & X"00F", -- 0x2B3: POP R15
"111110" & X"000", -- 0x2B4: RET
"111100" & X"00F", -- 0x2B5: PUSH R15
"000011" & X"63F", -- 0x2B6: MOV R15, 0x63
"000000" & X"000", -- 0x2B7: NOP
"000000" & X"000", -- 0x2B8: NOP
"000000" & X"000", -- 0x2B9: NOP
"010101" & X"01F", -- 0x2BA: DEC R15
"110010" & X"2B7", -- 0x2BB: JNZ 0x2B7
"111101" & X"00F", -- 0x2BC: POP R15
"111110" & X"000", -- 0x2BD: RET
"111100" & X"00F", -- 0x2BE: PUSH R15
"000011" & X"09F", -- 0x2BF: MOV R15, 0x09
"000000" & X"000", -- 0x2C0: NOP
"000000" & X"000", -- 0x2C1: NOP
"000000" & X"000", -- 0x2C2: NOP
"010101" & X"01F", -- 0x2C3: DEC R15
"110010" & X"2C0", -- 0x2C4: JNZ 0x2C0
"111101" & X"00F", -- 0x2C5: POP R15
"111110" & X"000", -- 0x2C6: RET
"111100" & X"001", -- 0x2C7: PUSH R01
"101000" & X"061", -- 0x2C8: XIN R01, (0x06)
"011001" & X"021", -- 0x2C9: AND R01, 0x02
"110010" & X"2C8", -- 0x2CA: JNZ 0x2C8
"100100" & X"020", -- 0x2CB: XOUT (0x02), R00
"111101" & X"001", -- 0x2CC: POP R01
"111110" & X"000", -- 0x2CD: RET
"111100" & X"001", -- 0x2CE: PUSH R01
"101000" & X"061", -- 0x2CF: XIN R01, (0x06)
"011001" & X"101", -- 0x2D0: AND R01, 0x10
"110001" & X"2CF", -- 0x2D1: JZ 0x2CF
"101000" & X"020", -- 0x2D2: XIN R00, (0x02)
"111101" & X"001", -- 0x2D3: POP R01
"111110" & X"000", -- 0x2D4: RET
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000",
"000000" & X"000"
);
signal jtag_ld_clk : STD_LOGIC;
signal jtag_ld_we : STD_LOGIC;
signal jtag_ld_addr : inst_addr_t;
signal jtag_ld_dout : inst_t;
signal jtag_ld_din : inst_t;
signal bs_rst, bs_sel, bs_shift, bs_tdi, bs_tdo : std_logic;
signal bs_capture, bs_clk0, bs_clk1, bs_update0, bs_update1 : std_logic;
signal user_regi, user_rego : unsigned (31 downto 0);
constant id : unsigned (31 downto 0) := X"BABE" & X"BEEF";
begin
--------------------------------------------------------------------------
-- Virtex-4: JTAG Loader
--------------------------------------------------------------------------
i00_BUFG : BUFG
port map
(
O => bs_clk1,
I => bs_clk0
);
i01_BUFG : BUFG
port map
(
O => bs_update1,
I => bs_update0
);
BSCAN_VIRTEX4_inst1 : BSCAN_VIRTEX4
generic map
(
JTAG_CHAIN => 1 -- Value to set BSCAN site of device. Possible values: (1,2,3 or 4)
)
port map
(
CAPTURE => bs_capture, -- CAPTURE output from TAP controller
DRCK => bs_clk0, -- Data register output for USER functions
RESET => bs_rst, -- Reset output from TAP controller
SEL => bs_sel, -- USER active output
SHIFT => bs_shift, -- SHIFT output from TAP controller
TDI => bs_tdi, -- TDI output from TAP controller
UPDATE => bs_update0, -- UPDATE output from TAP controller
TDO => bs_tdo -- Data input for USER function
);
jtag_ld_addr <= user_regi(user_regi'left downto user_regi'left-inst_addr_t'length+1);
jtag_ld_din <= user_regi(inst_t'length-1 downto 0);
jtag_ld_clk <= bs_update1;
jtag_ld_we <= bs_sel;
sipo:
process (bs_rst, bs_clk1, bs_tdi, bs_shift)
begin
if bs_rst = '1' then
user_regi <= (others => '0');
elsif rising_edge(bs_clk1) then
if bs_shift = '1' then
user_regi <= bs_tdi & user_regi(user_regi'left downto 1);
end if;
end if;
end process;
piso:
process (bs_rst, bs_clk1, bs_shift, user_rego)
begin
bs_tdo <= user_rego(0);
if bs_rst = '1' then
user_rego <= (others => '0');
elsif rising_edge(bs_clk1) then
if bs_shift = '1' then
user_rego <= user_rego(0) & user_rego(user_rego'left downto 1);
else
user_rego <= (user_rego'left downto inst_t'length => '0') & jtag_ld_dout;
-- user_rego <= id;
end if;
end if;
end process;
--------------------------------------------------------------------------
-- ROM Read/Write
--------------------------------------------------------------------------
PROM_READ:
process(clk, ce)
begin
if rising_edge(clk) and ce = '1' then
dout <= imem_rom(to_integer(addr));
end if;
end process;
PROM_WRITE:
process(jtag_ld_clk, jtag_ld_we)
begin
if rising_edge(jtag_ld_clk) then
if jtag_ld_we = '1' then
imem_rom(to_integer(jtag_ld_addr)) <= jtag_ld_din;
else
jtag_ld_dout <= imem_rom(to_integer(jtag_ld_addr));
end if;
end if;
end process;
--------------------------------------------------------------------------
end loadable;
Reference in New Issue View Git Blame Copy Permalink