液晶显示子程序.asm

开发平台,任一MCS-51单片机上,很多程序,如键盘,显示,液晶驱动

HANG     EQU     7AH  ;指定行的位置
LIE      EQU     79H  ;指定列的位置
DEL1     EQU     7FH  ;用于延时
DEL2     EQU     7EH  ;用于延时
YE       EQU     7DH  ;页地址
LIEH     EQU     7CH  ;列地址高位
LIEL     EQU     7BH  ;列地址低位
DATAPAGE EQU     78H  ;送字数据计数
LOOPNUM  EQU  	 77H  ;送显示列计数
CSPIN    EQU     P2.7 ;片选端
REST     EQU     P2.6 ;复位端
RSPIN    EQU     P2.5 ;命令/数据选择端
SCLPIN   EQU     P2.4 ;时钟端
SIDPIN   EQU     P2.3 ;数据输入端
SSH EQU 60H
SSL EQU 61H
SJH EQU 62H
SJL EQU 63H
TIMEH1 EQU 64H
TIMEH2 EQU 65H
TIMEL1 EQU 66H
TIMEL2 EQU 67H
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ORG     0000H
XIANSHI:
        MOV     R0,#7FH
CLEAR:  MOV     @R0,#0
        DJNZ    R0,CLEAR

        CLR     REST       ;复位
        LCALL   LDELAY
        SETB    REST
        LCALL   LDELAY
        LCALL   RESET      ;初始化
        LCALL   CLEARALL   ;清屏
        SETB REST
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;调试用
        MOV SSH,#7H
        MOV SSL,#1H
        MOV SJH,#6H
        MOV SJL,#8H
        MOV TIMEH1,#8
        MOV TIMEH2,#8
        MOV TIMEL1,#8
        MOV TIMEL2,#8
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;调试用
chushihua2:
MOV DPTR,#HUAN
MOV HANG,#2
MOV LIE,#3
ACALL SHANGXIAONE
MOV DPTR,#YING
MOV HANG,#2
MOV LIE,#4
ACALL SHANGXIAONE
MOV DPTR,#SHI
MOV HANG,#2
MOV LIE,#5
ACALL SHANGXIAONE
MOV DPTR,#YONG
MOV HANG,#2
MOV LIE,#6
ACALL SHANGXIAONE
MOV DPTR,#ZHIZHI
MOV HANG,#3
MOV LIE,#2
ACALL SHANGXIAONE
MOV DPTR,#KONGKONG
MOV HANG,#3
MOV LIE,#3
ACALL SHANGXIAONE
MOV DPTR,#DIDI
MOV HANG,#3
MOV LIE,#4
ACALL SHANGXIAONE
MOV DPTR,#SHISHI
MOV HANG,#3
MOV LIE,#5
ACALL SHANGXIAONE
MOV DPTR,#SISI
MOV HANG,#3
MOV LIE,#6
ACALL SHANGXIAONE
MOV DPTR,#ZUZU
MOV HANG,#3
MOV LIE,#7
ACALL SHANGXIAONE
LCALL DELAY
LCALL CLEARALL

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
MOV DPTR,#DIAN
MOV HANG,#1
MOV LIE,#1
ACALL SHANGXIAONE
MOV DPTR,#JI
MOV HANG,#1
MOV LIE,#2
ACALL SHANGXIAONE
MOV DPTR,#KONG
MOV HANG,#1
MOV LIE,#3
ACALL SHANGXIAONE
MOV DPTR,#ZHI
MOV HANG,#1
MOV LIE,#4
ACALL SHANGXIAONE
MOV DPTR,#XIANG
MOV HANG,#1
MOV LIE,#5
ACALL SHANGXIAONE
MOV DPTR,#SHI
MOV HANG,#1
MOV LIE,#6
ACALL SHANGXIAONE
MOV DPTR,#BIAO
MOV HANG,#1
MOV LIE,#7
ACALL SHANGXIAONE
MOV DPTR,#zhuang
MOV HANG,#3
MOV LIE,#5
ACALL SHANGXIAONE

MOV DPTR,#MEI
MOV HANG,#3
MOV LIE,#6
ACALL SHANGXIAONE

MOV DPTR,#MIAO
MOV HANG,#3
MOV LIE,#7
ACALL SHANGXIAONE
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

MOV DPTR,#TAB4
MOV HANG,#4
MOV LIE,#1
ACALL SHANGXIAONE

MOV DPTR,#TAB5
MOV HANG,#4
MOV LIE,#2
ACALL SHANGXIAONE

MOV DPTR,#MAOHAO
MOV HANG,#4
MOV LIE,#3
ACALL SHANGXIAONE

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
XIANSHI2:
MOV DPTR,#TAB1
MOV HANG,#2
MOV LIE,#1
ACALL SHANGXIAONE
MOV DPTR,#TAB2
MOV HANG,#2
MOV LIE,#2
ACALL SHANGXIAONE
MOV DPTR,#MAOHAO
MOV HANG,#2
MOV LIE,#3
ACALL SHANGXIAONE
MOV DPTR,#zhuang
MOV HANG,#2
MOV LIE,#5
ACALL SHANGXIAONE
MOV DPTR,#MEI
MOV HANG,#2
MOV LIE,#6
ACALL SHANGXIAONE
MOV DPTR,#MIAO
MOV HANG,#2
MOV LIE,#7
ACALL SHANGXIAONE
MOV DPTR,#TAB3
MOV HANG,#3
MOV LIE,#1
ACALL SHANGXIAONE
MOV DPTR,#TAB2
MOV HANG,#3
MOV LIE,#2
ACALL SHANGXIAONE
MOV DPTR,#MAOHAO
MOV HANG,#3
MOV LIE,#3
ACALL SHANGXIAONE

;;;;;;;;;;;;;;;;;;;;;数据显示;;;;;;;;;;;;;;;;;;;;;;;;

LCM:CLR C
MOV A,SSH
MOV B,#16
MUL AB
MOV DPTR,#SHU
ADD A,DPL
MOV DPL,A
MOV A,DPH
ADDC A,#00H
MOV DPH,A
MOV HANG,#2
MOV LIE,#6
ACALL SHANGXIABYTE
CLR C
MOV A,SSL
MOV B,#16
MUL AB
MOV DPTR,#SHU
ADD A,DPL
MOV DPL,A
MOV A,DPH
ADDC A,#00H
MOV DPH,A
MOV HANG,#2
MOV LIE,#7
ACALL SHANGXIABYTE

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;*****************************************************

CLR C
MOV A,SJH
MOV B,#16
MUL AB
MOV DPTR,#SHU
ADD A,DPL
MOV DPL,A
MOV A,DPH
ADDC A,#00H
MOV DPH,A
MOV HANG,#3
MOV LIE,#6
ACALL SHANGXIABYTE

CLR C
MOV A,SJL
MOV B,#16
MUL AB
MOV DPTR,#SHU
ADD A,DPL
MOV DPL,A
MOV A,DPH
ADDC A,#00H
MOV DPH,A
MOV HANG,#3
MOV LIE,#7
ACALL SHANGXIABYTE


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
CLR C
MOV A,TIMEH1
MOV B,#16
MUL AB
MOV DPTR,#SHU
ADD A,DPL
MOV DPL,A
MOV A,DPH
ADDC A,#00H
MOV DPH,A
MOV HANG,#4
MOV LIE,#6
ACALL SHANGXIABYTE

CLR C
MOV A,TIMEH2
MOV B,#16
MUL AB
MOV DPTR,#SHU
ADD A,DPL
MOV DPL,A
MOV A,DPH
ADDC A,#00H
MOV DPH,A
MOV HANG,#4
MOV LIE,#7
ACALL SHANGXIABYTE

CLR C
MOV A,TIMEL1
MOV B,#16
MUL AB
MOV DPTR,#SHU
ADD A,DPL
MOV DPL,A
MOV A,DPH
ADDC A,#00H
MOV DPH,A
MOV HANG,#4
MOV LIE,#8
ACALL SHANGXIABYTE

CLR C
MOV A,TIMEL2
MOV B,#16
MUL AB
MOV DPTR,#SHU
ADD A,DPL
MOV DPL,A
MOV A,DPH
ADDC A,#00H
MOV DPH,A
MOV HANG,#4
MOV LIE,#9
ACALL SHANGXIABYTE

MOV DPTR,#MIAO
MOV HANG,#4
MOV LIE,#6
ACALL SHANGXIAONE


RET;;;;;;;;;;;;;;;***********

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
MAOHAO:
DB 00H 00H 00H 00H 00H 00H 00H 00H 00H 00H 00H 00H 00H 00H 00H 00H;
DB 00H 00H 36H 36H 00H 00H 00H 00H 00H 00H 00H 00H 00H 00H 00H 00H;"："
TAB1:

DB 40H 41H 0CEH 04H 00H 80H 40H 0BEH 82H 82H 82H 0BEH 0C0H 40H 40H 00H;
DB 00H 00H 7FH 20H 90H 80H 40H 43H 2CH 10H 10H 2CH 43H 0C0H 40H 00H;"设"

TAB2:
DB 40H 42H 0CCH 00H 04H 0E4H 24H 24H 0FFH 24H 24H 24H 0E4H 04H 00H 00H;
DB 40H 20H 1FH 20H 48H 49H 45H 43H 7FH 41H 43H 45H 4DH 40H 40H 00H;"速"
TAB3:
 DB 00H 10H 0CH 04H 4CH 0B4H 94H 05H 0F6H 04H 04H 04H 14H 0CH 04H 00H;
DB 00H 82H 82H 42H 42H 23H 12H 0AH 07H 0AH 12H 0E2H 42H 02H 02H 00H;"实"
TAB4:
DB 00H 0FCH 44H 44H 44H 0FCH 10H 90H 10H 10H 10H 0FFH 10H 10H 10H 00H;
DB 00H 07H 04H 04H 04H 07H 00H 00H 03H 40H 80H 7FH 00H 00H 00H 00H;"时"
TAB5:
DB 00H 0F8H 01H 06H 00H 0F0H 92H 92H 92H 92H 0F2H 02H 02H 0FEH 00H 00H;
DB 00H 0FFH 00H 00H 00H 07H 04H 04H 04H 04H 07H 40H 80H 7FH 00H 00H;"间",
ZHUANG:
DB 0C8H 0A8H 9CH 0EBH 88H 88H 88H 40H 48H 0F8H 4FH 48H 48H 48H 40H 00H;
DB 08H 08H 04H 0FFH 04H 04H 00H 02H 0BH 12H 22H 0D2H 0EH 02H 00H 00H;"转"
mei:
DB 20H 10H 0CH 07H 0F4H 14H 34H 54H 14H 14H 14H 0F4H 04H 04H 00H 00H;
DB 01H 01H 01H 1FH 11H 11H 11H 13H 15H 51H 91H 7FH 11H 11H 11H 00H;"每",
MIAO:
DB 12H 12H 0D2H 0FEH 91H 11H 0C0H 38H 10H 00H 0FFH 00H 08H 10H 60H 00H;
DB 04H 03H 00H 0FFH 00H 83H 80H 40H 40H 20H 23H 10H 08H 04H 03H 00H;"秒",2
DIAN:
DB 00H 00H 0F8H 48H 48H 48H 48H 0FFH 48H 48H 48H 48H 0F8H 00H 00H 00H;
DB 00H 00H 0FH 04H 04H 04H 04H 3FH 44H 44H 44H 44H 4FH 40H 70H 00H;"电
JI:
DB 08H 08H 0C8H 0FFH 48H 88H 08H 00H 0FEH 02H 02H 02H 0FEH 00H 00H 00H;
DB 04H 03H 00H 0FFH 00H 41H 30H 0CH 03H 00H 00H 00H 3FH 40H 78H 00H;"机"
KONG:
DB 08H 08H 08H 0FFH 88H 48H 00H 98H 48H 28H 0AH 2CH 48H 0D8H 08H 00H;