关闭

CPLD被STM32读写VHDL程序

1745人阅读 评论(4) 收藏 举报

 

--本程序用来测试STM32对CPLD的读写操作

--测试功能如下:

--向0x05地址写入0x01,LED灯停止闪烁,写入其他数据闪烁继续

--0x03,0x04寄存器为定值,可以通过STM32读取然后使用串口输出看看是否一致

 

--文件名:AD.vhd

library ieee;

use ieee.std_logic_1164.all;

use ieee.std_logic_unsigned.all;

 

entity AD is

port(

-- 系统信号线

    CLK:         in      std_logic;

LED:  out  std_logic;

-- ARM相连的信号线

    Adr_L:       in      std_logic_vector(7 downto 0); --A7...A0,只使用了低八位地址线

    D:           inout   std_logic_vector(7 downto 0); --只使用了低八位数据线

    FSMC_NE4:    in      std_logic;  

    FSMC_NOE:    in      std_logic;

    FSMC_NWE:    in      std_logic

);

end AD;

 

architecture art of AD is

--设置存储数据的寄存器

signal AD0_H_data,AD0_L_data,AD1_H_data,AD1_L_data,LED_ctrl:  std_logic_vector(7 downto 0); 

--数据缓冲寄存器

signal data_buf: std_logic_vector(7 downto 0);

--数据输出控制

signal data_outctl: std_logic;

signal datacnt:integer range 0 to 4000000;--分频计数

--LED闪烁使能

signal LED_flag: std_logic;

 

 

--统一编址,地址线数据线为八位,每个地址数据宽度8位

--"00000001" AD0_H_data 0x01

--"00000010" AD0_L_data 0x02

--"00000011" AD1_H_data 0x03

--"00000100" AD1_L_data 0x04

--"00000101" LED_ctrl 0x05

 

begin

 

AD1_H_data <="10100001";

AD1_L_data <="00010001";

--LED 闪烁,用作CPLD运行指示

 

process(LED_ctrl) is

begin

if(LED_ctrl="00000001") then

LED_flag <= '0';

else

LED_flag <= '1';

end if;

end process;

 

process(CLK)is

begin

 

 

if(CLK'event and CLK='1') then

if(LED_flag='1') then

datacnt<=datacnt+1;

if (datacnt>2000000) then

LED <= '1';

end if;

if (datacnt>=4000000) then

LED <='0';

datacnt <=0;

end if;

end if;

end if;

end process;

 

--当读取CPLD数据时用来判断何时向总线上输出数据

data_outctl <= (not  FSMC_NE4) and (not FSMC_NOE) and (FSMC_NWE);  

D <=  data_buf when (data_outctl='1') else "ZZZZZZZZ";--向数据线输出数据,否则保持为高阻态

 

-- 写操作,模式1,时序图在数据手册P331

process(FSMC_NE4,FSMC_NWE,Adr_L,FSMC_NOE) is  --,FSMC_NBL,D,RESET

begin

if(FSMC_NWE'event and FSMC_NWE='1') then

if((FSMC_NOE and (not FSMC_NE4))='1') then

case (Adr_L) is

when "00000001" =>   

AD0_H_data<= D; --0x01

when "00000010" =>  

AD0_L_data<= D; --0x02

when "00000101" =>  

LED_ctrl<= D; --0x05

when others =>

AD0_H_data<= AD0_H_data;

AD0_L_data<= AD0_L_data;

end case;

end if;

end if;

end process;

 

--读操作,模式1,P331

process(FSMC_NE4,FSMC_NWE,Adr_L,FSMC_NOE) is 

begin

if(FSMC_NOE='0' and FSMC_NOE'event) then --直接在NOE的下降沿更新数据

case (Adr_L) is

when "00000001" =>   

data_buf <= AD0_H_data; --0x01

when "00000010" =>  

data_buf <= AD0_L_data; --0x02

when "00000011" =>  

data_buf <= AD1_H_data; --0x03

when "00000100" => 

data_buf <= AD1_L_data; --0x04

when others =>  data_buf <= "ZZZZZZZZ";

end case; 

end if;

end process;

end;

 

 

 

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    博客说明
    博文更新请访问http://emouse.cnblogs.com/ 本博客不定期更新。交流加入QQ群: 237389191
    我的cnblog-文章首发
    个人资料
    • 访问:458764次
    • 积分:5496
    • 等级:
    • 排名:第5013名
    • 原创:104篇
    • 转载:51篇
    • 译文:0篇
    • 评论:167条
    最新评论