реклама на сайте
подробности

 
 
> модуль энкодеров на верилоге
sergey sva
сообщение Aug 8 2013, 14:44
Сообщение #1


Гуру
******

Группа: Свой
Сообщений: 2 546
Регистрация: 23-05-07
Из: Самарская область Сызрань
Пользователь №: 27 923



Модуль энкодеров делаю для этой платы. Набросал заготовку, только заготовку.
Какие замечания, что бы сразу переделать? Может кто помочь захочет. )
CODE
//*************************************************************************//
// |------|
// ____| |____ A
//
// |------|
// _____| |____ B
//
// R ноль метка
//************************************************************************//
module ENCODERS(
ENCOD1_A,ENCOD1_B,ENCOD1_R, //
ENCOD2_A,ENCOD2_B,ENCOD2_R, //
ENCOD3_A,ENCOD3_B,ENCOD3_R, //Сигналы от энкодеров
SEL_MOD_E,ADRES_MOD,CLCK, //Сигнал от модуля clck_manage. Сигнал ADRES_MOD выдает адреса всех модулей.
//после трансляции адреса через 5 тактов устанавливается сигнал разрешения SEL_MOD_E
//Если адрес совпадает с адресом этого модуля thisadresmod, то можно записывть данные в
//двух портовую память.
WRITE_EN_MEMORI, //Разрешение записи 1 = запись; 0 = чтение.
RST_MEMORY, //сброс выхода памяти.
DATA_TO_MEMORY, //данные для записи.
DATA_FROM_MEMORY, //данные для чтения.
MEMORY_ADRES //Адрес чтение / записи.

);

input ENCOD1_A,ENCOD1_B,ENCOD1_R,ENCOD2_A,ENCOD2_B,ENCOD2_R,ENCOD3_A,ENCOD3_B,ENCOD3_R
, SEL_MOD_E, CLCK;
input[3:0] ADRES_MOD;
output WRITE_EN_MEMORI, RST_MEMORY;
output[31:0] DATA_TO_MEMORY;
input[31:0] DATA_FROM_MEMORY;
output[9:0] MEMORY_ADRES;
// Адрес этого модуля
parameter [3:0] thisadresmod = 4'h1;

//-----------------------------------------------------------------//
// Выбор модуля. Если модуль выбран можно читать писать в память. >>
reg select_module_ok;
reg wrmem,rstmem;
reg[31:0] dat_to_mem;
reg[9:0] adrmem;

always @( SEL_MOD_E )
begin

if(SEL_MOD_E == 1)
begin
if(ADRES_MOD[3:0] == thisadresmod[3:0] )
begin
select_module_ok <= 1;
end
else begin
select_module_ok <= 0;

end
end
else begin
select_module_ok <= 0;
end
end

assign WRITE_EN_MEMORI = select_module_ok ? wrmem : 1'bZ;
assign RST_MEMORY = select_module_ok ? rstmem : 1'bZ;
assign DATA_TO_MEMORY = select_module_ok ? dat_to_mem : 32'bZ;
assign MEMORY_ADRES = select_module_ok ? adrmem : 10'bZ;
// Выбор модуля. Если модуль выбран можно читать писать в память. <<
//------------------------------------------------------------------//

//------------------------------------------------------------------//
// Главный процесс модуля энкодеров >>
reg[31:0] encode1_value;
reg[31:0] encode2_value;
reg[31:0] encode3_value;
always @(posedge CLCK)
begin

//----------------------------//
if(select_module_ok == 1)
begin

// Здесь моно читать писать в память.
// Сигналы (wrmem, rstmem; dat_to_mem[31:0], DATA_FROM_MEMORY[31:0]; adrmem[9:0]wink.gif

// мапинг памяти
// энкодер 1 смещение в памяти 0x0
// адрес 0 "множитель" формат флоат 32 бита (для чтения,записывается с компьютера)
// адрес 4 "позиция" формат флоат, получается из encode1_value * "множитель".

// энкодер 2 смещение в памяти 0x30
// адрес 30 "множитель" формат флоат 32 бита (для чтения,записывается с компьютера)
// адрес 34 "позиция" формат флоат, получается из encode2_value * "множитель".

// энкодер 3 смещение в памяти 0x60
// адрес 60 "множитель" формат флоат 32 бита (для чтения,записывается с компьютера)
// адрес 64 "позиция" формат флоат, получается из encode3_value * "множитель".




end
//---------------------------//


//сигналы от энкодеров
//(ENCOD1_A || ENCOD1_B || ENCOD1_R || ENCOD2_A || ENCOD2_B || ENCOD2_R || ENCOD3_A || ENCOD3_B || ENCOD3_R)

//переменные для результат подсчета
// encode1_value[31:0]; encode2_value[31:0]; encode3_value[31:0];



end

// Главный процесс модуля энкодеров <<
//---------------------------------------------------------------------//




endmodule
Go to the top of the page
 
+Quote Post
 
Start new topic
Ответов
sergey sva
сообщение Aug 12 2013, 16:48
Сообщение #2


Гуру
******

Группа: Свой
Сообщений: 2 546
Регистрация: 23-05-07
Из: Самарская область Сызрань
Пользователь №: 27 923



Добрался для ксалинкса , попробовал собрал, исправил ошибки которые наделал, все считает.
Только не нравиться как я сделал подсчет импульсов за оборот, может посоветуете как сделать это красивее?
Импульс R приходит когда датчик делает полный оборот.

CODE
//---------------------------------------------------------------------//
//---Энкодер Счетчик --------------------------------------------------//
module ENCODER(A,B,R,CLCK,POSITION,TURNPULSEVAL);
// Сигналы
input A;
input B;
input R;
input CLCK;
output[31:0] POSITION;
output[31:0] TURNPULSEVAL;
// Сигналы

reg[31:0] position;
reg[31:0] turnpulse;

reg count_up,count_down;
reg [1:0] z,e;

reg[31:0] count_up_r;
reg[31:0] count_down_r;
reg fagindex,norim;



// инициализация переменных
initial
begin
position = 0;
turnpulse = 0;

e = 2'b00;
z = 2'b00;

count_up =1'b0;
count_down =1'b0;

count_up_r = 32'd0;
count_down_r = 32'd0;
fagindex =1'b0;
norim =1'b0;
end
// инициализация переменных


always @ (posedge CLCK)
begin
e = {A,B};

count_down <=1 'b0;
count_up <= 1'b0;

case(z)
2'b00: if(e[1:0] == 2'b01)
begin
z[1:0] <= 2'b01;
count_up <= 1'b1;

end
else if(e[1:0] == 2'b10)
begin
z[1:0] <= 2'b10;
count_down <= 1'b1;

end

2'b01: if(e[1:0] == 2'b11)
begin
z[1:0] <= 2'b11;
//count_up <= 1'b1;

end
else if(e[1:0] == 2'b00)
begin
z[1:0] <= 2'b00;
//count_down <= 1'b1;

end

2'b11: if(e[1:0] == 2'b10)
begin
z[1:0] <= 2'b10;
//count_up <= 1'b1;

end
else if(e[1:0] == 2'b01)
begin
z[1:0] <= 2'b01;
//count_down <= 1'b1;
end

2'b10: if(e[1:0] == 2'b00)
begin
z[1:0] <= 2'b00;
//count_up <= 1'b1;
end
else if(e[1:0] == 2'b11)
begin
z[1:0] <= 2'b11;
//count_down <= 1'b1;
end
endcase


if(count_up)
begin
position<= position +1;
count_up_r <= count_up_r +1;

end
else if(count_down)
begin
position<= position -1;
count_down_r <= count_down_r +1;

end





if((count_up_r[31:0] > 32'd0) && (count_down_r[31:0] > 32'd0))
begin

if(norim)
begin
fagindex <= 1'b0;
count_up_r <=0;
count_down_r<=0;

end
else begin
fagindex <= 1'b1;
end

end



end



always @ (posedge R)
begin

if(fagindex == 1'b0)
begin

if((count_up_r[31:0] > 32'd0) && (count_down_r[31:0] == 32'd0))
begin
turnpulse[31:0] <= count_up_r;
end
else if ((count_up_r[31:0] == 32'd0) && (count_down_r[31:0] > 32'd0))
begin
turnpulse[31:0] <= count_down_r;
end
norim <= 1'b0;
end
else begin
norim <= 1'b1;

end

end

assign POSITION = position;
assign TURNPULSEVAL = turnpulse;

endmodule
//---Энкодер Счетчик --------------------------------------------------//
//---------------------------------------------------------------------//
Go to the top of the page
 
+Quote Post



Reply to this topicStart new topic
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 


RSS Текстовая версия Сейчас: 25th July 2025 - 18:35
Рейтинг@Mail.ru


Страница сгенерированна за 0.0138 секунд с 7
ELECTRONIX ©2004-2016