標(biāo)題: Tablet counting system verilog code [打印本頁]
作者: Vimalraj    時間: 2017-12-3 16:09
標(biāo)題: Tablet counting system verilog code
Hex keypad or tablet counting system


源程序如下:
  1. //##################################################################
  2. /*
  3. Project/Module        : Assignment
  4. File name        : HexKeyCodeGenerator.v
  5. Version                : 1-0
  6. Date created        : 25 Aug 2017
  7. Author                : Vimalraj Kasivisvanathan
  8. Code type        : Verilog
  9. Description        : Verilog code for HexKeypad
  10. */
  11. //##################################################################

  13. //`default_nettype none

  15. module HEXKEY
  16. #(parameter [3:0]
  17. PRESSKEY = 4'b0001,
  18. KEYCOL0 = 4'b0010,
  19. KEYCOL1 = 4'b0011,
  20. KEYCOL2 = 4'b0100,
  21. KEYCOL3 = 4'b0101,
  22. //DELAY1 = 4'b0110,
  23. //DELAY2 = 4'b0111,
  24. KEYVALID = 4'b1000,
  25. KEYRELEASE = 4'b1001,
  26. KEYERROR = 4'b1010)
  27. (input        b_ip_hex_sys_clock,
  28. input        b_ip_hex_sys_reset,
  29. input        b_ip_hex_clear,
  30. input [3:0] b_ip_hex_keypad_row
  31. output reg [3:0] b_op_hex_keycode,
  32. output reg              b_op_hex_valid_code,
  33. output reg [3:0]  b_op_hex_keypad_column,
  34. );

  36. reg [3:0] current,next,row;

  38. //***********************************************************

  40. ///////////////FIRST//////////////////////////////////////
  41. always @(posedge b_ip_hex_sys_clock) begin: BGN
  42. if (b_ip_hex_sys_reset || b_ip_hex_clear) current <= PRESSKEY;
  43. else                                         current <= next;
  44. end
  45. //////////////////////////////////////////////////////////


  48. ///////////////////////CURRENTSTATE/////////////////////////
  49. always @(b_ip_hex_keypad_row || current)begin: NSL
  50.         case(current)
  51.        
  52.                 PRESSKEY:
  53.                         if ((|b_ip_hex_keypad_row))  next <= KEYCOL0;
  54.                         else                            next <= PRESSKEY;
  55.                
  56.                 KEYCOL0:
  57.                         if ((|b_ip_hex_keypad_row))  next = KEYVALID;
  58.                         else if ((!(|b_ip_hex_keypad_row)) && b_op_hex_keypad_column == 4'b0001) next = KEYCOL1;  
  59.        
  60.        
  61.                 KEYCOL1:
  62.                         if ((|b_ip_hex_keypad_row))  next = KEYVALID;
  63.                         else if ((!(|b_ip_hex_keypad_row)) && b_op_hex_keypad_column == 4'b0010) next = KEYCOL2;


  66.                 KEYCOL2:
  67.                         if ((|b_ip_hex_keypad_row))  next = KEYVALID;
  68.                         else if ((!(|b_ip_hex_keypad_row)) && b_op_hex_keypad_column == 4'b0100) next = KEYCOL3;


  71.                 KEYCOL3:
  72.                         if ((|b_ip_hex_keypad_row))          next = KEYVALID;
  73.                         else if (!(b_ip_hex_keypad_row)) next = KEYERROR;
  74.                         else                                 next = 4'bx;



  78.                 KEYVALID:
  79.                         next = KEYRELEASE;


  82.                 KEYRELEASE:
  83.                         if (!(|b_ip_hex_keypad_row)) next = PRESSKEY;
  84.                         else                            next = KEYRELEASE;


  87.                 KEYERROR:
  88.                         next = PRESSKEY;
  89.                

  91.                 default:
  92.                         next = 4'bx;
  93.         endcase
  94. end


  97. /////////////////////NEXTSTATE LOGIC///////////////////////////////////////////////

  99. always @(posedge b_ip_hex_sys_clock)begin: ROL
  100.     if (b_ip_hex_sys_reset || b_ip_hex_clear)begin
  101.         b_op_hex_keypad_column <= 4'b1111;
  102.         b_op_hex_valid_code    <= 1'b0;
  103.         b_op_hex_keycode       <= 4'b0000;
  104.         row                       <= 4'b0000;
  105. end
  106. else begin

  108.         case(next)

  110.                 PRESSKEY:begin
  111.                         b_op_hex_keypad_column <= 4'b1111;
  112.                         b_op_hex_valid_code    <= 1'b0;
  113.                         b_op_hex_keycode       <= 4'b0000;
  114.                         row                       <= 4'b0000;
  115.                         end
  116.                
  117.                 KEYCOL0:begin
  118.                         b_op_hex_keypad_column <= 4'b0001;
  119.                         b_op_hex_valid_code    <= 1'b0;
  120.                         row                       <= b_ip_hex_keypad_row;
  121.                                 if (row == 4'b0001) b_op_hex_keycode <= 4'b0000;
  122.                                 else if (row == 4'b0010) b_op_hex_keycode <= 4'b0100;
  123.                                 else if (row == 4'b0100) b_op_hex_keycode <= 4'b1000;
  124.                                 else if(row == 4'b1000) b_op_hex_keycode <= 4'b1100;
  125.                         end

  127.                 KEYCOL1:begin
  128.                         b_op_hex_keypad_column <= 4'b0010;
  129.                         b_op_hex_valid_code    <= 1'b0;
  130.                         row                       <= row;
  131.                                 if (row == 4'b0001) b_op_hex_keycode <= 4'b0001;
  132.                                 else if (row == 4'b0010) b_op_hex_keycode <= 4'b0101;
  133.                                 else if (row == 4'b0100) b_op_hex_keycode <= 4'b1001;
  134.                                 else if(row == 4'b1000) b_op_hex_keycode <= 4'b1101;
  135.                         end

  137.                 KEYCOL2:begin
  138.                         b_op_hex_keypad_column <= 4'b0100;
  139.                         b_op_hex_valid_code    <= 1'b0;
  140.                         row                       <= row;
  141.                                 if (row == 4'b0001) b_op_hex_keycode <= 4'b0010;
  142.                                 else if (row == 4'b0010) b_op_hex_keycode <= 4'b0110;
  143.                                 else if (row == 4'b0100) b_op_hex_keycode <= 4'b1010;
  144.                                 else if(row == 4'b1000) b_op_hex_keycode <= 4'b1110;
  145.                         end

  147.                 KEYCOL3:begin
  148.                         b_op_hex_keypad_column <= 4'b1000;
  149.                         b_op_hex_valid_code    <= 1'b0;
  150.                         row                       <= row;
  151.                                 if (row == 4'b0001) b_op_hex_keycode <= 4'b0011;
  152.                                 else if (row == 4'b0010) b_op_hex_keycode <= 4'b0111;
  153.                                 else if (row == 4'b0100) b_op_hex_keycode <= 4'b1011;
  154.                                 else if(row == 4'b1000) b_op_hex_keycode <= 4'b1111;
  155.                         end

  157.                 KEYRELEASE:begin
  158.                         b_op_hex_keypad_column <= 4'b1111;
  159.                         b_op_hex_valid_code    <= 1'b0;
  160.                         b_op_hex_keycode       <= b_op_hex_keycode;
  161.                         end

  163. ……………………

  165. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復(fù)制代碼

所有資料51hei提供下載:
HexKeypad.rar (72.42 KB, 下載次數(shù): 6)






歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1