用51单片机设计数字电压表的程序(汇编)

//晶振频率12MHZ AD采样频率为8.192ms
COM EQU 50H ;指令寄存器
DA T EQU 51H ;数据寄存器
RS EQU P2.1 ;LCD寄存器选择信号
RW EQU P2.2 ;LCD读/写选择信号
E EQU P2.3 ;LCD使能信号
ORG 0000H
LJMP MAIN ;主程序入口
ORG 000BH
LJMP BT0 ;T0中断入口
ORG 0030H ;主程序,初始化
MAIN: MOV SP,#60H
LCALL INT
MOV 30H,#30H ;显示电压整数位
MOV 31H,#02EH ;显示小数点
MOV 32H,#30H ;显示电压小数个位
MOV 33H,#30H ;显示电压小数十位
MOV 34H,#30H ;显示电压小数百位
MOV 35H,#56H ;显示V
MOV R7,#30H
LCALL N1 ;显示V oltage=0.000V
//**********************定时器初始化程序*********************** MOV TMOD,#00H ;定时器T0设为方式0,为13位定时/计数器
MOV TL0,#00H ;装入定时初值
MOV TH0,#00H
SETB TR0 ;启动T0
MOV 24H,#08H ;装入T0中断次数
MOV IE,#82H ;开中断定时器T0溢出中断允许位
//*************************************************************
LP: MOV R7,#30H ;显示缓冲区首地址
LCALL DISPLY
SJMP LP ;循环显示
//****定时器中断服务程序,读取0809第0通道的转换结果并化为显示值***** BT0: PUSH ACC ;保护现场
PUSH PSW
PUSH DPH
PUSH DPL
MOV PSW,#08H ;设定工作寄存器1区
CLR TR0 ;停止T0
MOV TH0,#00H ;重装定时常数
MOV TL0,#00H
DEC 24H ;24H内容减一，剩7次中断
MOV A,24H
JNZ RTN1 ;8次中断未到，返回
MOV 24H,#08H ;重装中断次数
MOV DPTR,#0F6FFH ;0809端口地址
MOV A,#00H ;0通道
MOVX @DPTR,A;启动0809
MOV R7,#40H ;延时方式等待AD0809转换完毕
DJNZ R7,$ ;也可采用中断方式
MOVX A,@DPTR ;读0809转换结果
LCALL RTN ;采样值转换为显示值子程序
LCALL RTN1
//*******A/D转换结果化为显示值**************
RTN:
PUSH PSW
MOV PSW,#10H ;选择工作寄存器2区
MOV R6,#00H ;填入被除数，除数为51
MOV R5,A
LCALL DDIV ;调用除51子程序
MOV A,R5 ;商为个位数
ORL A,#30H
MOV 30H,A;个位存入缓冲区
MOV R0,#32H ;指针指向显示缓冲区
MOV R1,#3H ;循环3次
LP_1:MOV A,R6 ;(余数)*10/51
MOV B,#0AH
MUL AB
MOV R6,B ;填入被除数，除数为51
MOV R5,A
LCALL DDIV
MOV A,R5 ;商分别为十分位，百分位，千分位
ORL A,#30H
MOV @R0,A; 十，百，千存入缓冲区
INC R0
DJNZ R1,LP_1
POP PSW
RET
//********16位/51无符号数除法************************ ;入口:r6r5 被除数除数为33H=51
;出口：r5商r6 余数
DDIV:
MOV R7,#08H ;R7为计数器
DDIVI:
CLR C
MOV A,R5
RLC A
MOV R5,A
MOV A,R6
RLC A
MOV 07H,C
CLR C
SUBB A,#33H
JB 07H,NEXT ;
JNC NEXT ;
ADD A,#33H
SJMP NEXTI
NEXT: INC R5
NEXTI:MOV R6,A
DJNZ R7,DDIVI
RET
RTN1:LCALL DISPLY
SETB TR0
POP DPL
POP DPH
POP PSW
POP ACC
RETI
//******LCD显示子程序************************ DISPLY:
MOV COM,#080H+4AH ;显示测量值首地址
LCALL PR1 ;调用写指令子程序
MOV R1,#06H ;要显示数据的个数
MOV R0,#30H ;要显示数据的首地址L: MOV DA T,@R0 ;取A/D转换数据LCALL PR2 ;调写显示数据子程序
INC R0
DJNZ R1,L ;共显示6个数据？
RET
//******逐字依次输入显示第一行字符*********** N1: MOV COM,#01H ;LCD清屏
LCALL PR1 ;调用写指令代码子程序
MOV COM,#06H ;设置输入方式
LCALL PR1
MOV COM,#80H ; 设置数据指针首地址
LCALL PR1
MOV DPTR,#TAB0 ;DPTR指向显示字符表0首地址;
MOV R4,#16
MOV R5,#00H;
xianshi:
MOV A,R5;
MOVC A,@A+DPTR ;取出显示字符
MOV DA T,A
LCALL PR2
INC R5;
DJNZ R4,xianshi;
//******逐字依次输入显示第二行字符*********** MOV COM,#080H+42H ;
LCALL PR1
MOV DPTR,#TAB1 ;DPTR指向显示字符表1首地址MOV R2,#8
MOV R3,#00H
WRIN:
MOV A,R3
MOVC A,@A+DPTR ;取出显示字符
MOV DA T,A
LCALL PR2
INC R3
DJNZ R2,WRIN
RET
TAB0:DB"ZDH10602 YW&WH"
TAB1:DB"V oltage=";
//*******LCD间接控制方式下的初始化子程序******** INT: ;调延时子程序
MOV COM,#38H ;设置液晶显示模式
LCALL PR1
MOV COM,#01H ;清屏
LCALL PR1
MOV COM,#06H ;设置输入方式
LCALL PR1
MOV COM,#0CH ;设置显示方式
LCALL PR1
RET
//**********延时子程序*******************
DELAY: MOV R6,#0FH
MOV R7,#00H
DELAY1:NOP
DJNZ R7,DELAY1
DJNZ R6,DELAY1
RET
//****LCD间接控制方式的驱动子程序*******
//*********写指令代码子程序************
PR1: PUSH ACC
CLR RS ;RS=0
SETB RW ;R/W=1 读指令
PR11:MOV P0,#0FFH ;P0置位,准备读
SETB E ;E=1
LCALL DELAY
NOP
MOV A,P0
CLR E
JB ACC.7,PR11 ;BF=1? 读写检测，判断忙标志
CLR RW ;R/W=0 写指令
MOV P0,COM
SETB E ;E=1
CLR E ;E=0
POP ACC
RET
//*********写显示数据子程序************
PR2: PUSH ACC
CLR RS ;RS=0
SETB RW ;R/W=1
PR21:MOV P0,#0FFH
SETB E ;E=1
LCALL DELAY
MOV A,P0 ;读BF和AC6-4值
CLR E ;E=0
JB ACC.7,PR21
SETB RS
CLR RW // 写数据
MOV P0,DA T ;写入数据高四位
SETB E ;E=1
CLR E ;E=0
POP ACC
RET
END。