基于FPGA的温度采集显示与报警

基于FPGA的温度采集显示与报警 部分 参考代码

-- ******************************************************************************
-- 温度采集与显示
-- *******************************************************************************
library IEEE;
use IEEE.STD_LOGIC_1164.ALL;
use IEEE.STD_LOGIC_ARITH.ALL;
use IEEE.STD_LOGIC_UNSIGNED.ALL;

entity temperature is
port(
   clk:in std_logic;                    --50M时钟输入
   rst_n:in std_logic;                  --复位信号输入
   key_in:in std_logic;                 --按键信号输入
   d:inout std_logic;                   --温度输入   
   en:out std_logic_vector(4 downto 0); --数码管片选      
   dataout:out std_logic_vector(7 downto 0);--数码管段选  
   bell_out:out std_logic               --蜂鸣器输出
   );
end entity;

architecture one of temperature is

signal tmp_data:std_logic_vector(9 downto 0);
signal tmp:std_logic_vector(9 downto 0);
signal tmp_final_ge:std_logic_vector(5 downto 0);
signal tmp_final_xiaoshu:std_logic_vector(3 downto 0);
signal cnt:integer range 0 to 75;
signal num:integer range 0 to 90;
signal d_reg,link_d,clk200k,clk1m,link_data,ab:std_logic;
signal seg7_tmp:integer range 0 to 9;
signal count2,count3,count4,count5:integer range 0 to 9;
signal count1 :integer range 0 to 9;
signal count :integer range 0 to 4;
signal temp3:integer range 0 to 9999;
signal temp4:integer range 0 to 999;
signal temp5:integer range 0 to 99;
signal temp1:integer range 0 to 99;
signal scan_reg:std_logic_vector(4 downto 0);
---------------存储温度数据-------------------------------------------
signal temperture_data1:std_logic_vector(9 downto 0);
signal temperture_data2:std_logic_vector(9 downto 0);
signal temperture_data3:std_logic_vector(9 downto 0);
signal temperture_data4:std_logic_vector(9 downto 0);
signal temperture_data5:std_logic_vector(9 downto 0);
signal temperture_data6:std_logic_vector(9 downto 0);
signal temperture_data7:std_logic_vector(9 downto 0);
signal temperture_data8:std_logic_vector(9 downto 0);
signal temperture_data9:std_logic_vector(9 downto 0);
signal temperture_data10:std_logic_vector(9 downto 0);
signal temperture_out:std_logic_vector(9 downto 0);--按键选择输出的存储的温度数据

component bell is
port(
    clk:in std_logic;                               --50M时钟输入
    reset_n:in std_logic;                           --复位信号输入
    temperature:in std_logic_vector(3 downto 0);                       --最后一分钟信号输出   
    pwm_out:out std_logic                           --蜂鸣器驱动脉冲
);
end component;

component key is
port(
    clk:in std_logic;                               --50M时钟输入
    reset_n:in std_logic;                           --复位信号输入
    key:in std_logic;                               --按键信号输入
    temperture_data1:in std_logic_vector(9 downto 0);  --存储的10个温度信号输入
    temperture_data2:in std_logic_vector(9 downto 0);
    temperture_data3:in std_logic_vector(9 downto 0);
    temperture_data4:in std_logic_vector(9 downto 0);
    temperture_data5:in std_logic_vector(9 downto 0);
    temperture_data6:in std_logic_vector(9 downto 0);
    temperture_data7:in std_logic_vector(9 downto 0);
    temperture_data8:in std_logic_vector(9 downto 0);
    temperture_data9:in std_logic_vector(9 downto 0);
    temperture_data10:in std_logic_vector(9 downto 0);
    temperture_out:out std_logic_vector(9 downto 0)     ----经按键选择的温度数据输出，按住按键一秒输出一个
);
end component;

begin
    tmp_final_ge<=  tmp_data(9)&tmp_data(8)&tmp_data(7)&tmp_data(6)&tmp_data(5)&tmp_data(4) when key_in = '1' --当按键没有按下时，输出当前的温度
                    else temperture_out(9)&temperture_out(8)&temperture_out(7)&temperture_out(6)&temperture_out(5)&temperture_out(4);
                    ----当按键按下时，输出存储的之前的温度，1秒输出一个温度
    tmp_final_xiaoshu<= tmp_data(3)&tmp_data(2)&tmp_data(1)&tmp_data(0) when key_in = '1'--当按键没有按下时，输出当前的温度
                    else temperture_out(3)&temperture_out(2)&temperture_out(1)&temperture_out(0);
                    --当按键按下时，输出存储的之前的温度，1秒输出一个温度
    d<=d_reg when link_d='1' else 'Z';
    tmp_data<=tmp when link_data<='1' else tmp_data;
    en<=scan_reg;
    -- //****************************************************************************************************
    -- //  模块名称:分频模块，产生1M的时钟信号
    -- //  功能描述:
    -- //****************************************************************************************************
process(clk)
variable a:integer range 0 to 24;
begin
if clk'event and clk='1' then
	if a=24 then a:=0;clk1m<=not clk1m;
	else a:=a+1;
	end if;
end if;
end process;

    -- //****************************************************************************************************
    -- //  模块名称:温度传感器数据采集模块
    -- //  功能描述:
    -- //****************************************************************************************************
process(clk1m,num,cnt,d,tmp,temperture_data1,temperture_data2,temperture_data3,temperture_data4,
        temperture_data5,temperture_data6,temperture_data7,
        temperture_data8,temperture_data9,temperture_data10)
begin
if clk1m'event and clk1m='1' then
    -- if(key_in = '1')then--按键没有按下的情况下才进行采集温度数据，按下则输出之前10个温度数据，不进行采集
	if num=90 then num<=0;
		if cnt=75 then cnt<=0;
		else cnt<=cnt+1;
		end if;
	else num<=num+1;
	end if;
---------------------rst脉冲-------------------------7
if (cnt>=0 and cnt<=6) then d_reg<='0';link_d<='1'; 
---------------------present pulse-------------------等待应答 7
elsif (cnt>=7 and cnt<=13) then link_d<='0';
---------------------skip rom------------------------8
elsif (cnt=14 or cnt=15 or cnt=18 or cnt=19) then           -----写0      
	if (num>=0 and num<66) then 
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
elsif (cnt=16 or cnt=17 or cnt=20 or cnt=21) then           -----写1
	if (num>=0 and num<10) then
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
---------------------convert t-----------------------8
elsif (cnt=22 or cnt=23 or cnt=25 or cnt=26 or cnt=27 or cnt=29) then          --------写0
	if (num>=0 and num<66) then 
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
elsif (cnt=24 or cnt=28) then													--------写1
	if (num>=0 and num<10) then
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
---------------------reset pulse---------------------7
elsif (cnt>=30 and cnt<=36) then d_reg<='0';link_d<='1';
----------------------presence-----------------------7
elsif (cnt>=37 and cnt<=43) then link_d<='0';
----------------------skip rom-----------------------8
elsif (cnt=44 or cnt=45 or cnt=48 or cnt=49) then
	if (num>=0 and num<66) then
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
elsif (cnt=46 or cnt=47 or cnt=50 or cnt=51) then
	if (num>=0 and num<10) then
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
----------------------read scratchpad-----------------8
elsif (cnt=52 or cnt=58) then
	if (num>=0 and num<66) then
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
elsif (cnt=53 or cnt=54 or cnt=55 or cnt=56 or cnt=57 or cnt=59) then
	if (num>=0 and num<10) then
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
-----------------------读取温度数据----------------------10
elsif cnt=60 then
	if (num>=0 and num<5) then
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
    if num=13 then tmp(0)<=d;               ----------0
	end if;
elsif cnt=61 then
	if (num>=0 and num<5) then
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
    if num=13 then tmp(1)<=d;               ---------1
	end if;
elsif cnt=62 then
	if (num>=0 and num<5) then
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
    if num=13 then tmp(2)<=d;               ----------2
	end if;
elsif cnt=63 then
	if (num>=0 and num<5) then
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
    if num=13 then tmp(3)<=d;              ---------3
	end if;
elsif cnt=64 then
	if (num>=0 and num<5) then
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
    if num=13 then tmp(4)<=d;             ---------4
	end if;
elsif cnt=65 then
	if (num>=0 and num<5) then
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
    if num=13 then tmp(5)<=d;            ------------5
	end if;
elsif cnt=66 then
	if (num>=0 and num<5) then
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
    if num=13 then tmp(6)<=d;           -----------6
	end if;
elsif cnt=67 then
	if (num>=0 and num<5) then
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
    if num=13 then tmp(7)<=d;          ------------7
	end if;
elsif cnt=68 then
	if (num>=0 and num<5) then
	d_reg<='0';link_d<='1';
	else link_d<='0';
	end if;
    if num=13 then tmp(8)<=d;         --------------8
	end if;
elsif cnt=69 then
	if (num>=0 and num<5) then
	d_reg<='0';link_d<='1';
	elsif num=15 then link_data<='1';
	else link_d<='0';link_data<='0';
	end if;
    if num=13 then tmp(9)<=d;        ------------9
    temperture_data1 <= tmp;-------------依次存储10个温度数据
    temperture_data2 <= temperture_data1;
    temperture_data3 <= temperture_data2;
    temperture_data4 <= temperture_data3;
    temperture_data5 <= temperture_data4;
    temperture_data6 <= temperture_data5;
    temperture_data7 <= temperture_data6;
    temperture_data8 <= temperture_data7;
    temperture_data9 <= temperture_data8;
    temperture_data10 <= temperture_data9;
	end if;
else link_d<='0';link_data<='0';
end if;
end if;
-- end if;
end process;
    -- //****************************************************************************************************
    -- //  模块名称:分频模块，产生10K的时钟信号
    -- //  功能描述:用于数码管的位扫描信号clk200k，实为10K
    -- //****************************************************************************************************
--------------------数码管扫描CLK3 
process(clk)
variable a   : integer range 0 to 2499;
begin
	if clk'event and clk='1' then
		if a=2499 then
		a:=0;clk200k<=not clk200k;
		else a:=a+1;
		end if;
	end if;
end process;                 

链接：https://pan.baidu.com/s/1V7q_UGv2gJ9rbNJY00Iqfw
提取码：1234