;------------------------------------------------------------------------------
;       LCD CONTROLLER : RAIO RA8802B,IN 8080 TIMING
;------------------------------------------------------------------------------
;
LCD_BUS         REG     P1
STP             REG     P2.0
S_S             REG     P2.1
IC_WR           REG     P3.0    ;
IC_RD           REG     P3.7    ;
CS1             REG     P3.4    ;
;
RS              REG     P3.1    ;
RST             REG     P3.6    ;
LED_CTL         REG     P3.2    ;BCAK LIGHT CONTROL
BUSY            REG     P3.5    ;
INT             REG     P3.3    ;
PB_SW           REG     P2.0
;
;    ----     RAM SECTOR    ----
;
i             EQU     30H
j             EQU     32H
;
C_X           EQU     40H
C_Y           EQU     41H
DATA_READ     EQU     42H
Data_Data     EQU     43H
Cmd_Data      EQU     44H
Cursor        EQU     45H
REG_TMP       EQU     46H
Data          EQU     47H
CHAR          EQU     48H
ADDR_X        EQU     49H
ADDR_Y        EQU     4AH
CONTRAST      EQU     4BH
TEMP          EQU     4CH
FRM	      EQU     4DH	
;
;-----------------------------------------------------------------------------
;
                ORG     0000H             ;
                JMP     MAIN              ;
;                                       ;
                ORG     0003H             ;INT0
                RETI                      ;
;                                       ;
                ORG     000BH             ;TMR0
                RETI                      ;
;                                       ;
                ORG     0013H             ;INT1
                RETI                      ;
;                                         ;
                ORG     001BH             ;TIMER1
                RETI                      ;
;                                         ;
                ORG     0023H             ;UART
                RETI                      ;
;                                         ;
                ORG     002BH             ;TIMER2
                RETI                      ;
;                                       ;
;------------------------------------------------------------------------------
;
                ORG     0030H
MAIN:                                     ;
                MOV     R6,#FFH           ;
 $WAIT_LOOP:                              ;
                MOV     R7,#FFH           ;
 $WAIT_LOOP1:                             ;
                DJNZ    R7,$WAIT_LOOP1    ;
                DJNZ    R6,$WAIT_LOOP     ;
;                                         ;
                MOV     SP,#C0H           ;
                CLR     RS0               ;
                CLR     RS1               ;
;                                         ;
                MOV     P0,#0FFH          ;
                MOV     P1,#0FFH          ;
                MOV     P2,#0FFH          ;
                MOV     P3,#0FFH          ;
;                                         ;
                CALL    LCD_Reset          ;
                CALL    LCD_Initial        ;
                CALL    LCD_Clear          ;
;                                         ;
                MOV     R7,#02H           ;
                LCALL   _DelayXms         ;
;                                         ;
$PLAY_LOOP:
                MOV	FRM,#17H
                MOV     R7,#00H           ;
                LCALL   LCD_CursorX       ;
;                                         ;
                MOV     R7,#00H           ;
                LCALL   LCD_CursorY       ;
;
                MOV     C_X,#00H          ;
                MOV     C_Y,#00H          ;
                MOV     DPTR,#MAP_DEGREE  ;
                CALL    SHOW_MAP          ;
                CALL    LONG_DELAY        ;
                CALL    STP_SC
;                                         ;
;----                                     ;
                MOV     R7,#00H           ;
                LCALL   LCD_CursorX       ;
;                                         ;
                MOV     R7,#00H           ;
                LCALL   LCD_CursorY       ;
                CALL    SHOW_FULL         ;
                CALL    LONG_DELAY        ;
                CALL    STP_SC
;                                         ;
;----
                MOV     R7,#00H           ;
                LCALL   LCD_CursorX       ;
;                                         ;
                MOV     R7,#00H           ;
                LCALL   LCD_CursorY       ;
                CALL    SHOW_VERTICAL     ;
                CALL    LONG_DELAY        ;
                CALL    STP_SC
;                                         ;
;----
                MOV     R7,#00H           ;
                LCALL   LCD_CursorX       ;
;                                         ;
                MOV     R7,#00H           ;
                LCALL   LCD_CursorY       ;
                CALL    SHOW_HORIZONTAL   ;
                CALL    LONG_DELAY        ;
                CALL    STP_SC
;---
                MOV     R7,#00H           ;
                LCALL   LCD_CursorX       ;
;                                         ;
                MOV     R7,#00H           ;
                LCALL   LCD_CursorY       ;
                CALL    SHOW_CROSS        ;
                CALL    LONG_DELAY        ;
                CALL    STP_SC
;---
                MOV     R7,#00H           ;
                LCALL   LCD_CursorX       ;
;                                         ;
                MOV     R7,#00H           ;
                LCALL   LCD_CursorY       ;
                CALL    SHOW_TEXT         ;
                CALL    LONG_DELAY        ;
                CALL    STP_SC
                
                CALL	CLEAR_SCREEN
                
                CALL    TEXT_ON
                MOV     R7,#05H           ;
                LCALL   LCD_CursorX       ;
;                                         ;
                MOV     R7,#000H          ;
                LCALL   LCD_CursorY   
                
                CALL    COMPANY_TITLE
                
                MOV     R7,#05H           ;
                LCALL   LCD_CursorX       ;
;                                         ;
                MOV     R7,#010H          ;
                LCALL   LCD_CursorY   
                
                CALL    COMPANY_TITLE1
                MOV     R7,#05H           ;
                LCALL   LCD_CursorX       ;
;                                         ;
                MOV     R7,#020H          ;
                LCALL   LCD_CursorY   
                
                CALL    COMPANY_TITLE
                MOV     R7,#05H           ;
                LCALL   LCD_CursorX       ;
;                                         ;
                MOV     R7,#030H          ;
                LCALL   LCD_CursorY   
                
                CALL    COMPANY_TITLE1
                CALL    LONG_DELAY        ;
                CALL    STP_SC
                
                JMP     $PLAY_LOOP        ;
;
;------------------------------------------------------------------------------
;
LONG_DELAY:
                MOV     R2,#3             ;
 $DELAY:                                  ;
                MOV     R7,#FFH           ;
                LCALL   _DelayXms         ;
                DJNZ    R2,$DELAY         ;
                RET
;
;------------------------------------------------------------------------------
;
SHORT_DELAY:
                MOV     R2,#2             ;
 $DELAY:                                  ;
                MOV     R7,#FFH           ;
                LCALL   _DelayXms         ;
                DJNZ    R2,$DELAY         ;
                RET
;
;------------------------------------------------------------------------------
;                     RA8802 SUBROUTINE
;------------------------------------------------------------------------------
;FUNCTION LCD_Reset (BEGIN)
LCD_Reset:
                CLR     RST
                MOV     R7,#02H
                LCALL   _DelayXms
                SETB    RST
                MOV     R7,#02H
                LCALL   _DelayXms
                RET
;
;------------------------------------------------------------------------------
; FUNCTION LCD_Initial (BEGIN)
LCD_Initial:
                                      ;
                CLR     A             ;
                MOV     R7,A          ;REGISTER 00H
                LCALL   LCD_CmdWrite  ;
                MOV     R7,#0CDH      ;11001101B NORMAL DISPLAY,TEXT,
                LCALL   LCD_CmdWrite  ;DATA
;                                     ;
                MOV     R7,#08H       ;REGISTER 08H
                LCALL   LCD_CmdWrite  ;
                MOV     R7,#073H      ;11100011b ,work in active window,8MHz clock
                LCALL   LCD_CmdWrite  ;
;                                     ;
                MOV     R7,#010H      ;TEXT FONT BOLD,DATA TO DDRAM,ALIGN OFF
                LCALL   LCD_CmdWrite  ;CURSOR AUTO INCREASE AS WRITE,
                MOV     R7,#06FH      ;CURSOR FLASH ON
                LCALL   LCD_CmdWrite  ;01101111b
;                                     ;
                MOV     R7,#018H      ;CURSOR HEIGHT(4-7) 2 PIXEL
                LCALL   LCD_CmdWrite  ;
                MOV     R7,#021H      ;00100001b
                LCALL   LCD_CmdWrite  ;
;                                     ;
                MOV     R7,#028H      ;
                LCALL   LCD_CmdWrite  ;
                MOV     R7,#29        ;30(*8) SEGMENT(0~29)
                LCALL   LCD_CmdWrite  ;
                                      ;
                MOV     R7,#038H      ;
                LCALL   LCD_CmdWrite  ;
                MOV     R7,#128        ;128 COMMON
                LCALL   LCD_CmdWrite  ;
;                                     ;
                MOV     R7,#048H      ;DISPLAY LEFT SET
                LCALL   LCD_CmdWrite  ;
                CLR     A             ;
                MOV     R7,A          ;
                LCALL   LCD_CmdWrite  ;
                                      ;
                MOV     R7,#058H      ;DISPLAY TOP SET
                LCALL   LCD_CmdWrite  ;
                CLR     A             ;
                MOV     R7,A          ;
                LCALL   LCD_CmdWrite  ;
;
                MOV     R7,#020H      ;ACTIVE RIGHT DISPLAY SET
                LCALL   LCD_CmdWrite  ;
                MOV     R7,#29        ;
                LCALL   LCD_CmdWrite  ;
                                      ;
                MOV     R7,#030H      ;ACTIVE BOTTOM DISPLAY SET
                LCALL   LCD_CmdWrite  ;
                MOV     R7,#128        ;
                LCALL   LCD_CmdWrite  ;
                                      ;
                MOV     R7,#040H      ;ACTIVE LEFT SIDE
                LCALL   LCD_CmdWrite  ;
                CLR     A             ;
                MOV     R7,A          ;
                LCALL   LCD_CmdWrite  ;
                                      ;
                MOV     R7,#050H      ;ACTIVE TOP SIDE
                LCALL   LCD_CmdWrite  ;
                CLR     A             ;
                MOV     R7,A          ;
                LCALL   LCD_CmdWrite  ;
                                      ;
                MOV     R7,#060H      ;SET Cursor SEGMENT ADDRESS
                LCALL   LCD_CmdWrite  ;
                CLR     A             ;
                MOV     R7,A          ;
                LCALL   LCD_CmdWrite  ;
                                      ;
                MOV     R7,#070H      ;SET Cursor COMMON ADDRESS
                LCALL   LCD_CmdWrite  ;
                CLR     A             ;
                MOV     R7,A          ;
                LCALL   LCD_CmdWrite  ;
                                      ;
                MOV     R7,#080H      ;SET Blink Time
                LCALL   LCD_CmdWrite  ;
                MOV     R7,#033H      ;
                LCALL   LCD_CmdWrite  ;
                                      ;
                MOV     R7,#090H      ;FRAME RATE SET(reg:90h)
                LCALL   LCD_CmdWrite  ;
                MOV     R7,#1BH       ;70 HZ
                LCALL   LCD_CmdWrite  ;
                                      ;
                MOV     R7,#0B0H      ;(REG:B0H)
                LCALL   LCD_CmdWrite  ;
                MOV     R7,#013H      ;
                LCALL   LCD_CmdWrite  ;
                                      ;
                MOV     R7,#0B8H      ;
                LCALL   LCD_CmdWrite  ;
                MOV     R7,#09FH      ;
                LCALL   LCD_CmdWrite  ;
                                      ;
                MOV     R7,#0A0H      ;
                LCALL   LCD_CmdWrite  ;
                MOV     R7,#08H       ;ENABLE BUSY SIGNAL OUT
                LCALL   LCD_CmdWrite  ;
                                      ;
                MOV     R7,#0C0H      ;
                LCALL   LCD_CmdWrite  ;
                MOV     R7,#0F0H      ;
                LCALL   LCD_CmdWrite ;
                                      ;
                MOV     R7,#0D0H      ;
                LCALL   LCD_CmdWrite  ;
                MOV     R7,#020H      ;
                LCALL   LCD_CmdWrite  ;
                                      ;
                MOV     R7,#0E0H      ;AUTO LOAD DATA BUFFER
                LCALL   LCD_CmdWrite  ;
                CLR     A             ;
                MOV     R7,A          ;
                LCALL   LCD_CmdWrite  ;
;                                     ;
                MOV     R7,#F0H       ;
                LCALL   LCD_CmdWrite  ;
                MOV     R7,#94H       ;  90h
                LJMP    LCD_CmdWrite  ;
;
;----------------------------------------------------------------------------
; FUNCTION _LCD_CursorX (BEGIN)
LCD_CursorX:
                MOV     Cursor,R7       ;
                MOV     R7,#060H        ;
                LCALL   LCD_CmdWrite    ;
                MOV     R7,Cursor       ;
                LJMP    LCD_CmdWrite    ;
;
;--------------------------------------------------------------------
; FUNCTION _LCD_CursorY (BEGIN)
LCD_CursorY:
                MOV     Cursor,R7       ;
                MOV     R7,#070H        ;
                LCALL   LCD_CmdWrite    ;
                MOV     R7,Cursor       ;
                LJMP    LCD_CmdWrite    ;
                                        ;
;--------------------------------------------------------------------
; FUNCTION LCD_Clear (BEGIN)
LCD_Clear:
                MOV     R7,#0E0H        ;
                LCALL   LCD_CmdWrite    ;
                CLR     A               ;
                MOV     R7,A            ;
                LCALL   LCD_CmdWrite    ;
                                        ;
                MOV     R7,#0F0H        ;
                LCALL   LCD_CmdRead     ;
                MOV     REG_TMP,R7      ;
                                        ;
                ANL     REG_TMP,#0F7H   ;
                                        ;
                ORL     REG_TMP,#08H    ;
                                        ;
                MOV     R7,#0F0H        ;
                LCALL   LCD_CmdWrite    ;
                                        ;
                MOV     R7,REG_TMP      ;
                LJMP    LCD_CmdWrite    ;
;
;---------------------------------------------------------------
; FUNCTION _LCD_CmdWrite (BEGIN)
LCD_CmdWrite:
                MOV     Cmd_Data,R7 ;
                                    ;
                LCALL   LCD_ChkBusy ;
;                                   ;
                CLR     CS1         ;
;
                MOV     LCD_BUS,Cmd_Data ;
                                    ;
                SETB    RS          ;
                SETB    IC_RD       ;
;                                   ;
                CLR     IC_WR       ;WRITE
                NOP                 ;
                NOP                 ;
                NOP                 ;
                NOP                 ;
                SETB    IC_WR       ;
                SETB    CS1         ;
                RET
;
;---------------------------------------------------------------------
; FUNCTION _LCD_DataWrite (BEGIN)
LCD_DataWrite:
                MOV     Data_Data,R7    ;
                                        ;
                LCALL   LCD_ChkBusy     ;
                                        ;
                CLR     CS1             ;
                MOV     LCD_BUS,Data_Data    ;
                CLR     RS              ;==0 MEANS DATA
                SETB    IC_RD           ;
;                                       ;
                CLR     IC_WR           ;WRITE
                NOP                     ;
                NOP                     ;
                NOP                     ;
                NOP                     ;
                SETB    IC_WR           ;
;                                       ;
                SETB    CS1             ;
                RET                     ;
;
;-----------------------------------------------------------------
; FUNCTION LCD_CmdRead
LCD_CmdRead:
                LCALL   LCD_CmdWrite;
                MOV     LCD_BUS,#FFH;
                CLR     CS1         ;
                SETB    RS          ;
                SETB    IC_WR       ;READ
                NOP                 ;
;                                   ;
                CLR     IC_RD       ;
                NOP                 ;
                MOV     R7,LCD_BUS  ;
                NOP
                SETB    IC_RD       ;
                SETB    CS1         ;
                RET                 ;
;
;-------------------------------------------------------------------
; FUNCTION LCD_DataRead (BEGIN)
LCD_DataRead:
                LCALL   LCD_ChkBusy ;
                MOV     LCD_BUS,#FFH;
                CLR     CS1         ;
;                                   ;
                CLR     RS          ;
                SETB    IC_WR       ;
;                                   ;
                CLR     IC_RD       ;
                NOP                 ;
                MOV     DATA_READ,LCD_BUS;
                NOP                 ;
                SETB    RD          ;
;                                   ;
                SETB    CS1         ;
                                    ;
                MOV     R7,DATA_READ;
                RET                 ;
;
;---------------------------------------------------------------
; FUNCTION LCD_ChkBusy (BEGIN)
LCD_ChkBusy:
    C0019:
                JB      BUSY,C0019
                RET
;
;----------------------------------------------------------------
; FUNCTION _DelayXms (BEGIN)
_DelayXms:
  $LOOP1:
                MOV       R5,#2
  $LOOP:
                MOV       R4,#250
                DJNZ      R4,$
;
                DJNZ      R5,$LOOP
                DJNZ      R7,$LOOP1
                RET
;-----------------------------------------------------------------
;
PRINT_ENG_STRING:
                MOV     A,#00H            ;
                MOVC    A,@A+DPTR         ;
                JZ      $PRINT_ENG_OUT    ;
                MOV     R7,A              ;
                LCALL   LCD_DataWrite     ;
                INC     DPTR              ;
                SJMP    PRINT_ENG_STRING  ;
 $PRINT_ENG_OUT:                          ;
                RET                       ;
;
;-----------------------------------------------------------------
;
TEXT_INVERT_MODE:
                MOV     R7,#010H      ;TEXT FONT BOLD,DATA TO DDRAM,ALIGN OFF
                LCALL   LCD_CmdRead   ;CURSOR AUTO INCREASE AS WRITE,
                MOV     A,R7          ;
                ANL     A,#11011111B  ;
                MOV     B,A           ;
;                                     ;
                MOV     R7,#010H      ;CURSOR FLASH ON
                LCALL   LCD_CmdWrite  ;
                MOV     R7,B          ;CURSOR FLASH ON
                LCALL   LCD_CmdWrite  ;
                RET
;
;-----------------------------------------------------------------
;
TEXT_NORMAL_MODE:
                MOV     R7,#010H      ;TEXT FONT BOLD,DATA TO DDRAM,ALIGN OFF
                LCALL   LCD_CmdRead   ;CURSOR AUTO INCREASE AS WRITE,
                MOV     A,R7          ;
                ORL     A,#00100000B  ;
                MOV     B,A           ;
;                                     ;
                MOV     R7,#010H      ;CURSOR FLASH ON
                LCALL   LCD_CmdWrite  ;
                MOV     R7,B          ;CURSOR FLASH ON
                LCALL   LCD_CmdWrite  ;
                RET
;
;-----------------------------------------------------------------
;
DISP_INVERT_MODE:
                MOV     R7,#000H      ;TEXT FONT BOLD,DATA TO DDRAM,ALIGN OFF
                LCALL   LCD_CmdRead   ;CURSOR AUTO INCREASE AS WRITE,
                MOV     A,R7          ;
                ANL     A,#11111110B  ;
                MOV     B,A           ;
;                                     ;
                MOV     R7,#000H      ;CURSOR FLASH ON
                LCALL   LCD_CmdWrite  ;
                MOV     R7,B          ;CURSOR FLASH ON
                LCALL   LCD_CmdWrite  ;
                RET
;
;-----------------------------------------------------------------
;
DISP_NORMAL_MODE:
                MOV     R7,#000H      ;
                LCALL   LCD_CmdRead   ;READ REG(00H)
                MOV     A,R7          ;
                ORL     A,#00000001B  ;
                MOV     B,A           ;
;                                     ;
                MOV     R7,#000H      ;
                LCALL   LCD_CmdWrite  ;
                MOV     R7,B          ;
                LCALL   LCD_CmdWrite  ;
                RET
;
;-----------------------------------------------------------------
;               REGISTER: 00H, BIT3=0 GRAPHIC ON
;
GRAPHIC_ON:
                MOV     R7,#000H      ;
                LCALL   LCD_CmdRead   ;READ REG(00H)
                MOV     A,R7          ;
                ANL     A,#11110111B  ;
                MOV     B,A           ;
;                                     ;
                MOV     R7,#000H      ;
                LCALL   LCD_CmdWrite  ;
                MOV     R7,B          ;
                LCALL   LCD_CmdWrite  ;
                RET
;
;-----------------------------------------------------------------
;               REGISTER: 00H, BIT3=1 TEXT ON
;
TEXT_ON:
                MOV     R7,#000H      ;
                LCALL   LCD_CmdRead   ;READ REG(00H)
                MOV     A,R7          ;
                ORL     A,#00001000B  ;
                MOV     B,A           ;
;                                     ;
                MOV     R7,#000H      ;
                LCALL   LCD_CmdWrite  ;
                MOV     R7,B          ;
                LCALL   LCD_CmdWrite  ;
                RET
;
;-----------------------------------------------------------------
;
;CLEAR_SCREEN:
;                MOV     R7,#00H           ;
;                LCALL   LCD_CursorX       ;
;;                                         ;
;                MOV     R7,#00H           ;
;                LCALL   LCD_CursorY       ;
;
;-----------------------------------------------------------------
;               SHOW MAP 24064
SHOW_MAP:
                CALL    GRAPHIC_ON        ;
;                                         ;
                MOV     R4,#128            ;
 $NEXT_COLUMN:                            ;
                MOV     R5,#30            ; 8 * 40 =240
  $SHOW_LOOP:                             ;
                MOV     A,#00H            ;
                MOVC    A,@A+DPTR         ;
                MOV     R7,A              ;
                LCALL   LCD_DataWrite     ;
                INC     DPTR              ;
                DJNZ    R5,$SHOW_LOOP     ;
                DJNZ    R4,$ADJUST        ;
                RET                       ;
;                                         ;
 $ADJUST:                                 ;
                MOV     A,C_X             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorX       ;
;                                         ;
                INC     C_Y               ;
                MOV     A,C_Y             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorY       ;
                JMP     $NEXT_COLUMN
;
;-----------------------------------------------------------------
;
MESSAGE:
        DB      "ABCDEFGHIJKLMNOPQRSTUVWXYZ",0
MESSAGE1:
        DB      "abcdefghijklmnopqrstuvwxyz",0
MESSAGE2:
        DB      "!@#$%^&*()_+:;?<>,-0123456789",0
;
;-----------------------------------------------------------------
;

COMPANY_TITLE:
               
                              
                MOV     R7,#B5H           ;華
                LCALL   LCD_DataWrite     ;
                MOV     R7,#D8H           ;
                LCALL   LCD_DataWrite     ;
                
                MOV     R7,#ADH           ;凌
                LCALL   LCD_DataWrite     ;
                MOV     R7,#E2H           ;
                LCALL   LCD_DataWrite     ;
                
                MOV     R7,#A5H           ;光
                LCALL   LCD_DataWrite     ;
                MOV     R7,#FAH           ;
                LCALL   LCD_DataWrite     ;
                
                MOV     R7,#B9H           ;電
                LCALL   LCD_DataWrite     ;
                MOV     R7,#71H           ;
                LCALL   LCD_DataWrite     ;
                
                MOV     R7,#AAH           ;股
                LCALL   LCD_DataWrite     ;
                MOV     R7,#D1H           ;
                LCALL   LCD_DataWrite     ;
;
                MOV     R7,#A5H           ;份
                LCALL   LCD_DataWrite     ;
                MOV     R7,#F7H           ;
                LCALL   LCD_DataWrite     ;
;
                MOV     R7,#A6H           ;有
                LCALL   LCD_DataWrite     ;
                MOV     R7,#B3H           ;
                LCALL   LCD_DataWrite     ;
;
                MOV     R7,#ADH           ;限
                LCALL   LCD_DataWrite     ;
                MOV     R7,#ADH           ;
                LCALL   LCD_DataWrite     ;
;
                MOV     R7,#A4H           ;公
                LCALL   LCD_DataWrite     ;
                MOV     R7,#BDH           ;
                LCALL   LCD_DataWrite     ;
;
                MOV     R7,#A5H           ;司
                LCALL   LCD_DataWrite     ;
                MOV     R7,#71H           ;
                LCALL   LCD_DataWrite     ;
;
                RET
                
COMPANY_TITLE1:
               
                MOV     R7,#BBH           ;華
                LCALL   LCD_DataWrite     ;
                MOV     R7,#AAH           ;
                LCALL   LCD_DataWrite     ;
                
                MOV     R7,#C1H           ;凌
                LCALL   LCD_DataWrite     ;
                MOV     R7,#E8H           ;
                LCALL   LCD_DataWrite     ;
                
                MOV     R7,#B9H           ;光
                LCALL   LCD_DataWrite     ;
                MOV     R7,#E2H           ;
                LCALL   LCD_DataWrite     ;
                
                MOV     R7,#B5H           ;電
                LCALL   LCD_DataWrite     ;
                MOV     R7,#E7H           ;
                LCALL   LCD_DataWrite     ;
                
                MOV     R7,#B9H           ;股
                LCALL   LCD_DataWrite     ;
                MOV     R7,#C9H           ;
                LCALL   LCD_DataWrite     ;
;
                MOV     R7,#B7H           ;份
                LCALL   LCD_DataWrite     ;
                MOV     R7,#DDH           ;
                LCALL   LCD_DataWrite     ;
;
                MOV     R7,#D3H           ;有
                LCALL   LCD_DataWrite     ;
                MOV     R7,#D0H           ;
                LCALL   LCD_DataWrite     ;
;
                MOV     R7,#CFH           ;限
                LCALL   LCD_DataWrite     ;
                MOV     R7,#DEH           ;
                LCALL   LCD_DataWrite     ;
;
                MOV     R7,#B9H           ;公
                LCALL   LCD_DataWrite     ;
                MOV     R7,#ABH           ;
                LCALL   LCD_DataWrite     ;
;
                MOV     R7,#CBH           ;司
                LCALL   LCD_DataWrite     ;
                MOV     R7,#BEH           ;
                LCALL   LCD_DataWrite     ;
;
                RET 
                
;**********************************************************                


;               SHOW MAP 240128
CLEAR_SCREEN:
                CALL    GRAPHIC_ON        ;
;                                         ;
                MOV     C_X,#00H          ;
                MOV     C_Y,#00H          ;
;
                MOV     R4,#128           ;
 $NEXT_COLUMN:                            ;
                MOV     R5,#30            ; 8 * 40 =240
  $SHOW_LOOP:                             ;
                MOV     R7,#00H           ;
                LCALL   LCD_DataWrite     ;
                DJNZ    R5,$SHOW_LOOP     ;
                DJNZ    R4,$ADJUST        ;
                RET                       ;
;                                         ;
 $ADJUST:                                 ;
                MOV     A,C_X             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorX       ;
;                                         ;
                INC     C_Y               ;
                MOV     A,C_Y             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorY       ;
                JMP     $NEXT_COLUMN
;
;-----------------------------------------------------------------
;               SHOW MAP 240128
SHOW_FULL:
                CALL    GRAPHIC_ON        ;
;                                         ;
                MOV     C_X,#00H          ;
                MOV     C_Y,#00H          ;
;
                MOV     R4,#128            ;
 $NEXT_COLUMN:                            ;
                MOV     R5,#30            ; 8 * 40 =240
  $SHOW_LOOP:                             ;
                MOV     R7,#FFH           ;
                LCALL   LCD_DataWrite     ;
                DJNZ    R5,$SHOW_LOOP     ;
                DJNZ    R4,$ADJUST        ;
                RET                       ;
;                                         ;
 $ADJUST:                                 ;
                MOV     A,C_X             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorX       ;
;                                         ;
                INC     C_Y               ;
                MOV     A,C_Y             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorY       ;
                JMP     $NEXT_COLUMN
;
;-----------------------------------------------------------------
;               SHOW MAP 240128
SHOW_VERTICAL:
                CALL    GRAPHIC_ON        ;
;                                         ;
                MOV     C_X,#00H          ;
                MOV     C_Y,#00H          ;
;
                MOV     R4,#128           ;
 $NEXT_COLUMN:                            ;
                MOV     R5,#30            ; 8 * 40 =240
  $SHOW_LOOP:                             ;
                MOV     R7,#AAH           ;
                LCALL   LCD_DataWrite     ;
                DJNZ    R5,$SHOW_LOOP     ;
                DJNZ    R4,$ADJUST        ;
                RET                       ;
;                                         ;
 $ADJUST:                                 ;
                MOV     A,C_X             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorX       ;
;                                         ;
                INC     C_Y               ;
                MOV     A,C_Y             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorY       ;
                JMP     $NEXT_COLUMN
;
;-----------------------------------------------------------------
;               SHOW MAP 240128
SHOW_HORIZONTAL:
                CALL    GRAPHIC_ON        ;
;                                         ;
                MOV     C_X,#00H          ;
                MOV     C_Y,#00H          ;
;
                MOV     R4,#64            ;
 $NEXT_COLUMN:                            ;
                MOV     R5,#30            ; 8 * 40 =240
  $SHOW_LOOP:                             ;
                MOV     R7,#FFH           ;
                LCALL   LCD_DataWrite     ;
                DJNZ    R5,$SHOW_LOOP     ;
;
                MOV     A,C_X             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorX       ;
;                                         ;
                INC     C_Y               ;
                MOV     A,C_Y             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorY       ;
;
                MOV     R5,#30            ; 8 * 40 =240
  $SHOW_LOOP1:                            ;
                MOV     R7,#00H           ;
                LCALL   LCD_DataWrite     ;
                DJNZ    R5,$SHOW_LOOP1    ;
;
                DJNZ    R4,$ADJUST        ;
                RET                       ;
;                                         ;
 $ADJUST:                                 ;
                MOV     A,C_X             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorX       ;
;                                         ;
                INC     C_Y               ;
                MOV     A,C_Y             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorY       ;
                JMP     $NEXT_COLUMN
;
;-----------------------------------------------------------------
;               SHOW MAP 24064
SHOW_CROSS:
                CALL    GRAPHIC_ON        ;
;                                         ;
                MOV     C_X,#00H          ;
                MOV     C_Y,#00H          ;
;
                MOV     R4,#64            ;
 $NEXT_COLUMN:                            ;
                MOV     R5,#30            ; 8 * 40 =240
  $SHOW_LOOP:                             ;
                MOV     R7,#AAH           ;
                LCALL   LCD_DataWrite     ;
                DJNZ    R5,$SHOW_LOOP     ;
;
                MOV     A,C_X             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorX       ;
;                                         ;
                INC     C_Y               ;
                MOV     A,C_Y             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorY       ;
;
                MOV     R5,#30            ; 8 * 40 =240
  $SHOW_LOOP1:                            ;
                MOV     R7,#55H           ;
                LCALL   LCD_DataWrite     ;
                DJNZ    R5,$SHOW_LOOP1    ;
;
                DJNZ    R4,$ADJUST        ;
                RET                       ;
;                                         ;
 $ADJUST:                                 ;
                MOV     A,C_X             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorX       ;
;                                         ;
                INC     C_Y               ;
                MOV     A,C_Y             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorY       ;
                JMP     $NEXT_COLUMN
;
;-----------------------------------------------------------------
;               SHOW MAP 240128
SHOW_TEXT:
                CALL    TEXT_ON        ;
;                                         ;
                MOV     CHAR,#30H
                MOV     C_X,#00H          ;
                MOV     C_Y,#00H          ;
;
                MOV     R4,#8             ;
 $NEXT_COLUMN:                            ;
                MOV     R5,#30            ; 8 * 40 =240
  $SHOW_LOOP:                             ;
                MOV     A,CHAR            ;
                MOV     R7,A              ;
                LCALL   LCD_DataWrite     ;
                INC     CHAR
                DJNZ    R5,$SHOW_LOOP     ;
                DJNZ    R4,$ADJUST        ;
                RET                       ;
;                                         ;
 $ADJUST:                                 ;
                MOV     A,C_X             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorX       ;
;                                         ;
                MOV     A,C_Y             ;
                ADD     A,#16             ;
                MOV     C_Y,A             ;
                MOV     R7,A              ;
                LCALL   LCD_CursorY       ;
                JMP     $NEXT_COLUMN
;
;-----------------------------------------------------------------
;
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
;-----------------------------------------------------------------
;       SHOW DEGREE AREA
;-----------------------------------------------------------------
MAP_DEGREE:       

        DB      008h,042h,010h,084h,021h,008h,042h,010h
        DB      084h,021h,008h,042h,010h,084h,021h,008h
        DB      042h,010h,084h,021h,008h,042h,010h,084h
        DB      021h,008h,042h,010h,084h,02Ah,008h,042h
        DB      010h,084h,021h,008h,042h,010h,084h,021h
        DB      008h,042h,010h,084h,021h,008h,042h,010h
        DB      084h,021h,008h,042h,010h,084h,021h,008h
        DB      042h,010h,084h,035h,000h,040h,010h,004h
        DB      001h,000h,040h,010h,004h,001h,000h,040h
        DB      010h,004h,001h,000h,040h,010h,004h,001h
        DB      000h,040h,010h,084h,001h,000h,040h,010h
        DB      004h,00Ah,000h,040h,010h,004h,001h,000h
        DB      040h,010h,004h,001h,000h,040h,010h,004h
        DB      001h,000h,040h,010h,004h,001h,000h,040h
        DB      010h,004h,001h,000h,040h,010h,004h,015h
        DB      0C0h,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,00Ah,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,015h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0A0h,000h,0AAh,0AAh,0AAh,0AAh,0A8h
        DB      000h,00Ah,0AAh,0AAh,0AAh,0AAh,000h,002h
        DB      0AAh,0AAh,0AAh,0AAh,000h,000h,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,043h
        DB      0B8h,055h,055h,055h,055h,050h,0BBh,085h
        DB      055h,055h,055h,054h,02Eh,0E1h,055h,055h
        DB      055h,054h,03Bh,0B8h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0A2h,028h,0AAh
        DB      0AAh,0AAh,0AAh,0A8h,0AAh,08Ah,0AAh,0AAh
        DB      0AAh,0AAh,028h,0A2h,0AAh,0AAh,0AAh,0AAh
        DB      00Ah,0A8h,0AAh,0AAh,0AAh,0AAh,0F1h,055h
        DB      055h,055h,055h,043h,0A8h,055h,055h,055h
        DB      055h,050h,0AAh,085h,055h,055h,055h,054h
        DB      02Eh,0A1h,055h,055h,055h,054h,03Ah,0A8h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0A0h,0A8h,0AAh,0AAh,0AAh,0AAh,0A8h
        DB      0AAh,08Ah,0AAh,0AAh,0AAh,0AAh,022h,0A2h
        DB      0AAh,0AAh,0AAh,0AAh,022h,0A8h,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,043h
        DB      0B8h,055h,055h,055h,055h,050h,0BBh,085h
        DB      055h,055h,055h,054h,02Eh,0E1h,055h,055h
        DB      055h,054h,03Bh,0B8h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0A0h,000h,0AAh
        DB      0AAh,0AAh,0AAh,0A8h,000h,00Ah,0AAh,0AAh
        DB      0AAh,0AAh,000h,002h,0AAh,0AAh,0AAh,0AAh
        DB      000h,000h,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,040h,000h,055h,055h,055h
        DB      055h,050h,000h,005h,055h,055h,055h,054h
        DB      000h,001h,055h,055h,055h,054h,000h,000h
        DB      055h,055h,055h,055h,0C2h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0F1h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      0C2h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0F1h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,0C2h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0F1h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      0C2h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,000h,000h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,000h,000h,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,0DCh,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      001h,014h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0F1h,0D4h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,000h,054h,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,0DCh,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      000h,000h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,000h,000h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,0C2h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0F1h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      0C2h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0F1h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,0C2h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0F1h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      0C2h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0F1h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,0C2h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,000h,000h,015h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      000h,000h,02Ah,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,077h
        DB      015h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,001h,055h,02Ah,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0F1h,055h,015h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      001h,055h,02Ah,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,077h
        DB      015h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,000h,000h,02Ah,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,000h,000h,015h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      0C2h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0F1h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,0C2h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,001h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0F1h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      002h,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,001h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,002h,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh,0AAh
        DB      0AAh,0AAh,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
        DB      055h,055h,055h,055h,055h,055h,055h,055h
;-----------------------------------------------------------------
        END