求大家给个EDA数码管显示0-999的程序，谢谢！
module smg(a,seg,dig,clock);
input clock;
output [3:0] a;
output [7:0] seg; //数码管段码输出
output [3:0] dig; //数码管位码输出
reg [7:0] seg; //数码管段码输出寄存器
reg [3:0] disp_dat1; //显示数据寄存器
reg [3:0] disp_dat2; //显示数据寄存器
reg [3:0] disp_dat3; //显示数据寄存器
reg [3:0] disp_dat4; //显示数据寄存器
reg [3:0] disp_dat; //显示数据寄存器
reg [3:0] digt; //数码管位码输出寄存器
reg [3:0] a;
reg [16:0] data;
assign dig=~digt;
reg [36:0] count; //定义计数寄存器
reg [36:0] ct;
/*always@(posedge clock)*/
begin
disp_dat1<=data%10000/1000;
disp_dat2<=data%1000/100;
disp_dat3<=data%100/10;
disp_dat4<=data%10;
end
always@(posedge clock)
begin
count <= count + 1;
if (count==25'd25000)
begin
count<=0;
a=~a;
digt=(digt<<1);
if(digt==0)
digt=8'b0001;
end
end
always @ (digt)
begin
case (digt)
4'b1000 : disp_dat=disp_dat1;
4'b0100 : disp_dat=disp_dat2;
4'b0010 : disp_dat=disp_dat3;
4'b0001 : disp_dat=disp_dat4;
endcase
end
always @ (disp_dat)
begin
case (disp_dat)
4'd0 : seg = 8'hc0; //显示"0"
4'd1 : seg = 8'hf9; //显示"1"
4'd2 : seg = 8'ha4; //显示"2"
4'd3 : seg = 8'hb0; //显示"3"
4'd4 : seg = 8'h99; //显示"4"
4'd5 : seg = 8'h92; //显示"5"
4'd6 : seg = 8'h82; //显示"6"
4'd7 : seg = 8'hf8; //显示"7"
4'd8 : seg = 8'h80; //显示"8"
4'd9 : seg = 8'h90; //显示"9"
4'd10 : seg = 8'h7f; //显示"."
4'd11 : seg = 8'hff; //显示" "
endcase
end
always@(posedge clock)
begin
ct <= ct + 1;
if (ct==25'd250000)
begin
ct<=0;
data=data+1;
if(data==9999)
data<=0;
end
end
endmodule
你好，我在quartus上编译了一下，有错误，怎么回事呢?我要在睿智开发板上显示0-999，希望能帮助！