;**********************************
;       WG12864J
;**********************************
RS              REG     P3.0
E               REG     P3.4
R_W             REG     P3.7
STP             REG     P2.0
S_S             REG     P2.1
BCD             EQU     01H
CHAR_ADD        EQU     7FH
DPTRH           EQU     01H
DPTRL           EQU     00H
DT1             EQU     02H
DT2             EQU     03H
DT3             EQU     04H

;**********************************
                ORG     0H
                JMP     START

START:

INITIAL:
                CLR     E
                MOV     A,#00111000B            
                CALL    WCOM       

                MOV     A,#00001100B            ;Display ON/OFF = 00001DCB
                CALL    WCOM                    ;Display ON,Cursor&Blink OFF

                MOV     A,#00000110B            ;Entry Mode Set = 000001IS
                CALL    WCOM                    ;Increment & Shift OFF

                MOV     A,#00000010B            ;Return Home
                CALL    WCOM 

                MOV     A,#00000001B            ;Clear Display
                CALL    WCOM                    ;Write 20H to DDRAM

;******************************************************
SHOW:
                MOV     R6,#00H
                CALL    F_C

                MOV     DPTR,#G1
                CALL    GSHOW
;               CALL    STP_SC

                MOV     R6,#00H
                CALL    F_C
                
                MOV     DPTR,#G2
                CALL    GSHOW
;               CALL    STP_SC
                
                MOV     R6,#00H
                CALL    F_C

                CALL    CSHOW
;               CALL    STP_SC
                
                MOV     A,#01H
                CALL    WCOM
                
                JMP     SHOW   
;******************************************************
CSHOW:
                CLR     E
                MOV     A,#00111000B
                CALL    WCOM
                
                MOV     A,#10000000B	;LINE1 00H
                CALL    WCOM
                MOV     DPTR,#S1
                MOV     R1,#64		;1 WORD = 2
CLOOP1:
                MOV     A,#00H
                MOVC    A,@A+DPTR
                CALL    WDATA
                INC     DPTR                
                DJNZ    R1,CLOOP1
                
                LCALL   DELAY
;               CALL    STP_SC
                RET

;******************************************************
GSHOW:
                MOV     A,#00111110B
                CALL    WCOM  
                        
                MOV     R5,#02H
                MOV     R4,#00H
                MOV     R2,#0
GLOOP1:
                MOV     A,#80H
                ADD     A,R2
                CALL    WCOM
                MOV     A,#80H
                CALL    WCOM
GLOOP2:         MOV     R3,#16
GLOOP3:
                MOV     A,#00H
                MOVC    A,@A+DPTR
                CALL    WDATA
                INC     DPTR
                DJNZ    R3,GLOOP3
                CALL    DPTRADJ
                DJNZ    R5,GLOOP2
                MOV     R5,#02H
                INC     R2
                CJNE    R2,#32,GLOOP1
                
                LCALL   DELAY
;               CALL    STP_SC
                RET
;*******************************************************                
DPTRADJ:
                CLR     C
                CJNE    R4,#00H,SUBER
ADDER:          
                MOV     DPTRH,DPH
                MOV     DPTRL,DPL
                
                MOV     A,DPL
                ADD     A,#240
                JC      CARRY
ALOOP:          MOV     DPL,A
                
                INC     DPH
                INC     R4
                RET
SUBER:
                MOV     DPH,DPTRH
                MOV     DPL,DPTRL
                DEC     R4
                RET
CARRY:                
                INC     DPH
                JMP     ALOOP
;********************************************************                
F_C:
                MOV     A,#00111110B            
                CALL    WCOM
                
                MOV     R2,#0
FLOOP1:
                MOV     A,#80H
                ADD     A,R2
                CALL    WCOM
                MOV     A,#80H
                CALL    WCOM
                MOV     R3,#32
FLOOP2:
                MOV     A,R6
                CALL    WDATA
                DJNZ    R3,FLOOP2
                INC     R2
                CJNE    R2,#32,FLOOP1
                RET
;*******************************************************                
CHK_BUSY:
                MOV     P1,#0FFH                ;SET PORT1=INPUT
                CLR     RS                      ;SET IR  MODE RS=0
                SETB    R_W                     ;SET READ MODE R/W=1
                SETB    E                       ;ENABLE LCM
                MOV     C,P1.7                  ;CHECK BUSY FLAGE(BIT7)
                CLR     E
                JC      CHK_BUSY
                RET
;******************************************************                
WCOM:
                CALL    CHK_BUSY
                CLR     RS
                CLR     R_W
                SETB    E
                MOV     P1,A
                CLR     E
                RET
;*******************************************************
WDATA:
                CALL    CHK_BUSY
                SETB    RS
                CLR     R_W
                SETB    E
                MOV     P1,A
                CLR     E
                RET
;**********************************************************
DELAY:
                MOV     DT1,R1
                MOV     DT2,R2
                MOV     DT3,R3
                MOV     R1,#0BH
D1:             MOV     R2,#0FFH
D2:             MOV     R3,#0FFH
D3:             DJNZ    R3,D3
                DJNZ    R2,D2
                DJNZ    R1,D1
                MOV     R3,DT3
                MOV     R2,DT2
                MOV     R1,DT1
                RET
;******************************************************************************
;   procedure of step by step   and  scan
;******************************************************************************
STP_SC
                MOV        C,S_S
                JC         STEP
                RET

STEP:
                MOV        C,STP
                MOV        R5,#0FH
LOPE:
                MOV        R6,#0FFH
LOPH:
                DJNZ       R6,LOPH
                DJNZ       R5,LOPE
                JNB        S_S,LOUT
                JNC        STEP
LOUT:
                RET
;**********************************************************

S1:        DB      0C2H,0F1H,0CCH,022H,0CCH,033H,0CCH,044H,0CCH,055H,0C2H,0F1H,0C2H,0F1H,0CCH,022H
           DB      0C2H,0F1H,0CCH,022H,0CCH,033H,0CCH,044H,0CCH,022H,0C2H,0F1H,0CCH,022H,0CCH,033H
           DB      0C2H,0F1H,0CCH,022H,0CCH,033H,0CCH,044H,0CCH,055H,0C2H,0F1H,0CCH,022H,0CCH,033H
           DB      0CCH,055H,0C2H,0F1H,0C2H,0F1H,0CCH,022H,0CCH,022H,0C2H,0F1H,0CCH,022H,0CCH,033H
        
G1:
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0F8H,000H,01FH,0FCH,000H
      DB    00FH,0FFH,000H,003H,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0E7H,0FFH,0E7H,0F3H,0FFH
      DB    0F3H,0FCH,0FFH,0FCH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0ECH,000H,003H,0F6H,000H
      DB    001H,0FDH,080H,000H,07FH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0F4H,000H,003H,0FAH,000H
      DB    001H,0FEH,080H,000H,07FH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0F6H,000H,001H,0FBH,000H
      DB    000H,0FEH,0C0H,000H,03FH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FAH,000H,001H,0FDH,000H
      DB    000H,0FFH,040H,000H,03FH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FBH,000H,000H,0FDH,080H
      DB    000H,07FH,060H,000H,01FH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FDH,000H,000H,0FEH,080H
      DB    000H,07FH,0A0H,000H,01FH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FDH,080H,000H,07EH,0C0H
      DB    000H,03FH,0B0H,000H,00FH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FEH,080H,000H,07FH,040H
      DB    000H,03FH,0D0H,000H,00FH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FEH,000H,000H,07FH,000H
      DB    000H,03FH,0C0H,000H,00FH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,000H,000H,0FEH,080H
      DB    000H,07FH,0A0H,000H,01FH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FCH,07FH
      DB    0FFH,0FFH,01FH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0F9H,0FFH
      DB    0FFH,0FEH,07FH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0E0H,000H,07FH,0FCH
      DB    000H,00FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,09FH,0FFH,09FH,0F3H
      DB    0FFH,0F3H,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0B0H,000H,00FH,0F6H
      DB    000H,001H,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0D0H,000H,00FH,0FAH
      DB    000H,001H,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0D8H,000H,007H,0FBH
      DB    000H,000H,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0E8H,000H,007H,0FDH
      DB    000H,000H,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0ECH,000H,003H,0FDH
      DB    080H,000H,07FH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0F4H,000H,003H,0FEH
      DB    080H,000H,07FH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0F6H,000H,001H,0FEH
      DB    0C0H,000H,03FH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FAH,000H,001H,0FFH
      DB    040H,000H,03FH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0F8H,000H,001H,0FFH
      DB    000H,000H,03FH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,087H,08FH,00FH,00FH,083H,087H
      DB    0E0H,000H,000H,03EH,00FH,0E0H,00FH,0FEH
      DB    07FH,0FFH,087H,08FH,00FH,00FH,083H,087H
      DB    080H,000H,000H,03EH,00FH,0E0H,007H,0FEH
      DB    07FH,0FFH,0C3H,006H,01FH,00FH,081H,087H
      DB    000H,000H,000H,03CH,007H,0E0H,003H,0FEH
      DB    07FH,0FFH,0C3H,006H,01FH,00FH,081H,087H
      DB    00FH,0FFH,0C3H,0FCH,007H,0E1H,0C3H,0FEH
      DB    07FH,0FFH,0C3H,006H,01FH,00FH,080H,087H
      DB    00FH,0FFH,0C3H,0FCH,007H,0E1H,0C3H,0FEH
      DB    07FH,0FFH,0C3H,026H,01FH,00FH,080H,087H
      DB    000H,0FFH,0C3H,0F8H,043H,0E1H,0C3H,0FEH
      DB    07FH,0FFH,0E3H,024H,03FH,00FH,084H,087H
      DB    080H,03FH,0C3H,0F8H,043H,0E0H,007H,0FEH
      DB    07FH,0FFH,0E1H,024H,03FH,00FH,084H,007H
      DB    0C0H,01FH,0C3H,0F0H,041H,0E0H,00FH,0FEH
      DB    07FH,0FFH,0E0H,020H,03FH,00FH,086H,007H
      DB    0F8H,00FH,0C3H,0F0H,0E1H,0E0H,00FH,0FEH
      DB    07FH,0FFH,0E0H,020H,03FH,00FH,086H,007H
      DB    0FFH,00FH,0C3H,0F0H,001H,0E1H,007H,0FEH
      DB    07FH,0FFH,0F0H,060H,07FH,00FH,086H,007H
      DB    03FH,00FH,0C3H,0E0H,000H,0E1H,007H,0FEH
      DB    07FH,0FFH,0F0H,070H,07FH,00FH,087H,007H
      DB    000H,01FH,0C3H,0E0H,000H,0E1H,083H,0FEH
      DB    07FH,0FFH,0F0H,070H,07FH,00FH,087H,007H
      DB    000H,01FH,0C3H,0E1H,0F0H,0E1H,0C1H,0FEH
      DB    07FH,0FFH,0F0H,070H,07FH,00FH,087H,087H
      DB    080H,07FH,0C3H,0C3H,0F8H,061H,0E0H,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    07FH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000h
G2:
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,089H,080H,002H,000H,00CH
      DB    000H,002H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,04DH,000H,082H,000H,008H
      DB    000H,032H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,0D1H,000H,05CH,020H,009H
      DB    081H,0C7H,0C0H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,05DH,0E0H,009H,0E0H,02AH
      DB    001H,044H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,001H,0FAH,020H,0C9H,020H,008H
      DB    001H,07BH,0C0H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,0D5H,0C1H,0C9H,020H,009H
      DB    0C1H,092H,040H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,071H,000H,08FH,0E0H,0F6H
      DB    001H,023H,0C0H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,0F1H,000H,099H,040H,014H
      DB    001H,0C0H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,001H,0B9H,080H,041H,000H,024H
      DB    001H,04EH,0F0H,000H,000H,000H,000H,000H
      DB    000H,000H,002H,0E9H,080H,0C1H,000H,024H
      DB    011H,04AH,0A0H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,0B2H,041H,039H,000H,044H
      DB    011H,0FAH,0E0H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,0FCH,030H,007H,0F0H,082H
      DB    030H,004H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,080H,000H,000H,0C0H,001H
      DB    0E0H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,001H,000H,004H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,021H,000H,004H
      DB    000H,00CH,000H,03EH,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,0BEH,080H,007H
      DB    080H,008H,000H,008H,040H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,062H,001H,08CH
      DB    000H,009H,080H,0FFH,0E0H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,01FH,080H,085H
      DB    0C0H,02AH,001H,0A9H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,025H,080H,03BH
      DB    000H,008H,001H,00AH,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,029H,0C0H,009H
      DB    000H,009H,0C0H,079H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,0E9H,000H,095H
      DB    0C0H,0F6H,000H,007H,080H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,02AH,060H,087H
      DB    000H,014H,000H,079H,080H,000H,000H,000H
      DB    000H,000H,000H,000H,001H,0FDH,081H,0A9H
      DB    000H,024H,000H,03FH,080H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,008H,003H,01AH
      DB    000H,024H,010H,029H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,07FH,001H,026H
      DB    000H,044H,010H,03FH,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,008H,000H,00BH
      DB    080H,082H,030H,008H,020H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,008H,000H,031H
      DB    0F0H,001H,0E0H,007H,0E0H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,004H,000H,002H,000H,000H,000H,000H
      DB    000H,081H,0E1H,0E1H,0E0H,020H,060H,000H
      DB    000H,002H,000H,041H,000H,000H,000H,000H
      DB    000H,082H,012H,031H,020H,060H,060H,018H
      DB    000H,01FH,080H,047H,0C0H,018H,000H,000H
      DB    000H,082H,012H,012H,020H,0A0H,060H,00BH
      DB    0C0H,0C4H,0E1H,0F2H,080H,008H,000H,000H
      DB    000H,083H,013H,032H,000H,0A0H,060H,0FCH
      DB    041H,07FH,080H,047H,0F0H,00FH,0C0H,000H
      DB    000H,080H,021H,0A2H,0E1H,020H,060H,08CH
      DB    040H,087H,080H,0F8H,0C0H,0F2H,000H,000H
      DB    000H,080H,060H,0C3H,031H,020H,060H,094H
      DB    041H,00CH,001H,077H,040H,002H,000H,000H
      DB    000H,080H,043H,022H,012H,020H,060H,096H
      DB    041H,0CFH,001H,097H,080H,022H,000H,000H
      DB    000H,080H,082H,032H,012H,020H,060H,0E3H
      DB    0C0H,044H,0C1H,0E1H,000H,014H,000H,000H
      DB    000H,081H,002H,012H,013H,0F0H,040H,080H
      DB    043H,05FH,000H,047H,0C0H,00CH,000H,000H
      DB    000H,082H,012H,013H,010H,020H,040H,080H
      DB    040H,0C4H,003H,0E5H,000H,01EH,000H,000H
      DB    000H,083H,0F3H,031H,020H,022H,041H,080H
      DB    041H,03CH,000H,047H,0E0H,033H,080H,000H
      DB    001H,0E3H,0F0H,0C0H,0C0H,0F1H,080H,000H
      DB    0C2H,007H,0C0H,041H,001H,0C1H,0E0H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,001H,0E0H,041H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,001H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000H
      DB    000H,000H,000H,000H,000H,000H,000H,000h

                END
