标题: 基于FPGA的日式钟程序设计 [打印本页]

---

作者: 路过啊    时间: 2019-7-15 10:09
标题: 基于FPGA的日式钟程序设计
在LED1602显示时间 00：00：00
可以显示温度。

1. module lcd(clk,rs,miao0,miao1,fen2,fen3,shi4,shi5, wendu,rw, en,dat,rst_n);  
   
2. input clk;  
   
3. input rst_n;
   
4. input [3:0]miao0,miao1,fen2,fen3,shi4,shi5;
   
5. input [15:0] wendu;
   
6. output [7:0] dat;
   
7. output  rs,rw,en;
   
8. reg e;
   
9. reg [7:0] dat;
   
10. reg rs;   
    
11. reg  [15:0] counter;
    
12. reg [4:0] next;
    
13. reg clkr;
    
14. reg [1:0] cnt;
    
15. parameter  set0=4'h0;
    
16. parameter  set1=4'h1;
    
17. parameter  set2=4'h2;
    
18. parameter  set3=4'h3;
    
19. parameter  set4=4'h4;
    
20. parameter  dat0=4'h5;
    
21. parameter  dat1=4'h6;
    
22. parameter  dat2=4'h7;
    
23. parameter  dat3=4'h8;
    
24. parameter  dat4=4'h9;
    
25. parameter  dat5=4'hA;
    
26. parameter  dat6=4'hB;
    
27. parameter  dat7=4'hC;
    
28. 
    
29. parameter  set5=5'hD;
    
30. 
    
31. parameter  dat8=4'hE;
    
32. parameter  dat9=4'hF;
    
33. parameter  dat10=5'h10;
    
34. parameter  dat11=5'h11;
    
35. parameter  dat12=5'h12;
    
36. 
    
37. parameter  nul=5'h13;
    
38. always @(posedge clk )      
    
39. begin
    
40.   counter=counter+1;
    
41.   if(counter==16'h000f)  
    
42.   clkr=~clkr;
    
43. end
    
44. 
    
45. 
    
46. always @(posedge clkr)
    
47. 
    
48. 
    
49. begin
    
50. 
    
51.   case(next)
    
52.     set0:   begin  rs<=0; dat<=8'h38; next<=set1; end //设置为显示2行，数据线8位 5x7点阵
    
53.     set1:   begin  rs<=0; dat<=8'h0c; next<=set2; end //显示功能开，无光标
    
54.     set2:   begin  rs<=0; dat<=8'h6; next<=set3; end //光标右移，显示屏不动
    
55.     set3:   begin  rs<=0; dat<=8'h1; next<=set4; end //清屏
    
56.          set4:   begin  rs<=0; dat<=8'h80; next<=dat0; end
    
57.     dat0:   begin  rs<=1; dat<=shi5+8'h30; next<=dat1; end
    
58.     dat1:   begin  rs<=1; dat<=shi4+8'h30; next<=dat2; end
    
59.     dat2:   begin  rs<=1; dat<=":"; next<=dat3; end
    
60.     dat3:   begin  rs<=1; dat<=fen3+8'h30; next<=dat4; end
    
61.     dat4:   begin  rs<=1; dat<=fen2+8'h30; next<=dat5; end
    
62.     dat5:   begin  rs<=1; dat<=":"; next<=dat6; end
    
63.     dat6:   begin  rs<=1; dat<=miao1+8'h30; next<=dat7; end
    
64.     dat7:   begin  rs<=1; dat<=miao0+8'h30; next<=set5; end
    
65.     set5:   begin  rs<=0; dat<=8'hc0; next<=dat8; end
    
66.          dat8:   begin  rs<=1;if (wendu[15]==0) begin dat<="+"; next<=dat9; end
    
67.                                                                 else begin dat<="-"; next<=dat9; end
    
68.                                 end
    
69.     dat9:   begin  rs<=1;if (wendu[15]==0) begin dat<=((wendu[15:5]/8)%100)/10+8'h30; next<=dat10; end
    
70.                                                 else begin dat<=(((~wendu[14:5]+1)/8)%100)/10+8'h30; next<=dat10; end
    
71.                                 end
    
72.     dat10:  begin  rs<=1;if (wendu[15]==0) begin dat<=((wendu[15:5]/8)%100)%10+8'h30; next<=dat11; end
    
73.                                                                 else begin dat<=(((~wendu[14:5]+1)/8)%100)%10+8'h30; next<=dat11; end
    
74.                                 end
    
75.     dat11:   begin  rs<=1; dat<=8'hdf; next<=dat12; end //显示° 8'hdf
    
76.          dat12:   begin  rs<=1; dat<="C"; next<=nul; end
    
77.          //dat13:   begin  rs<=1; dat<=" "; next<=nul; end
    
78.          nul: begin dat<=" ";next<=set4;end
    
79.    default:   next<=set0;
    
80.     endcase
    
81. end
    
82. 
    
83. 
    
84. 
    
85. assign en=clkr|e;
    
86. assign rw=0; //只写入
    
87. endmodule  
    

复制代码

全部资料51hei下载地址：
日时钟.7z (4.96 MB, 下载次数: 15)

2019-7-15 18:29 上传

点击文件名下载附件
工程
下载积分: 黑币 -5

---

欢迎光临 (http://www.51hei.com/bbs/)

Powered by Discuz! X3.1