jens
4b742dd23b
git-svn-id: http://moon:8086/svn/vhdl/trunk@1636 cc03376c-175c-47c8-b038-4cd826a8556b
187 lines
6.6 KiB
VHDL
187 lines
6.6 KiB
VHDL
-------------------------------------------------------------------------
|
|
-- 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 <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 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 hallo_welt_uart OF irom IS
|
|
|
|
type imem_rom_t is array (0 to 124) of inst_t;
|
|
|
|
-- Assembled from hallo_welt_uart.jsm
|
|
constant imem_rom : imem_rom_t :=
|
|
(
|
|
"110000" & X"002", -- 0x000: JMP 0x002
|
|
"111111" & X"000", -- 0x001: RETI
|
|
"101000" & X"020", -- 0x002: XIN R00, (0x02)
|
|
"111011" & X"029", -- 0x003: CALL 0x029
|
|
"111011" & X"039", -- 0x004: CALL 0x039
|
|
"000010" & X"010", -- 0x005: MOV R00, R01
|
|
"111011" & X"039", -- 0x006: CALL 0x039
|
|
"000011" & X"001", -- 0x007: MOV R01, 0x00
|
|
"111011" & X"030", -- 0x008: CALL 0x030
|
|
"000011" & X"031", -- 0x009: MOV R01, 0x03
|
|
"111011" & X"030", -- 0x00A: CALL 0x030
|
|
"101001" & X"000", -- 0x00B: CIN R00, (0x00)
|
|
"010001" & X"300", -- 0x00C: ADD R00, 0x30
|
|
"111011" & X"039", -- 0x00D: CALL 0x039
|
|
"000011" & X"001", -- 0x00E: MOV R01, 0x00
|
|
"111011" & X"030", -- 0x00F: CALL 0x030
|
|
"000011" & X"0D1", -- 0x010: MOV R01, 0x0D
|
|
"111011" & X"030", -- 0x011: CALL 0x030
|
|
"000011" & X"161", -- 0x012: MOV R01, 0x16
|
|
"111011" & X"030", -- 0x013: CALL 0x030
|
|
"000011" & X"A0F", -- 0x014: MOV R15, 0xA0
|
|
"001111" & X"00F", -- 0x015: TST R15
|
|
"110001" & X"020", -- 0x016: JZ 0x020
|
|
"010101" & X"01F", -- 0x017: DEC R15
|
|
"000011" & X"301", -- 0x018: MOV R01, 0x30
|
|
"001111" & X"3A1", -- 0x019: CMP R01, 0x3A
|
|
"111001" & X"01F", -- 0x01A: JEQ 0x01F
|
|
"000010" & X"010", -- 0x01B: MOV R00, R01
|
|
"010001" & X"011", -- 0x01C: INC R01
|
|
"111011" & X"039", -- 0x01D: CALL 0x039
|
|
"110000" & X"019", -- 0x01E: JMP 0x019
|
|
"110000" & X"015", -- 0x01F: JMP 0x015
|
|
"000011" & X"001", -- 0x020: MOV R01, 0x00
|
|
"111011" & X"030", -- 0x021: CALL 0x030
|
|
"110000" & X"009", -- 0x022: JMP 0x009
|
|
"011001" & X"0F0", -- 0x023: AND R00, 0x0F
|
|
"001111" & X"0A0", -- 0x024: CMP R00, 0x0A
|
|
"110101" & X"027", -- 0x025: JLT 0x027
|
|
"010001" & X"070", -- 0x026: ADD R00, 0x07
|
|
"010001" & X"300", -- 0x027: ADD R00, 0x30
|
|
"111110" & X"000", -- 0x028: RET
|
|
"111100" & X"000", -- 0x029: PUSH R00
|
|
"111011" & X"023", -- 0x02A: CALL 0x023
|
|
"000010" & X"001", -- 0x02B: MOV R01, R00
|
|
"111101" & X"000", -- 0x02C: POP R00
|
|
"101010" & X"000", -- 0x02D: SWAP R00
|
|
"111011" & X"023", -- 0x02E: CALL 0x023
|
|
"111110" & X"000", -- 0x02F: RET
|
|
"111100" & X"000", -- 0x030: PUSH R00
|
|
"000100" & X"010", -- 0x031: MOVX R00, (R01)
|
|
"010001" & X"011", -- 0x032: INC R01
|
|
"001111" & X"000", -- 0x033: TST R00
|
|
"110001" & X"037", -- 0x034: JZ 0x037
|
|
"111011" & X"039", -- 0x035: CALL 0x039
|
|
"110000" & X"031", -- 0x036: JMP 0x031
|
|
"111101" & X"000", -- 0x037: POP R00
|
|
"111110" & X"000", -- 0x038: RET
|
|
"110000" & X"03A", -- 0x039: JMP 0x03A
|
|
"111100" & X"001", -- 0x03A: PUSH R01
|
|
"101000" & X"061", -- 0x03B: XIN R01, (0x06)
|
|
"011001" & X"021", -- 0x03C: AND R01, 0x02
|
|
"110010" & X"03B", -- 0x03D: JNZ 0x03B
|
|
"100100" & X"020", -- 0x03E: XOUT (0x02), R00
|
|
"111101" & X"001", -- 0x03F: POP R01
|
|
"111110" & X"000", -- 0x040: RET
|
|
"111100" & X"001", -- 0x041: PUSH R01
|
|
"101000" & X"061", -- 0x042: XIN R01, (0x06)
|
|
"011001" & X"101", -- 0x043: AND R01, 0x10
|
|
"110010" & X"042", -- 0x044: JNZ 0x042
|
|
"101000" & X"020", -- 0x045: XIN R00, (0x02)
|
|
"111101" & X"001", -- 0x046: POP R01
|
|
"111110" & X"000", -- 0x047: RET
|
|
"111100" & X"00F", -- 0x048: PUSH R15
|
|
"000011" & X"0AF", -- 0x049: MOV R15, 0x0A
|
|
"111011" & X"04F", -- 0x04A: CALL 0x04F
|
|
"010101" & X"01F", -- 0x04B: DEC R15
|
|
"110010" & X"04A", -- 0x04C: JNZ 0x04A
|
|
"111101" & X"00F", -- 0x04D: POP R15
|
|
"111110" & X"000", -- 0x04E: RET
|
|
"111100" & X"00F", -- 0x04F: PUSH R15
|
|
"000011" & X"0AF", -- 0x050: MOV R15, 0x0A
|
|
"111011" & X"056", -- 0x051: CALL 0x056
|
|
"010101" & X"01F", -- 0x052: DEC R15
|
|
"110010" & X"051", -- 0x053: JNZ 0x051
|
|
"111101" & X"00F", -- 0x054: POP R15
|
|
"111110" & X"000", -- 0x055: RET
|
|
"111100" & X"00F", -- 0x056: PUSH R15
|
|
"000011" & X"0AF", -- 0x057: MOV R15, 0x0A
|
|
"111011" & X"05D", -- 0x058: CALL 0x05D
|
|
"010101" & X"01F", -- 0x059: DEC R15
|
|
"110010" & X"058", -- 0x05A: JNZ 0x058
|
|
"111101" & X"00F", -- 0x05B: POP R15
|
|
"111110" & X"000", -- 0x05C: RET
|
|
"111100" & X"00F", -- 0x05D: PUSH R15
|
|
"000011" & X"0AF", -- 0x05E: MOV R15, 0x0A
|
|
"111011" & X"064", -- 0x05F: CALL 0x064
|
|
"010101" & X"01F", -- 0x060: DEC R15
|
|
"110010" & X"05F", -- 0x061: JNZ 0x05F
|
|
"111101" & X"00F", -- 0x062: POP R15
|
|
"111110" & X"000", -- 0x063: RET
|
|
"111100" & X"00F", -- 0x064: PUSH R15
|
|
"000011" & X"0AF", -- 0x065: MOV R15, 0x0A
|
|
"111011" & X"06B", -- 0x066: CALL 0x06B
|
|
"010101" & X"01F", -- 0x067: DEC R15
|
|
"110010" & X"066", -- 0x068: JNZ 0x066
|
|
"111101" & X"00F", -- 0x069: POP R15
|
|
"111110" & X"000", -- 0x06A: RET
|
|
"111100" & X"00F", -- 0x06B: PUSH R15
|
|
"000011" & X"63F", -- 0x06C: MOV R15, 0x63
|
|
"000000" & X"000", -- 0x06D: NOP
|
|
"000000" & X"000", -- 0x06E: NOP
|
|
"000000" & X"000", -- 0x06F: NOP
|
|
"010101" & X"01F", -- 0x070: DEC R15
|
|
"110010" & X"06D", -- 0x071: JNZ 0x06D
|
|
"111101" & X"00F", -- 0x072: POP R15
|
|
"111110" & X"000", -- 0x073: RET
|
|
"111100" & X"00F", -- 0x074: PUSH R15
|
|
"000011" & X"09F", -- 0x075: MOV R15, 0x09
|
|
"000000" & X"000", -- 0x076: NOP
|
|
"000000" & X"000", -- 0x077: NOP
|
|
"000000" & X"000", -- 0x078: NOP
|
|
"010101" & X"01F", -- 0x079: DEC R15
|
|
"110010" & X"076", -- 0x07A: JNZ 0x076
|
|
"111101" & X"00F", -- 0x07B: POP R15
|
|
"111110" & X"000" -- 0x07C: 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 hallo_welt_uart;
|
|
|