;-----------------------------------------------------------
MOV A,DISPBUF+6 ;取显示缓冲区的第七位
MOV DPTR ,#DISPTAB
MOVC A,@A+DPTR ;取字形码
CPL A
MOV P0,A ;将第七个字形码送P0位（段口）
CLR LED7 ;开第七位显示器位口
LCALL DELAY ;延时5毫秒
SETB LED7 ;关闭第七位显示器
;-----------------------------------------------------------
MOV A,DISPBUF+7 ;取显示缓冲区的第八位
MOV DPTR ,#DISPTAB
MOVC A,@A+DPTR ;取字形码
CPL A
MOV P0,A ;将第八个字形码送P0位（段口）
CLR LED8 ;开第八位显示器位口
LCALL DELAY ;延时5毫秒
SETB LED8 ;关闭第八位显示器
;-----------------------------------------------------------
RET
PAUSE:
ACALL DISP
JNB P3.2,K3
AJMP PAUSE
K3: acall CLEAR
CLEAR:
MOV 58H, #0
MOV 59H, #0
MOV 60H, #0
MOV 61H, #0
MOV 62H, #0
MOV 63H, #0
MOV 64H, #0
MOV 65H, #0
LJMP LOOP1
RETI
;======================================================================
;延时程序
;======================================================================
DELAY:
MOV R6,#20H ;延时约5mS
D1: MOV R7,#10H
D2: DJNZ R7,D2
DJNZ R6,D1
RET
;======================================================================
DISPTAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,0ffh
上一页 [1] [2] [3]
本文关键字：LED数码管 51单片机，单片机-工控设备 - 51单片机
