《电子技术应用》
您所在的位置:首页 > 嵌入式技术 > 解决方案 > LCD1602液晶显示频率计(源程序)-ME300B型 51

LCD1602液晶显示频率计(源程序)-ME300B型 51

2008-12-28
关键词: 液晶显示 频率计

使用说明:

频率计:
LCD1602显示
在不增加外部计数硬件的情况下,本试验软件可测最高频率达到460KHz

工作原理:

1S 钟内对输入脉冲所计数的次数则为频率值。
16位二进制加法计数器的最大计数值为 65535。

设置定时器 0 工作在定时方式1,定时1S。
设置定时器 1 工作在计数方式1,对输入脉冲进行计数,溢出产生中断。
将定时器 1中断定义为优先。在中断处理程序里对中断次数进行计数。1S到后,将中断次数和计数器里的计数值取出进行综合数据处理,处理后的数据送LCD1602显示。

信号来源:
1、软件里对 P1.4定时取反,形成输出脉冲,接到 P3.5 可自测。
2、可用CD4040 芯片对 ALE 信号进行分频。
ALE 频率=11059200Hz ÷ 6 = 1843200 Hz
接 CD4040 芯片 Q2 以后的输出段均可显示真实的频率值。
1843200 Hz ÷ 4 = 460800 Hz
    
显示结果:
P1.4 → P3.5 显示:
     
  000010   (Hz) 

CD4040-Q2 → P3.5 显示:
      
  460806   (Hz)

如果有条件的话,可使用专用设备(信号发生器和频率计)进行校正。

;******************************************************************
;*                                                                *
;* ME300B单片机开发系统演示程序-1602LCD显示数字频率计             *
;*                                                                *
;* 邮箱: gguoqing@willar.com                                     *
;* 网站: http://www.willar.com ;                                  *
;* 作者: gguoqing                                                *
;* 时间: 2006/06/03                                              *
;*                                                                *
;*【版权】COPYRIGHT(C)伟纳电子 www.willar.com ALL RIGHTS RESERVED *
;*【声明】此程序仅用于学习与参考,引用请注明版权和作者信息!      *
;*                                                                *
;******************************************************************


;------------------------------------------------------------
;频率计的程序
;包含:外部中断设置,中断服务程序,定时程序,定时服务程序
;以及数据处理,显示,包括 三位十进制数转化为四位BCD码,
;
;------------------------------------------------------------
        BEEP    BIT  P3.7
        LCD_RS  BIT  P2.0
        LCD_RW  BIT  P2.1
        LCD_EN  BIT  P2.2
        LCD_X   EQU  3FH        ;LCD 地址变量

        TIMER_H   EQU   30H    ;定时器高位字节单元
        TIMER_L   EQU   31H    ;定时器低位字节单元
        TIMCOUNT  EQU   32H    ;时间中断数


        INT_G     EQU   35H    ;中断计数缓冲单元高地址
      INT_H     EQU   34H    ;中断计数缓冲单元中地址
      INT_L     EQU   33H    ;中断计数缓冲单元低地址


        T_S       EQU   36H    ;数据显示低位
        T_M       EQU   37H    ;数据显示中位
        T_H       EQU   38H    ;数据显示高位
        T_G       EQU   39H    ;数据显示最高位

;----------------------------------------------------------
              ORG 0000H
              JMP MAIN            ;主程序开始
              ORG 000BH
              JMP TIMER_INT        ;定时器T0中断服务程序
              ORG  001BH           ;定时器T1中断服务程序
              JMP  TIMER1
              ORG  0030H
;----------------------------------------------------------
   MAIN:
            MOV  SP,#60H          ;设置SP指针
            LCALL PRO_SET         ;初始化
            CALL  SET_LCD
            LCALL TIM_T0
;-----------------------------------------------------------
;LCD1602是慢速显示器件,故100MS显示一次。
;-----------------------------------------------------------
MAIN1:
            MOV  R5,40
MAIN2:
            ACALL  DELAY1    ;3ms
            DJNZ  R5,MAIN2
            ACALL  SBIN_SBCD
            CALL  CONV
            JMP MAIN1
;------------------------------------------------------------
;T1计数器中断服务子程序
;计T1计数器溢出次数
;------------------------------------------------------------
TIMER1:
            INC  2AH
            RETI
;------------------------------------------------------------
;初始化程序
;------------------------------------------------------------
PRO_SET:  MOV A,#00H
          MOV B,#00H
          MOV  2AH,A
          MOV P0,#0FFH
          MOV P1,#0FFH
          MOV P2,#0FFH
          MOV INT_H,#00H
          MOV INT_L,#00H
          MOV  INT_G,#00H
          MOV  T_S,#00H
          MOV  T_H,#00H
          MOV  T_M,#00H
          MOV  T_G,#00H
          MOV TIMCOUNT,#00H
          MOV TIMER_H,#04CH      ;定时 50 MS
          MOV TIMER_L,#10H       ;
          CLR BEEP
          SETB  P3.5            ;P3.5端口置输入状态
          RET                   ;T1(TIMER1的外部输入脚)
;-----------------------------------------------------
;LCD 初始化设置
;-----------------------------------------------------
SET_LCD:
          CLR  LCD_EN
          CALL  INIT_LCD     ;初始化 LCD
          CALL  DELAY1
          MOV  DPTR,#INFO1   ;指针指到显示信息1
          MOV  A,#1          ;显示在第一行
          CALL  LCD_SHOW
          MOV  DPTR,#INFO2   ;指针指到显示信息2
          MOV  A,#2          ;显示在第二行
          CALL  LCD_SHOW
          RET
;-----------------------------------------------------
INFO1:  DB  "    CYMOMETER   ",0  ;LCD 第一行显示信息
INFO2:  DB  "FREQ:        HZ ",0  ;LCD 第二行显示信息
;-----------------------------------------------------
;LCD 接口初始化
;8位I/O控制
;-----------------------------------------------------
INIT_LCD:
          MOV  A,#38H     ;双列显示,字形5*7点阵
          CALL  WCOM
          CALL  DELAY1
          MOV  A,#38H     ;双列显示,字形5*7点阵
          CALL  WCOM
          CALL  DELAY1
          MOV  A,#38H     ;双列显示,字形5*7点阵
          CALL  WCOM
          CALL  DELAY1
          MOV  A,#0CH     ;开显示,关光标,
          CALL  WCOM
          CALL  DELAY1
          MOV  A,#01H     ;清除 LCD 显示屏
          CALL  WCOM
          CALL  DELAY1
          RET
;----------------------------------------------------
LCD_SHOW:       ;在LCD的第一行或第二行显示信息字符

          CJNE  A,#1,LINE2  ;判断是否为第一行
  LINE1:  MOV  A,#80H       ;设置 LCD 的第一行地址
          CALL  WCOM        ;写入命令
          CALL  CLR_LINE    ;清除该行字符数据
          MOV  A,#80H       ;设置 LCD 的第一行地址
          CALL  WCOM        ;写入命令
          JMP  FILL
  LINE2:  MOV  A,#0C0H      ;设置 LCD 的第二行地址
          CALL  WCOM        ;写入命令
          CALL  CLR_LINE    ;清除该行字符数据
          MOV  A,#0C0H      ;设置 LCD 的第二行地址
          CALL  WCOM
  FILL:   CLR  A            ;填入字符
          MOVC  A,@A+DPTR   ;由消息区取出字符
          CJNE  A,#0,LC1    ;判断是否为结束码
          RET
  LC1:    CALL  WDATA       ;写入数据
          INC  DPTR         ;指针加1
          JMP  FILL         ;继续填入字符
          RET
;---------------------------------------------------
CLR_LINE:                  ;清除该行 LCD 的字符
          MOV  R0,#24
   CL1:   MOV  A,#' '
          CALL  WDATA
          DJNZ  R0,CL1
          RET
;-----------------------------------------------------
; 写指令、数据使能子程序
;-----------------------------------------------------
ENABLE:                    ;写指令使能
          CLR LCD_RS           ;RS=L,LCD_RW=L,D0-D7=指令码,E=高脉冲
          CLR LCD_RW
          SETB LCD_EN
          CALL  DELAY0
          CLR LCD_EN
          RET
ENABLE1:                  ;写数据使能
          SETB  LCD_RS        ;RS=H,RW=L,D0-D7=数据,E=高脉冲
          CLR   LCD_RW
          SETB  LCD_EN
          CALL  DELAY0
          CLR   LCD_EN
          RET

DELAY0:   MOV  R7,#250      ;延时500微秒
          DJNZ  R7,$
          RET
;----------------------------------------------------
;写入命令子程序
;----------------------------------------------------
WCOM:                     ;以8位控制方式将命令写至LCD
          MOV  P0,A       ;写入命令
          CALL  ENABLE
          RET
;----------------------------------------------------
;写入数据子程序
;----------------------------------------------------
WDATA:                    ;以8位控制方式将数据写至LCD
          MOV  P0,A       ;写入数据
          CALL  ENABLE1
          RET
;---------------------------------------------------
;在 LCD 第二行显示字符
;A=ASC DATA, B=LINE X POS
;---------------------------------------------------
LCDP2:                    ;在LCD的第二行显示字符
          PUSH  ACC        ;
          MOV  A,B         ;设置显示地址
          ADD  A,#0C0H     ;设置LCD的第二行地址
          CALL  WCOM       ;写入命令
          POP  ACC         ;由堆栈取出A
          CALL  WDATA      ;写入数据
          RET
;-------------------------------------------------------
;ASCII 转换并在第二行显示数字子程序
;-------------------------------------------------------
CONV:    ; MOV  A,T_G
          MOV  LCD_X,#6          ;设置位置
         ; CALL  SHOW_DIG2
          MOV  A,T_H
          ;INC  LCD_X             ;加载小时数据
          CALL  SHOW_DIG2    ;显示数据
          MOV  A,T_M         ;加载分钟数据
          INC  LCD_X             ;设置位置
          CALL  SHOW_DIG2    ;显示数据
          MOV  A,T_S        ;加载秒数数据
          INC  LCD_X             ;设置位置
          CALL  SHOW_DIG2    ;显示数据
          RET
;----------------------------------------------------
SHOW_DIG2:
          MOV  B,#16
          DIV  AB
          ADD  A,#30H
          PUSH  B
          MOV  B,LCD_X
          CALL  LCDP2
          POP  B
          MOV  A,B
          ADD  A,#30H
          INC  LCD_X
          MOV  B,LCD_X
          CALL  LCDP2
          RET
;-----------------------------------------------------
DELAY1:                    ;延时3MS
         MOV  R6,#15
  D2:    MOV  R7,#100
         DJNZ  R7,$
         DJNZ  R6,D2
         RET
; -----------------  定时器设置   ------------------------
;设置定时器0工作在定时方式1,定时器1工作在计数方式1
;---------------------------------------------------------
TIM_T0:   MOV TMOD,#0D1H
          MOV TH0,TIMER_H        ;设置定时初值高位
          MOV TL0,TIMER_L        ;设置定时初值低位
          MOV  TH1,#00H          ;清T1计数器
          MOV  TL1,#00H
          MOV  IE,#8AH           ;开中断总允许,允许T0溢出中断
          SETB  PT1
          SETB  TR1
          SETB  TR0              ;定时器开始工作
          RET
;--------------------------------------------------------
;定时器0中断服务程序
;--------------------------------------------------------
TIMER_INT:
         CLR TR0             ;关闭定时器
         MOV TL0,TIMER_L     ;重新赋初值
         MOV TH0,TIMER_H                 ;
         INC TIMCOUNT        ;定时1S,时间单位
         MOV A,TIMCOUNT      ;查看数量值
         CPL  P1.4           ;产生自测信号
         CJNE A,#20,T_END    ;如果没有到1S返回

         CLR  TR1            ;关闭计数器T1
         MOV TIMCOUNT,#00H   ;到1S则清零
         MOV INT_L,TL1       ;取出计数值低位
         MOV INT_H,TH1       ;取出计数值高位
         MOV INT_G,2AH       ;取出溢出计数值位
         MOV  TH1,#00H
         MOV  TL1,#00H
         MOV  2AH,#00H
         SETB  TR1
T_END:   SETB TR0            ;重新开始定时操作
         RETI
;---------------------------------------------------------------
;三字节二进制整数转换成四字节BCD码子程序
;二进制数从低位到高位分别存放在INT_L、INT_H、INT_G单元中
;BCD码从低位到高位分别存放在T_S、T_M、T_H、T_G 单元中
;---------------------------------------------------------------
 SBIN_SBCD:
              PUSH PSW
              SETB PSW.3       ;设置当前寄存器
              CLR PSW.4

              CLR A            ;清累加器
              MOV T_G,A
              MOV T_H,A        ;清除出口单元,准备转换
              MOV T_M,A
              MOV T_S,A

              MOV  R5,INT_G
              MOV  R7,INT_L    ;设置二进制数起始地址
              MOV  R6,INT_H
              MOV  R2,#24
              CLR  C
HH1:
              MOV  A,R7
              RLC  A
              MOV  R7,A

              MOV  A,R6
              RLC  A
              MOV  R6,A

              MOV  A,R5
              RLC  A
              MOV  R5,A

              MOV A,T_S        ;得到低位数据
              ADDC A,T_S       ;累加
              DA A             ;十进制调整
              MOV T_S,A        ;保存数据

              MOV A,T_M        ;得到第二位数据
              ADDC A,T_M       ;累加
              DA A             ;十进制调整
              MOV T_M,A        ;保存结果

              MOV A,T_H        ;得到第三位
              ADDC A,T_H       ;累加
              DA  A
              MOV T_H,A        ;保存

              MOV A,T_G        ;得到第四位
              ADDC A,T_G       ;累加
              ;DA  A
              MOV T_G,A

              DJNZ R2,HH1      ;
              POP  PSW
              RET
;----------------------------------------------------------------
  END     ;告诉编译器本程序到此结束。
;-----------------------------------------------------------------

本站内容除特别声明的原创文章之外,转载内容只为传递更多信息,并不代表本网站赞同其观点。转载的所有的文章、图片、音/视频文件等资料的版权归版权所有权人所有。本站采用的非本站原创文章及图片等内容无法一一联系确认版权者。如涉及作品内容、版权和其它问题,请及时通过电子邮件或电话通知我们,以便迅速采取适当措施,避免给双方造成不必要的经济损失。联系电话:010-82306118;邮箱:aet@chinaaet.com。