合泰单片机笔段式LCD显示程序+电路图

CLRCOM0EN;设置管脚为PC.0
CLRCOM0;输出低电平
CALLRR0;调用seg管脚数据处理程序
MOVA,SEG_0;
MOVSEG,A;将处理后的数据从seg连接口输出
CLRSEG9
CALLM001;延时
SETCOM0;输出高电平
CPLSEG_0;将管脚数据取反
MOVA,SEG_0;
MOVSEG,A;数据从seg脚输出
SETSEG9
CALLM001;延时
SETCOM0EN;设置管脚为com0口输出VDD/2电压
CALLM001;延时
clrCOM1EN;设置管脚为PC.1
clrcom1 ;输出低电平
CALLRR0;调用seg管脚数据处理程序
MOVA,SEG_0;
MOVSEG,A;将处理后的数据从seg连接口输出
CLRSEG9
CALLM001;延时
SETCOM1 ;输出高电平
CPLSEG_0;将管脚数据取反
MOVA,SEG_0;
MOVSEG,A;数据从seg脚输出
SETSEG9
CALLM001;延时
SETCOM1EN;设置管脚为com1口输出VDD/2电压
CALLM001;延时
clrCOM2EN;设置管脚为PC.6
clrcom2 ;输出低电平
CALLRR0;调用seg管脚数据处理程序
MOVA,SEG_0;
MOVSEG,A;将处理后的数据从seg连接口输出
CLRSEG9
CALLM001;延时
SETCOM2;输出高电平
CPLSEG_0;将管脚数据取反
MOVA,SEG_0;
MOVSEG,A;数据从seg脚输出
SETSEG9
CALLM001;延时
SETCOM2EN;设置管脚为com2口输出VDD/2电压
CALLM001;延时
clrCOM3EN;设置管脚为PC.7
clrcom3 ;输出低电平
CALLRR0;调用seg管脚数据处理程序
MOVA,SEG_0;
MOVSEG,A;将处理后的数据从seg连接口输出
CLRSEG9
CALLM001;延时
SETCOM3 ;输出高电平
CPLSEG_0;将管脚数据取反
MOVA,SEG_0;
MOVSEG,A;将处理后的数据从seg连接口输出
SETSEG9
CALLM001;
SETCOM3EN;设置管脚为com3口输出VDD/2电压
CALLM001;延时
JMPA2
;*********************************************************
;********seg数据处理子程序********************************
;*********************************************************
;SEG01中为第一位要显示的编码SEG0与SEG1控制
;SEG23--SEG8分别控制对应的编码
;当扫描COM0时SEG（0-7）输出第0位与第1位
;当扫描COM1时SEG（0-7）输出第2位与第3位
;当扫描COM2时SEG（0-7）输出第4位与第5位
;当扫描COM3时SEG（0-7）输出第6位与第7位
;**********************************************************
RR0:
RRCSEG01;将SEG01第0位通过带进位C移到seg_0寄存器
RRCSEG_0;
RRCSEG01;将SEG01第1位通过带进位C移到seg_0寄存器
RRCSEG_0;
RRCSEG23;将SEG23第0位通过带进位C移到seg_0寄存器
RRCSEG_0;
RRCSEG23;将SEG23第1位通过带进位C移到seg_0寄存器
RRCSEG_0;
RRCSEG45;将SEG45第0位通过带进位C移到seg_0寄存器
RRCSEG_0;
RRCSEG45;将SEG45第1位通过带进位C移到seg_0寄存器
RRCSEG_0;
RRCSEG67;将SEG67第0位通过带进位C移到seg_0寄存器
RRCSEG_0;
RRCSEG67;将SEG67第1位通过带进位C移到seg_0寄存器
RRCSEG_0;移完时SEG_0寄存器则是扫描COM时所需seg口
RET;输出状态
;*********************************************************
;延时子程序
;*********************************************************
M001:
MOVA,4
MOV[8AH],A
M002:
MOVA,250
MOV[8BH],A
SDZ[8BH]
JMP$-1
SDZ[8AH]
JMPM002
RET
END