Verilog实现的莫尔斯电码发生器

莫尔斯或者摩尔斯电码(Morse Code)，发明于1837年(另有一说是1836年)，通过不同的排列顺序来表达不同的英文字母、数字和标点符号，在这里作一简单处理，仅产生点(Dit)和划(Dah)，时长在0.25秒之内为点，超过为划，用按键控制时间模拟实现，5个点或划表示一个数字(0-9)，通过数码管显示按键发声频率1350Hz。

//莫尔斯代码发生器
module morse(rst_n,clk,key,seg,dg,beep);
input clk,rst_n,key;//clk50M，rst_n低电平有效，key按下为0
output reg beep; //蜂鸣器
output reg[7:0]  seg;//段码
output reg[5:0]  dg;//位码
reg [10:0] ct; //1350Hz分频计数
reg [3:0] cnt,kcnt; //50Hz分频计数，按键计数
reg clk50hz,clk1k; //分频得到的时钟
reg [3:0] num,number; //要显示的数，点划编码数
reg [2:0] i=0;  //要显示的点划序号
reg [9:0] dh=10'b0000000000;  //点划输入，点为10，划为11，不按为00
wire clk5;  //PLL输出的5.4M
reg [2:0] state; //按键状态
localparam S0 = 0; //初始状态
localparam S1 = 1;  //按键按下0-0.25S
localparam S2 = 2; //按键在0.25S内释放
localparam S3 = 3; //按键按