1
2
3 --本程序用來測試STM32對CPLD的讀寫操作
4
5 --測試功能如下：
6
7 --向0x05地址寫入0x01,LED燈停止閃爍，寫入其他數(shù)據(jù)閃爍繼續(xù)
8
9 --0x03,0x04寄存器為定值，可以通過STM32讀取然后使用串口輸出看看是否一致
10
11
12
13 --文件名：AD.vhd
14
15 library ieee;
16
17 use ieee.std_logic_1164.all;
18
19 use ieee.std_logic_unsigned.all;
20
21
22
23 entity AD is
24
25 port(
26
27 -- 系統(tǒng)信號線
28
29 CLK: in std_logic;
30
31 LED: out std_logic;
32
33 -- ARM相連的信號線
34
35 Adr_L: in std_logic_vector(7 downto 0); --A7...A0,只使用了低八位地址線
36
37 D: inout std_logic_vector(7 downto 0); --只使用了低八位數(shù)據(jù)線
38
39 FSMC_NE4: in std_logic;
40
41 FSMC_NOE: in std_logic;
42
43 FSMC_NWE: in std_logic
44
45 );
46
47 end AD;
48
49
50
51 architecture art of AD is
52
53 --設(shè)置存儲數(shù)據(jù)的寄存器
54
55 signal AD0_H_data,AD0_L_data,AD1_H_data,AD1_L_data,LED_ctrl: std_logic_vector(7 downto 0);
56
57 --數(shù)據(jù)緩沖寄存器
58
59 signal data_buf: std_logic_vector(7 downto 0);
60
61 --數(shù)據(jù)輸出控制
62
63 signal data_outctl: std_logic;
64
65 signal datacnt:integer range 0 to 4000000;--分頻計數(shù)
66
67 --LED閃爍使能
68
69 signal LED_flag: std_logic;
70
71
72
73
74
75 --統(tǒng)一編址，地址線數(shù)據(jù)線為八位，每個地址數(shù)據(jù)寬度8位
76
77 --"00000001" AD0_H_data0x01
78
79 --"00000010" AD0_L_data0x02
80
81 --"00000011" AD1_H_data0x03
82
83 --"00000100" AD1_L_data0x04
84
85 --"00000101" LED_ctrl0x05
86
87
88
89 begin
90
91
92
93 AD1_H_data <="10100001";
94
95 AD1_L_data <="00010001";
96
97 --LED 閃爍，用作CPLD運行指示
98
99
100
101 process(LED_ctrl) is
102
103 begin
104
105 if(LED_ctrl="00000001") then
106
107 LED_flag <= '0';
108
109 else
110
111 LED_flag <= '1';
112
113 end if;
114
115 end process;
116
117
118
119 process(CLK)is
120
121 begin
122
123
124
125
126
127 if(CLK'event and CLK='1') then
128
129 if(LED_flag='1') then
130
131 datacnt<=datacnt+1;
132
133 if (datacnt>2000000) then
134
135 LED <= '1';
136
137 end if;
138
139 if (datacnt>=4000000) then
140
141 LED <='0';
142
143 datacnt <=0;
144
145 end if;
146
147 end if;
148
149 end if;
150
151 end process;
152
153
154
155 --當(dāng)讀取CPLD數(shù)據(jù)時用來判斷何時向總線上輸出數(shù)據(jù)
156
157 data_outctl <= (not FSMC_NE4) and (not FSMC_NOE) and (FSMC_NWE);
158
159 D <= data_buf when (data_outctl='1') else "ZZZZZZZZ";--向數(shù)據(jù)線輸出數(shù)據(jù)，否則保持為高阻態(tài)
160
161
162
163 -- 寫操作,模式1,時序圖在數(shù)據(jù)手冊P331
164
165 process(FSMC_NE4,FSMC_NWE,Adr_L,FSMC_NOE) is --,FSMC_NBL,D,RESET
166
167 begin
168
169 if(FSMC_NWE'event and FSMC_NWE='1') then
170
171 if((FSMC_NOE and (not FSMC_NE4))='1') then
172
173 case (Adr_L) is
174
175 when "00000001" =>
176
177 AD0_H_data<= D; --0x01
178
179 when "00000010" =>
180
181 AD0_L_data<= D; --0x02
182
183 when "00000101" =>
184
185 LED_ctrl<= D;--0x05
186
187 when others =>
188
189 AD0_H_data<= AD0_H_data;
190
191 AD0_L_data<= AD0_L_data;
192
193 end case;
194
195 end if;
196
197 end if;
198
199 end process;
200
201
202
203 --讀操作,模式1,P331
204
205 process(FSMC_NE4,FSMC_NWE,Adr_L,FSMC_NOE) is
206
207 begin
208
209 if(FSMC_NOE='0' and FSMC_NOE'event) then --直接在NOE的下降沿更新數(shù)據(jù)
210
211 case (Adr_L) is
212
213 when "00000001" =>
214
215 data_buf <= AD0_H_data; --0x01
216
217 when "00000010" =>
218
219 data_buf <= AD0_L_data; --0x02
220
221 when "00000011" =>
222
223 data_buf <= AD1_H_data; --0x03
224
225 when "00000100" =>
226
227 data_buf <= AD1_L_data; --0x04
228
229 when others => data_buf <= "ZZZZZZZZ";
230
231 end case;
232
233 end if;
234
235 end process;
236
237 end;
238
239
240
241
242
243
下載文檔
