;TEST TO 24064 ;CONTROLLER: T6963C ;SIDE: 240 X 64 DOTS ;**************************************************************** W_R EQU P3.6 ;DEFINE LCM W_RITE PIN R_D EQU P3.7 ;DEFINE LCM READ PIN CE EQU P2.7 ;DEFINE LCM CHIP ENABLE PIN CD EQU P2.0 ;DEFINE LCM COMMAND/DATA PIN FS EQU P3.5 ;DEFINE LCM WOR_D PIN RST EQU P2.3 ;DEFINE LCM RESET PIN ;DB0-DB7 REG P0.0-P0.7 DEFINE LCM DATA BUS PIN ORG 0000H JMP START ORG 0013H JMP HALT ORG 0040H HALT: JMP $ START: CLR RST ;RESET NOP SETB RST CLR FS ;TEXT HOME ADDRESS SET MOV R2,#00H MOV R3,#00H MOV R4,#40H LCALL PR1 ;TEXT AREA SET MOV R2,#1EH ;TEXT AREA 30 COLUMNS MOV R3,#00H MOV R4,#41H LCALL PR1 ;GRAPHIC HOME ADDRESS SET MOV R2,#00H MOV R3,#04H MOV R4,#42H LCALL PR1 ;GRAPHIC AREA SET MOV R2,#1EH ;GRAPHIC AREA 30 COLUMNS MOV R3,#00H MOV R4,#43H LCALL PR1 MOV R4,#80H ;"OR" MODE 80H LCALL PR12 MOV R4,#0A3H ;CURSOR PATTERN SET 3 LINES LCALL PR12 START1: MOV R2,#00H MOV R3,#04H MOV R4,#42H LCALL PR1 LCALL CLEAR ;START TO TEST MOV R4,#98H ;DISPLAY ON LCALL PR12 SETB EA ;HALT ENABLE SETB IT1 SETB EX1 LCALL TEST LCALL DELAYL LCALL CLEAR LCALL WRCHAR LCALL DELAYL LCALL CLEAR LCALL DRAW LCALL DELAYL JMP START DELAY: MOV 40H,#1FH ;DELAY TIME DELAY1: MOV 41H,#30H DELAY2: DJNZ 41H,DELAY2 DJNZ 40H,DELAY1 RET DELAYL: MOV 42H,#0AH DELAYL3: MOV 40H,#0FFH ;DELAY TIME DELAYL1: MOV 41H,#0FFH DELAYL2: DJNZ 41H,DELAYL2 DJNZ 40H,DELAYL1 DJNZ 42H,DELAYL3 RET ;READ BUSY_SIGNAL PR0: CLR CE ;SET CE=L SETB CD ;SET C/D=H SETB W_R ;SET W_R=H ORL P0,#0FFH CLR R_D ;SET R_D=L MOV A,P0 SETB R_D ;SET R_D=H RET ;READ BUSY_SIGNAL ,OK OR NOT ? PR01: CALL PR0 JNB ACC.0,PR01 ;STA0 OK? JNB ACC.1,PR01 ;STA1 OK? RET PR02: CALL PR0 JNB ACC.2,PR03 ;STA2 OK? RET PR03: CALL PR0 JNB ACC.3,PR03 ;STA3 OK? RET PR06: CALL PR0 JB ACC.6,ERR RET ERR: LJMP START RET ;SEND OUT INSTRUCTION AND DATA TO LCM PR1: CALL PR01 ;DOUBLE BYTE PARAMETER INST. PORT MOV A,R2 CALL PR14 PR11: CALL PR01 ;SINGLE BYTE PARAMETER INST. PORT MOV A,R3 CALL PR14 PR12: CALL PR01 ;NO PARAMETER INST. PORT MOV A,R4 JMP PR15 PR14: CLR CE ;SET CE=L CLR CD ;SET C/D=L JMP PR16 PR15: CLR CE ;SET CE=L SETB CD ;SET C/D=H PR16: SETB R_D ;SET R_D=H CLR W_R ;SET W_R=L MOV P0,A SETB W_R ;SET W_R=H RET CLEAR: MOV R2,#00H ;CLEAR DISPLAY RAM ADDRESS MOV R3,#00H MOV R4,#24H LCALL PR1 MOV R4,#0B0H ;AUTO WRITE LCALL PR12 MOV R6,#66H CLEAR1: MOV R5,#1EH CLEAR2: LCALL PR03 MOV A,#00H LCALL PR14 DJNZ R5,CLEAR2 DJNZ R6,CLEAR1 MOV R4,#0B2H ;AUTO WRITE END LCALL PR12 RET TEST: MOV R4,#84H LCALL PR12 MOV R4,#9FH LCALL PR12 MOV R2,#00H MOV R3,#00H MOV R4,#24H LCALL PR1 MOV R4,#0B0H LCALL PR12 MOV R2,#08H TEST1: MOV R3,#50H MOV R7,#10H TEST2: MOV A,R7 LCALL PR14 INC R7 DJNZ R3,TEST2 DJNZ R2,TEST1 MOV R4,#0B2H LCALL PR12 RET WRCHAR: MOV R4,#80H LCALL PR12 MOV R4,#9CH LCALL PR12 MOV R2,#00H MOV R3,#00H MOV R4,#24H LCALL PR1 MOV R4,#0B0H LCALL PR12 MOV DPTR,#CHAR MOV R2,#08H WRCHAR1:MOV R3,#30 WRCHAR2:MOV A,#0 MOVC A,@A+DPTR CLR C SUBB A,#20H LCALL PR14 INC DPTR DJNZ R3,WRCHAR2 DJNZ R2,WRCHAR1 MOV R4,#0B2H LCALL PR12 RET DRAW: MOV DPTR,#TU ;TEST 2 DRAW0: MOV R2,#00H ;DISPLAY RAM ADDRESS =0X0400H MOV R3,#04H MOV R4,#24H LCALL PR1 MOV R4,#0B0H ;AUTO WRITE LCALL PR12 MOV R2,#3FH DRAW2: MOV R3,#1FH DRAW3: LCALL PR03 MOV A,#00H MOVC A,@A+DPTR LCALL PR14 INC DPTR DJNZ R3,DRAW3 DJNZ R2,DRAW2 MOV R4,#0B2H LCALL PR12 RET CHAR: DB ' ' DB ' WINCOM TECH CO.,LTD. ' DB ' ' DB ' TEL:0086-755-83308729 ' DB ' ' DB ' FAX:0086-755-83308659 ' DB ' ' DB ' Http://www.wincomlcd.com ' DB ' ' TU: ;Ή«ΛΎΠΕΟ’ DB 000H,000H,000H,000H,05DH,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,0FEH,000H,000H,000H,000H,000H,000H,000H,000H,000H,001H,0F0H,000H,000H,000H DB 000H,003H,0A2H,0C0H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,003H,079H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,006H,03EH,000H,000H,000H,000H,002H DB 000H,030H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,004H,000H,080H,000H DB 000H,000H,000H,000H,000H,000H,000H,01CH,047H,000H,000H,000H,000H,004H,000H,00CH DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,008H,001H,040H,000H,000H,000H DB 000H,000H,000H,000H,000H,031H,001H,080H,000H,000H,000H,004H,000H,004H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,008H,001H,0E0H,000H,000H,000H,000H,000H DB 000H,000H,000H,062H,002H,040H,000H,000H,000H,004H,000H,002H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,018H,0C1H,0E0H,000H,000H,000H,000H,000H,000H,000H DB 000H,045H,000H,040H,000H,000H,000H,004H,000H,002H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,019H,0E0H,0E0H,000H,000H,000H,000H,000H,000H,000H,000H,040H DB 081H,020H,000H,000H,000H,004H,000H,002H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,011H,0E0H,010H,000H,000H,000H,000H,000H,000H,000H,000H,088H,040H,020H DB 000H,000H,000H,008H,000H,001H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 011H,0C0H,010H,000H,000H,000H,000H,000H,000H,000H,000H,080H,008H,020H,000H,000H DB 000H,010H,0C1H,001H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,010H,000H DB 030H,000H,000H,000H,000H,000H,000H,000H,000H,090H,005H,0A0H,000H,000H,000H,010H DB 0C3H,001H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,010H,000H,020H,000H DB 000H,000H,000H,000H,000H,00FH,0FCH,081H,080H,0A0H,000H,000H,000H,020H,002H,001H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,00AH,007H,0A0H,000H,000H,000H DB 000H,000H,000H,070H,086H,0D7H,0E0H,020H,000H,000H,000H,020H,000H,001H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,001H,0FFH,007H,040H,000H,000H,000H,000H,000H DB 003H,080H,081H,00CH,0B1H,020H,000H,000H,000H,040H,000H,001H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,002H,007H,08EH,040H,000H,000H,000H,000H,000H,006H,008H DB 003H,059H,020H,040H,000H,000H,000H,040H,000H,001H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,004H,003H,001H,080H,000H,000H,000H,000H,000H,018H,008H,002H,078H DB 0E2H,040H,000H,000H,000H,040H,000H,001H,060H,000H,000H,000H,000H,000H,000H,000H DB 000H,004H,001H,096H,000H,000H,000H,000H,000H,000H,010H,000H,006H,039H,004H,080H DB 000H,000H,000H,080H,000H,000H,0A0H,038H,000H,000H,000H,000H,000H,000H,000H,008H DB 004H,07CH,000H,000H,000H,000H,000H,000H,030H,000H,004H,019H,0B9H,000H,000H,000H DB 000H,040H,000H,000H,040H,0CCH,000H,000H,000H,000H,000H,000H,000H,008H,008H,046H DB 000H,000H,000H,000H,000H,000H,020H,000H,018H,00CH,0C6H,000H,000H,000H,000H,07FH DB 0C0H,000H,0C3H,004H,000H,000H,000H,000H,000H,000H,000H,008H,000H,001H,000H,000H DB 000H,000H,000H,000H,010H,000H,010H,006H,07CH,000H,000H,000H,000H,000H,040H,001H DB 00EH,002H,000H,000H,000H,000H,000H,000H,000H,010H,000H,001H,000H,000H,000H,000H DB 000H,000H,010H,000H,010H,005H,0F0H,000H,000H,000H,000H,000H,023H,002H,013H,003H DB 000H,000H,000H,000H,000H,000H,000H,008H,000H,000H,080H,000H,000H,000H,000H,000H DB 008H,000H,008H,00AH,0A0H,000H,000H,000H,000H,000H,010H,007H,061H,039H,000H,000H DB 000H,000H,000H,000H,000H,010H,000H,000H,040H,000H,000H,000H,000H,000H,008H,000H DB 0F8H,017H,060H,000H,000H,000H,000H,000H,010H,01BH,0C0H,0C5H,000H,000H,000H,000H DB 000H,000H,000H,008H,000H,000H,040H,000H,000H,000H,000H,000H,00CH,000H,040H,017H DB 040H,000H,000H,000H,000H,000H,008H,064H,030H,0C4H,080H,000H,000H,000H,000H,000H DB 000H,010H,000H,000H,0C0H,000H,000H,000H,000H,000H,004H,000H,03CH,02EH,080H,000H DB 000H,000H,000H,000H,007H,098H,008H,042H,0C0H,000H,000H,000H,000H,000H,000H,008H DB 000H,007H,000H,000H,000H,000H,000H,000H,002H,000H,006H,04CH,080H,000H,000H,000H DB 000H,000H,00CH,060H,006H,082H,06EH,000H,000H,000H,000H,000H,000H,008H,000H,018H DB 000H,000H,000H,000H,000H,000H,003H,000H,002H,099H,000H,000H,000H,07FH,000H,000H DB 019H,080H,001H,001H,032H,000H,000H,000H,000H,000H,000H,008H,000H,010H,000H,000H DB 000H,000H,000H,000H,001H,007H,0C3H,011H,000H,000H,000H,0FFH,080H,000H,00EH,000H DB 000H,081H,016H,000H,000H,000H,000H,000H,000H,008H,000H,010H,000H,000H,000H,000H DB 000H,000H,000H,089H,0FCH,022H,000H,000H,003H,0FFH,0E0H,000H,008H,000H,000H,0C0H DB 08BH,000H,000H,000H,000H,000H,007H,078H,000H,010H,000H,000H,000H,000H,000H,000H DB 000H,052H,030H,022H,000H,000H,003H,0FFH,0E0H,000H,060H,000H,000H,040H,042H,000H DB 000H,000H,000H,000H,000H,048H,000H,010H,000H,000H,000H,000H,000H,000H,000H,074H DB 000H,044H,000H,000H,007H,0FCH,0F0H,000H,080H,000H,000H,030H,03EH,000H,000H,000H DB 000H,000H,01FH,0FCH,001H,008H,000H,000H,000H,000H,000H,000H,000H,034H,000H,0CCH DB 000H,000H,007H,0FEH,0F0H,007H,000H,000H,000H,00EH,000H,000H,000H,000H,000H,000H DB 060H,003H,080H,0F0H,000H,000H,000H,000H,000H,000H,000H,028H,001H,088H,000H,000H DB 00FH,0FFH,07BH,0F8H,080H,000H,000H,001H,0C0H,000H,000H,000H,000H,003H,0A0H,000H DB 0F0H,080H,000H,000H,000H,000H,000H,000H,000H,024H,001H,010H,000H,000H,00FH,0FFH DB 000H,000H,080H,000H,000H,000H,080H,000H,000H,000H,000H,00CH,020H,000H,04EH,060H DB 000H,000H,000H,000H,000H,000H,000H,028H,002H,0A0H,000H,000H,00FH,0FFH,014H,000H DB 080H,000H,000H,001H,080H,000H,000H,000H,000H,008H,020H,000H,021H,090H,000H,000H DB 000H,000H,000H,000H,000H,028H,004H,0C0H,000H,000H,00FH,0FFH,01BH,0FFH,080H,0C0H DB 000H,001H,0C0H,00CH,000H,000H,000H,011H,060H,000H,010H,0F0H,000H,000H,000H,000H DB 000H,000H,000H,024H,004H,080H,000H,000H,00FH,0FEH,010H,000H,047H,080H,000H,003H DB 0F0H,00FH,000H,000H,000H,022H,0A0H,000H,009H,0A0H,000H,000H,000H,000H,000H,000H DB 000H,02CH,004H,080H,000H,000H,007H,0F8H,0B0H,000H,078H,040H,000H,007H,0F0H,01BH DB 080H,000H,000H,02CH,020H,000H,006H,060H,000H,000H,000H,000H,000H,000H,000H,024H DB 004H,080H,000H,000H,003H,0FBH,020H,000H,020H,020H,000H,00FH,0F0H,031H,0E0H,000H DB 000H,070H,030H,000H,000H,040H,000H,000H,000H,000H,000H,000H,000H,024H,004H,080H DB 000H,000H,001H,0FEH,0E0H,000H,000H,018H,000H,01FH,0FFH,0E0H,0E0H,000H,000H,090H DB 000H,000H,000H,040H,000H,000H,000H,000H,000H,000H,000H,024H,008H,080H,000H,000H DB 001H,0FFH,0C0H,000H,000H,004H,000H,03FH,0FFH,0E0H,070H,000H,000H,088H,010H,000H DB 000H,040H,000H,000H,000H,000H,000H,000H,000H,022H,008H,080H,000H,000H,000H,07FH DB 000H,000H,000H,002H,000H,07FH,0FFH,0C0H,020H,000H,000H,084H,01CH,000H,000H,080H DB 000H,000H,000H,000H,000H,000H,000H,042H,010H,080H,000H,000H,000H,008H,000H,000H DB 000H,001H,001H,0FFH,07FH,080H,000H,000H,000H,066H,004H,000H,000H,080H,000H,000H DB 000H,000H,000H,000H,000H,041H,060H,080H,000H,000H,000H,000H,000H,000H,000H,000H DB 087H,0FEH,000H,000H,000H,000H,000H,020H,004H,000H,000H,080H,000H,000H,000H,000H DB 000H,000H,000H,081H,080H,080H,000H,000H,000H,000H,000H,000H,000H,000H,0DFH,0FEH DB 000H,000H,000H,000H,000H,00EH,008H,000H,000H,080H,000H,000H,000H,000H,000H,000H DB 001H,000H,000H,080H,000H,000H,000H,000H,000H,000H,000H,000H,07FH,0F8H,000H,000H DB 000H,000H,000H,03CH,010H,000H,000H,080H,000H,000H,000H,000H,000H,000H,006H,000H DB 000H,080H,000H,000H,000H,000H,000H,000H,000H,000H,07FH,0F8H,000H,000H,000H,000H DB 000H,010H,018H,000H,001H,000H,000H,000H,000H,000H,000H,000H,006H,000H,000H,080H DB 000H,000H,000H,000H,000H,000H,000H,000H,0FFH,0F0H,000H,000H,000H,000H,000H,000H DB 017H,000H,001H,000H,000H,000H,000H,000H,000H,000H,003H,080H,000H,080H,000H,000H DB 000H,000H,000H,000H,000H,000H,0FFH,0C0H,000H,000H,000H,000H,000H,000H,030H,0C0H DB 001H,000H,000H,000H,000H,000H,000H,000H,002H,070H,000H,080H,000H,000H,000H,000H DB 000H,000H,000H,000H,0FFH,000H,000H,000H,000H,000H,000H,000H,040H,030H,001H,000H DB 000H,000H,000H,000H,000H,000H,00CH,01CH,000H,080H,000H,000H,000H,000H,000H,000H DB 000H,001H,0F8H,000H,000H,000H,000H,000H,000H,000H,080H,007H,0FEH,000H,000H,000H DB 000H,000H,000H,000H,018H,003H,001H,080H,000H,000H,000H,000H,000H,000H,000H,001H DB 0F0H,000H,000H,000H,000H,000H,000H,030H,0C0H,000H,001H,080H,000H,000H,000H,000H DB 000H,000H,060H,000H,0C1H,060H,000H,000H,000H,000H,000H,000H,000H,001H,0E0H,000H DB 000H,000H,000H,000H,000H,078H,0C0H,000H,000H,0C0H,000H,000H,000H,000H,000H,000H DB 060H,000H,039H,030H,000H,000H,000H,000H,000H,000H,000H,001H,0C0H,000H,000H,000H DB 000H,000H,001H,0CFH,0E0H,000H,000H,020H,000H,000H,000H,000H,000H,001H,0B0H,000H DB 00FH,04EH,000H,000H,000H,000H,000H,000H,000H,001H,0C0H,000H,000H,000H,000H,000H DB 001H,0C7H,0F0H,000H,000H,010H,000H,000H,000H,000H,000H,002H,018H,000H,000H,041H DB 000H,080H,000H,000H,000H,000H,000H,001H,080H,000H,000H,000H,000H,000H,001H,083H DB 0F8H,000H,000H,008H,000H,000H,000H,000H,000H,00CH,074H,00EH,000H,0BCH,0C1H,080H DB 000H,000H,000H,000H,000H,001H,080H,000H,000H,000H,000H,000H,001H,000H,004H,03CH DB 000H,018H,000H,000H,000H,000H,000H,033H,0C2H,019H,081H,083H,061H,080H,000H,000H DB 000H,000H,000H,001H,080H,000H,000H,000H,000H,000H,000H,000H,005H,083H,080H,03CH DB 008H,000H,000H,000H,00DH,0FCH,001H,020H,061H,000H,0F3H,080H,000H,000H,000H,000H DB 000H,003H,000H,000H,000H,000H,000H,000H,000H,000H,002H,000H,040H,0DEH,00CH,000H DB 000H,000H,00CH,080H,000H,0E0H,01EH,000H,01BH,000H,000H,000H,000H,000H,000H,001H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,031H,006H,01CH,000H,000H,000H DB 00CH,000H,000H,000H,004H,000H,007H,000H,000H,000H,000H,000H,000H,001H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,00EH,003H,098H,000H,000H,000H,01CH,000H DB 000H,000H,000H,000H,002H,000H,000H,000H,000H,000H,000H,0EFH,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,0F0H,000H,000H,000H,01CH,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,001H,0FFH,080H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,060H,000H,000H,000H,00CH,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,001H,0F8H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,020H,000H,000H,000H,004H,000H,000H,000H,000H,000H,000H,000H END