用Rd-03雷达做个报警器

由于实在是太久没发帖子了，引起了园长的不满，再加上买了Rd-03雷达几个月了还没怎么玩过，所以今天水一帖交个作业

这次我用的是Rd-03雷达、LCD1602显示屏、和Intel Cyclone 10 10CL025YU256I7G芯片
做的所谓的报警器很简单：雷达检测到有人来，发送信号到主控，蜂鸣器响起，屏幕上显示'some body come in'、'Warning'；没人的时候蜂鸣器不响，屏幕上显示'nobody come in'、'safe'
整体就是这个样子，LCD1602用个转接板接到开发板上，不用接杜邦线比较方便，还可以轻易调亮度和对比度

整体图

下面就是思路和程序了
Rd-03雷达检测到有人来会在OT2引脚输出一个高电平，没人的时候输出低电平，因此只需要检测高低电平就知道有没有人来了。
至于检测的距离设置我买的是测试板套装，可以在安信可配网助手里设置距离门（检测距离）


之后是LCD1602的驱动程序

1. module lcd(
   
2. clk,
   
3. rst,
   
4. LCD_EN,
   
5. RS,
   
6. RW,
   
7. DB8,
   
8. trig //trigger
   
9. //data_row1,
   
10. //data_row2
    
11. );
    
12. //input         [127:0]data_row1,data_row2;//第一行和第二行输入数据
    
13. input   clk;
    
14. input   rst;        //rst为全局复位信号
    
15. input   trig;
    
16. output  LCD_EN;//LCD_EN为LCD模块的使能信号（下降沿触发）
    
17. output  reg RS;//RS=0时为写指令；RS=1时为写数据
    
18. output  RW;//RW=0时对LCD模块执行写操作；RW=1时对LCD模块执行读操作
    
19. output  [7:0] DB8; //8位指令或数据总线
    
20. 
    
21. reg     LCD_EN_Sel;
    
22. reg     [7:0] DB8;
    
23. reg [127:0]data_row1;
    
24. reg [127:0]data_row2;
    
25. 
    
26. //-------------------------------------//
    
27. //输入时钟50MHz  输出周期2ms
    
28. //division50MHz_2ms.v
    
29. reg [15:0]count;
    
30. reg clk_2ms;
    
31. always @ (posedge clk)
    
32. begin
    
33.         if(count == 16'd50_000)
    
34.         begin
    
35.                 count <= 16'b1;
    
36.                 clk_2ms <= ~clk_2ms;
    
37.         end
    
38.         else
    
39.                 count <= count + 1'b1;
    
40. end
    
41. //---------------------------------------//
    
42. 
    
43. reg     [127:0] Data_Buf;   //液晶显示的数据缓存
    
44. reg     [4:0] disp_count;
    
45. reg     [3:0] state;
    
46. 
    
47. parameter   Clear_Lcd = 4'b0000,  //清屏并光标复位
    
48.                       Set_Disp_Mode = 4'b0001, //设置显示模式：8位2行5x7点阵   
    
49.                    Disp_On = 4'b0010,  //显示器开、光标不显示、光标不允许闪烁
    
50.             Shift_Down = 4'b0011,  //文字不动，光标自动右移
    
51.             Write_Addr = 4'b0100,   //写入显示起始地址
    
52.             Write_Data_First = 4'b0101,  //写入第一行显示的数据
    
53.             Write_Data_Second = 4'b0110; //写入第二行显示的数据                       
    
54. assign  RW = 1'b0;  //RW=0时对LCD模块执行写操作(一直保持写状态）
    
55. assign  LCD_EN = LCD_EN_Sel ? clk_2ms : 1'b0;//通过LCD_EN_Sel信号来控制LCD_EN的开启与关闭
    
56. 
    
57. always @(*) begin
    
58.         if(!rst) begin
    
59.                 data_row1 <= "IT IS IN RESET  ";
    
60.                 data_row2 <= "RELEASE THE KEY ";
    
61.         end
    
62.         else if(trig) begin
    
63.                 data_row1 <= "somebody come in";
    
64.                 data_row2 <= "    WARNING     ";
    
65.         end
    
66.         else begin
    
67.                 data_row1 <= " nobody come in ";
    
68.                 data_row2 <= "      SAFE      ";
    
69.         end
    
70. end
    
71. 
    
72. always @(posedge clk_2ms or negedge rst)
    
73. begin
    
74.         if(!rst)
    
75.         begin
    
76.                 state <= Clear_Lcd;  //复位：清屏并光标复位   
    
77.                 RS <= 1'b1;          //复位：RS=1时为读指令；                       
    
78.                 DB8 <= 8'b0;         //复位：使DB8总线输出全0
    
79.                 LCD_EN_Sel <= 1'b0;  //复位：关夜晶使能信号
    
80.                 disp_count <= 5'b0;
    
81.         end
    
82.         else
    
83.         begin
    
84.                 case(state)         //初始化LCD模块
    
85.                 Clear_Lcd:
    
86.         begin
    
87.                         LCD_EN_Sel <= 1'b1;//开使能
    
88.                         RS <= 1'b0;//写指令
    
89.             DB8 <= 8'b00000001;  //清屏并光标复位
    
90.                         state <= Set_Disp_Mode;
    
91.         end
    
92.                 Set_Disp_Mode:
    
93.                 begin
    
94.                         DB8 <= 8'b00111000;   //设置显示模式：8位2行5x8点阵
    
95.                         state <= Disp_On;
    
96.                 end
    
97.                 Disp_On:
    
98.                 begin
    
99.                         DB8 <= 8'b00001100;   //显示器开、光标不显示、光标不允许闪烁
    
100.                         state <= Shift_Down;
     
101.                 end
     
102.                 Shift_Down:
     
103.                 begin
     
104.                         DB8 <= 8'b00000110;    //文字不动，光标自动右移   
     
105.                         state <= Write_Addr;
     
106.                 end
     
107. //---------------------------------显示循环------------------------------------//               
     
108.                 Write_Addr:
     
109.                 begin
     
110.                         RS <= 1'b0;//写指令
     
111.                         DB8 <= 8'b10000000;      //写入第一行显示起始地址：第一行第1个位置   
     
112.                         Data_Buf <= data_row1;     //将第一行显示的数据赋给Data_First_Buf
     
113.                 //        DB8 <= Data_First_Buf[127:120];
     
114.                         state <= Write_Data_First;
     
115.                 end
     
116.                 Write_Data_First:  //写第一行数据
     
117.                 begin
     
118.                         if(disp_count == 16)    //disp_count等于15时表示第一行数据已写完
     
119.                         begin
     
120.                                 RS <= 1'b0;//写指令
     
121.                                 DB8 <= 8'b11000000;     //送入写第二行的指令,第2行第1个位置
     
122.                                 disp_count <= 5'b0; //计数清0
     
123.                                 Data_Buf <= data_row2;//将第2行显示的数据赋给Data_First_Buf
     
124.                         //        DB8 <= Data_Second_Buf[127:120];
     
125.                                 state <= Write_Data_Second;   //写完第一行进入写第二行状态
     
126.                         end
     
127.                         else//没写够16字节
     
128.                         begin
     
129.                                 RS <= 1'b1;    //RS=1表示写数据
     
130.                                 DB8 <= Data_Buf[127:120];
     
131.                                 Data_Buf <= (Data_Buf << 8);
     
132.                                 disp_count <= disp_count + 1'b1;
     
133.                                 state <= Write_Data_First;
     
134.                         end
     
135.                 end
     
136.                 Write_Data_Second: //写第二行数据
     
137.                 begin
     
138.                         if(disp_count == 16)//数据写完了
     
139.                         begin
     
140.                                 RS <= 1'b0;//写指令
     
141.                                 DB8 <= 8'b10000000;      //写入第一行显示起始地址：第一行第1个位置
     
142.                                 disp_count <= 5'b0;
     
143.                                 state <= Write_Addr;   //重新循环
     
144.                         end
     
145.                         else//
     
146.                         begin
     
147.                                 RS <= 1'b1;
     
148.                                 DB8 <= Data_Buf[127:120];
     
149.                                 Data_Buf <= (Data_Buf << 8);
     
150.                                 disp_count <= disp_count + 1'b1;
     
151.                                 state <= Write_Data_Second;
     
152.                         end              
     
153.                 end
     
154. //--------------------------------------------------------------------------//               
     
155.                 default:  state <= Clear_Lcd; //若state为其他值，则将state置为Clear_Lcd
     
156.                 endcase
     
157.         end
     
158. end
     
159. 
     
160. endmodule

复制代码

通过触发信号trig，即雷达OT2引脚的输出来确定检测范围内是否有人，从而确定屏幕上显示什么内容
没人来的时候


有人来的时候


之后是蜂鸣器，我开发板上的蜂鸣器是无源蜂鸣器，需要给一个大约500Hz~5KHz的PWM波才能驱动

1. module beep(
   
2.     clk,         // 50 MHz clock input
   
3.     rst,         // Reset input
   
4.     trig,        // trig input to control PWM output
   
5.     pwm_out      // PWM output
   
6. );
   
7.         input clk;
   
8.         input rst;
   
9.         input trig;
   
10.         output reg pwm_out;
    
11. 
    
12.     reg [17:0] count;       // Counter for generating PWM
    
13.     localparam [17:0] count_period = 18'd60_000 - 1;  // 50M / 2000 = 25000
    
14. 
    
15.     // PWM generation logic
    
16.     always @(posedge clk or negedge rst) begin
    
17.         if (!rst) begin
    
18.             count <= 18'd0;
    
19.             pwm_out <= 1'b0;
    
20.         end else begin
    
21.             if (trig) begin
    
22.                 if (count >= count_period) begin
    
23.                     count <= 18'd0;
    
24.                     pwm_out <= ~pwm_out; // Toggle the PWM output
    
25.                 end else begin
    
26.                     count <= count + 1;
    
27.                 end
    
28.             end else begin
    
29.                 count <= 18'd0; // Reset the counter when sw is 0
    
30.                 pwm_out <= 1'b0; // Disable PWM output when sw is 0
    
31.             end
    
32.         end
    
33.     end
    
34. endmodule
    

复制代码

beep蜂鸣器同样由trig信号来控制是否响，有人来响，没人来不响。
写好了蜂鸣器和LCD1602模块之后，在顶层模块例化它们

1. module radar(
   
2.     clk,         // 50 MHz clock input
   
3.     rst,         // Reset input
   
4.     pwm_out,      // PWM output
   
5.          LCD_EN,
   
6.          RS,
   
7.          RW,
   
8.          DB8,
   
9.          trig //trigger
   
10. );
    
11.         input clk;
    
12.         input rst;
    
13.         input trig;
    
14.         output pwm_out;
    
15.        
    
16.         output  LCD_EN;//LCD_EN为LCD模块的使能信号（下降沿触发）
    
17.         output  RS;//RS=0时为写指令；RS=1时为写数据
    
18.         output  RW;//RW=0时对LCD模块执行写操作；RW=1时对LCD模块执行读操作
    
19.         output  [7:0] DB8; //8位指令或数据总线
    
20.        
    
21.         lcd u_lcd(
    
22.                 .clk(clk),
    
23.                 .rst(rst),
    
24.                 .LCD_EN(LCD_EN),
    
25.                 .RS(RS),
    
26.                 .RW(RW),
    
27.                 .DB8(DB8),
    
28.                 .trig(trig)
    
29.         );
    
30.        
    
31.         beep u_beep(
    
32.                 .clk(clk),      
    
33.                 .rst(rst),      
    
34.                 .trig(trig),        
    
35.                 .pwm_out(pwm_out)
    
36.         );
    
37. endmodule

复制代码

综合、分配管脚，大功告成
论坛发不了视频，只能发个GIF了，没有蜂鸣器的声音

哈哈哈并没有不满

爱笑 发表于 2024-8-1 08:31
哈哈哈并没有不满

厉害

FPGA大佬，太厉害了

爱笑 发表于 2024-8-1 08:31
哈哈哈并没有不满

没关系，你可以表示不满

粉肠大哥太棒了

能不能在车上多装几个当报警的

Francisliu 发表于 2024-8-1 10:48
能不能在车上多装几个当报警的

走近开车门的时候被报警了

妖猊 发表于 2024-8-1 10:20
粉肠大哥太棒了