Metropoli BBS - 30line.asm

VIEWER: 30line.asm MODE: TEXT (ASCII)
COMMENT ~
 PROGRAM: 30LINE.ASM
  AUTHOR: Denis Boyles
 RELEASE: Public Domain (Dec 13, 1996)

 COMPILE: Arrowsoft Assembler (MASM v3.0)
      OS: MS-DOS (v6.20)

 PURPOSE: an 8x13 character `font' for 30 VGA text lines!?
~

CODE SEGMENT
    ASSUME CS:CODE,DS:CODE,ES:CODE,SS:CODE
    ORG 0100h

MAIN:
    mov     AX,003h                    ;reset 80x25 color text mode?
    int     010h

    mov     BP,offset font             ;ES:BP -> new character set
    mov     AX,01110h                  ;BIOS video set character set
    mov     BH,FontDepth               ;depth of font
    xor     BL,BL
    mov     CX,NumChars                ;nunber of characters in font
    xor     DX,DX
    int     010h                       ;call BIOS to activate new font

    mov     AX,04C00h                  ;DOS terminate with code (0)
    int     021h                       ;call DOS to end program

NumChars    dw  256                    ;256 characters are defined
FontDepth   db  13                     ;8x13 size font for 30 lines?

font LABEL byte                        ;label the start of the data

DB 000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h
DB 07Eh,081h,0A5h,081h,081h,0BDh,099h,081h,07Eh,000h,000h,000h,000h,07Eh
DB 0FFh,0DBh,0FFh,0FFh,0C3h,0E7h,0FFh,07Eh,000h,000h,000h,000h,000h,06Ch
DB 0FEh,0FEh,0FEh,0FEh,07Ch,038h,010h,000h,000h,000h,000h,000h,010h,038h
DB 07Ch,0FEh,07Ch,038h,010h,000h,000h,000h,000h,000h,018h,03Ch,03Ch,0E7h
DB 0E7h,0E7h,018h,018h,03Ch,000h,000h,000h,000h,018h,03Ch,07Eh,0FFh,0FFh
DB 07Eh,018h,018h,03Ch,000h,000h,000h,000h,000h,000h,000h,018h,03Ch,03Ch
DB 018h,000h,000h,000h,000h,000h,0FFh,0FFh,0FFh,0FFh,0E7h,0C3h,0C3h,0E7h
DB 0FFh,0FFh,0FFh,0FFh,0FFh,000h,000h,000h,03Ch,066h,042h,042h,066h,03Ch
DB 000h,000h,000h,000h,0FFh,0FFh,0FFh,0C3h,099h,0BDh,0BDh,099h,0C3h,0FFh
DB 0FFh,0FFh,0FFh,000h,01Eh,00Eh,01Ah,032h,078h,0CCh,0CCh,0CCh,078h,000h
DB 000h,000h,000h,03Ch,066h,066h,066h,03Ch,018h,07Eh,018h,018h,000h,000h
DB 000h,000h,03Fh,033h,03Fh,030h,030h,030h,070h,0F0h,0E0h,000h,000h,000h
DB 000h,07Fh,063h,07Fh,063h,063h,063h,067h,0E7h,0E6h,0C0h,000h,000h,000h
DB 018h,018h,0DBh,03Ch,0E7h,03Ch,0DBh,018h,018h,000h,000h,000h,000h,080h
DB 0C0h,0E0h,0F8h,0FEh,0F8h,0E0h,0C0h,080h,000h,000h,000h,000h,002h,006h
DB 00Eh,03Eh,0FEh,03Eh,00Eh,006h,002h,000h,000h,000h,000h,018h,03Ch,07Eh
DB 018h,018h,018h,07Eh,03Ch,018h,000h,000h,000h,000h,066h,066h,066h,066h
DB 066h,066h,000h,066h,066h,000h,000h,000h,000h,07Fh,0DBh,0DBh,0DBh,07Bh
DB 01Bh,01Bh,01Bh,01Bh,000h,000h,000h,07Ch,0C6h,060h,038h,06Ch,0C6h,0C6h
DB 06Ch,038h,00Ch,0C6h,07Ch,000h,000h,000h,000h,000h,000h,000h,000h,0FEh
DB 0FEh,0FEh,000h,000h,000h,000h,018h,03Ch,07Eh,018h,018h,018h,07Eh,03Ch
DB 018h,07Eh,000h,000h,000h,018h,03Ch,07Eh,018h,018h,018h,018h,018h,018h
DB 000h,000h,000h,000h,018h,018h,018h,018h,018h,018h,07Eh,03Ch,018h,000h
DB 000h,000h,000h,000h,000h,018h,00Ch,0FEh,00Ch,018h,000h,000h,000h,000h
DB 000h,000h,000h,000h,030h,060h,0FEh,060h,030h,000h,000h,000h,000h,000h
DB 000h,000h,000h,000h,0C0h,0C0h,0C0h,0FEh,000h,000h,000h,000h,000h,000h
DB 000h,000h,028h,06Ch,0FEh,06Ch,028h,000h,000h,000h,000h,000h,000h,000h
DB 010h,038h,038h,07Ch,07Ch,0FEh,0FEh,000h,000h,000h,000h,000h,000h,0FEh
DB 0FEh,07Ch,07Ch,038h,038h,010h,000h,000h,000h,000h,000h,000h,000h,000h
DB 000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,018h,03Ch,03Ch,03Ch
DB 018h,018h,000h,018h,018h,000h,000h,000h,066h,066h,066h,024h,000h,000h
DB 000h,000h,000h,000h,000h,000h,000h,000h,06Ch,06Ch,0FEh,06Ch,06Ch,06Ch
DB 0FEh,06Ch,06Ch,000h,000h,000h,018h,07Ch,0C6h,0C2h,0C0h,07Ch,006h,086h
DB 0C6h,07Ch,018h,018h,000h,000h,000h,000h,0C2h,0C6h,00Ch,018h,030h,066h
DB 0C6h,000h,000h,000h,000h,038h,06Ch,06Ch,038h,076h,0DCh,0CCh,0CCh,076h
DB 000h,000h,000h,030h,030h,030h,060h,000h,000h,000h,000h,000h,000h,000h
DB 000h,000h,000h,00Ch,018h,030h,030h,030h,030h,030h,018h,00Ch,000h,000h
DB 000h,000h,030h,018h,00Ch,00Ch,00Ch,00Ch,00Ch,018h,030h,000h,000h,000h
DB 000h,000h,000h,066h,03Ch,0FFh,03Ch,066h,000h,000h,000h,000h,000h,000h
DB 000h,000h,018h,018h,07Eh,018h,018h,000h,000h,000h,000h,000h,000h,000h
DB 000h,000h,000h,000h,000h,018h,018h,018h,030h,000h,000h,000h,000h,000h
DB 000h,000h,0FEh,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h
DB 000h,000h,000h,000h,018h,018h,000h,000h,000h,000h,002h,006h,00Ch,018h
DB 030h,060h,0C0h,080h,000h,000h,000h,000h,000h,07Ch,0C6h,0CEh,0DEh,0F6h
DB 0E6h,0C6h,0C6h,07Ch,000h,000h,000h,000h,018h,038h,078h,018h,018h,018h
DB 018h,018h,07Eh,000h,000h,000h,000h,07Ch,0C6h,006h,00Ch,018h,030h,060h
DB 0C6h,0FEh,000h,000h,000h,000h,07Ch,0C6h,006h,006h,03Ch,006h,006h,0C6h
DB 07Ch,000h,000h,000h,000h,00Ch,01Ch,03Ch,06Ch,0CCh,0FEh,00Ch,00Ch,01Eh
DB 000h,000h,000h,000h,0FEh,0C0h,0C0h,0C0h,0FCh,006h,006h,0C6h,07Ch,000h
DB 000h,000h,000h,038h,060h,0C0h,0C0h,0FCh,0C6h,0C6h,0C6h,07Ch,000h,000h
DB 000h,000h,0FEh,0C6h,006h,00Ch,018h,030h,030h,030h,030h,000h,000h,000h
DB 000h,07Ch,0C6h,0C6h,0C6h,07Ch,0C6h,0C6h,0C6h,07Ch,000h,000h,000h,000h
DB 07Ch,0C6h,0C6h,0C6h,07Eh,006h,006h,00Ch,078h,000h,000h,000h,000h,000h
DB 018h,018h,000h,000h,000h,018h,018h,000h,000h,000h,000h,000h,000h,018h
DB 018h,000h,000h,000h,018h,018h,030h,000h,000h,000h,000h,006h,00Ch,018h
DB 030h,060h,030h,018h,00Ch,006h,000h,000h,000h,000h,000h,000h,000h,07Eh
DB 000h,000h,07Eh,000h,000h,000h,000h,000h,000h,060h,030h,018h,00Ch,006h
DB 00Ch,018h,030h,060h,000h,000h,000h,000h,07Ch,0C6h,0C6h,00Ch,018h,018h
DB 000h,018h,018h,000h,000h,000h,000h,07Ch,0C6h,0C6h,0DEh,0DEh,0DEh,0DCh
DB 0C0h,07Ch,000h,000h,000h,000h,010h,038h,06Ch,0C6h,0C6h,0FEh,0C6h,0C6h
DB 0C6h,000h,000h,000h,000h,0FCh,066h,066h,066h,07Ch,066h,066h,066h,0FCh
DB 000h,000h,000h,000h,03Ch,066h,0C2h,0C0h,0C0h,0C0h,0C2h,066h,03Ch,000h
DB 000h,000h,000h,0F8h,06Ch,066h,066h,066h,066h,066h,06Ch,0F8h,000h,000h
DB 000h,000h,0FEh,066h,062h,068h,078h,068h,062h,066h,0FEh,000h,000h,000h
DB 000h,0FEh,066h,062h,068h,078h,068h,060h,060h,0F0h,000h,000h,000h,000h
DB 03Ch,066h,0C2h,0C0h,0C0h,0DEh,0C6h,066h,03Ah,000h,000h,000h,000h,0C6h
DB 0C6h,0C6h,0C6h,0FEh,0C6h,0C6h,0C6h,0C6h,000h,000h,000h,000h,03Ch,018h
DB 018h,018h,018h,018h,018h,018h,03Ch,000h,000h,000h,000h,01Eh,00Ch,00Ch
DB 00Ch,00Ch,00Ch,0CCh,0CCh,078h,000h,000h,000h,000h,0E6h,066h,06Ch,06Ch
DB 078h,06Ch,06Ch,066h,0E6h,000h,000h,000h,000h,0F0h,060h,060h,060h,060h
DB 060h,062h,066h,0FEh,000h,000h,000h,000h,0C6h,0EEh,0FEh,0FEh,0D6h,0C6h
DB 0C6h,0C6h,0C6h,000h,000h,000h,000h,0C6h,0E6h,0F6h,0FEh,0DEh,0CEh,0C6h
DB 0C6h,0C6h,000h,000h,000h,000h,038h,06Ch,0C6h,0C6h,0C6h,0C6h,0C6h,06Ch
DB 038h,000h,000h,000h,000h,0FCh,066h,066h,066h,07Ch,060h,060h,060h,0F0h
DB 000h,000h,000h,000h,07Ch,0C6h,0C6h,0C6h,0C6h,0D6h,0DEh,07Ch,00Ch,00Eh
DB 000h,000h,000h,0FCh,066h,066h,066h,07Ch,06Ch,066h,066h,0E6h,000h,000h
DB 000h,000h,07Ch,0C6h,0C6h,060h,038h,00Ch,0C6h,0C6h,07Ch,000h,000h,000h
DB 000h,07Eh,07Eh,05Ah,018h,018h,018h,018h,018h,03Ch,000h,000h,000h,000h
DB 0C6h,0C6h,0C6h,0C6h,0C6h,0C6h,0C6h,0C6h,07Ch,000h,000h,000h,000h,0C6h
DB 0C6h,0C6h,0C6h,0C6h,0C6h,06Ch,038h,010h,000h,000h,000h,000h,0C6h,0C6h
DB 0C6h,0C6h,0D6h,0D6h,0FEh,07Ch,06Ch,000h,000h,000h,000h,0C6h,0C6h,06Ch
DB 038h,038h,038h,06Ch,0C6h,0C6h,000h,000h,000h,000h,066h,066h,066h,066h
DB 03Ch,018h,018h,018h,03Ch,000h,000h,000h,000h,0FEh,0C6h,08Ch,018h,030h
DB 060h,0C2h,0C6h,0FEh,000h,000h,000h,000h,03Ch,030h,030h,030h,030h,030h
DB 030h,030h,03Ch,000h,000h,000h,000h,080h,0C0h,0E0h,070h,038h,01Ch,00Eh
DB 006h,002h,000h,000h,000h,000h,03Ch,00Ch,00Ch,00Ch,00Ch,00Ch,00Ch,00Ch
DB 03Ch,000h,000h,000h,038h,06Ch,0C6h,000h,000h,000h,000h,000h,000h,000h
DB 000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h
DB 0FFh,000h,030h,018h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h
DB 000h,000h,000h,000h,000h,078h,00Ch,07Ch,0CCh,0CCh,076h,000h,000h,000h
DB 000h,0E0h,060h,060h,078h,06Ch,066h,066h,066h,07Ch,000h,000h,000h,000h
DB 000h,000h,000h,07Ch,0C6h,0C0h,0C0h,0C6h,07Ch,000h,000h,000h,000h,01Ch
DB 00Ch,00Ch,03Ch,06Ch,0CCh,0CCh,0CCh,076h,000h,000h,000h,000h,000h,000h
DB 000h,07Ch,0C6h,0FEh,0C0h,0C6h,07Ch,000h,000h,000h,000h,038h,06Ch,064h
DB 060h,0F0h,060h,060h,060h,0F0h,000h,000h,000h,000h,000h,000h,000h,076h
DB 0CCh,0CCh,0CCh,07Ch,00Ch,0CCh,078h,000h,000h,0E0h,060h,060h,06Ch,076h
DB 066h,066h,066h,0E6h,000h,000h,000h,000h,018h,018h,000h,038h,018h,018h
DB 018h,018h,03Ch,000h,000h,000h,000h,006h,006h,000h,00Eh,006h,006h,006h
DB 006h,066h,066h,03Ch,000h,000h,0E0h,060h,060h,066h,06Ch,078h,06Ch,066h
DB 0E6h,000h,000h,000h,000h,038h,018h,018h,018h,018h,018h,018h,018h,03Ch
DB 000h,000h,000h,000h,000h,000h,000h,0ECh,0FEh,0D6h,0D6h,0D6h,0C6h,000h
DB 000h,000h,000h,000h,000h,000h,0DCh,066h,066h,066h,066h,066h,000h,000h
DB 000h,000h,000h,000h,000h,07Ch,0C6h,0C6h,0C6h,0C6h,07Ch,000h,000h,000h
DB 000h,000h,000h,000h,0DCh,066h,066h,066h,07Ch,060h,060h,0F0h,000h,000h
DB 000h,000h,000h,076h,0CCh,0CCh,0CCh,07Ch,00Ch,00Ch,01Eh,000h,000h,000h
DB 000h,000h,0DCh,076h,066h,060h,060h,0F0h,000h,000h,000h,000h,000h,000h
DB 000h,07Ch,0C6h,070h,01Ch,0C6h,07Ch,000h,000h,000h,000h,010h,030h,030h
DB 0FCh,030h,030h,030h,036h,01Ch,000h,000h,000h,000h,000h,000h,000h,0CCh
DB 0CCh,0CCh,0CCh,0CCh,076h,000h,000h,000h,000h,000h,000h,000h,066h,066h
DB 066h,066h,03Ch,018h,000h,000h,000h,000h,000h,000h,000h,0C6h,0C6h,0D6h
DB 0D6h,0FEh,06Ch,000h,000h,000h,000h,000h,000h,000h,0C6h,06Ch,038h,038h
DB 06Ch,0C6h,000h,000h,000h,000h,000h,000h,000h,0C6h,0C6h,0C6h,0C6h,07Eh
DB 006h,00Ch,0F8h,000h,000h,000h,000h,000h,0FEh,0CCh,018h,030h,066h,0FEh
DB 000h,000h,000h,000h,00Eh,018h,018h,018h,070h,018h,018h,018h,00Eh,000h
DB 000h,000h,000h,018h,018h,018h,018h,000h,018h,018h,018h,018h,000h,000h
DB 000h,000h,070h,018h,018h,018h,00Eh,018h,018h,018h,070h,000h,000h,000h
DB 000h,076h,0DCh,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h
DB 000h,000h,010h,038h,06Ch,0C6h,0C6h,0FEh,000h,000h,000h,000h,000h,03Ch
DB 066h,0C2h,0C0h,0C0h,0C2h,066h,03Ch,00Ch,006h,07Ch,000h,000h,0CCh,0CCh
DB 000h,0CCh,0CCh,0CCh,0CCh,0CCh,076h,000h,000h,000h,00Ch,018h,030h,000h
DB 07Ch,0C6h,0FEh,0C0h,0C6h,07Ch,000h,000h,000h,010h,038h,06Ch,000h,078h
DB 00Ch,07Ch,0CCh,0CCh,076h,000h,000h,000h,000h,0CCh,0CCh,000h,078h,00Ch
DB 07Ch,0CCh,0CCh,076h,000h,000h,000h,060h,030h,018h,000h,078h,00Ch,07Ch
DB 0CCh,0CCh,076h,000h,000h,000h,038h,06Ch,038h,000h,078h,00Ch,07Ch,0CCh
DB 0CCh,076h,000h,000h,000h,000h,000h,000h,03Ch,066h,060h,066h,03Ch,00Ch
DB 006h,03Ch,000h,000h,010h,038h,06Ch,000h,07Ch,0C6h,0FEh,0C0h,0C6h,07Ch
DB 000h,000h,000h,000h,0CCh,0CCh,000h,07Ch,0C6h,0FEh,0C0h,0C6h,07Ch,000h
DB 000h,000h,060h,030h,018h,000h,07Ch,0C6h,0FEh,0C0h,0C6h,07Ch,000h,000h
DB 000h,000h,066h,066h,000h,038h,018h,018h,018h,018h,03Ch,000h,000h,000h
DB 018h,03Ch,066h,000h,038h,018h,018h,018h,018h,03Ch,000h,000h,000h,060h
DB 030h,018h,000h,038h,018h,018h,018h,018h,03Ch,000h,000h,000h,0C6h,0C6h
DB 010h,038h,06Ch,0C6h,0C6h,0FEh,0C6h,0C6h,000h,000h,000h,06Ch,038h,000h
DB 038h,06Ch,0C6h,0C6h,0FEh,0C6h,0C6h,000h,000h,000h,030h,060h,000h,0FEh
DB 066h,060h,07Ch,060h,066h,0FEh,000h,000h,000h,000h,000h,000h,0CCh,076h
DB 036h,07Eh,0D8h,0D8h,06Eh,000h,000h,000h,000h,03Eh,06Ch,0CCh,0CCh,0FEh
DB 0CCh,0CCh,0CCh,0CEh,000h,000h,000h,010h,038h,06Ch,000h,07Ch,0C6h,0C6h
DB 0C6h,0C6h,07Ch,000h,000h,000h,000h,0C6h,0C6h,000h,07Ch,0C6h,0C6h,0C6h
DB 0C6h,07Ch,000h,000h,000h,060h,030h,018h,000h,07Ch,0C6h,0C6h,0C6h,0C6h
DB 07Ch,000h,000h,000h,030h,078h,0CCh,000h,0CCh,0CCh,0CCh,0CCh,0CCh,076h
DB 000h,000h,000h,060h,030h,018h,000h,0CCh,0CCh,0CCh,0CCh,0CCh,076h,000h
DB 000h,000h,000h,0C6h,0C6h,000h,0C6h,0C6h,0C6h,0C6h,07Eh,006h,00Ch,078h
DB 000h,0C6h,0C6h,038h,06Ch,0C6h,0C6h,0C6h,0C6h,06Ch,038h,000h,000h,000h
DB 0C6h,0C6h,000h,0C6h,0C6h,0C6h,0C6h,0C6h,0C6h,07Ch,000h,000h,000h,018h
DB 018h,03Ch,066h,060h,060h,066h,03Ch,018h,018h,000h,000h,000h,038h,06Ch
DB 064h,060h,0F0h,060h,060h,060h,0E6h,0FCh,000h,000h,000h,000h,066h,066h
DB 03Ch,018h,07Eh,018h,07Eh,018h,018h,000h,000h,000h,0F8h,0CCh,0CCh,0F8h
DB 0C4h,0CCh,0DEh,0CCh,0CCh,0C6h,000h,000h,000h,00Eh,01Bh,018h,018h,018h
DB 07Eh,018h,018h,018h,018h,0D8h,070h,000h,018h,030h,060h,000h,078h,00Ch
DB 07Ch,0CCh,0CCh,076h,000h,000h,000h,00Ch,018h,030h,000h,038h,018h,018h
DB 018h,018h,03Ch,000h,000h,000h,018h,030h,060h,000h,07Ch,0C6h,0C6h,0C6h
DB 0C6h,07Ch,000h,000h,000h,018h,030h,060h,000h,0CCh,0CCh,0CCh,0CCh,0CCh
DB 076h,000h,000h,000h,000h,076h,0DCh,000h,0DCh,066h,066h,066h,066h,066h
DB 000h,000h,000h,0DCh,000h,0C6h,0E6h,0F6h,0FEh,0DEh,0CEh,0C6h,0C6h,000h
DB 000h,000h,03Ch,06Ch,06Ch,03Eh,000h,07Eh,000h,000h,000h,000h,000h,000h
DB 000h,038h,06Ch,06Ch,038h,000h,07Ch,000h,000h,000h,000h,000h,000h,000h
DB 000h,030h,030h,000h,030h,030h,060h,0C6h,0C6h,07Ch,000h,000h,000h,000h
DB 000h,000h,000h,000h,0FEh,0C0h,0C0h,0C0h,000h,000h,000h,000h,000h,000h
DB 000h,000h,000h,0FEh,006h,006h,006h,000h,000h,000h,000h,0C0h,0C0h,0C6h
DB 0CCh,0D8h,030h,060h,0DCh,086h,00Ch,018h,03Eh,000h,0C0h,0C0h,0C6h,0CCh
DB 0D8h,030h,066h,0CEh,09Eh,03Eh,006h,006h,000h,000h,018h,018h,000h,018h
DB 018h,03Ch,03Ch,03Ch,018h,000h,000h,000h,000h,000h,000h,036h,06Ch,0D8h
DB 06Ch,036h,000h,000h,000h,000h,000h,000h,000h,000h,0D8h,06Ch,036h,06Ch
DB 0D8h,000h,000h,000h,000h,000h,044h,011h,044h,011h,044h,011h,044h,011h
DB 044h,011h,044h,011h,044h,0AAh,055h,0AAh,055h,0AAh,055h,0AAh,055h,0AAh
DB 055h,0AAh,055h,0AAh,077h,0DDh,077h,0DDh,077h,0DDh,077h,0DDh,077h,0DDh
DB 077h,0DDh,077h,018h,018h,018h,018h,018h,018h,018h,018h,018h,018h,018h
DB 018h,018h,018h,018h,018h,018h,018h,018h,0F8h,018h,018h,018h,018h,018h
DB 018h,018h,018h,018h,018h,0F8h,018h,0F8h,018h,018h,018h,018h,018h,018h
DB 036h,036h,036h,036h,036h,036h,0F6h,036h,036h,036h,036h,036h,036h,000h
DB 000h,000h,000h,000h,000h,0FEh,036h,036h,036h,036h,036h,036h,000h,000h
DB 000h,000h,0F8h,018h,0F8h,018h,018h,018h,018h,018h,018h,036h,036h,036h
DB 036h,0F6h,006h,0F6h,036h,036h,036h,036h,036h,036h,036h,036h,036h,036h
DB 036h,036h,036h,036h,036h,036h,036h,036h,036h,000h,000h,000h,000h,0FEh
DB 006h,0F6h,036h,036h,036h,036h,036h,036h,036h,036h,036h,036h,0F6h,006h
DB 0FEh,000h,000h,000h,000h,000h,000h,036h,036h,036h,036h,036h,036h,0FEh
DB 000h,000h,000h,000h,000h,000h,018h,018h,018h,018h,0F8h,018h,0F8h,000h
DB 000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,0F8h,018h,018h
DB 018h,018h,018h,018h,018h,018h,018h,018h,018h,018h,01Fh,000h,000h,000h
DB 000h,000h,000h,018h,018h,018h,018h,018h,018h,0FFh,000h,000h,000h,000h
DB 000h,000h,000h,000h,000h,000h,000h,000h,0FFh,018h,018h,018h,018h,018h
DB 018h,018h,018h,018h,018h,018h,018h,01Fh,018h,018h,018h,018h,018h,018h
DB 000h,000h,000h,000h,000h,000h,0FFh,000h,000h,000h,000h,000h,000h,018h
DB 018h,018h,018h,018h,018h,0FFh,018h,018h,018h,018h,018h,018h,018h,018h
DB 018h,018h,01Fh,018h,01Fh,018h,018h,018h,018h,018h,018h,036h,036h,036h
DB 036h,036h,036h,037h,036h,036h,036h,036h,036h,036h,036h,036h,036h,036h
DB 037h,030h,03Fh,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,03Fh
DB 030h,037h,036h,036h,036h,036h,036h,036h,036h,036h,036h,036h,0F7h,000h
DB 0FFh,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,0FFh,000h,0F7h
DB 036h,036h,036h,036h,036h,036h,036h,036h,036h,036h,037h,030h,037h,036h
DB 036h,036h,036h,036h,036h,000h,000h,000h,000h,0FFh,000h,0FFh,000h,000h
DB 000h,000h,000h,000h,036h,036h,036h,036h,0F7h,000h,0F7h,036h,036h,036h
DB 036h,036h,036h,018h,018h,018h,018h,0FFh,000h,0FFh,000h,000h,000h,000h
DB 000h,000h,036h,036h,036h,036h,036h,036h,0FFh,000h,000h,000h,000h,000h
DB 000h,000h,000h,000h,000h,0FFh,000h,0FFh,018h,018h,018h,018h,018h,018h
DB 000h,000h,000h,000h,000h,000h,0FFh,036h,036h,036h,036h,036h,036h,036h
DB 036h,036h,036h,036h,036h,03Fh,000h,000h,000h,000h,000h,000h,018h,018h
DB 018h,018h,01Fh,018h,01Fh,000h,000h,000h,000h,000h,000h,000h,000h,000h
DB 000h,01Fh,018h,01Fh,018h,018h,018h,018h,018h,018h,000h,000h,000h,000h
DB 000h,000h,03Fh,036h,036h,036h,036h,036h,036h,036h,036h,036h,036h,036h
DB 036h,0FFh,036h,036h,036h,036h,036h,036h,018h,018h,018h,018h,0FFh,018h
DB 0FFh,018h,018h,018h,018h,018h,018h,018h,018h,018h,018h,018h,018h,0F8h
DB 000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,01Fh,018h
DB 018h,018h,018h,018h,018h,0FFh,0FFh,0FFh,0FFh,0FFh,0FFh,0FFh,0FFh,0FFh
DB 0FFh,0FFh,0FFh,0FFh,000h,000h,000h,000h,000h,000h,0FFh,0FFh,0FFh,0FFh
DB 0FFh,0FFh,0FFh,0F0h,0F0h,0F0h,0F0h,0F0h,0F0h,0F0h,0F0h,0F0h,0F0h,0F0h
DB 0F0h,0F0h,00Fh,00Fh,00Fh,00Fh,00Fh,00Fh,00Fh,00Fh,00Fh,00Fh,00Fh,00Fh
DB 00Fh,0FFh,0FFh,0FFh,0FFh,0FFh,0FFh,000h,000h,000h,000h,000h,000h,000h
DB 000h,000h,000h,000h,076h,0DCh,0D8h,0D8h,0DCh,076h,000h,000h,000h,000h
DB 000h,000h,07Ch,0C6h,0FCh,0C6h,0C6h,0FCh,0C0h,0C0h,040h,000h,000h,0FEh
DB 0C6h,0C6h,0C0h,0C0h,0C0h,0C0h,0C0h,0C0h,000h,000h,000h,000h,000h,000h
DB 0FEh,06Ch,06Ch,06Ch,06Ch,06Ch,06Ch,000h,000h,000h,000h,0FEh,0C6h,060h
DB 030h,018h,030h,060h,0C6h,0FEh,000h,000h,000h,000h,000h,000h,000h,07Eh
DB 0D8h,0D8h,0D8h,0D8h,070h,000h,000h,000h,000h,000h,000h,066h,066h,066h
DB 066h,07Ch,060h,060h,0C0h,000h,000h,000h,000h,000h,076h,0DCh,018h,018h
DB 018h,018h,018h,000h,000h,000h,000h,07Eh,018h,03Ch,066h,066h,066h,03Ch
DB 018h,07Eh,000h,000h,000h,000h,038h,06Ch,0C6h,0C6h,0FEh,0C6h,0C6h,06Ch
DB 038h,000h,000h,000h,000h,038h,06Ch,0C6h,0C6h,0C6h,06Ch,06Ch,06Ch,0EEh
DB 000h,000h,000h,000h,01Eh,030h,018h,00Ch,03Eh,066h,066h,066h,03Ch,000h
DB 000h,000h,000h,000h,000h,000h,07Eh,0DBh,0DBh,07Eh,000h,000h,000h,000h
DB 000h,000h,003h,006h,07Eh,0DBh,0DBh,0F3h,07Eh,060h,0C0h,000h,000h,000h
DB 000h,01Ch,030h,060h,060h,07Ch,060h,060h,030h,01Ch,000h,000h,000h,000h
DB 000h,07Ch,0C6h,0C6h,0C6h,0C6h,0C6h,0C6h,0C6h,000h,000h,000h,000h,000h
DB 0FEh,000h,000h,0FEh,000h,000h,0FEh,000h,000h,000h,000h,000h,000h,018h
DB 018h,07Eh,018h,018h,000h,000h,0FFh,000h,000h,000h,000h,030h,018h,00Ch
DB 006h,00Ch,018h,030h,000h,07Eh,000h,000h,000h,000h,00Ch,018h,030h,060h
DB 030h,018h,00Ch,000h,07Eh,000h,000h,000h,000h,00Eh,01Bh,01Bh,018h,018h
DB 018h,018h,018h,018h,018h,018h,018h,018h,018h,018h,018h,018h,018h,018h
DB 0D8h,0D8h,070h,000h,000h,000h,000h,000h,018h,018h,000h,07Eh,000h,018h
DB 018h,000h,000h,000h,000h,000h,000h,000h,076h,0DCh,000h,076h,0DCh,000h
DB 000h,000h,000h,000h,038h,06Ch,06Ch,038h,000h,000h,000h,000h,000h,000h
DB 000h,000h,000h,000h,000h,000h,000h,000h,018h,018h,000h,000h,000h,000h
DB 000h,000h,000h,000h,000h,000h,000h,000h,018h,000h,000h,000h,000h,000h
DB 000h,00Fh,00Ch,00Ch,00Ch,00Ch,00Ch,0ECh,06Ch,03Ch,01Ch,000h,000h,000h
DB 0D8h,06Ch,06Ch,06Ch,06Ch,06Ch,000h,000h,000h,000h,000h,000h,000h,070h
DB 0D8h,030h,060h,0C8h,0F8h,000h,000h,000h,000h,000h,000h,000h,000h,000h
DB 000h,07Ch,07Ch,07Ch,07Ch,07Ch,07Ch,000h,000h,000h,000h,000h,000h,000h
DB 000h,000h,000h,000h,000h,000h,000h,000h,000h,000h

CODE ENDS
END MAIN
[ RETURN TO DIRECTORY ]