CPLD与51单片机总线接口程序-电子工程世界

CPLD与51单片机总线接口程序

`timescale 1ns/1ns
module IO_KZ(Data,P27,WR,RD,ALE,CLR,OUTKEY,OUT30,CS,CS1,LEDCS,OC);
inout [7:0]Data;
input WR;
input P27;
input RD;
input ALE;
input CLR;
input OC;
input [4:0]OUTKEY;
output [59:0]OUT30;
output [1:0]CS;
output CS1;
output [14:0]LEDCS;
reg   [14:0]LEDCS;
reg   [59:0]OUT30;
reg   [1:0]CS;
wire   CS1;
//wire [7:0]Data;
reg   [8:0]IOADD;
reg   [15:0]DataBF;
reg   wr_en;
reg   [7:0]OUTKEYBF;
//wire   [7:0]OUTKEYBF1;
assign CS1=((IOADD==338)&&(OC==0))?1'b0:1'b1;//8052
assign Data=((IOADD==277)&&(OC==0)&&(RD==0))?OUTKEYBF:8'bzzzzzzz;//8015
always @(OUTKEY)
      begin
      if(OUTKEY[0]==0)
      OUTKEYBF<=1;
      else if(OUTKEY[1]==0)
      OUTKEYBF<=2;
      else if(OUTKEY[2]==0)
      OUTKEYBF<=3;
      else if(OUTKEY[3]==0)
      OUTKEYBF<=4;
      else if(OUTKEY[4]==0)
      OUTKEYBF<=5;
      else
      OUTKEYBF<=0;
      end
always @(negedge ALE)
      begin
      IOADD<={P27,Data};//ALE下降延读地址
      end
always @(IOADD or WR) //WR下降延写数据
      begin
      if((IOADD>256)&&(IOADD<337)&&(IOADD!=277))wr_en<=WR;
      else
      begin
      wr_en<=1;
      end
      end
always @(negedge wr_en or posedge OC or posedge WR) //WR下降延写数据
    begin
    if(OC)
      begin
                CS=2'b00;
LEDCS=15'b00000_0000_0000_00;
      end
    else if(WR)
                begin
                CS=2'b00;
      end
    else
                begin
                case(IOADD)
                261: begin CS=2'b01; end//8005
                262: begin CS=2'b10;LEDCS=15'b00000_0000_0000_01;end//8006
                263: begin CS=2'b10;LEDCS=15'b00000_0000_0000_10;end//8007
            264: begin CS=2'b10;LEDCS=15'b00000_0000_0001_00;end//8008
            265: begin CS=2'b10;LEDCS=15'b00000_0000_0010_00;end//8009
            266: begin CS=2'b10;LEDCS=15'b00000_0000_0100_00;end//800A
            267: begin CS=2'b10;LEDCS=15'b00000_0000_1000_00;end//800B
            268: begin CS=2'b10;LEDCS=15'b00000_0001_0000_00;end//800C
            269: begin CS=2'b10;LEDCS=15'b00000_0010_0000_00;end//800D
            270: begin CS=2'b10;LEDCS=15'b00000_0100_0000_00;end//800E
            271: begin CS=2'b10;LEDCS=15'b00000_1000_0000_00;end//800F
            272: begin CS=2'b10;LEDCS=15'b00001_0000_0000_00;end//8010
            273: begin CS=2'b10;LEDCS=15'b00010_0000_0000_00;end//8011
            274: begin CS=2'b10;LEDCS=15'b00100_0000_0000_00;end//8012
            275: begin CS=2'b10;LEDCS=15'b01000_0000_0000_00;end//8013
                276: begin CS=2'b10;LEDCS=15'b10000_0000_0000_00;end//8014
                endcase
              end

    end


always @(negedge wr_en or posedge CLR or posedge OC ) //WR下降延写数据
    begin
        if(OC)
      begin
DataBF=0;
OUT30[59:0]=60'hfffffffffffffff;
      end
        else if(CLR)
      begin

DataBF=0;
OUT30[59:0]=60'hfffffffffffffff;
      end
else
      begin
        if(Data[0])
    DataBF[1:0]=2'b10;
else
    DataBF[1:0]=2'b01;
            if(Data[1])
                      DataBF[3:2]=2'b10;
else
    DataBF[3:2]=2'b01;
            if(Data[2])
                      DataBF[5:4]=2'b10;
else
    DataBF[5:4]=2'b01;
            if(Data[3])
                      DataBF[7:6]=2'b10;
else
    DataBF[7:6]=2'b01;
        if(Data[4])
                      DataBF[9:8]=2'b10;
else
    DataBF[9:8]=2'b01;
        if(Data[5])
                      DataBF[11:10]=2'b10;
else
    DataBF[11:10]=2'b01;
        if(Data[6])
                      DataBF[13:12]=2'b10;
else
    DataBF[13:12]=2'b01;
        if(Data[7])
                      DataBF[15:14]=2'b10;
else
    DataBF[15:14]=2'b01;

                case(IOADD)
            257: begin OUT30[15:0] =DataBF;end//8001
                258: begin OUT30[31:16]=DataBF;end//8002
                259: begin OUT30[47:32]=DataBF;end//8003
            260: begin OUT30[59:48]=DataBF;end//8004
                endcase
                case(IOADD)
                278: begin OUT30[1:0]=2'b10;end//8016
                279: begin OUT30[1:0]=2'b01;end//8017
                280: begin OUT30[3:2]=2'b10;end//8018
                281: begin OUT30[3:2]=2'b01;end//8019
                282: begin OUT30[5:4]=2'b10;end//801A
                283: begin OUT30[5:4]=2'b01;end//801B
                284: begin OUT30[7:6]=2'b10;end//801C
                285: begin OUT30[7:6]=2'b01;end//801D
                286: begin OUT30[9:8]=2'b10;end//801E
                287: begin OUT30[9:8]=2'b01;end//802F
                endcase
                case(IOADD)
                288: begin OUT30[11:10]=2'b10;end//8020
                289: begin OUT30[11:10]=2'b01;end//8021
                290: begin OUT30[13:12]=2'b10;end//8022
                291: begin OUT30[13:12]=2'b01;end//8023
                292: begin OUT30[15:14]=2'b10;end//8024
                293: begin OUT30[15:14]=2'b01;end//8025
                294: begin OUT30[17:16]=2'b10;end//8026
                295: begin OUT30[17:16]=2'b01;end//8027
                296: begin OUT30[19:18]=2'b10;end//8028
                297: begin OUT30[19:18]=2'b01;end//8029
                  endcase
                  case(IOADD)
                298: begin OUT30[21:20]=2'b10;end//802A
                299: begin OUT30[21:20]=2'b01;end//802B
                300: begin OUT30[23:22]=2'b10;end//802C
                301: begin OUT30[23:22]=2'b01;end//802D
                302: begin OUT30[25:24]=2'b10;end//802E
                303: begin OUT30[25:24]=2'b01;end//802F
                304: begin OUT30[27:26]=2'b10;end//8030
                305: begin OUT30[27:26]=2'b01;end//8031
                306: begin OUT30[29:28]=2'b10;end//8032
                307: begin OUT30[29:28]=2'b01;end//8033
                  endcase
                  case(IOADD)
                308: begin OUT30[31:30]=2'b10;end//8034
                309: begin OUT30[31:30]=2'b01;end//8035
                310: begin OUT30[33:32]=2'b10;end//8036
                311: begin OUT30[33:32]=2'b01;end//8037
                312: begin OUT30[35:34]=2'b10;end//8038
                313: begin OUT30[35:34]=2'b01;end//8039
                314: begin OUT30[37:36]=2'b10;end//803A
                315: begin OUT30[37:36]=2'b01;end//803B
                316: begin OUT30[39:38]=2'b10;end//803C
                317: begin OUT30[39:38]=2'b01;end//803D
                  endcase
                  case(IOADD)
                318: begin OUT30[41:40]=2'b10;end//803E
                319: begin OUT30[41:40]=2'b01;end//803F
                320: begin OUT30[43:42]=2'b10;end//8040
                321: begin OUT30[43:42]=2'b01;end//8041
                322: begin OUT30[45:44]=2'b10;end//8042
                323: begin OUT30[45:44]=2'b01;end//8043
                324: begin OUT30[47:46]=2'b10;end//8044
                325: begin OUT30[47:46]=2'b01;end//8045
                326: begin OUT30[49:48]=2'b10;end//8046
                327: begin OUT30[49:48]=2'b01;end//8047
                  endcase
                  case(IOADD)
                328: begin OUT30[51:50]=2'b10;end//8048
                329: begin OUT30[51:50]=2'b01;end//8049
                330: begin OUT30[53:52]=2'b10;end//804A
                331: begin OUT30[53:52]=2'b01;end//804B
                332: begin OUT30[55:54]=2'b10;end//804C
                333: begin OUT30[55:54]=2'b01;end//804D
                334: begin OUT30[57:56]=2'b10;end//804E
                335: begin OUT30[57:56]=2'b01;end//804F
                336: begin OUT30[59:58]=2'b10;end//8050
                337: begin OUT30[59:58]=2'b01;end//8051
                endcase
                end

end
endmodule

[1] [2]

关键字：CPLD 51单片机总线接口引用地址：CPLD与51单片机总线接口程序

上一篇：基于地磁传感器V2XE在GPS系统设计中的应用
下一篇：MCS51单片机的检索查找程序

推荐阅读最新更新时间：2024-11-12 06:55

51单片机时钟计时器学习板基本原理

　　1.功能　　　　时钟计时器学习板使用8位LED数码管显示时、分、秒，以24小时制计时方式，其核心芯片为DSl302时钟芯片，DSl302可以记录下时间、日期、星期等数据。在板子上装有后备电池，所以即使学习板断开外接电源后，其时间与日期数据也不会丢失。板载的按键可供用户开发使用，我们通过程序设计可以实现通过按键来调整日期、时间等各项参数值，我们也可以做出一个万年历和电子钟。　　　　2.基本原理　　　　DS1302是DAL.LAS公司推出的涓流充电时钟芯片，内含一个实时时钟/日历和31字节静态RAM，可以通过串行接口与单片机进行通信。实时时钟/日历电路提供秒、分、时、日、星期、月、年的信息。每个月的天数和闰年的天数可自

[单片机]

51单片机串口通信原理讲解

今天研究了一下51单片机的串口通信，使用的单片机是普中科技开发板，但实际上所运用到的硬件和其他品牌单片机都相同，没有区别，总结一下，自己的理解和看法。通信原理通信原理大致分为串行和并行两种方法，各有优缺点，也不再这里赘述了，使用到的是串行通信的方法，简单介绍一下串行通信的原理，上图两个设备，一根互传线，每次传一组数据，总长度不一定8位，由51单片机内部设定来决定。设备间通信有许多接口方式，我用的是51上的串行接口，挂图： SBUF:是指串行口中的两个缓冲寄存器，一个是发送寄存器，一个是接收寄存器，在物理结构上是完全独立的，但地址是重叠的。它们都是字节寻址的寄存器，字节地址均为99H, TXD:Transmit(tx

[单片机]

51单片机的延时计算

前言我使用51,STC这一类的单片机做控制好几年，一直是使用现成的程序，在其上修修改改，以达到需求动作目的即可。从来都是不求甚解。想法既是如此，会用即可，了解那么多做什么。此次又在做一项目，里面用到I2C通讯。本来是直接复制粘贴了事，却没想对里面的一个小小的延时函数起了兴趣，由于本人是基础功底只有5战斗力的渣渣，写写画画了一天才搞了个大体明白。以前总是在看其他博主的文章，默默潜水。然而此次，突然就忍不住想写篇文章发表一下费尽心思的微不足道的心得体会。正文 void Delay10us() //@12.000MHz { unsigned char i; _nop_(); _nop_(); i = 27

[单片机]

51单片机开发步骤详解

想要从事高端嵌入式开发，首先要会用ARM与Linux，想要会用ARM与Linux，首先要会单片机，想要零基础学会单片机，就要想从51单片机开始；想要学好单片机，基础：1、C语言了解；2、微机原理与接口技术了解；想要提升开发能力，就必须要不断地实践，建议小白可以在网上（某宝）买一块51单片机开发板，自己参照课程研究研究下面我把我的经历给大家说一下，希望有志于单片机开发的童鞋能做一个参考第一步： C语言基础，建议买一本谭浩强的《C语言程序设计》，如果不想买，可以在网上找一个PDF版；微机原理与接口技术基础，建议去中国大学MOOC上看一下相关课程，也可以看C语言课程；记住：这些课程要不求甚解，因为这些都是非常抽象的概念，如果非要

[单片机]

89C51单片机的工作方式与工作原理

89C51单片机共有复位、程序执行、低功耗以及编程和校验等四种工作方式。 1．复位方式 (l)复位操作复位是单片机的初始化操作，其主要功能是把PC初始化为OOOOH，使单片机从0000H单元开始执行程序。除了进入系统的正常初始化之外，当由于程序运行出错或操作错误使系统处于死锁状态时，为摆脱困境，也需按复位键以重新启动。除PC之外，复位操作还对其它一些特殊功能寄存器有影响，它们的复位状态如上表所示。复位操作还对单片机的个别引脚信号有影响。例如在复位期间，ALE和信号变为无效状态，即ALE=LPSEN=1。(2)复位信号及其产生 ①复位信号 RST引脚是复位信号的输入端，复位信号是高电平有效，其有效时间应持续24个振荡脉冲周

[单片机]

51单片机还适合作为初学者入门的单片机吗？

对于很多初学者来说考虑要不要从51单片机入门是个挺头疼的问题。毕竟现在许多公司已经不用51单片机做产品了。但是51单片机流行了这么久，它肯定是一款很经典的产品。我以前也是从51开始学的。我个人的建议是从51单片机作为入门是一个非常不错的选择。大多数的从业者都是以51单片机作为起点的。下面就具体说说我推荐51作为入门的具体原因。容易入门我们作为初学者脑海里可能没有单片机的概念，如果我们入门以STM32或者STM8S这类单片机来入门的话，作为初学者我们会感到迷茫无从下手。STM32这类的单片机内容会比较多，一开始就要了解单片机的方向寄存器还要了解单片机的数据寄存器，甚至还有库函数，太多的知识涌入进来，一时间让初学

[单片机]

用51单片机控制LCD12864显示屏源程序

12864液晶在出厂时其对比度已经调好，所以用户在使用的时候第三管脚可不用接任何东西，本实验板上为了兼容多家12864液晶所以加了液晶对比度调节电位器，若用户使用我们配套的12864液晶可不用管它，液晶的第三管脚悬空就可以。有些液晶功耗比较大，用户在使用的时候可将液晶的第19、20引脚的背光不接，这样字体会很清楚。单片机源程序如下: /**********************BST-V51实验开发板例程************************ * 平台：BST-V51 + Keil U3 + STC89C52 * 名称： * 晶振:11.0592MHZ * 说明：免费开源，不提供源代码分析. ********

[单片机]

51单片机-继电器

继电器控制方式： * 单片机I/O口控制端 * 继电器控制端 * 光耦控制端 * 在原理图中TX-3那部分，用单片机控制继电器把P35与JDQ连接在一起，如果B极是低电平，那么VCC的电流流过B，电流流过Ｃ极，通过继电器的线圈，指针从常闭端打到常开端。对应上边继电器左边绿色的那三个中间的是中间端，一个常开端，一个常闭端。平时中间端和常闭端是导通的，一控制继电器吸合，中间端和常开端导通。 NPN与PNP的区别 NPN和PNP主要就是电流方向和电压正负不同，说得专业一点，就是极性问题。 NPN 是用 B E 的电流（IB）控制 C E 的电流（IC），E极电位最低，且正常放大

[单片机]

热门资源推荐
热门放大器推荐

小广播

CPLD与51单片机总线接口程序

设计资源 培训 开发板 精华推荐

设计资源培训开发板精华推荐