jb_cpu2013--姜咏江教授

//简单计算机核设计 2009-4-29  解释权姜咏江 Email:[e-mail]

//参考书:姜咏江.PMC计算机设计与应用.清华大学出版社.2008-5

//说明：这里给出的简单计算机核设计，是初学计算机设计的最好实例。

//基本输入时钟clock

//复位控制：reset_n,低电位有效

//基本输出：o

//程序存储器iram,16位，高5位是类指令代码,用imem16_1.mif初始化

//数据存储器dram,16位，不用数据文件初始化

//用lpm存储器地址数据信号要稳定1拍，才可以读写数据

//指令格式:高5位指令代码,11位地址码,16位立即数(分高低8位)

module jb_cpu2013

(

clock,

reset_n,

o,

//调试输出(可以不要)：

opc,

omar,

ojp,

oqw,

/* olda,

oadd,

oout,

osdal,

osdah,

ostr,

osub,

ojmp,

ojz,

ojn,

ocall,

oret,

oir, */

oda,

ozf,osp

);

input clock;

input reset_n;

output [15:0] o;

output [15:0] oqw,oda;

output [10:0] opc,omar,osp;

output [2:0] ojp;

output ozf; /*oiro,lda,oadd,oout,osdal,osdah,ostr,osub,

ojmp,ojz,ojn,ocall,oret,*/

reg dwren,swren;

wire [15:0] q_w,q_data;

    reg  [15:0] ir;

reg [15:0] b,a,da,oo,ddata;

reg  [10:0] pc,pc_back,mar,sp,q_s;

reg  [2:0] jp; //节拍

//指令:

reg lda, //取数:从数据单元取数到da

add, //加:da与数据单元相加，结果放入da

out, //输出:将数据单元内容输出到输出寄存器

sdal, //低8位立即数:将8位立即数扩充为16位送da

sdah, //高8位立即数:将8位立即数作为高8位，与原da低8位连接成16位放在da中

str, //da送数据存储单元:

sub, //减:da与数据单元相减，结果放入da

jmp, //跳转

jz, //da为0跳转

jn, //da为负跳转

call, //调用子程序

ret, //返回

mult, //

divi, //

stp; //停止

//仿真信号输出:

assign o    = oo;

assign opc  = pc;

assign osp  = sp;

assign omar = mar;

assign ojp = jp;

assign oqw = q_w;

assign olda=lda;

assign oadd=add;

assign osub=sub;

assign oout=out;

assign ojmp=jmp;

assign ostr=str;

assign osdal=sdal;

assign osdah=sdah;

assign ocall=call;

assign oret=ret;

assign ojz=jz;

assign ojn=jn;

assign oda=da;

assign oir=ir;

assign ozf=~|da;

//指令存储器:  

lpm_rom iram(.address(pc),.inclock(clock),.q(q_w));  //程序存储器

defparam iram.lpm_width = 16;

defparam iram.lpm_widthad = 11;

defparam iram.lpm_outdata = "UNREGISTERED";

defparam iram.lpm_indata = "REGISTERED";

defparam iram.lpm_address_control = "REGISTERED";

defparam iram.lpm_file = "imem16_2013.mif";  //初始化文件,放置程序

//数据存储器:

lpm_ram_dq dram(.data(ddata),.address(mar),.we(dwren),.inclock(clock),.q(q_data)); //数据存储器

defparam dram.lpm_width = 16;

defparam dram.lpm_widthad = 10;

defparam dram.lpm_outdata = "UNREGISTERED";

defparam dram.lpm_indata = "REGISTERED";

defparam dram.lpm_address_control = "REGISTERED";

lpm_ram_dq sram(.data(pc_back),.address(sp),.we(swren),.inclock(clock),.q(q_s)); //堆栈

defparam sram.lpm_width = 11;

defparam sram.lpm_widthad = 10;

defparam sram.lpm_outdata = "UNREGISTERED";

defparam sram.lpm_indata = "REGISTERED";

defparam sram.lpm_address_control = "REGISTERED";

always @(posedge clock or negedge reset_n)

begin

if (!reset_n)

begin

pc <= 0;

sp <= 0;

lda <= 0;   

add <= 0;   

out <= 0;

sdal <= 0;

sdah <= 0;

str <= 0;

sub <= 0;

jmp <= 0;

jz <= 0;

jn <= 0;

call <= 0;

ret <= 0;

mult <= 0;

divi <= 0;

jp <= 0;

end

else

begin

// 节拍jp指出的状态： 

case (jp)

0: begin

jp <= 1;

end

1: begin

case (q_w[15:11])

5'b00001: lda <= 1; //lda:00001

5'b00010: add <= 1; //add:00010

5'b00011:   out <= 1; //out:00011

5'b00100:   sdal <= 1; //低8位，扩充有符号16位

5'b00101:   sdah <= 1; //高8位，与前面低8位输入合成16位

5'b00110:   str <= 1; //da送数据单元

5'b00111:   sub <= 1;

5'b01000:   jmp <= 1;

5'b01001:   if (da==0) jz <= 1;

5'b01010:   if (da<0)  jn <= 1;

5'b01011:   call <= 1;

5'b01100:   ret <= 1;

5'b01101:   mult <= 1;

5'b01110:   divi <= 1;

5'b11111:   stp <= 1;

default:    jp <= 0;

endcase

jp <= 2;

end

2: begin

case (q_w[15:11])

5'b00001: begin  //lda <= 1;

mar<=q_w[10:0];

jp <= 3;

end

5'b00010: begin  //add <= 1;

mar<=q_w[10:0];

jp <= 3;

end

5'b00011:   begin  //out <= 1;

mar<=q_w[10:0];

jp <= 3;

end

5'b00100:   begin  //sdal <= 1;

da <= {{8{q_w[7]}},q_w[7:0]};        //扩充16位有符号数

sdal<= 0;

pc <= pc+1;

jp<= 0;

end

5'b00101:   begin  //sdah <= 1;

da[15:0] <= {q_w[7:0],da[7:0]};

sdah <= 0;

pc <= pc+1;

jp<= 0;

end 

5'b00110:   begin  //str <= 1;

mar<=q_w[10:0];

ddata <= da;

jp <= 3;

end

5'b00111:   begin  //sub <= 1;

mar<=q_w[10:0];

jp <= 3;

end

5'b01000:   begin  //jmp <= 1;

pc <= q_w[10:0];

jmp <=0;

jp <= 0;

end

5'b01001:   begin  //jz <= 1;

if (jz) pc <= q_w[10:0];

else pc <= pc+1;

jz <=0;

jp <= 0;

end

5'b01010:   begin  //jn <= 1;

if (jn) pc <= q_w[10:0];

else pc <= pc+1;

jn<=0;

jp <= 0;

end

5'b01011:   begin  //call <= 1;

pc_back <= pc+1;

jp <= 3;

end

5'b01100:   begin  //ret <= 1;

jp <= 3;

end

5'b01101: begin  //mult <= 1;

mar<=q_w[10:0];

jp <= 3;

end

5'b01110: begin  //divi <= 1;

mar<=q_w[10:0];

jp <= 3;

end

5'b11111: jp<=0;

default:    jp <= 0;

endcase

end 

3: begin 

case (q_w[15:11])

5'b00001: begin  //lda <= 1;

jp <= 4;

end

5'b00010: begin  //add <= 1;

jp <= 4;

end

5'b00011:   begin  //out <= 1;

jp <= 4;

end

5'b00110:   begin  //str <= 1;

dwren <= 1;

jp <= 4;     

end

5'b00111:   begin  //sub <= 1;

jp <= 4;

end

5'b01011:   begin  //call <= 1;

pc <= q_w[10:0];

swren <= 1;

jp <= 4;

end

5'b01100:   begin  //ret <= 1;

sp <= sp-1;

jp <= 4;

end

5'b01101: begin  //mult <= 1;

jp <= 4;

end

5'b01110: begin  //divi <= 1;

jp <= 4;

end

default:    jp <= 0;

endcase

end

4: begin

case (q_w[15:11])

5'b00001: begin  //lda <= 1;

da<=q_data;

pc <= pc+1;

jp <= 0;

lda<= 0;

end

5'b00010: begin  //add <= 1;

b<=q_data;

a<=da;

jp <= 5;

end

5'b00011:   begin  //out <= 1;

oo <= q_data;

pc <= pc+1;

jp <= 0;

out<= 0;

end

5'b00110:   begin  //str <= 1;

jp <= 5;     

end

5'b00111:   begin  //sub <= 1;

b<=q_data;

a<=da;

jp <= 5;

end

5'b01011:   begin  //call <= 1;

sp <= sp+1;

jp <= 5;

end

5'b01100:   begin  //ret <= 1;

jp <= 5;

end

5'b01101: begin  //mult <= 1;

b<=q_data;

a<=da;

jp <= 5;

end

5'b01110: begin  //divi <= 1;

b<=q_data;

a<=da;

jp <= 5;

end

default:    jp <= 0;

endcase

end

5: begin

case (q_w[15:11])

5'b00010: begin  //add <= 1;

da<=a+b;

pc <= pc+1;

add <=0;

jp <= 0;

end

5'b00110:   begin  //str <= 1;

dwren <= 0;

pc <= pc+1;

str <=0;

jp <= 0;     

end

5'b00111:   begin  //sub <= 1;

da<=a-b;

pc <= pc+1;

sub<=0;

jp <= 0;

end

5'b01011:   begin  //call <= 1;

swren <= 0;

call<=0;

jp<=0;

end

5'b01100:   begin  //ret <= 1;

pc <= q_s;

ret<=0;

jp <= 0;

end

5'b01101: begin  //mult <= 1;

da <=a*b;

pc <= pc+1;

mult <=0;

jp <= 0;

end

5'b01110: begin  //divi <= 1;

da <=a/b;

pc <= pc+1;

divi <=0;

jp <= 0;

end

default:    jp <= 0;

endcase

end

endcase

end 

end

endmodule

 

//////  仿真实例: 求64*8且输出循环次数 ////////

//

// 汇编 编译  

// sdal 1 2001

// str one 3001

// sub one 3801

// str result 3002

// str n 3005

// sdal 64 2040

// str x 3003

// sdal 8 2008

// str y 3004

//loop: lda y 0804

// jz exit 4812

// sub one 3801

// str y 3004

// lda result 0802

// add x 1003

// str result 3002

// call loopno 5814

// jmp loop 4009

//exit: out result 1802

// stp ffff

//loopno: lda n 0805

// add one 1001

// str n 3005

// out n 1805

// ret 6000

//

// 将编译的16进制数写入imem16_1.mif

//  

///////  16进制结果输出:0200  //////////////////

//

////验证CPU的实例3: 求8！且输出结果。

//

// 汇编 编译  

// sdal 1 2001

// str one 3001

// str result 3002

// sdal 8 2008

// str x 3003

//loop: lda x 0803

// jz exit 480D

// mult result 6802

// str result 3002

// lda x 0803

// sub one 3801

// str x 3003

// jmp loop 4005

//exit: out result 1802

// stp ffff

//将编译的16进制数写入imem16_2013.mif 

/////// 如果下载到开发板检查运行情况，各输出之间要加延时子程序。

//

//毕业设计：扩充设计一个功能完备的计算机，并在PMC110计算机开发板上下载运行。