*** 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 


    Source: geocities.com/dinceraydin/files

               ( geocities.com/dinceraydin)