*** ASSEMBLY SUCCESSFUL ***
009B ALLPSIN 004B CHOOSE_LEFT 0054 CHOOSE_RIGHT 047F COMBEGADR
000A COMMAND 006A COMMON 0003 CWADR 000B DATA
000E DISABLE 001C DOWN 000F ENABLE 007F IMAGE
0039 NEXTCOM 0004 NUMOFC 0043 NXT_BYTE 0000 PAADR
0082 PACOUTBIN 0090 PAINCOUT 0080 PANDCOUT 0001 PBADR
0002 PCADR 0034 PREPARE_LCD 000D READ 005D SENDCHAR
005E SENDCHARA 0065 SENDCOM 0066 SENDCOMA 0040 SEND_64
000C WRITE
;********************************************************************
;====================================================================
; Program:graphic1.asm
; programmer(s): Dincer Aydin
; function:Displays preformatted image data on LCD
;====================================================================
;********************************************************************
; Example presented here require that the KS0108 cotrolled 128*64 LCD is connected to an
; 8255 with base address of 00h.
; This program was tested on a Powertip PG12864-D 128*64 Graphic LCD
; The Z80 was clocked at 2 MHz
;
; Connections:
; LCD data bus(pins #14-#7) connected to Port A of an 8255 with 00h base address
; LCD Enable pin(#6) connected to Port C bit #7 of the 8255
; LCD R/W pin(#5) connected to Port C bit #6 of the 8255
; LCD RS pin(#4) connected to Port C bit #5 of the 8255
; CSA Chip selection driver 1 connected to Port C bit #4 of the 8255
; CSB Chip selection driver 2 connected to Port C bit #3 of the 8255
; 8255 port address(base 00h):
0000 PAADR EQU 00H
0000 PBADR EQU 01H
0000 PCADR EQU 02H
0000 CWADR EQU 03H
; stuff to be written into the control word of the 8255:
; Some of the change the state of the ports and some manipulate
; bits on port C
0000 ALLPSIN EQU 9BH
0000 PAINCOUT EQU 90H
0000 PANDCOUT EQU 80H
0000 PACOUTBIN EQU 82H
0000 ENABLE EQU 0FH
0000 DISABLE EQU 0EH
0000 READ EQU 0DH
0000 WRITE EQU 0CH
0000 COMMAND EQU 0AH
0000 DATA EQU 0BH
; Define number of commands / strings
0000 NUMOFC EQU 4H
; initialization:
0000 31 00 05 LD SP,500H ; Set stack pointer
0003 0E 03 LD C,CWADR
0005 3E 82 LD A,PACOUTBIN ; Ports A&C out,B in
0007 ED 79 OUT (C),A
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
;*********it all begins here**********:
0009 CD 54 00 CALL CHOOSE_RIGHT
000C CD 34 00 CALL PREPARE_LCD ; initialize the right controller
000F CD 4B 00 CALL CHOOSE_LEFT
0012 CD 34 00 CALL PREPARE_LCD ; initialize the left controller
0015 16 B8 LD D,0B8H ; set page command is in reg D
0017 06 08 LD B,8H ; number of pages
0019 21 7F 00 LD HL,IMAGE ; make HL point the image data
001C CD 40 00 DOWN: CALL SEND_64 ; send 64 bytes of the image data to fill
; one page of the left controller
001F CD 54 00 CALL CHOOSE_RIGHT ; enable the right controller
0022 7A LD A,D ; command byte to set the right page goes to A
0023 CD 66 00 CALL SENDCOMA ; page is set
0026 CD 40 00 CALL SEND_64 ; send 64 bytes of the image data to fill
; one page of the right controller
0029 CD 4B 00 CALL CHOOSE_LEFT ; enable the left controller
002C 14 INC D ; change the set page command to choose another page
002D 7A LD A,D ; command byte to set the left page goes to A
002E CD 66 00 CALL SENDCOMA ; page is set
0031 10 E9 DJNZ DOWN ; loop till all pages of both halves are done
0033 76 HALT
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
;***********************************************
; commands to prepare KS0108 for graphic loading
; these will set page address,display start address
; and y adress
;***********************************************
0034 21 7F 04 PREPARE_LCD: LD HL,COMBEGADR
0037 06 04 LD B,NUMOFC
0039 CD 65 00 NEXTCOM: CALL SENDCOM
003C 23 INC HL
003D 10 FA DJNZ NEXTCOM
003F C9 RET
;***********************************************
; routine to send 64 bytes (one page)
; to the LCD statring from (HL)
; input:(HL)
; output:
; Registers altered: HL
;***********************************************
0040 C5 SEND_64: PUSH BC
0041 06 40 LD B,64
0043 CD 5D 00 NXT_BYTE: CALL SENDCHAR
0046 23 INC HL
0047 10 FA DJNZ NXT_BYTE
0049 C1 POP BC
004A C9 RET
;***********************************************
; routine to select the left part of the display
;***********************************************
004B C5 CHOOSE_LEFT: PUSH BC
004C 0E 02 LD C,PCADR
004E 06 08 LD B,08H ; bit pattern to select the left part
0050 ED 41 OUT (C),B
0052 C1 POP BC
0053 C9 RET
;************************************************
; routine to select the right part of the display
;************************************************
0054 C5 CHOOSE_RIGH: PUSH BC
0055 0E 02 LD C,PCADR
0057 06 10 LD B,10H ; bit pattern to select the right part
0059 ED 41 OUT (C),B
005B C1 POP BC
005C C9 RET
;====================================================================
; Subroutine name:sendcomA & sendcom & sendcharA & sendchar
; programmer:Caner Buyuktuna & Dincer Aydin
; input:A or (HL)
; output:
; Registers altered:A
; function: sendcharA sends the data in A to the LCD
; sendchar sends the data in (HL) to the LCD
; sendcomA sends the command in A to the LCD
; sendcom sends the command in (HL) to the LCD
; !!!!!!!!!!- The busy flag is not checked -!!!!!!!!!!
;====================================================================
005D 7E SENDCHAR: LD A,(HL) ; put the data to be sent to the LCD in A
005E C5 SENDCHARA: PUSH BC ; save BC
005F D5 PUSH DE ; save DE
0060 1E 0B LD E,DATA
0062 C3 6A 00 JP COMMON
0065 7E SENDCOM: LD A,(HL)
0066 C5 SENDCOMA: PUSH BC ; save BC
0067 D5 PUSH DE ; save DE
0068 1E 0A LD E,COMMAND
006A 0E 03 COMMON: LD C,CWADR
006C ED 59 OUT (C),E ; Set/reset RS accoring to the content of register E
006E 16 0C LD D,WRITE
0070 ED 51 OUT (C),D ; reset RW pin for writing to LCD
0072 D3 00 OUT (PAADR),A ; place data/instrucrtion to be written into portA
0074 16 0F LD D,ENABLE
0076 ED 51 OUT (C),D ; enable the LCD
0078 16 0E LD D,DISABLE
007A ED 51 OUT (C),D ; disable the LCD
007C D1 POP DE ; restore DE
007D C1 POP BC ; restore BC
007E C9 RET ; return
; Page0
007F FF FF FF FF IMAGE: DB 0FFH,0FFH,0FFH,0FFH
0083 7F 7F 7F FF DB 07FH,07FH,07FH,0FFH
0087 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
008B FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
008F FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0093 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0097 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
009B FF 7F 7F 1F DB 0FFH,07FH,07FH,01FH
009F 1F CF F7 FF DB 01FH,0CFH,0F7H,0FFH
00A3 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00A7 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00AB FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00AF FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00B3 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00B7 7F 3F 3F FF DB 07FH,03FH,03FH,0FFH
00BB FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00BF FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00C3 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00C7 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00CB 7F 7F FF FF DB 07FH,07FH,0FFH,0FFH
00CF FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00D3 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00D7 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00DB BF BF FF FF DB 0BFH,0BFH,0FFH,0FFH
00DF FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00E3 FF FF 7F 1F DB 0FFH,0FFH,07FH,01FH
00E7 5F FF FF FF DB 05FH,0FFH,0FFH,0FFH
00EB FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00EF FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00F3 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00F7 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
00FB FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
; Page1
00FF FF FF 83 01 DB 0FFH,0FFH,083H,001H
0103 00 05 0F 0D DB 000H,005H,00FH,00DH
0107 0F 0F 3F 7F DB 00FH,00FH,03FH,07FH
010B FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
010F FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0113 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0117 FF E7 E3 E1 DB 0FFH,0E7H,0E3H,0E1H
011B F0 F8 BC 3E DB 0F0H,0F8H,0BCH,03EH
011F 7F FF FF FF DB 07FH,0FFH,0FFH,0FFH
0123 EF 07 03 0B DB 0EFH,007H,003H,00BH
0127 03 0B 9B 5F DB 003H,00BH,09BH,05FH
012B DF FF FF FF DB 0DFH,0FFH,0FFH,0FFH
012F FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0133 FF FF FF 00 DB 0FFH,0FFH,0FFH,000H
0137 00 20 81 FF DB 000H,020H,081H,0FFH
013B FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
013F FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0143 FF FF FF 7F DB 0FFH,0FFH,0FFH,07FH
0147 7F 1F 01 01 DB 07FH,01FH,001H,001H
014B 41 D4 F6 FC DB 041H,0D4H,0F6H,0FCH
014F FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0153 FF BF 3F 43 DB 0FFH,0BFH,03FH,043H
0157 03 81 D4 F5 DB 003H,081H,0D4H,0F5H
015B FC FF FF FF DB 0FCH,0FFH,0FFH,0FFH
015F FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0163 FB F1 00 00 DB 0FBH,0F1H,000H,000H
0167 80 09 1F A3 DB 080H,009H,01FH,0A3H
016B 0F FF 1F 9F DB 00FH,0FFH,01FH,09FH
016F 7F 7F FF FF DB 07FH,07FH,0FFH,0FFH
0173 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0177 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
017B FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
; Pageh,02
017F FF FF FF 08 DB 0FFH,0FFH,0FFH,008H
0183 12 00 80 E0 DB 012H,000H,080H,0E0H
0187 F8 F0 E0 C0 DB 0F8H,0F0H,0E0H,0C0H
018B 84 81 01 3D DB 084H,081H,001H,03DH
018F 0F 2F 3F 7F DB 00FH,02FH,03FH,07FH
0193 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0197 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
019B F9 C0 86 00 DB 0F9H,0C0H,086H,000H
019F D2 FF FF FF DB 0D2H,0FFH,0FFH,0FFH
01A3 FF FC 0C 04 DB 0FFH,0FCH,00CH,004H
01A7 00 00 E0 70 DB 000H,000H,0E0H,070H
01AB 83 09 7F 7F DB 083H,009H,07FH,07FH
01AF FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
01B3 FF FF 03 00 DB 0FFH,0FFH,003H,000H
01B7 00 D8 FD FF DB 000H,0D8H,0FDH,0FFH
01BB FF FF FF 7F DB 0FFH,0FFH,0FFH,07FH
01BF 7F 3F 37 17 DB 07FH,03FH,037H,017H
01C3 89 86 C1 F1 DB 089H,086H,0C1H,0F1H
01C7 F8 FC FE FF DB 0F8H,0FCH,0FEH,0FFH
01CB FF 7F 3F 1F DB 0FFH,07FH,03FH,01FH
01CF 0F 47 03 63 DB 00FH,047H,003H,063H
01D3 D1 31 90 5C DB 0D1H,031H,090H,05CH
01D7 1E BF 7F 3F DB 01EH,0BFH,07FH,03FH
01DB 7F 7F 7F 3F DB 07FH,07FH,07FH,03FH
01DF 7F 7F FF FF DB 07FH,07FH,0FFH,0FFH
01E3 FF FF FF F8 DB 0FFH,0FFH,0FFH,0F8H
01E7 C0 22 00 3A DB 0C0H,022H,000H,03AH
01EB FE FC F8 FA DB 0FEH,0FCH,0F8H,0FAH
01EF F5 E3 D6 C1 DB 0F5H,0E3H,0D6H,0C1H
01F3 87 03 23 07 DB 087H,003H,023H,007H
01F7 0F 0F 0F 8F DB 00FH,00FH,00FH,08FH
01FB FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
; Page3
01FF FF FF 0F 40 DB 0FFH,0FFH,00FH,040H
0203 02 0C FE FF DB 002H,00CH,0FEH,0FFH
0207 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
020B FF FF FE F4 DB 0FFH,0FFH,0FEH,0F4H
020F FC F8 C4 22 DB 0FCH,0F8H,0C4H,022H
0213 00 09 07 87 DB 000H,009H,007H,087H
0217 E7 FF FF FF DB 0E7H,0FFH,0FFH,0FFH
021B FF F0 00 02 DB 0FFH,0F0H,000H,002H
021F 00 A7 FF FF DB 000H,0A7H,0FFH,0FFH
0223 FF 7F 80 08 DB 0FFH,07FH,080H,008H
0227 84 DA FF FF DB 084H,0DAH,0FFH,0FFH
022B F0 B4 62 E6 DB 0F0H,0B4H,062H,0E6H
022F 6D 3F FF FF DB 06DH,03FH,0FFH,0FFH
0233 FF FF 04 80 DB 0FFH,0FFH,004H,080H
0237 04 D5 FF FF DB 004H,0D5H,0FFH,0FFH
023B FF E1 80 B0 DB 0FFH,0E1H,080H,0B0H
023F 18 06 3E BF DB 018H,006H,03EH,0BFH
0243 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0247 FF FF FF F9 DB 0FFH,0FFH,0FFH,0F9H
024B F8 F8 F1 E0 DB 0F8H,0F8H,0F1H,0E0H
024F C0 81 21 44 DB 0C0H,081H,021H,044H
0253 0D 29 B9 79 DB 00DH,029H,0B9H,079H
0257 FC F9 FA FA DB 0FCH,0F9H,0FAH,0FAH
025B F8 F8 F8 F8 DB 0F8H,0F8H,0F8H,0F8H
025F FC FF FF FF DB 0FCH,0FFH,0FFH,0FFH
0263 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0267 04 22 00 01 DB 004H,022H,000H,001H
026B 03 47 83 43 DB 003H,047H,083H,043H
026F 43 E1 F3 E1 DB 043H,0E1H,0F3H,0E1H
0273 E1 E1 F1 F0 DB 0E1H,0E1H,0F1H,0F0H
0277 F8 FC FE FF DB 0F8H,0FCH,0FEH,0FFH
027B FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
; Page4
027F FF FF 09 12 DB 0FFH,0FFH,009H,012H
0283 08 09 FF FF DB 008H,009H,0FFH,0FFH
0287 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
028B FF FF FF 1F DB 0FFH,0FFH,0FFH,01FH
028F 0F 07 41 70 DB 00FH,007H,041H,070H
0293 DC FE FF FF DB 0DCH,0FEH,0FFH,0FFH
0297 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
029B 7F 07 00 00 DB 07FH,007H,000H,000H
029F E8 FF FF FF DB 0E8H,0FFH,0FFH,0FFH
02A3 3F 00 00 00 DB 03FH,000H,000H,000H
02A7 F8 FF FF FF DB 0F8H,0FFH,0FFH,0FFH
02AB FF FF FC E3 DB 0FFH,0FFH,0FCH,0E3H
02AF 00 C1 08 03 DB 000H,0C1H,008H,003H
02B3 7F FF 10 A4 DB 07FH,0FFH,010H,0A4H
02B7 44 A6 FF FF DB 044H,0A6H,0FFH,0FFH
02BB FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
02BF FC FC F1 E4 DB 0FCH,0FCH,0F1H,0E4H
02C3 EB 9D 03 47 DB 0EBH,09DH,003H,047H
02C7 CF 4F 5F FF DB 0CFH,04FH,05FH,0FFH
02CB FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
02CF FF FF FF FE DB 0FFH,0FFH,0FFH,0FEH
02D3 F8 F8 E0 18 DB 0F8H,0F8H,0E0H,018H
02D7 02 83 0F FF DB 002H,083H,00FH,0FFH
02DB 7F FF FF FF DB 07FH,0FFH,0FFH,0FFH
02DF FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
02E3 FF FF FF 3F DB 0FFH,0FFH,0FFH,03FH
02E7 42 04 80 FA DB 042H,004H,080H,0FAH
02EB FE F9 F0 E0 DB 0FEH,0F9H,0F0H,0E0H
02EF 0B 00 01 B7 DB 00BH,000H,001H,0B7H
02F3 3F FF FF FF DB 03FH,0FFH,0FFH,0FFH
02F7 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
02FB FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
; Page5
02FF FF 7F C0 80 DB 0FFH,07FH,0C0H,080H
0303 E0 F8 FF FF DB 0E0H,0F8H,0FFH,0FFH
0307 FF FF 7F 1F DB 0FFH,0FFH,07FH,01FH
030B 0F 83 C0 E0 DB 00FH,083H,0C0H,0E0H
030F F8 FE FF FF DB 0F8H,0FEH,0FFH,0FFH
0313 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0317 FF FF FF 3F DB 0FFH,0FFH,0FFH,03FH
031B 00 04 00 D1 DB 000H,004H,000H,0D1H
031F FF FF FF 0F DB 0FFH,0FFH,0FFH,00FH
0323 80 00 08 FD DB 080H,000H,008H,0FDH
0327 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
032B FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
032F FF F8 00 00 DB 0FFH,0F8H,000H,000H
0333 00 03 03 14 DB 000H,003H,003H,014H
0337 E8 F9 FF FF DB 0E8H,0F9H,0FFH,0FFH
033B FF FF E3 C5 DB 0FFH,0FFH,0E3H,0C5H
033F 00 03 03 0F DB 000H,003H,003H,00FH
0343 8F DF FE FE DB 08FH,0DFH,0FEH,0FEH
0347 F8 E9 C0 A7 DB 0F8H,0E9H,0C0H,0A7H
034B 03 0B 0B 07 DB 003H,00BH,00BH,007H
034F 1F 9F FF FF DB 01FH,09FH,0FFH,0FFH
0353 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0357 FF F0 82 00 DB 0FFH,0F0H,082H,000H
035B 00 05 1F 7F DB 000H,005H,01FH,07FH
035F FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0363 FF FF 07 00 DB 0FFH,0FFH,007H,000H
0367 00 C0 FC FF DB 000H,0C0H,0FCH,0FFH
036B FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
036F FF FC FA FA DB 0FFH,0FCH,0FAH,0FAH
0373 00 11 01 61 DB 000H,011H,001H,061H
0377 BF FF FF FF DB 0BFH,0FFH,0FFH,0FFH
037B FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
; Page6
037F FF FF FF 9F DB 0FFH,0FFH,0FFH,09FH
0383 BF A7 A7 0F DB 0BFH,0A7H,0A7H,00FH
0387 01 80 C0 FC DB 001H,080H,0C0H,0FCH
038B FE FE FF FF DB 0FEH,0FEH,0FFH,0FFH
038F FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0393 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0397 FF FF FF 00 DB 0FFH,0FFH,0FFH,000H
039B 00 80 C0 FF DB 000H,080H,0C0H,0FFH
039F FF FF FF 70 DB 0FFH,0FFH,0FFH,070H
03A3 A8 60 DC FF DB 0A8H,060H,0DCH,0FFH
03A7 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
03AB FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
03AF FF FF E8 C0 DB 0FFH,0FFH,0E8H,0C0H
03B3 C0 E0 F0 FF DB 0C0H,0E0H,0F0H,0FFH
03B7 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
03BB FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
03BF FF FE FE FF DB 0FFH,0FEH,0FEH,0FFH
03C3 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
03C7 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
03CB FF F8 E0 E0 DB 0FFH,0F8H,0E0H,0E0H
03CF F0 F8 FF FF DB 0F0H,0F8H,0FFH,0FFH
03D3 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
03D7 FF FF FF F8 DB 0FFH,0FFH,0FFH,0F8H
03DB C0 C0 C0 E0 DB 0C0H,0C0H,0C0H,0E0H
03DF F3 FF FF FF DB 0F3H,0FFH,0FFH,0FFH
03E3 FF 04 00 04 DB 0FFH,004H,000H,004H
03E7 A2 FF FF FF DB 0A2H,0FFH,0FFH,0FFH
03EB FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
03EF FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
03F3 FF FE E2 80 DB 0FFH,0FEH,0E2H,080H
03F7 00 00 13 4F DB 000H,000H,013H,04FH
03FB FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
; Page7
03FF FF FF FF FC DB 0FFH,0FFH,0FFH,0FCH
0403 FD FE FF FF DB 0FDH,0FEH,0FFH,0FFH
0407 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
040B FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
040F FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0413 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0417 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
041B FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
041F FF FF FF FE DB 0FFH,0FFH,0FFH,0FEH
0423 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0427 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
042B FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
042F FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0433 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0437 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
043B FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
043F FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0443 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0447 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
044B FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
044F FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0453 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0457 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
045B FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
045F FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0463 FF FF FE FF DB 0FFH,0FFH,0FEH,0FFH
0467 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
046B FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
046F FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0473 FF FF FF FF DB 0FFH,0FFH,0FFH,0FFH
0477 FD F0 E0 E1 DB 0FDH,0F0H,0E0H,0E1H
047B F8 FE FF FF DB 0F8H,0FEH,0FFH,0FFH
047F 3F 40 B8 C0 COMBEGADR: DB 3FH,40H,0B8H,0C0H
; initialization commands
               (
geocities.com/dinceraydin)