华东交大单片机课程设计
CLR RS SETB E MOV A, LCD CLR E
MOV LCD, 0FFH ;第2次读 CLR RS SETB RW SETB E MOV A, LCD CLR E
JB ACC.7, WAIT MOV A, 30H POP 30H RET
W_CMD: ACALL WAIT MOV LCD, A CLR RS CLR RW SETB E NOP
CLR E RET
W_DATA: ACALL WAIT MOV LCD, A SETB RS CLR RW SETB E NOP
CLR E RET
CLEAR: MOV R0, #0H
CLR1: MOV A, R0 ORL A, #10111000B ACALL W_CMD MOV R1, #0H
MOV A,#01000000B ACALL W_CMD CLR2: MOV A, #0H ACALL W_DATA INC R1
CJNE R1, #64, CLR2 INC R0
CJNE R0, #8, CLR1 RET
设置页号 16
;华东交大单片机课程设计
FBOPLAY: ;方波显示 MOV DPTR,#PAGET CJNE R3,#8,BIJIAO AJMP LOOPF4
BIJIAO: JNC LOOPF3
LOOPF4: MOV A, #10111100B ACALL W_CMD MOV A, #01000000B ;设置4页号 ;0列开始显示
ACALL W_CMD ACALL LXPFBH4 ACALL LXPFBL4 ACALL LXPFBH4 ACALL LXPFBL4 RET
LOOPF3: MOV A, #10111011B ACALL W_CMD
MOV A, #01000000B ACALL W_CMD MOV A,R3 SUBB A,#8 MOV R3,A
ACALL LXPFBH4 ACALL LXPFBL4 MOV A, #10111011B ACALL W_CMD ACALL LXPFBH4 ACALL LXPFBL4 RET
LXPFBH4: ;PUSH 03H MOV R5,#16 ;DEC R3 MOV A, R3
MOVC A, @A+DPTR LOPFBH4:ACALL W_DATA DJNZ R5 , LOPFBH4 ; POP 03H RET
LXPFBL4: MOV A, #10111100B ACALL W_CMD MOV R5,#16 MOV A,#80H LOPFBL4:ACALL W_DATA DJNZ R5, LOPFBL4 RET
;设置3页号 ;0列开始显示
;设置3页号
;设置4页号
17
华东交大单片机课程设计
SINPLAY:
MOV A, #10111100B ;设置4页号 ACALL W_CMD MOV DPTR, #PAGE4
MOV A, #01000000B ;0列开始显示 ACALL W_CMD ACALL LXPTZ
MOV A, #01011000B ;24列开始显示 ACALL W_CMD ACALL LXPTJ
MOV A, #10111011B ;设置3页号 ACALL W_CMD MOV DPTR, #PAGE3
MOV A, #01000000B ;0列开始显示 ACALL W_CMD ACALL LXPZ
MOV A, #01010000B ;16列开始显示 ACALL W_CMD ACALL LXPJ
MOV A, #10111101B ;设置5页号 ACALL W_CMD MOV DPTR, #PAGE5
MOV A, #01100000B ;32列开始显示 ACALL W_CMD ACALL LXPTZ
MOV A, #01111000B ;48列开始显示 ACALL W_CMD ACALL LXPTJ
MOV A, #10111110B ;设置6页号 ACALL W_CMD MOV DPTR, #PAGE6
MOV A, #01100000B ;32列开始显示 ACALL W_CMD ACALL LXPZ
MOV A, #01110000B ;48列开始显示 ACALL W_CMD ACALL LXPJ RET
LXPZ:MOV R5, #0 LOOPZ: MOV A, R5
MOVC A, @A+DPTR ACALL W_DATA
18
华东交大单片机课程设计
INC R5
CJNE R5, #16, LOOPZ RET
LXPJ: MOV R5, #16 LOOPJ: DEC R5 MOV A, R5
MOVC A, @A+DPTR ACALL W_DATA CJNE R5, #0, LOOPJ RET TRIPLAY:
MOV A, #10111011B ;设置3页号 ACALL W_CMD MOV DPTR, #PAGET
MOV A, #01001000B ;8列开始显示 ACALL W_CMD ACALL LXPTZ
MOV A, #01010000B ;16开始显示 ACALL W_CMD ACALL LXPTJ
MOV A, #01110000B ;48开始显示 ACALL W_CMD ACALL LXPTJ
MOV A, #01101000B ;40列开始显示 ACALL W_CMD ACALL LXPTZ
MOV A, #10111100B ;设置4页号 ACALL W_CMD
MOV A, #01000000B ;0列开始显示 ACALL W_CMD MOV DPTR, #PAGET ACALL LXPTZ
MOV A, #01011000B ;24开始显示 ACALL W_CMD
ACALL LXPTJ
MOV A, #01100000B ;32开始显示 ACALL W_CMD
ACALL LXPTZ
MOV A, #01111000B ;48开始显示 ACALL W_CMD
ACALL LXPTJ
19
华东交大单片机课程设计
RET
LXPTZ: MOV R5,#0 LOOPTZ: MOV A, R5
MOVC A, @A+DPTR ACALL W_DATA INC R5
CJNE R5, #8, LOOPTZ RET
LXPTJ: MOV R5,#8 LOOPTJ: DEC R5 MOV A, R5
MOVC A, @A+DPTR ACALL W_DATA
CJNE R5, #0, LOOPTJ
RET
DDDDLCD: CLR CS1 CLR CS2 MOV A,R6 MOV B,#16 DIV AB
MOV R3,A ;ZENG LIANG
MOV A, #00111111B ACALL W_CMD
ACALL CLEAR ;清屏 RET END
打开显示 20
;