1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
| type data_array is array (0 to 479999) of integer range 0 to 1;
constant data :data_array:=(1,0,0,1,1,0,1,0,1,0,0,1,0,0,0,0,0,1,0,1,0,1,1,1,1,1,1,0,1,0,0,1,0,0);
tx_parallel_data(0)<=to_unsigned(data(0+counter),1)(0);
tx_parallel_data(1)<=to_unsigned(data(1+counter),1)(0);
tx_parallel_data(2)<=to_unsigned(data(2+counter),1)(0);
tx_parallel_data(3)<=to_unsigned(data(3+counter),1)(0);
tx_parallel_data(4)<=to_unsigned(data(4+counter),1)(0);
tx_parallel_data(5)<=to_unsigned(data(5+counter),1)(0);
tx_parallel_data(6)<=to_unsigned(data(6+counter),1)(0);
tx_parallel_data(7)<=to_unsigned(data(7+counter),1)(0);
tx_parallel_data(8)<=to_unsigned(data(8+counter),1)(0);
tx_parallel_data(9)<=to_unsigned(data(9+counter),1)(0);
tx_parallel_data(10)<=to_unsigned(data(10+counter),1)(0);
tx_parallel_data(11)<=to_unsigned(data(11+counter),1)(0);
tx_parallel_data(12)<=to_unsigned(data(12+counter),1)(0);
tx_parallel_data(13)<=to_unsigned(data(13+counter),1)(0);
tx_parallel_data(14)<=to_unsigned(data(14+counter),1)(0);
tx_parallel_data(15)<=to_unsigned(data(15+counter),1)(0);
tx_parallel_data(16)<=to_unsigned(data(16+counter),1)(0);
tx_parallel_data(17)<=to_unsigned(data(17+counter),1)(0);
tx_parallel_data(18)<=to_unsigned(data(18+counter),1)(0);
tx_parallel_data(19)<=to_unsigned(data(19+counter),1)(0);
tx_parallel_data(20)<=to_unsigned(data(20+counter),1)(0);
tx_parallel_data(21)<=to_unsigned(data(21+counter),1)(0);
tx_parallel_data(22)<=to_unsigned(data(22+counter),1)(0);
tx_parallel_data(23)<=to_unsigned(data(23+counter),1)(0);
tx_parallel_data(24)<=to_unsigned(data(24+counter),1)(0);
tx_parallel_data(25)<=to_unsigned(data(25+counter),1)(0);
tx_parallel_data(26)<=to_unsigned(data(26+counter),1)(0);
tx_parallel_data(27)<=to_unsigned(data(27+counter),1)(0);
tx_parallel_data(28)<=to_unsigned(data(28+counter),1)(0);
tx_parallel_data(29)<=to_unsigned(data(29+counter),1)(0);
tx_parallel_data(30)<=to_unsigned(data(30+counter),1)(0);
tx_parallel_data(31)<=to_unsigned(data(31+counter),1)(0);
counter:=counter+32;
if counter> limitforData then
counter:=0;
end if; |