module lcd(clk,rs,rw,en,dat);
input clk;
output [7:0] dat;
output rs,rw,en;
reg e;
reg [7:0] dat;
reg rs;
reg [15:0] counter;
reg [4:0] current,next;
reg clkr;
reg [1:0] cnt;
parameter set0=4'h0;
parameter set1=4'h1;
parameter set2=4'h2;
parameter set3=4'h3;
parameter dat0=4'h4;
parameter dat1=4'h5;
parameter dat2=4'h6;
parameter dat3=4'h7;
parameter dat4=4'h8;
parameter dat5=4'h9;
parameter dat6=4'ha;
parameter dat7=4'hb;
parameter dat8=4'hc;
parameter dat9=4'hd;
parameter dat10=4'he;
parameter dat11=5'h10;
parameter nul=4'hf;
//assign rw=0;
[email=always@(posedge]always@(posedge[/email] clk)
begin
counter=counter+1;
if(counter==16'h000f)
clkr=~clkr;
end
[email=always@(posedge]always@(posedge[/email] clkr)
begin
current=next;
case(current)
set0:begin rs<=0;dat<=8'h38;next<=set1;end
set1:begin rs<=0;dat<=8'h0c;next<=set2;end
set2:begin rs<=0;dat<=8'h06;next<=set3;end
set3:begin rs<=0;dat<=8'h01;next<=dat0;end
dat0:begin rs<=1;dat<=8'h3c;next<=dat1;end
dat1:begin rs<=1;dat<="F";next<=dat2;end
dat2:begin rs<=1;dat<="P";next<=dat3;end
dat3:begin rs<=1;dat<="G";next<=dat4;end
dat4:begin rs<=1;dat<="A";next<=dat5;end
dat5:begin rs<=1;dat<=8'h3e;next<=dat6;end
dat6:begin rs<=1;dat<="C";next<=dat7;end
dat7:begin rs<=1;dat<="P";next<=dat8;end
dat8:begin rs<=1;dat<="L";next<=dat9;end
dat9:begin rs<=1;dat<="D";next<=dat10;end
dat10:begin rs<=1;dat<="!";next<=dat11;end
dat11:begin rs<=1;dat<="!";next<=nul;end
nul:begin rs<=0;dat<=8'h00;
if(cnt!=2'h2)
begin
e<=0;next<=set0;cnt<=cnt+1;
end
else
begin
next<=nul;e<=1;
end
end
default: next=set0;
endcase
end
assign en=clkr|e;
assign rw=0;
endmodule
这个程序总是运行不出来，我用的芯片是EP2C8T144C8，希望各位高手帮忙看看 |
楼主
标题置顶
标题高亮
