hgs12864z80.asm

HGS12864Z is OLED Display Screen for Instrument display application.

        MOV     DAT,GRAYH2
        LCALL   W_D
        NOP
        NOP
        MOV     DAT,GRAYH1
        LCALL   W_D
        NOP
        NOP
        MOV     DAT,GRAYH0
        LCALL   W_D
        NOP
        RET

;******************16*16汉字写入子程序**************************
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; 汉字写入子程序(16*16点阵字库）CHTAB
;  占用内部资源：O_XL,O_YL,COD,COUNT1,A,B,DPTR
;  连接字库：      CHTAB
;  程序调用入口：  CC8PR
;  程序输入变量：  O_XL(水平位置/2),O_YL(垂直位置),COD
;  汉字写入子程序如下:
CC16PR: MOV   A, O_XL
        MOV   DAT1,A       ;起始地址放入中间寄存器
        ADD   A,#7         ;计算结束地址
        MOV   DAT2,A       ;结束地址放入中间寄存器
        MOV   COM,#015H   ;设置列地址
        LCALL W_C
        MOV   COM,DAT1
        LCALL W_C
        MOV   COM,DAT2
        LCALL W_C

        MOV   A, O_YL
        ADD   A,#00CH     ;计算起始行地址
        MOV   DAT1,A
        ADD   A,#15
        MOV   DAT2,A
        MOV   COM,#075H   ;设置行地址
        LCALL W_C
        MOV   COM,DAT1
        LCALL W_C
        MOV   COM,DAT2
        LCALL W_C


        MOV     COUNT1,#00H   ; 计数器=0
        MOV     DPTR,#CCTAB16 ; 设置汉字字库指针
        MOV     A,COD        ; 取汉字代码
        MOV     B,#32        ; 计算字模数据首地址72
        MUL     AB
        ADD     A,DPL
        MOV     DPL,A
        MOV     A,B
        ADDC    A,DPH
        MOV     DPH,A

CC16PR1:MOV     A,COUNT1
        MOVC    A,@A+DPTR
        LCALL   GRAY
        INC     COUNT1
        MOV     A,COUNT1
        CJNE    A,#32,CC16PR1
        RET

;******************8*8汉字写入子程序**************************
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; 西文字符写入子程序(8*8点阵字库）CC24PR
;  占用内部资源：O_XL,O_YL,COD,COUNT1,A,B,DPTR
;  连接字库：      CCTAB24
;  程序调用入口：  CC16PR
;  程序输入变量：  O_XL(水平位置/2),O_YL(垂直位置),COD
;  汉字写入子程序如下:
CC8PR: MOV   A, O_XL
        MOV   DAT1,A       ;起始地址放入中间寄存器
        ADD   A,#3         ;计算结束地址
        MOV   DAT2,A       ;结束地址放入中间寄存器
        MOV   COM,#015H   ;设置列地址
        LCALL W_C
        MOV   COM,DAT1
        LCALL W_C
        MOV   COM,DAT2
        LCALL W_C

        MOV   A, O_YL
        ADD   A,#00CH     ;计算起始行地址
        MOV   DAT1,A
        ADD   A,#7
        MOV   DAT2,A
        MOV   COM,#075H   ;设置行地址
        LCALL W_C
        MOV   COM,DAT1
        LCALL W_C
        MOV   COM,DAT2
        LCALL W_C


        MOV     COUNT1,#00H   ; 计数器=0
        MOV     DPTR,#CHTAB ; 设置汉字字库指针
        MOV     A,COD        ; 取汉字代码
        MOV     B,#8        ; 计算字模数据首地址72
        MUL     AB
        ADD     A,DPL
        MOV     DPL,A
        MOV     A,B
        ADDC    A,DPH
        MOV     DPH,A

CC8PR1:MOV     A,COUNT1
        MOVC    A,@A+DPTR
        LCALL   GRAY
        INC     COUNT1
        MOV     A,COUNT1
        CJNE    A,#8,CC8PR1
        RET

CCTAB190:DB 000H,000H,000H,000H,000H,000H,000H,0FFH,000H,000H,000H,00FH,0FFH,0E0H,000H,000H    ;40*38单色图形
DB 03FH,0FFH,0FCH,000H,000H,07FH,0FFH,0FEH,000H,000H,0FFH,0FFH,0FFH,000H,001H,0FFH
DB 0FFH,081H,080H,003H,081H,0FFH,081H,0C0H,007H,081H,0FFH,081H,0E0H,00FH,081H,0FFH
DB 081H,0F0H,00FH,081H,0FFH,081H,0F0H,01FH,081H,0FFH,081H,0F8H,01FH,081H,0FFH,081H
DB 0F8H,03FH,081H,0FFH,081H,0FCH,03FH,081H,0FFH,081H,0FCH,03FH,081H,0FFH,081H,0FCH
DB 03FH,080H,000H,001H,0FCH,07FH,080H,000H,001H,0FEH,07FH,080H,000H,001H,0FEH,07FH
DB 080H,000H,001H,0FEH,07FH,081H,0FFH,081H,0FEH,03FH,081H,0FFH,081H,0FCH,03FH,081H
DB 0FFH,081H,0FCH,03FH,081H,0FFH,081H,0FCH,03FH,081H,0FFH,081H,0FCH,01FH,081H,0FFH
DB 081H,0F8H,01FH,081H,0FFH,081H,0F0H,00FH,081H,0FFH,081H,0F0H,00FH,081H,0FFH,081H
DB 0E0H,007H,081H,0FFH,081H,0E0H,003H,081H,0FFH,081H,0C0H,001H,081H,0FFH,0FFH,080H
DB 000H,0FFH,0FFH,0FFH,000H,000H,07FH,0FFH,0FEH,000H,000H,01FH,0FFH,0F8H,000H,000H
DB 003H,0FFH,0C0H,000H,000H,000H,03CH,000H,000H,000H,000H,000H,000H,000H

CCTAB16:
; 点阵：16x16
; 提取点阵方向：横向（先左->右, 再上->下）
; 字节掉转：否
; 字节方式：汇编
DB 040H,080H,02FH,0F8H,020H,080H,007H,0F0H    ; 清 0
DB 080H,080H,05FH,0FCH,050H,000H,027H,0F0H
DB 024H,010H,0C7H,0F0H,044H,010H,047H,0F0H
DB 044H,010H,044H,030H,000H,000H,000H,000H

DB 040H,080H,030H,080H,010H,080H,000H,088H    ; 达 1
DB 00FH,0FCH,0E0H,080H,020H,080H,021H,040H
DB 021H,020H,022H,010H,024H,008H,050H,000H
DB 08CH,000H,003H,0FCH,000H,000H,000H,000H

DB 002H,000H,002H,000H,022H,010H,012H,020H    ; 光 2
DB 00AH,040H,002H,000H,0FFH,0FCH,004H,080H
DB 004H,080H,004H,080H,008H,080H,010H,084H
DB 020H,084H,0C0H,07CH,000H,000H,000H,000H

DB 002H,000H,002H,000H,002H,010H,03FH,0F8H    ; 电 3
DB 022H,010H,022H,010H,03FH,0F0H,022H,010H
DB 022H,010H,03FH,0F0H,022H,000H,002H,004H
DB 002H,004H,001H,0FCH,000H,000H,000H,000H

DB 000H,008H,07FH,0FCH,044H,008H,047H,0C8H    ; 图 4
DB 04CH,088H,073H,008H,044H,088H,048H,078H
DB 073H,008H,040H,088H,047H,008H,040H,088H
DB 07FH,0F8H,040H,008H,000H,000H,000H,000H

DB 001H,000H,0FFH,088H,012H,010H,012H,020H    ; 形 5
DB 012H,040H,012H,008H,0FFH,090H,012H,020H
DB 012H,0C4H,012H,008H,022H,010H,022H,020H
DB 042H,040H,082H,080H,000H,000H,000H,000H

DB 001H,000H,001H,000H,001H,0F8H,001H,000H    ; 点 6
DB 001H,000H,01FH,0F0H,010H,010H,010H,010H
DB 010H,010H,01FH,0F0H,000H,000H,024H,090H
DB 022H,048H,042H,048H,000H,000H,000H,000H

DB 000H,080H,078H,080H,04BH,0F8H,049H,000H    ; 阵 7
DB 051H,040H,052H,040H,04BH,0F8H,048H,040H
DB 048H,040H,06FH,0FCH,050H,040H,040H,040H
DB 040H,040H,040H,040H,000H,000H,000H,000H

DB 000H,010H,01FH,0F8H,010H,010H,01FH,0F0H    ; 显 8
DB 010H,010H,01FH,0F0H,010H,010H,004H,080H
DB 044H,088H,024H,090H,014H,0A0H,014H,0C0H
DB 004H,088H,0FFH,0FCH,000H,000H,000H,000H

DB 000H,010H,03FH,0F8H,000H,000H,000H,000H    ; 示 9
DB 000H,008H,07FH,0FCH,001H,000H,009H,040H
DB 009H,020H,011H,010H,021H,008H,041H,008H
DB 005H,000H,002H,000H,000H,000H,000H,000H

DB 000H,008H,03FH,0FCH,020H,008H,03FH,0F8H    ; 屏 10
DB 024H,020H,022H,040H,02FH,0F8H,022H,040H
DB 022H,040H,03FH,0FCH,022H,040H,042H,040H
DB 044H,040H,098H,040H,000H,000H,000H,000H

DB 040H,008H,02FH,088H,028H,0A8H,00AH,0A8H    ; 测  11
DB 08AH,0A8H,04AH,0A8H,05AH,0A8H,02AH,0A8H
DB 02AH,0A8H,0CAH,0A8H,042H,008H,045H,008H
DB 048H,0A8H,050H,090H,000H,000H,000H,000H

DB 000H,040H,040H,050H,020H,048H,02FH,0FCH    ; 试  12
DB 000H,040H,000H,040H,0E7H,0C0H,021H,020H
DB 021H,020H,021H,020H,021H,014H,029H,0D4H
DB 036H,00CH,020H,004H,000H,000H,000H,000H

DB 008H,000H,07DH,0F8H,011H,008H,011H,008H    ; 程  13
DB 0FDH,0F8H,011H,008H,030H,000H,03BH,0FCH
DB 054H,040H,050H,040H,093H,0F8H,010H,040H
DB 010H,040H,017H,0FCH,000H,000H,000H,000H

DB 002H,000H,001H,008H,03FH,0FCH,020H,000H    ; 序  14
DB 02FH,0F0H,021H,040H,020H,080H,03FH,0FCH
DB 020H,088H,020H,090H,020H,080H,040H,080H
DB 042H,080H,081H,000H,000H,000H,000H,000H
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;======西文字符库==============================================
CHTAB:  DB 000H,000H,000H,000H,000H,000H,000H,000H ;" "代码"0"
	DB 004H,004H,004H,004H,000H,000H,004H,000H ; ! 代码"1"
	DB 00AH,00AH,00AH,00AH,000H,000H,000H,000H ; " 代码"2"
	DB 00AH,00AH,01FH,00AH,01FH,00AH,00AH,000H ; # 代码"3"
	DB 004H,00FH,014H,00EH,005H,01EH,004H,000H ; $ 代码"4"
	DB 018H,019H,002H,004H,008H,013H,003H,000H ; % 代码"5"
	DB 00CH,012H,014H,008H,015H,012H,00DH,000H ; & 代码"6"
	DB 00CH,004H,008H,000H,000H,000H,000H,000H ; ' 代码"7"
	DB 002H,004H,008H,008H,008H,004H,002H,000H ; ( 代码"8"
	DB 008H,004H,002H,002H,002H,004H,008H,000H ; ) 代码"9"
	DB 000H,004H,015H,00EH,015H,004H,000H,000H ; * 代码"A"
	DB 000H,004H,004H,01FH,004H,004H,000H,000H ; + 代码"B"
	DB 000H,000H,000H,000H,00CH,004H,008H,000H ; , 代码"C"
	DB 000H,000H,000H,01FH,000H,000H,000H,000H ; - 代码"D"
	DB 000H,000H,000H,000H,000H,00CH,00CH,000H ; . 代码"E"
	DB 000H,001H,002H,004H,008H,010H,000H,000H ; / 代码"F"
	DB 00EH,011H,013H,015H,019H,011H,00EH,000H ; 0 代码"10"
	DB 004H,00CH,004H,004H,004H,004H,00EH,000H ; 1 代码"11"
	DB 00EH,011H,001H,002H,004H,008H,01FH,000H ; 2 代码"12"
	DB 01FH,002H,004H,002H,001H,011H,00EH,000H ; 3 代码"13"
	DB 002H,006H,00AH,012H,01FH,002H,002H,000H ; 4 代码"14"
	DB 01FH,010H,01EH,001H,001H,011H,00EH,000H ; 5 代码"15"
	DB 006H,008H,010H,01EH,011H,011H,00EH,000H ; 6 代码"16"
	DB 01FH,001H,002H,004H,004H,004H,004H,000H ; 7 代码"17"
	DB 00EH,011H,011H,00EH,011H,011H,00EH,000H ; 8 代码"18"
	DB 00EH,011H,011H,00EH,001H,002H,00CH,000H ; 9 代码"19"
	DB 000H,00CH,00CH,000H,00CH,00CH,000H,000H ; : 代码"1A"
	DB 000H,00CH,00CH,000H,00CH,004H,008H,000H ; ; 代码"1B"
	DB 002H,004H,008H,010H,008H,004H,002H,000H ; < 代码"1C"
	DB 000H,000H,01FH,000H,01FH,000H,000H,000H ; = 代码"1D"
	DB 008H,004H,002H,001H,002H,004H,008H,000H ; > 代码"1E"
	DB 00EH,011H,001H,002H,004H,000H,004H,000H ; ? 代码"1F"
	DB 00EH,011H,001H,00DH,015H,015H,00EH,000H ; @ 代码"20"
	DB 00EH,011H,011H,011H,01FH,011H,011H,000H ; A 代码"21"
	DB 01EH,009H,009H,00EH,009H,009H,01EH,000H ; B 代码"22"
	DB 00EH,011H,010H,010H,010H,011H,00EH,000H ; C 代码"23"
	DB 01EH,009H,009H,009H,009H,009H,01EH,000H ; D 代码"24"
	DB 01FH,010H,010H,01FH,010H,010H,01FH,000H ; E 代码"25"
	DB 01FH,010H,010H,01EH,010H,010H,010H,000H ; F 代码"26"
	DB 00EH,011H,010H,013H,011H,011H,00FH,000H ; G 代码"27"
	DB 011H,011H,011H,01FH,011H,011H,011H,000H ; H 代码"28"
	DB 00EH,004H,004H,004H,004H,004H,00EH,000H ; I 代码"29"
	DB 007H,002H,002H,002H,002H,012H,00CH,000H ; J 代码"2A"
	DB 011H,012H,014H,018H,014H,012H,011H,000H ; K 代码"2B"
	DB 010H,010H,010H,010H,010H,010H,01FH,000H ; L 代码"2C"
	DB 011H,01BH,015H,011H,011H,011H,011H,000H ; M 代码"2D"
	DB 011H,019H,019H,015H,013H,013H,011H,000H ; N 代码"2E"
	DB 00EH,011H,011H,011H,011H,011H,00EH,000H ; O 代码"2F"
	DB 01EH,011H,011H,01EH,010H,010H,010H,000H ; P 代码"30"
	DB 00EH,011H,011H,011H,015H,012H,00BH,000H ; Q 代码"31"
	DB 01EH,011H,011H,01EH,014H,012H,011H,000H ; R 代码"32"
	DB 00EH,011H,010H,00EH,001H,011H,00EH,000H ; S 代码"33"
	DB 01FH,004H,004H,004H,004H,004H,004H,000H ; T 代码"34"
	DB 011H,011H,011H,011H,011H,011H,00EH,000H ; U 代码"35"
	DB 011H,011H,011H,011H,011H,00AH,004H,000H ; V 代码"36"
	DB 011H,011H,011H,015H,015H,01BH,011H,000H ; W 代码"37"
	DB 011H,011H,00AH,004H,00AH,011H,011H,000H ; X 代码"38"
	DB 011H,011H,011H,00AH,004H,004H,004H,000H ; Y 代码"39"
	DB 01FH,001H,002H,004H,008H,010H,01FH,000H ; Z 代码"3A"
	DB 00EH,008H,008H,008H,008H,008H,00EH,000H ; [ 代码"3B"
	DB 000H,010H,008H,004H,002H,001H,000H,000H ; \ 代码"3C"
	DB 00EH,002H,002H,002H,002H,002H,00EH,000H ; ] 代码"3D"
	DB 004H,00AH,011H,000H,000H,000H,000H,000H ; ^ 代码"3E"
	DB 000H,000H,000H,000H,000H,000H,01FH,000H ; _ 代码"3F"
	DB 010H,008H,004H,000H,000H,000H,000H,000H ; ` 代码"40"
	DB 000H,000H,00EH,001H,00FH,011H,00FH,000H ; a 代码"41"
	DB 010H,010H,016H,019H,011H,011H,01EH,000H ; b 代码"42"
	DB 000H,000H,00EH,011H,010H,011H,00EH,000H ; c 代码"43"
	DB 001H,001H,00DH,013H,011H,011H,00FH,000H ; d 代码"44"
	DB 000H,000H,00EH,011H,01FH,010H,00EH,000H ; e 代码"45"
	DB 002H,005H,004H,00EH,004H,004H,004H,000H ; f 代码"46"
	DB 000H,00DH,013H,013H,00DH,001H,00EH,000H ; g 代码"47"
	DB 010H,010H,016H,019H,011H,011H,011H,000H ; h 代码"48"
	DB 004H,000H,00CH,004H,004H,004H,00EH,000H ; i 代码"49"
	DB 002H,000H,006H,002H,002H,012H,00CH,000H ; j 代码"4A"
	DB 008H,008H,009H,00AH,00CH,00AH,009H,000H ; k 代码"4B"
	DB 00CH,004H,004H,004H,004H,004H,00EH,000H ; l 代码"4C"
	DB 000H,000H,01AH,015H,015H,015H,015H,000H ; m 代码"4D"
	DB 000H,000H,016H,019H,011H,011H,011H,000H ; n 代码"4E"
	DB 000H,000H,00EH,011H,011H,011H,00EH,000H ; o 代码"4F"
	DB 000H,016H,019H,019H,016H,010H,010H,000H ; p 代码"50"
	DB 000H,00DH,013H,013H,00DH,001H,001H,000H ; q 代码"51"
	DB 000H,000H,016H,019H,010H,010H,010H,000H ; r 代码"52"
	DB 000H,000H,00FH,010H,01EH,001H,01FH,000H ; s 代码"53"
	DB 008H,008H,01CH,008H,008H,009H,006H,000H ; t 代码"54"
	DB 000H,000H,012H,012H,012H,012H,00DH,000H ; u 代码"55"
	DB 000H,000H,011H,011H,011H,00AH,004H,000H ; v 代码"56"
	DB 000H,000H,011H,011H,015H,015H,00AH,000H ; w 代码"57"