;CONTROLLER: NO (ST7528) ;SIDE: 128 X 128 DOTS ;PARALLER 8080 PS2=L PS1=L PS0=H ;MPU: AT89C52 ;DATE: 2008.10.13 ;------------------------------------------------------------- CS1 EQU P3.0 ;CHIP SELECT RST EQU P3.1 ;DB7 A0 EQU P3.2 ;REGISTER SELECT RW EQU P3.3 ;READ/RWITE E EQU P3.4 ;EXECUTION CMD EQU 30H DAT EQU 32H ;------------------------------------------------------------- ORG 0000H ; RESET VECTOR LJMP MAIN ; ORG 0030H MAIN: MOV R6,#01H CALL DELAY CALL INIT MOV R6,#05H CALL DELAY MOV DAT,#0FH CALL FILL MOV R6,#08H CALL DELAY MOV DAT,#00H CALL FILL CALL SHOW_128_128 SJMP $ INIT: CLR RST MOV R6,#01H CALL DELAY SETB RST MOV R6,#01H CALL DELAY MOV CMD, #0A2H ;ICON OFF CALL WC MOV CMD, #0AEH ;DISPLAY OFF CALL WC MOV CMD, #48H ;DUTY CALL WC MOV CMD, #80H CALL WC MOV CMD, #0A0H ;ADC CALL WC MOV CMD, #0C8H ;SHL CALL WC MOV CMD, #40H ;SET START LINE CALL WC MOV CMD, #00H CALL WC MOV CMD, #0ABH ;OSC ON CALL WC MOV CMD, #27H ;REGULATOR RESISTOR CALL WC MOV CMD, #81H ;EV CALL WC MOV CMD, #2AH CALL WC MOV CMD, #57H ;LCD BIAS CALL WC MOV CMD, #64H ;DC-DC SETUP-UP 3X CALL WC MOV R6,#04H CALL DELAY MOV CMD, #2CH ;POWER CONTROL CALL WC MOV R6,#01H CALL DELAY MOV CMD, #67H ;DC-DC SETUP-UP 6X CALL WC MOV R6,#04H CALL DELAY MOV CMD, #2EH ;POWER CONTROL CALL WC MOV R6,#01H CALL DELAY MOV CMD, #2FH ;POWER CONTROL CALL WC MOV R6,#01H CALL DELAY MOV CMD, #092H ;FRC AND PWM CALL WC MOV CMD, #038H CALL WC MOV CMD, #075H CALL WC MOV CMD, #97H ;3FRC,45PWM CALL WC MOV DPTR, #color_tab1 MOV R4, #80H GRAY_LP: MOV CMD, R4 CALL WC ;SET ADDRESS CLR A MOVC A,@A+DPTR MOV CMD, A CALL WC ;SET DATA INC DPTR INC R4 CJNE R4, #0C0H, GRAY_LP MOV CMD, #038H CALL WC MOV CMD, #074H CALL WC MOV CMD, #0AFH ;DISPLAY ON CALL WC MOV CMD, #0A2H CALL WC RET ;---------------------------------------------------------- color_tab1: DB 00,00,00,00 ; 0 DB 06,06,06,06 ; 1 6 DB 11,11,11,11 ; 2 5 DB 16,16,16,16 ; 3 5 DB 21,21,21,21 ; 4 5 DB 26,26,26,26 ; 5 5 DB 31,31,31,31 ; 6 4 DB 35,35,35,35 ; 7 4 DB 39,39,39,39 ; 8 4 DB 43,43,43,43 ; 9 4 DB 47,47,47,47 ;10 3 DB 50,50,50,50 ;11 3 DB 53,53,53,53 ;12 3 DB 56,56,56,56 ;13 2 DB 58,58,58,58 ;14 2 DB 60,60,60,60 ;15 ;---------------------------------------------------------- DELAY: MOV R5,#0H DELAY0: MOV R7,#0H DELAY1: DJNZ R7,DELAY1 DJNZ R5,DELAY0 DJNZ R6,DELAY RET ;----------------------------------------------------------- WC: ;SEND OUT INSTRUCTION CLR A0 ; COMMAND DATA CLR CS1 SETB E ; E=1 CLR RW MOV P1,CMD SETB RW ; RW=1 SETB CS1 ; DISABLE CHIP NOP NOP RET WD: ;SEND OUT DATA SETB A0 ; DISPLAY DATA CLR CS1 SETB E ; E=1 CLR RW MOV P1,DAT SETB RW ; RW=1 SETB CS1 ; DISABLE CHIP NOP NOP RET ;------------------------------------------------------------ FILL: MOV R2, #0B0H ;PAGE FILL_1: MOV CMD, R2 CALL WC MOV CMD, #10H ;SET COLUMM CALL WC MOV CMD, #00H CALL WC MOV R1,#128 FILL_2: CALL WD CALL WD CALL WD CALL WD DJNZ R1,FILL_2 INC R2 CJNE R2, #0C0H,FILL_1 RET ;----------------------------------------------------------- SHOW_128_128: MOV DPTR,#TAB MOV R2,#0B0H ;PAGE DC33: MOV CMD,R2 CALL WC MOV CMD,#10H ;SET COLUMM CALL WC MOV CMD,#00H CALL WC MOV R1,#128 DC32: MOV A,#00H MOVC A,@A+DPTR MOV DAT,A LCALL WD LCALL WD LCALL WD LCALL WD INC DPTR DJNZ R1,DC32 INC R2 CJNE R2,#0B8H,DC33 MOV DPTR,#TAB MOV R2,#0B9H DC31: MOV CMD,R2 CALL WC MOV CMD,#10H ;SET COLUMM CALL WC MOV CMD,#00H CALL WC MOV R1,#128 DC30: MOV A,#00H MOVC A,@A+DPTR MOV DAT,A LCALL WD LCALL WD LCALL WD LCALL WD INC DPTR DJNZ R1,DC30 INC R2 CJNE R2,#0C0H,DC31 RET TAB: /*-- 调入了一幅图像：D:\测试图片\focus12864.bmp --*/ /*-- 宽度x高度=128x64 --*/ /*-- 调入了一幅图像：D:\测试图片\focus12864DB bmp --*/ /*-- 宽度高度=12864 --*/ DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,0F8H,048H,048H,048H,008H,000H DB 0C0H,020H,020H,020H,0C0H,000H,0C0H,020H,020H,020H,000H,0E0H,000H,000H,000H,0E0H DB 000H,040H,0A0H,0A0H,020H,000H,0F8H,000H,000H,000H,000H,000H,0F0H,008H,008H,008H DB 008H,010H,000H,0F8H,008H,008H,008H,008H,0F0H,000H,040H,0A0H,0A0H,020H,000H,000H DB 000H,000H,0C0H,020H,020H,020H,000H,0C0H,020H,020H,020H,0C0H,000H,0E0H,020H,020H DB 0C0H,020H,020H,0C0H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,003H,000H,000H,000H,000H,000H DB 001H,002H,002H,002H,001H,000H,001H,002H,002H,002H,000H,001H,002H,002H,002H,003H DB 000H,002H,002H,002H,001H,000H,003H,002H,002H,002H,002H,000H,001H,002H,002H,002H DB 002H,001H,000H,003H,002H,002H,002H,002H,001H,000H,002H,002H,002H,001H,000H,000H DB 002H,000H,001H,002H,002H,002H,000H,001H,002H,002H,002H,001H,000H,003H,000H,000H DB 003H,000H,000H,003H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,0C0H,020H,020H,020H,020H,040H DB 000H,080H,000H,000H,000H,080H,000H,000H,080H,080H,080H,000H,0C0H,080H,000H,000H DB 080H,080H,080H,000H,000H,080H,080H,080H,000H,080H,080H,000H,000H,000H,000H,000H DB 0E0H,000H,000H,000H,000H,000H,0C0H,020H,020H,020H,020H,040H,000H,0E0H,020H,020H DB 020H,020H,0C0H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,007H,008H,008H,008H,008H,004H DB 000H,007H,008H,008H,008H,00FH,000H,009H,00AH,00AH,004H,000H,007H,008H,000H,007H DB 008H,008H,008H,007H,000H,00FH,000H,000H,00FH,000H,000H,00FH,000H,000H,000H,000H DB 00FH,008H,008H,008H,008H,000H,007H,008H,008H,008H,008H,004H,000H,00FH,008H,008H DB 008H,008H,007H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,080H,080H,080H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,080H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,080H,000H,000H,000H,000H,080H,080H,080H,080H,080H,000H,000H,000H DB 080H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,080H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,013H,024H,024H,024H,019H,000H DB 000H,01FH,022H,000H,010H,02AH,02AH,02AH,03CH,000H,03EH,002H,002H,002H,03CH,000H DB 01CH,022H,022H,022H,03FH,000H,010H,02AH,02AH,02AH,03CH,000H,03EH,002H,000H,01CH DB 022H,022H,022H,03FH,000H,000H,000H,000H,03FH,020H,020H,020H,020H,01FH,000H,000H DB 03EH,000H,024H,02AH,02AH,012H,000H,07EH,022H,022H,022H,01CH,000H,03FH,000H,010H DB 02AH,02AH,02AH,03CH,040H,04EH,030H,010H,00EH,000H,024H,02AH,02AH,012H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H END