------------------------------------------------------------------------- -- Project: JCPU, a portable 8-bit RISC CPU written in VHDL -- This file: The ROM file for use in your VHDL design -- -- 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 . -- -- 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 work; use work.cpu_pkg.all; -- JASM_ROM_INSERT_HERE ENTITY irom IS Port ( clk : in STD_LOGIC; ce : in STD_LOGIC; addr : in inst_addr_t; dout : out inst_t ); END irom; ARCHITECTURE sdram_test_short OF irom IS type imem_rom_t is array (0 to 164) of inst_t; -- Assembled from sdram_test_short.jsm constant imem_rom : imem_rom_t := ( "110000" & X"002", -- 0x000: JMP 0x002 "111111" & X"000", -- 0x001: RETI "000011" & X"000", -- 0x002: MOV R00, 0x00 "100100" & X"010", -- 0x003: XOUT (0x01), R00 "000011" & X"040", -- 0x004: MOV R00, 0x04 "100100" & X"040", -- 0x005: XOUT (0x04), R00 "000011" & X"000", -- 0x006: MOV R00, 0x00 "000011" & X"801", -- 0x007: MOV R01, 0x80 "100100" & X"100", -- 0x008: XOUT (0x10), R00 "100100" & X"111", -- 0x009: XOUT (0x11), R01 "100100" & X"120", -- 0x00A: XOUT (0x12), R00 "110000" & X"026", -- 0x00B: JMP 0x026 "111011" & X"07D", -- 0x00C: CALL 0x07D "000011" & X"800", -- 0x00D: MOV R00, 0x80 "000011" & X"08F", -- 0x00E: MOV R15, 0x08 "000111" & X"000", -- 0x00F: MOVX (R00), 0x00 "010001" & X"010", -- 0x010: INC R00 "010101" & X"01F", -- 0x011: DEC R15 "110010" & X"00F", -- 0x012: JNZ 0x00F "101000" & X"080", -- 0x013: XIN R00, (0x08) "001111" & X"400", -- 0x014: CMP R00, 0x40 "111001" & X"025", -- 0x015: JEQ 0x025 "000011" & X"082", -- 0x016: MOV R02, 0x08 "101000" & X"070", -- 0x017: XIN R00, (0x07) "100100" & X"010", -- 0x018: XOUT (0x01), R00 "011001" & X"040", -- 0x019: AND R00, 0x04 "110010" & X"017", -- 0x01A: JNZ 0x017 "000011" & X"100", -- 0x01B: MOV R00, 0x10 "100100" & X"070", -- 0x01C: XOUT (0x07), R00 "010101" & X"022", -- 0x01D: SUB R02, 0x02 "110010" & X"017", -- 0x01E: JNZ 0x017 "111011" & X"072", -- 0x01F: CALL 0x072 "000011" & X"060", -- 0x020: MOV R00, 0x06 "100100" & X"070", -- 0x021: XOUT (0x07), R00 "000011" & X"080", -- 0x022: MOV R00, 0x08 "111011" & X"084", -- 0x023: CALL 0x084 "110000" & X"013", -- 0x024: JMP 0x013 "111011" & X"094", -- 0x025: CALL 0x094 "111011" & X"07D", -- 0x026: CALL 0x07D "000011" & X"000", -- 0x027: MOV R00, 0x00 "001101" & X"000", -- 0x028: MOVC (0x00), R00 "101000" & X"080", -- 0x029: XIN R00, (0x08) "001111" & X"400", -- 0x02A: CMP R00, 0x40 "111001" & X"046", -- 0x02B: JEQ 0x046 "000011" & X"082", -- 0x02C: MOV R02, 0x08 "001010" & X"001", -- 0x02D: MOVC R01, (0x00) "000011" & X"800", -- 0x02E: MOV R00, 0x80 "000011" & X"08F", -- 0x02F: MOV R15, 0x08 "000110" & X"001", -- 0x030: MOVX (R01), R00 "010001" & X"010", -- 0x031: INC R00 "010001" & X"011", -- 0x032: INC R01 "010101" & X"01F", -- 0x033: DEC R15 "110010" & X"030", -- 0x034: JNZ 0x030 "101000" & X"070", -- 0x035: XIN R00, (0x07) "100100" & X"010", -- 0x036: XOUT (0x01), R00 "011001" & X"040", -- 0x037: AND R00, 0x04 "110010" & X"035", -- 0x038: JNZ 0x035 "000011" & X"100", -- 0x039: MOV R00, 0x10 "100100" & X"070", -- 0x03A: XOUT (0x07), R00 "001010" & X"000", -- 0x03B: MOVC R00, (0x00) "010001" & X"010", -- 0x03C: INC R00 "001101" & X"000", -- 0x03D: MOVC (0x00), R00 "010101" & X"022", -- 0x03E: SUB R02, 0x02 "110010" & X"02D", -- 0x03F: JNZ 0x02D "111011" & X"072", -- 0x040: CALL 0x072 "000011" & X"060", -- 0x041: MOV R00, 0x06 "100100" & X"070", -- 0x042: XOUT (0x07), R00 "000011" & X"080", -- 0x043: MOV R00, 0x08 "111011" & X"084", -- 0x044: CALL 0x084 "110000" & X"029", -- 0x045: JMP 0x029 "111011" & X"094", -- 0x046: CALL 0x094 "111011" & X"07D", -- 0x047: CALL 0x07D "000011" & X"000", -- 0x048: MOV R00, 0x00 "001101" & X"000", -- 0x049: MOVC (0x00), R00 "101000" & X"0A0", -- 0x04A: XIN R00, (0x0A) "001111" & X"400", -- 0x04B: CMP R00, 0x40 "111001" & X"07A", -- 0x04C: JEQ 0x07A "111011" & X"072", -- 0x04D: CALL 0x072 "000011" & X"050", -- 0x04E: MOV R00, 0x05 "100100" & X"070", -- 0x04F: XOUT (0x07), R00 "000011" & X"083", -- 0x050: MOV R03, 0x08 "101000" & X"070", -- 0x051: XIN R00, (0x07) "100100" & X"010", -- 0x052: XOUT (0x01), R00 "011001" & X"200", -- 0x053: AND R00, 0x20 "110010" & X"051", -- 0x054: JNZ 0x051 "001010" & X"001", -- 0x055: MOVC R01, (0x00) "000011" & X"800", -- 0x056: MOV R00, 0x80 "000011" & X"08F", -- 0x057: MOV R15, 0x08 "000100" & X"002", -- 0x058: MOVX R02, (R00) "001110" & X"012", -- 0x059: CMP R02, R01 "111010" & X"07B", -- 0x05A: JNE 0x07B "010001" & X"010", -- 0x05B: INC R00 "010001" & X"011", -- 0x05C: INC R01 "010101" & X"01F", -- 0x05D: DEC R15 "110010" & X"058", -- 0x05E: JNZ 0x058 "000011" & X"200", -- 0x05F: MOV R00, 0x20 "100100" & X"070", -- 0x060: XOUT (0x07), R00 "001010" & X"000", -- 0x061: MOVC R00, (0x00) "010001" & X"010", -- 0x062: INC R00 "001101" & X"000", -- 0x063: MOVC (0x00), R00 "010101" & X"023", -- 0x064: SUB R03, 0x02 "110010" & X"051", -- 0x065: JNZ 0x051 "000011" & X"080", -- 0x066: MOV R00, 0x08 "111011" & X"084", -- 0x067: CALL 0x084 "110000" & X"04A", -- 0x068: JMP 0x04A "111100" & X"000", -- 0x069: PUSH R00 "000011" & X"800", -- 0x06A: MOV R00, 0x80 "100100" & X"070", -- 0x06B: XOUT (0x07), R00 "101000" & X"070", -- 0x06C: XIN R00, (0x07) "100100" & X"010", -- 0x06D: XOUT (0x01), R00 "011001" & X"800", -- 0x06E: AND R00, 0x80 "110001" & X"06C", -- 0x06F: JZ 0x06C "111101" & X"000", -- 0x070: POP R00 "111110" & X"000", -- 0x071: RET "111011" & X"069", -- 0x072: CALL 0x069 "111100" & X"000", -- 0x073: PUSH R00 "101000" & X"070", -- 0x074: XIN R00, (0x07) "100100" & X"010", -- 0x075: XOUT (0x01), R00 "011001" & X"010", -- 0x076: AND R00, 0x01 "110010" & X"074", -- 0x077: JNZ 0x074 "111101" & X"000", -- 0x078: POP R00 "111110" & X"000", -- 0x079: RET "110000" & X"07C", -- 0x07A: JMP 0x07C "110000" & X"07C", -- 0x07B: JMP 0x07C "110000" & X"00C", -- 0x07C: JMP 0x00C "111100" & X"000", -- 0x07D: PUSH R00 "000011" & X"000", -- 0x07E: MOV R00, 0x00 "100100" & X"080", -- 0x07F: XOUT (0x08), R00 "100100" & X"090", -- 0x080: XOUT (0x09), R00 "100100" & X"0A0", -- 0x081: XOUT (0x0A), R00 "111101" & X"000", -- 0x082: POP R00 "111110" & X"000", -- 0x083: RET "111100" & X"001", -- 0x084: PUSH R01 "111100" & X"002", -- 0x085: PUSH R02 "111100" & X"003", -- 0x086: PUSH R03 "101000" & X"081", -- 0x087: XIN R01, (0x08) "101000" & X"092", -- 0x088: XIN R02, (0x09) "101000" & X"0A3", -- 0x089: XIN R03, (0x0A) "010000" & X"001", -- 0x08A: ADD R01, R00 "010011" & X"002", -- 0x08B: ADDC R02, 0x00 "010011" & X"003", -- 0x08C: ADDC R03, 0x00 "100100" & X"081", -- 0x08D: XOUT (0x08), R01 "100100" & X"092", -- 0x08E: XOUT (0x09), R02 "100100" & X"0A3", -- 0x08F: XOUT (0x0A), R03 "111101" & X"003", -- 0x090: POP R03 "111101" & X"002", -- 0x091: POP R02 "111101" & X"001", -- 0x092: POP R01 "111110" & X"000", -- 0x093: RET "111110" & X"000", -- 0x094: RET "111110" & X"000", -- 0x095: RET "111110" & X"000", -- 0x096: RET "111110" & X"000", -- 0x097: RET "011001" & X"0F0", -- 0x098: AND R00, 0x0F "001111" & X"0A0", -- 0x099: CMP R00, 0x0A "110101" & X"09C", -- 0x09A: JLT 0x09C "010001" & X"070", -- 0x09B: ADD R00, 0x07 "010001" & X"300", -- 0x09C: ADD R00, 0x30 "111110" & X"000", -- 0x09D: RET "111100" & X"000", -- 0x09E: PUSH R00 "111011" & X"098", -- 0x09F: CALL 0x098 "000010" & X"001", -- 0x0A0: MOV R01, R00 "111101" & X"000", -- 0x0A1: POP R00 "101010" & X"000", -- 0x0A2: SWAP R00 "111011" & X"098", -- 0x0A3: CALL 0x098 "111110" & X"000" -- 0x0A4: RET ); begin PROM_READ: process(clk, ce) begin if rising_edge(clk) and ce = '1' then dout <= imem_rom(to_integer(addr)); end if; end process; end sdram_test_short;