;******************************************************************************
;               KS0713
;******************************************************************************
;                .SYMBOLS
;******************************************************************************
;          DEFINE  OUTPUT PORORT
;******************************************************************************
RS              BIT     P3.0
R_W             BIT     P3.7
E               BIT     P3.4
CS1             BIT     P3.1
CS2             BIT     P3.6
RST             BIT     P3.2
C86             BIT     P3.5

STP             BIT     P2.0
S_S             BIT     P2.1

BCD             BIT     30H
;******************************************************************************
;
                ORG     00H
                JMP    START
;
                ORG     0030H
START:                                          ;program reset start here
                MOV     R6,#0FFH
LOOP1:
                MOV     R7,#0FFH
                DJNZ    R7,$
                DJNZ    R6,LOOP1

                SETB    C86
                CLR     CS1
                CLR     CS2

                MOV     A,#0A1H                  ;SET ADC=0
                CALL    WRITE_COMMAND1           ;S1 to S128
                CALL	WRITE_COMMAND2

                MOV     A,#0C0H                  ;SET SHL=0
                CALL    WRITE_COMMAND1           ;C1 to C64
                CALL	WRITE_COMMAND2


                MOV     A,#0A3H                  ;SET BIAS=1
                CALL    WRITE_COMMAND1           ;1/9 Bias, 1/65 Duty
                CALL	WRITE_COMMAND2


                MOV     A,#2FH                  ;POWER control
                CALL    WRITE_COMMAND1           ;con.,reg.,follower ON
                CALL	WRITE_COMMAND2


                MOV     A,#25H                  ;Ref. R select 00100---
                CALL    WRITE_COMMAND1           ;
                CALL	WRITE_COMMAND2


                MOV     A,#81H                  ;Set Voltage Ref. Mode
                CALL    WRITE_COMMAND1           ;
                CALL	WRITE_COMMAND2


;               MOV     A,#3FH                 ;LEVEL 32 xx------
;               CALL    WRITE_COMMAND           ;

                MOV     A,#40H                  ;Initial Display Line
                CALL    WRITE_COMMAND1           ;01------
                CALL	WRITE_COMMAND2


                MOV     A,#0B0H                  ;Set Page From 0
                CALL    WRITE_COMMAND1
                CALL	WRITE_COMMAND2


                MOV     A,#10H                  ;Set Column Address MSB
                CALL    WRITE_COMMAND1
                CALL	WRITE_COMMAND2


                MOV     A,#0CH                  ;Set Column Address LSB
                CALL    WRITE_COMMAND1
                CALL	WRITE_COMMAND2



                MOV     A,#0AFH                  ;Set Display ON
                CALL    WRITE_COMMAND1
                CALL	WRITE_COMMAND2



                ;MOV     A,#A1H                  ;SET ADC=0
                ;CALL    WRITE_COMMAND           ;S1 to S128

                SETB   CS1
                SETB   CS2
                CALL    CLEAR_S
;******************************************************************************
;               FULL_ON
;******************************************************************************
FULL_ON:


                SJMP    SHOWM
;******************************************************************************
;               SHOW MODEL
;******************************************************************************
SHOWM:
                MOV     R0,#0
                MOV     R1,#0
                MOV     DPTR,#PAGE1
SMLOOP1:
                MOV     A,R1                    ;Command B8H~BFH
                ADD     A,#0B0H                  ;Set Page Address FROM 00H
                CALL    WRITE_COMMAND1
                MOV     A,#10H
                CALL    WRITE_COMMAND1
                MOV     A,#0CH                  ;Set Column Address FROM 40H
                CALL    WRITE_COMMAND1
                MOV     R0,#0                   ;Rest Counter
SMLOOP2:                                        ;Write Data To Chip I
                CLR	A
                MOVC    A,@A+DPTR
                CALL    WRITE_DATA1
                INC     R0
                INC     DPTR
                CJNE    R0,#120,SMLOOP2

;                INC     R1
;                CJNE    R1,#8,SMLOOP1

                MOV     R0,#0
                MOV     R1,#0
SMLOOP3:
                MOV     A,R1                    ;Command B8H~BFH
                ADD     A,#0B0H                  ;Set Page Address FROM 00H
                CALL    WRITE_COMMAND2
                MOV     A,#10H
                CALL    WRITE_COMMAND2
                MOV     A,#0CH                  ;Set Column Address FROM 40H
                CALL    WRITE_COMMAND2
                MOV     R0,#0                   ;Rest Counter
SMLOOP4:                                        ;Write Data To Chip I
                CLR	A
                MOVC    A,@A+DPTR
                CALL    WRITE_DATA2
                INC     R0
                INC     DPTR
                CJNE    R0,#120,SMLOOP4

                INC     R1
                CJNE    R1,#8,SMLOOP1

                LCALL   DELAY
                CALL    STP_SC
		SJMP	$
;******************************************************************************
;               CLEAR SCREEN
;******************************************************************************
CLEAR_S:
                MOV     R0,#0
                MOV     R1,#0
CLLOP1:
                MOV     A,R1                    ;Set Page Address FROM 00H
                ADD     A,#0B0H                  ;Command B8H~BFH
                CALL    WRITE_COMMAND1
                CALL    WRITE_COMMAND2

                MOV     A,#10H                  ;Set Column Address MSB
                LCALL   WRITE_COMMAND1
                CALL    WRITE_COMMAND2
                MOV     A,#0CH                  ;Set Column Address LSB
                CALL    WRITE_COMMAND1
                CALL    WRITE_COMMAND1

                MOV     R0,#0                   ;Rest Counter
CLLOP2:                                         ;Write Data To Chip I
                MOV     A,#00H
                CALL    WRITE_DATA1
                INC     R0
                CJNE    R0,#128,CLLOP2

                INC     R1
                CJNE    R1,#8,CLLOP1

                RET

;******************************************************************************
;               DELAY
;******************************************************************************
DELAY:
                MOV     R4,#10
LOPC:
                MOV     R5,#100
LOPB:
                MOV     R6,#250
LOPA:
                DJNZ    R6,LOPA
                DJNZ    R5,LOPB
                DJNZ    R4,LOPC
                RET
;******************************************************************************
;               DELAY
;******************************************************************************
DELAY1:
                MOV     R4,#5
LOP1:
                MOV     R5,#100
LOP2:
                MOV     R6,#100
LOP3:
                DJNZ    R6,LOP3
                DJNZ    R5,LOP2
                DJNZ    R4,LOP1
                RET
;******************************************************************************
READ_STATUS1:                                 ;READ Command To CS1
                MOV     P1,#0FFH
                CLR     RS
                SETB    R_W
                SETB    E
                CLR     CS1
                NOP
                MOV     A,P1
                NOP
                SETB    CS1
                RET
;******************************************************************************
READ_STATUS2:                                 ;READ Command To CS1
                MOV     P1,#0FFH
                CLR     RS
                SETB    R_W
                SETB    E
                CLR     CS2
                NOP
                MOV     A,P1
                NOP
                SETB    CS1
                RET
;******************************************************************************
;
;CHK_BUSY:
;                CALL    READ_STATUS
;                JB      A.7,CHK_BUSY
;                RET
;
;******************************************************************************
WRITE_COMMAND1:                                  ;Write Command To CS1
		CLR	CS1
		SETB	CS2
                CLR     RS
                CLR     R_W
                MOV     P1,A
                SETB    E
                NOP
                CLR     E
                RET
;******************************************************************************
WRITE_COMMAND2:                                  ;Write Command To CS2
		CLR	CS2
		SETB	CS1
                CLR     RS
                CLR     R_W
                MOV     P1,A
                SETB    E
                NOP
                CLR     E
                RET
;******************************************************************************
WRITE_DATA1:                                     ;Write Data To CS1
		CLR	CS1
		SETB	CS2
                SETB    RS
                CLR     R_W
                MOV     P1,A
                SETB    E
                NOP
                CLR     E
                RET
;******************************************************************************
WRITE_DATA2:                                     ;Write Data To CS2
		CLR	CS2
		SETB	CS1
                SETB    RS
                CLR     R_W
                MOV     P1,A
                SETB    E
                NOP
                CLR     E
                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
;******************************************************************************
;               BCD DELAY TIME SELECT
;******************************************************************************
;CBCD:
;                PUSH    A
;                MOV     A,P0
;                ANL     A,#0FH
;                RL      A
;                RL      A
;                MOV     BCD,A
;                POP     A
;                RET

;******************************************************************************
;*              DISPLAY DATA
;******************************************************************************
PAGE1:
              DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
      DB    0BEH,07EH,0BCH,07EH,0BEH,07EH,0BEH,070H
      DB    0BEH,07EH,0BEH,0FEH,0FCH,0FEH,07EH,07EH
      DB    07EH,0F0H,07EH,07EH,07EH,0FEH,0FCH,0FEH
      DB    0BEH,07EH,0BEH,070H,0BEH,07EH,0BEH,07EH
      DB    0BCH,07EH,0BEH,07EH,0BEH,070H,0BEH,07EH
      DB    0BEH,07EH,0BCH,07EH,0BEH,07EH,0BEH,070H
      DB    0BEH,07EH,0BEH,07EH,0BCH,07EH,0BEH,07EH
      DB    0BEH,070H,0BEH,07EH,0BEH,0FEH,0FCH,0FEH
      DB    07EH,0FEH,07EH,070H,07EH,0FEH,07EH,07EH
      DB    07CH,0FEH,0FEH,0FEH,0BEH,070H,0BEH,07EH
      DB    0BEH,07EH,0BCH,07EH,0BEH,07EH,0BEH,070H
      DB    0BEH,07EH,0BEH,07EH,0BCH,07EH,0BEH,07EH
      DB    0BEH,070H,0BEH,07EH,0BEH,07EH,0BCH,07EH
      DB    0BEH,07EH,0BEH,070H,0BEH,07EH,0BEH,0FEH
      DB    0FCH,0FEH,07EH,0FEH,07EH,070H,07EH,0FEH
      DB    07EH,07EH,07CH,0FEH,0FEH,0FEH,0BEH,070H
      DB    0BEH,07EH,0BEH,07EH,0BCH,07EH,0BEH,07EH
      DB    0BEH,070H,0BEH,07EH,0BEH,07EH,0BCH,07EH
      DB    0BEH,07EH,0BEH,070H,0BEH,07EH,0BEH,07EH
      DB    0B8H,07EH,0BEH,07EH,0BEH,070H,0BEH,0FEH
      DB    0FEH,0FEH,07CH,07EH,07EH,0FEH,07EH,070H
      DB    07EH,0FEH,07EH,07EH,07CH,0FEH,0FEH,0FEH
      DB    0BEH,070H,0BEH,07EH,0BEH,07EH,0BCH,07EH
      DB    0BEH,07EH,0BEH,070H,0BEH,07EH,0BEH,07EH
      DB    0BCH,07EH,0BEH,07EH,0BEH,070H,0BEH,07EH
      DB    0BEH,07EH,0BCH,07EH,0BEH,07EH,0BEH,000H
      DB    000H,0BDH,0FDH,0FDH,0FFH,0FFH,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,07FH,0BFH,07FH,0B4H,075H
      DB    0B1H,07FH,0B0H,077H,0B0H,07FH,0BFH,07FH
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,07FH,0BFH,07FH
      DB    0B0H,07FH,0B0H,077H,0B0H,07FH,0B0H,077H
      DB    0B0H,07FH,0BFH,07FH,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,07FH
      DB    0BFH,07FH,0B0H,07FH,0B4H,075H,0B1H,07FH
      DB    0B0H,077H,0B0H,07FH,0BFH,07FH,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,07FH
      DB    0BFH,07FH,0B1H,075H,0B4H,07FH,0B0H,077H
      DB    0B0H,07FH,0B0H,077H,0B0H,07FH,0BFH,07FH
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,000H
      DB    000H,0F7H,0F7H,0F7H,0FFH,0FFH,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,000H
      DB    000H,0DEH,0DFH,0DFH,0FFH,0FFH,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,000H
      DB    000H,07BH,07FH,07FH,0FFH,0FFH,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,000H
      DB    000H,0EFH,0FFH,0FFH,0FFH,0FFH,0EAH,0F5H
      DB    0EAH,0F5H,0EAH,075H,06AH,075H,0EAH,075H
      DB    06AH,075H,0EAH,0F5H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,000H
      DB    000H,0BDH,0FDH,0FDH,0FFH,0FFH,0BFH,07FH
      DB    0BFH,07FH,0BFH,074H,0B5H,071H,0BFH,070H
      DB    0B7H,070H,0BFH,07FH,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,055H
      DB    0AAH,055H,0AAH,055H,0AAH,055H,0AAH,000H
      DB    000H,077H,077H,077H,07FH,07FH,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,055H
      DB    02AH,055H,02AH,055H,02AH,055H,02AH,000h
        END
