`timescale 1ns/1ps
module adc_dis(
clk ,
rst_n ,
sm_seg ,
sm_bit
); input clk;//50HZ
input rst_n;
output[:] sm_seg;//段选
output[:] sm_bit;//位选 reg [:] sm_seg;
reg [:] sm_bit;
reg [:] count;
reg [:] count2;
reg [:] i;//数码管位数
reg clk1, clk2;
reg [:]ge,shi,bai,qian,wan,swan;
reg [:] ge_reg,shi_reg,bai_reg,qian_reg,wan_reg,swan_reg; parameter//共阳极
led_GYA0 = 'hc0, //''
led_GYA1 = 'hf9, //''
led_GYA2 = 'ha4, //''
led_GYA3 = 'hb0, //''
led_GYA4 = 'h99, //''
led_GYA5 = 'h92, //''
led_GYA6 = 'h82, //''
led_GYA7 = 'hf8, //''
led_GYA8 = 'h80, //''
led_GYA9 = 'h90; //'' /****************分频1S*****************/
always@(posedge clk or negedge rst_n) begin
if(!rst_n) begin //同步复位
clk2 <= 'b0;
count2 <= 'b0;
end
else if(count2 == 'd249999)begin //高低电平转换 5*10^7*20ns=10^9ns=1s
clk2 <= ~clk2;
count2 <= 'b0;
end
else begin
count2 <= count2 + 'b1; //计数
end
end /******************计数*********************/
always@(posedge clk2 or negedge rst_n) begin//个位处理
if(!rst_n) begin
ge <= 'b0000;
shi <= 'b0000;
bai <= 'b0000;
qian <= 'b0000;
wan <= 'b0000;
swan <= 'b0000;
end
else if(ge == 'b1010) begin //个位等于10
ge = 'b0000;
shi = shi + 'b1;
if(shi == 'b1010) begin//十位等于10
shi = 'b0000;
bai = bai + 'b1;
if(bai == 'b1010) begin//百位等于10
bai = 'b0000;
qian = qian + 'b1;
if(qian == 'b1010) begin//千位等于10
qian = 'b0000;
wan = wan + 'b1;
if(wan == 'b1010) begin//万位等于10
wan = 'b0000;
swan = swan + 'b1;
if(swan == 'b1010) begin//十万位等于10
ge <= 'b0000;
shi <= 'b0000;
bai <= 'b0000;
qian <= 'b0000;
wan <= 'b0000;
swan <= 'b0000;
end
end
end
end
end
end
else begin
ge <= ge + 'b1;
end end /***************编码*******************/
always@(posedge clk2 or negedge rst_n) begin
case(ge)
'b0000: ge_reg <= led_GYA0;
'b0001: ge_reg <= led_GYA1;
'b0010: ge_reg <= led_GYA2;
'b0011: ge_reg <= led_GYA3;
'b0100: ge_reg <= led_GYA4;
'b0101: ge_reg <= led_GYA5;
'b0110: ge_reg <= led_GYA6;
'b0111: ge_reg <= led_GYA7;
'b1000: ge_reg <= led_GYA8;
'b1001: ge_reg <= led_GYA9;
default: ge_reg <= led_GYA0;
endcase case(shi)
'b0000: shi_reg <= led_GYA0;
'b0001: shi_reg <= led_GYA1;
'b0010: shi_reg <= led_GYA2;
'b0011: shi_reg <= led_GYA3;
'b0100: shi_reg <= led_GYA4;
'b0101: shi_reg <= led_GYA5;
'b0110: shi_reg <= led_GYA6;
'b0111: shi_reg <= led_GYA7;
'b1000: shi_reg <= led_GYA8;
'b1001: shi_reg <= led_GYA9;
default: shi_reg <= led_GYA0;
endcase case(bai)
'b0000: bai_reg <= led_GYA0;
'b0001: bai_reg <= led_GYA1;
'b0010: bai_reg <= led_GYA2;
'b0011: bai_reg <= led_GYA3;
'b0100: bai_reg <= led_GYA4;
'b0101: bai_reg <= led_GYA5;
'b0110: bai_reg <= led_GYA6;
'b0111: bai_reg <= led_GYA7;
'b1000: bai_reg <= led_GYA8;
'b1001: bai_reg <= led_GYA9;
default: bai_reg <= led_GYA0;
endcase case(qian)
'b0000: qian_reg <= led_GYA0;
'b0001: qian_reg <= led_GYA1;
'b0010: qian_reg <= led_GYA2;
'b0011: qian_reg <= led_GYA3;
'b0100: qian_reg <= led_GYA4;
'b0101: qian_reg <= led_GYA5;
'b0110: qian_reg <= led_GYA6;
'b0111: qian_reg <= led_GYA7;
'b1000: qian_reg <= led_GYA8;
'b1001: qian_reg <= led_GYA9;
default: qian_reg <= led_GYA0;
endcase case(wan)
'b0000: wan_reg <= led_GYA0;
'b0001: wan_reg <= led_GYA1;
'b0010: wan_reg <= led_GYA2;
'b0011: wan_reg <= led_GYA3;
'b0100: wan_reg <= led_GYA4;
'b0101: wan_reg <= led_GYA5;
'b0110: wan_reg <= led_GYA6;
'b0111: wan_reg <= led_GYA7;
'b1000: wan_reg <= led_GYA8;
'b1001: wan_reg <= led_GYA9;
default: wan_reg <= led_GYA0;
endcase case(swan)
'b0000: swan_reg <= led_GYA0;
'b0001: swan_reg <= led_GYA1;
'b0010: swan_reg <= led_GYA2;
'b0011: swan_reg <= led_GYA3;
'b0100: swan_reg <= led_GYA4;
'b0101: swan_reg <= led_GYA5;
'b0110: swan_reg <= led_GYA6;
'b0111: swan_reg <= led_GYA7;
'b1000: swan_reg <= led_GYA8;
'b1001: swan_reg <= led_GYA9;
default: swan_reg <= led_GYA0;
endcase
end /****************分频1MS*****************/
always@(posedge clk or negedge rst_n) begin
if(!rst_n) begin //同步复位
clk1 <= 'b0;
count <= 'b0;
end
else if(count == 'd24999)begin //高低电平转换 25000*20=500000ns=0.5ms
clk1 <= ~clk1;
count <= 'b0;
end
else begin
count <= count + 'b1; //计数
end
end /************数码管位数循环****************/
always@(posedge clk1 or negedge rst_n) begin if(!rst_n) begin //同步复位
i <= 'b0000;
end
else if(i == 'b0101) begin
i <= 'b0000;
end
else begin
i <= i + 'b1;
end
end /************数码管显示****************/
always@(posedge clk1 or negedge rst_n) begin
case(i)
'b0000: begin sm_seg <= ge_reg; sm_bit <= 6'b11_1110; end
'b0001: begin sm_seg <= shi_reg; sm_bit <= 6'b11_1101; end
'b0010: begin sm_seg <= bai_reg; sm_bit <= 6'b11_1011; end
'b0011: begin sm_seg <= qian_reg; sm_bit <= 6'b11_0111; end
'b0100: begin sm_seg <= wan_reg; sm_bit <= 6'b10_1111; end
'b0101: begin sm_seg <= swan_reg; sm_bit <= 6'b01_1111; end
default: begin sm_seg <= led_GYA0; sm_bit <= 'b11_1111; end
endcase
end endmodule

FPGA六位共阳极数码管动态显示的更多相关文章

  1. FPGA自计数六位共阳极数码管动态显示2(调用task的方法)

    `timescale 1ns/1ps module adc_dis( clk , rst_n , sm_seg , sm_bit ); input clk;//50HZ input rst_n; :] ...

  2. 共阳极RGB LED二极管

    1)RGB LED二极管有四个引脚,它把3个普通led被封装在其内部,这三个led颜色分别为红.绿.蓝三种颜色,通过控制各个LED的亮度,你可以混合出几乎任何你想要的颜色,如下图: 2)RGB LED ...

  3. 数码管显示“0~F”的共阳共阴数码管编码表

    嵌入式设备中数码管显示“0~F”的方式是:定义了一个数组,里面含有16个元素,分别代表0~F,这样可以方便以后的调用.共阳极数码管编码表:unsigned char table[]={0xc0,0xf ...

  4. [51单片机] 以从0开始做4位8段共阴数码管3461AS驱动谈细节决定高质量DIY

    目录 1)问题产生 2)失败尝试 3)最终方案 4)使用方法 5)知识共享 1)问题产生 在上一篇“以PWM控制直流电机为例建一个简单的51工程框架”中已向大家介绍了一个封装好的8位8段数码管的驱动( ...

  5. 80C51 数码管动态显示0~7

    所使用的开发板 普中科技HC6800-ES V2.0 PC:win7 64位 编译软件: keil uversion2 烧写工具: 普中科技开发的PZ-ISP V1.82 烧写方式:热烧写 #incl ...

  6. 数码管动态显示Verilog实现(参考小梅哥教程)(视觉暂留)

    一个数码管有九个引脚,控制八段二极管的亮灭,用以显示需要的数字. 当有N个数码管时,一个一个控制的话需要N x 9 个引脚,消耗资源较多. 因此可以利用动态显示的方案通过人眼的视觉暂留特性达到静态显示 ...

  7. 数码管动态显示——74HC04

    1.电路设计: p0实现段选,p2实现位选,74hc04是反相器,有反向和放大的双重作用. 2.程序设计: #include<reg52.h> code unsigned char sev ...

  8. AC620教程 第十五节 8位7段数码管驱动设计与验证

    本章导读 电子系统中常用的显示设备有数码管.LCD液晶以及VGA显示器等.其中数码管又可分为段式显示(7段.米字型等)以及点阵显示(8*8.16*16等),LCD液晶的应用可以分为字符式液晶(1602 ...

  9. 【雕爷学编程】Arduino动手做(47)---七段LED数码管模块

    37款传感器与模块的提法,在网络上广泛流传,其实Arduino能够兼容的传感器模块肯定是不止37种的.鉴于本人手头积累了一些传感器和模块,依照实践(动手试试)出真知的理念,以学习和交流为目的,这里准备 ...

随机推荐

  1. Redis入门使用 -- 个人总结

    目录 什么是Redis? Redis 与其他 key - value 数据库的对比 Redis 能干什么 Redis的安装配置 Redis启动和连接 上面开启的是非守护线程下启动(独占模式),下面我们 ...

  2. jarvisoj MISC 取证2

    打开之后一个文件和一个镜像 TrueCrypt....记住他了,再看一眼那个文件,好的,TrueCrypt加密..找密码 把Truecrypt.exe直接dump下来,用efdd解密就行了

  3. 设计模式-原型模式(Prototype)【重点:浅复制与深复制】

    讲故事 最近重温了一下星爷的<唐伯虎点秋香>,依然让我捧腹不已,幻想着要是我也能有一名秋香如此的侍女,夫复何求呀,带着这个美好的幻想沉沉睡去... 突然想到,我是一名程序猿呀,想要什么对象 ...

  4. RSA非对称可逆加密

    /// <summary> /// RSA ECC /// 可逆非对称加密 /// 非对称加密算法的优点是密钥管理很方便,缺点是速度慢. /// </summary> usin ...

  5. 面试官:你对Redis缓存了解吗?面对这11道面试题你是否有很多问号?

    前言 关于Redis的知识,总结了一个脑图分享给大家 1.在项目中缓存是如何使用的?为什么要用缓存?缓存使用不当会造成什么后果? 面试官心理分析 这个问题,互联网公司必问,要是一个人连缓存都不太清楚, ...

  6. Selenium常见报错问题(2)- 解决和分析StaleElementReferenceException异常

    如果你在跑selenium脚本时,需要某些异常不知道怎么解决时,可以看看这一系列的文章,看看有没有你需要的答案 https://www.cnblogs.com/poloyy/category/1749 ...

  7. iOS逆向之一 工具的安装和使用

    iOS逆向之一-工具的安装和使用 最近在学习iOS安全方面的技术,有些东西就记录下来了,所有有了这篇文章.顺便也上传了DEMO,可以再这里找到这些DEMO的源码:dhar/iOSReProject 越 ...

  8. Burnside&Polya总结

    这里就算是一个小总结吧- 附参考的网址: http://blog.sina.com.cn/s/blog_6a46cc3f0100s2qf.html http://www.cnblogs.com/han ...

  9. 关于IE8上传文件的一些问题

    问题1: IE8下上传完文件后,对后台返回的JSON格式的数据,浏览器提示了下载该文件. 原因是因为IE8还不支持'application/json"类型的响应. 解决方法将后台返回的JSO ...

  10. 使用JXL.jar实现JAVA对EXCEL的读写操作

    简介: jxl.jar是通过java操作excel表格的工具类库 jxl操作excel包括对象Workbook(工作簿),Sheet(工作表) ,Cell(单元格). 一个excel就对应一个Work ...