lcd.asm

利用HOLTEK单片机开发的1602液晶驱动

#pragma debug scope 1 1
#line 40 "D:\桌面文件\液晶驱动\LCD\LCD.C"
#line 41 "D:\桌面文件\液晶驱动\LCD\LCD.C"
rombank 0 L2
L2 .SECTION INPAGE'CODE'
l_2:
MOV [06h],A
_2:
RET A,119
RET A,119
RET A,119
RET A,46
RET A,99
RET A,100
RET A,108
RET A,101
RET A,46
RET A,110
RET A,101
RET A,116
RET A,0
#line 42 "D:\桌面文件\液晶驱动\LCD\LCD.C"
rombank 0 L3
L3 .SECTION INPAGE'CODE'
l_3:
MOV [06h],A
_3:
RET A,112
RET A,110
RET A,122
RET A,119
RET A,122
RET A,119
RET A,64
RET A,99
RET A,100
RET A,108
RET A,101
RET A,46
RET A,110
RET A,101
RET A,116
RET A,0
__acsr EQU [027H]
__adcr EQU [026H]
__adrh EQU [025H]
__adrl EQU [024H]
__hdr EQU [023H]
__hsr EQU [022H]
__hcr EQU [021H]
__hadr EQU [020H]
__pwm3 EQU [01dH]
__pwm2 EQU [01cH]
__pwm1 EQU [01bH]
__pwm0 EQU [01aH]
__pfc EQU [029H]
__pf EQU [028H]
__pdc EQU [019H]
__pd EQU [018H]
__pcc EQU [017H]
__pc EQU [016H]
__pbc EQU [015H]
__pb EQU [014H]
__pac EQU [013H]
__pa EQU [012H]
__tmr1c EQU [011H]
__tmr1l EQU [010H]
__tmr1h EQU [0fH]
__tmr0c EQU [0eH]
__tmr0l EQU [0dH]
__tmr0h EQU [0cH]
__intc1 EQU [01eH]
__intc0 EQU [0bH]
__status EQU [0aH]
__tblh EQU [08H]
__tblp EQU [07H]
__pcl EQU [06H]
__acc EQU [05H]
__bp EQU [04H]
__mp1 EQU [03H]
__iar1 EQU [02H]
__mp0 EQU [01H]
__iar0 EQU [00H]
@MAIN .SECTION 'CODE'
_main PROC
begin:
#pragma debug scope 2 1 ; 41 "D:\桌面文件\液晶驱动\LCD\LCD.C"
#line 41 "D:\桌面文件\液晶驱动\LCD\LCD.C"
MOV A,13
MOV RH,A
MOV A,OFFSET CR3
MOV [01H],A
MOV A,1
MOV T2,A
ASB13:
MOV A,T2
ADD A,OFFSET l_2
CALL l_2
MOV [00H],A
INC [01H]
INC T2
SDZ RH
JMP ASB13
#line 42 "D:\桌面文件\液晶驱动\LCD\LCD.C"
MOV A,16
MOV RH,A
MOV A,OFFSET CR4
MOV [01H],A
MOV A,1
MOV T2,A
ASB14:
MOV A,T2
ADD A,OFFSET l_3
CALL l_3
MOV [00H],A
INC [01H]
INC T2
SDZ RH
JMP ASB14
#line 45 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CLR __pac
#line 46 "D:\桌面文件\液晶驱动\LCD\LCD.C"
MOV A,020h
MOV CR1,A
#line 47 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CALL _Delay400Ms
#line 48 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CALL _LCMInit
#line 49 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CALL _Delay5Ms
#line 51 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CLR CR2
L4:
#line 51 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CALL _Delay400Ms
L5:
#line 51 "D:\桌面文件\液晶驱动\LCD\LCD.C"
INC CR2
#line 51 "D:\桌面文件\液晶驱动\LCD\LCD.C"
MOV A,80h
XOR A,CR2
SUB A,085h
SNZ [0ah].0
JMP L4
#line 52 "D:\桌面文件\液晶驱动\LCD\LCD.C"
MOV A,00h
MOV DisplayListChar0,A
MOV A,00h
MOV DisplayListChar1,A
MOV A,OFFSET CR3
MOV DisplayListChar2,A
CLR DisplayListChar2[1]
CALL _DisplayListChar
#line 53 "D:\桌面文件\液晶驱动\LCD\LCD.C"
MOV A,00h
MOV DisplayListChar0,A
MOV A,01h
MOV DisplayListChar1,A
MOV A,OFFSET CR4
MOV DisplayListChar2,A
CLR DisplayListChar2[1]
CALL _DisplayListChar
#line 54 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CALL _ReadDataLCM
#line 54 "D:\桌面文件\液晶驱动\LCD\LCD.C"
JMP L9
L8:
#pragma debug scope 3 2 ; 58 "D:\桌面文件\液晶驱动\LCD\LCD.C"
#line 58 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CLR CR1.7
#line 59 "D:\桌面文件\液晶驱动\LCD\LCD.C"
MOV A,CR1
SUB A,020h
SZ [0ah].0
JMP L11
#line 59 "D:\桌面文件\液晶驱动\LCD\LCD.C"
MOV A,020h
MOV CR1,A
L11:
#line 60 "D:\桌面文件\液晶驱动\LCD\LCD.C"
MOV A,CR1
MOV b0_1,A
INC CR1
MOV A,b0_1
MOV Display0,A
CALL _Display
#line 61 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CALL _Delay400Ms
L9:
#line 56 "D:\桌面文件\液晶驱动\LCD\LCD.C"
#pragma debug scope 2 1 ; 56 "D:\桌面文件\液晶驱动\LCD\LCD.C"
JMP L8
L1:
#line 63 "D:\桌面文件\液晶驱动\LCD\LCD.C"
JMP $
LOCAL b0_1 DB ?
#line 43 "D:\桌面文件\液晶驱动\LCD\LCD.C"
LOCAL CR1 DB ? ; temp
#pragma debug variable 2 CR1 temp
#line 44 "D:\桌面文件\液晶驱动\LCD\LCD.C"
LOCAL CR2 DB ? ; i
#pragma debug variable 2 CR2 i
#line 41 "D:\桌面文件\液晶驱动\LCD\LCD.C"
LOCAL CR3 DB 13 DUP (?) ; cdle_net
#pragma debug variable 2 CR3 cdle_net
#line 42 "D:\桌面文件\液晶驱动\LCD\LCD.C"
LOCAL CR4 DB 16 DUP (?) ; email
#pragma debug variable 2 CR4 email
_main ENDP
#line 67 "D:\桌面文件\液晶驱动\LCD\LCD.C"
@WriteDataLCM .SECTION 'CODE'
PUBLIC _WriteDataLCM
_WriteDataLCM PROC
#pragma debug scope 4 1
#line 66 "D:\桌面文件\液晶驱动\LCD\LCD.C"
PUBLIC WriteDataLCM0
LOCAL WriteDataLCM0 DB ? ; WDLCM
#pragma debug variable 4 WriteDataLCM0 WDLCM
#pragma debug scope 4 1 ; 68 "D:\桌面文件\液晶驱动\LCD\LCD.C"
#line 68 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CALL _ReadStatusLCM
#line 69 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CLR __pbc
#line 70 "D:\桌面文件\液晶驱动\LCD\LCD.C"
MOV A,WriteDataLCM0
MOV __pb,A
#line 71 "D:\桌面文件\液晶驱动\LCD\LCD.C"
SET [012H].0
#line 72 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CLR [012H].1
#line 73 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CLR [012H].2
#line 75 "D:\桌面文件\液晶驱动\LCD\LCD.C"
SET [012H].2
L15:
RET
LOCAL b0_2 DB ?
_WriteDataLCM ENDP
#line 80 "D:\桌面文件\液晶驱动\LCD\LCD.C"
@WriteCommandLCM .SECTION 'CODE'
PUBLIC _WriteCommandLCM
_WriteCommandLCM PROC
#pragma debug scope 5 1
#line 79 "D:\桌面文件\液晶驱动\LCD\LCD.C"
PUBLIC WriteCommandLCM0
LOCAL WriteCommandLCM0 DB ? ; WCLCM
#pragma debug variable 5 WriteCommandLCM0 WCLCM
#line 79 "D:\桌面文件\液晶驱动\LCD\LCD.C"
PUBLIC WriteCommandLCM1
LOCAL WriteCommandLCM1 DB ? ; BusyC
#pragma debug variable 5 WriteCommandLCM1 BusyC
#pragma debug scope 5 1 ; 81 "D:\桌面文件\液晶驱动\LCD\LCD.C"
#line 81 "D:\桌面文件\液晶驱动\LCD\LCD.C"
SZ WriteCommandLCM1
JMP L19
JMP L17
L19:
#line 81 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CALL _ReadStatusLCM
L17:
#line 82 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CLR __pbc
#line 83 "D:\桌面文件\液晶驱动\LCD\LCD.C"
MOV A,WriteCommandLCM0
MOV __pb,A
#line 84 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CLR [012H].0
#line 85 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CLR [012H].1
#line 86 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CLR [012H].2
#line 88 "D:\桌面文件\液晶驱动\LCD\LCD.C"
SET [012H].2
L16:
RET
LOCAL b0_3 DB ?
_WriteCommandLCM ENDP
#line 93 "D:\桌面文件\液晶驱动\LCD\LCD.C"
@ReadDataLCM .SECTION 'CODE'
PUBLIC _ReadDataLCM
_ReadDataLCM PROC
#pragma debug scope 6 1 ; 94 "D:\桌面文件\液晶驱动\LCD\LCD.C"
#line 94 "D:\桌面文件\液晶驱动\LCD\LCD.C"
SET __pbc
#line 95 "D:\桌面文件\液晶驱动\LCD\LCD.C"
SET [012H].0
#line 96 "D:\桌面文件\液晶驱动\LCD\LCD.C"
SET [012H].1
#line 97 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CLR [012H].2
#line 99 "D:\桌面文件\液晶驱动\LCD\LCD.C"
SET [012H].2
#line 100 "D:\桌面文件\液晶驱动\LCD\LCD.C"
MOV A,__pb
L20:
RET
_ReadDataLCM ENDP
#line 105 "D:\桌面文件\液晶驱动\LCD\LCD.C"
@ReadStatusLCM .SECTION 'CODE'
PUBLIC _ReadStatusLCM
_ReadStatusLCM PROC
#pragma debug scope 7 1 ; 106 "D:\桌面文件\液晶驱动\LCD\LCD.C"
#line 106 "D:\桌面文件\液晶驱动\LCD\LCD.C"
SET __pbc
#line 107 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CLR [012H].0
#line 108 "D:\桌面文件\液晶驱动\LCD\LCD.C"
SET [012H].1
#line 109 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CLR [012H].2
#line 110 "D:\桌面文件\液晶驱动\LCD\LCD.C"
CLR [012H].2
#line 111 "D:\桌面文件\液晶驱动\LCD\LCD.C"
SET [012H].2
L22:
L23:
#line 112 "D:\桌面文件\液晶驱动\LCD\LCD.C"
SZ __pb.7