main.txt

基于stc12c5410ad的液晶屏显示汉字程序

ORG 023H
ORG 0030H
START:
RS BIT P1.0
RW BIT P1.1
EP BIT P1.2
MOV SP,#70H

MAIN:
MOV R5,#30H;
LCALL lcd_wcmd;
LCALL DELAY;
MOV R5,#0CH;
LCALL lcd_wcmd;
LCALL DELAY;
MOV R5,#06H;
LCALL lcd_wcmd;
LCALL DELAY;
MOV R5,#01H;
LCALL lcd_wcmd;
LCALL DELAY;
LCALL lcd_pos;
MOV R5,#80H
MOV DPTR,#TABLE1
MAIN_LOOP:
CALL WRITE1
MOV R5,#90H
LCALL lcd_wcmd
LCALL DELAY
MOV DPTR,#TABLE2
CALL WRITE1

/***************************************/
LOOP0:
MOV R7,50H
CJNE R7,#00H,Y1
JMP X1
Y1:CJNE R7,#01H,Y2 
JMP X2
Y2:CJNE R7,#02H,Y3
JMP X3
Y3:CJNE R7,#03H,Y4
JMP X4
Y4:CJNE R7,#04H,Y5
JMP X5
Y5:CJNE R7,#05H,Y6
JMP X6
Y6: CJNE R7,#06H,Y7
JMP X7
Y7: CJNE R7,#07H,Y8
JMP X8
Y8: CJNE R7,#08H,Y9
JMP X8
Y9:CJNE R7,#09H,Y10
JMP X10
Y10:CJNE R7,#10H,Y11
JMP X11
Y11:CJNE R7,#11H,$
JMP X12


/***************************************/

X1:MOV R5,#88H
LCALL lcd_wcmd
LCALL DELAY
MOV DPTR,#TABLE3
CALL WRITE1
SETB P1.5
JMP $
X2:MOV R5,#88H
LCALL lcd_wcmd
LCALL DELAY
MOV DPTR,#TABLE4
CALL WRITE1
SETB P1.5
JMP $
X3:MOV R5,#88H
LCALL lcd_wcmd
LCALL DELAY
MOV DPTR,#TABLE5
CALL WRITE1
SETB P1.5
JMP $
X4:MOV R5,#88H
LCALL lcd_wcmd
LCALL DELAY
MOV DPTR,#TABLE6
CALL WRITE1
SETB P1.5
JMP $
X5:MOV R5,#88H
LCALL lcd_wcmd
LCALL DELAY
MOV DPTR,#TABLE7
CALL WRITE1
SETB P1.5
JMP $
X6:MOV R5,#88H
LCALL lcd_wcmd
LCALL DELAY
MOV DPTR,#TABLE8
CALL WRITE1
SETB P1.5
JMP $
X7:MOV R5,#88H
LCALL lcd_wcmd
LCALL DELAY
MOV DPTR,#TABLE9
CALL WRITE1
SETB P1.5
JMP $
X8:MOV R5,#88H
LCALL lcd_wcmd
LCALL DELAY
MOV DPTR,#TABLE10
CALL WRITE1
SETB P1.5
JMP $
X9:MOV R5,#88H
LCALL lcd_wcmd
LCALL DELAY
MOV DPTR,#TABLE11
CALL WRITE1
SETB P1.5
JMP $
X10:MOV R5,#88H
LCALL lcd_wcmd
LCALL DELAY
MOV DPTR,#TABLE12
CALL WRITE1
SETB P1.5
JMP $
X11:MOV R5,#88H
LCALL lcd_wcmd
LCALL DELAY
MOV DPTR,#TABLE13
CALL WRITE1
SETB P1.5
JMP $
X12:MOV R5,#88H
LCALL lcd_wcmd
LCALL DELAY
MOV DPTR,#TABLE14
CALL WRITE1
SETB P1.5
JMP $
;JMP MAIN_LOOP;
/***************************************/


WRITE1:
A1:
MOV A,#00H;
MOVC A,@A+DPTR
MOV R4,A;
LCALL lcd_wdat;
LCALL DELAY;
INC DPTR;
CJNE R4,#00H,A1

RET

DELAY:MOV R0,#08
D1:MOV R1,#0FFH
DJNZ R1,$
DJNZ R0,D1
RET
TABLE1:DB '北京时代贝林 ',00H
TABLE2:DB '机电有限公司',00H
TABLE3:DB '楼层一',00H
TABLE4:DB '楼层二',00H
TABLE5:DB '楼层三',00H
TABLE6:DB '楼层四',00H
TABLE7:DB '楼层五',00H
TABLE8:DB '楼层六',00H
TABLE9:DB '楼层七',00H
TABLE10:DB '楼层八',00H
TABLE11:DB '楼层九',00H
TABLE12:DB '楼层十',00H
TABLE13:DB '楼层十一',00H
TABLE14:DB '楼层十二',00H
;;;;;;;;;;;;;R4   ; data
lcd_wdat:
LCALL lcd_bz;
SETB RS;
CLR RW;
CLR EP;
MOV P0,R4;
NOP;
NOP;
NOP;
SETB EP;
NOP;
NOP;
NOP;
CLR EP;
RET;


;;;;;;;;;;; r5  CMD;
lcd_wcmd:
LCALL lcd_bz;
CLR RS;
CLR RW;
CLR EP;
NOP;
NOP;
NOP;
MOV P0,R5;
NOP;
NOP;
NOP;
SETB EP;
NOP;
NOP;
NOP;
CLR EP;
RET;
;;;;;;;;;;;;;;;;;;;;;;
lcd_bz:
CLR RS;
SETB RW;
SETB EP;
NOP;
NOP;
NOP;
BZ_LOOP:
 MOV A,#80H;
 MOV B,P0;
 ANL A,B;
 CJNE A,#80H,BZ_NEXT1;
 JMP BZ_LOOP;
BZ_NEXT1:
CLR EP;
RET;
lcd_pos:
MOV R5,#80H;
LCALL lcd_wcmd;
RET;
END