;****************************************************************************
;*																			*
;*						40 x 25 TV Terminal	/ TV Controller					*
;*																			*
;*								Version 3.0									*
;*																			*
;*								© by Benedikt								*
;*																			*
;*						Email:	benedikt83 ät gmx.net						*
;*																			*
;*																			*
;*						ergänzt um Cursordarstellung und					*
;*																			*
;*						Steuertasten sowie CR-Abfrage						*
;*																			*
;*								by Björn Wieck								*
;*																			*
;*						Email:	bps_of_tbm@t-online.de						*
;*																			*
;*																			*
;****************************************************************************
;*																			*
;*	Die Software darf frei kopiert und verändert werden, solange sie nicht	*
;*	ohne meine Erlaubnis für kommerzielle Zwecke eingesetzt wird.			*
;*																			*
;****************************************************************************
;*																			*
;*	Diese Software erzeugt ein PAL ähnliches Videosignal, das von allen von	*
;*	mir getesteten TV geräten aktzeptiert wird.								*
;*																		 	*
;****************************************************************************

.include "m8def.inc"

;Im Interrupt genutzte und geänderte Register:
.def regsave	=r2
.def spian		=r3
.def spiaus		=r4
.def X_Cnt		=r5
.def tempi		=r16
.def LOOP		=r17
.def Y_Cnt		=r18
.def C_Cnt		=r19
;zusätzlich: X und Z

;Sonstige Register:
.def temp		=r20
.def temp2		=r21
.def RX			=r22
.def col_count 	=r23				;Spaltenzähler für Spalte 0-39 (Für CR und CRSR wichtig)
.def csr		=r24				;gesicherter Bildspeicherwert bevor Cursor angezeigt wird 
;zusätzlich: Y

;PortB
.equ 	DOUT	=1					;Pixeldaten     \
.equ 	Sync	=2					;Vsync Ausgang   } Verbinden
.equ 	MOSI	=3					;Pixeldaten     /
.equ 	MISO	=4					;NC
.equ 	SCK		=5					;NC          

.equ Baudrate	=19200

;Bildgröße
.equ XSize		=40					;Bildgröße in X Richtung in Nibbles
.equ YSize		=25					;Bildgröße in Y Richtung pro Halbbild

;Horizontal
.equ XStart		=220				;Anzahl an CPU Takten zwischen Beginn HSync und Bildbeginn (mindestens 30, und mindestens HSyncbreite)
.equ SyncWidth	=75					;Anzahl an CPU Takten für HSync

;Vertikal
.equ Height		=8					;Zeichenhöhe
.equ Dummy		=0					;Zusätzliche Zwischenzeilen (wird momentan nicht unterstützt, muss 0 sein !)
.equ BPSize		=50					;VSync Back Porch in Zeilen (Y Verschiebung)
.equ VSize		=4					;VSync Impuls in Zeilen

#define LCD							;Zeichen 128-135: Balkenanzeige
#define HOR_FILL					;Lücken zwischen den Zeichen füllen

;Interne Konstanten
.equ BildSize	=YSize*Height		;Bildhöhe in Zeilen
.equ BildStart	=313-BildSize+YSize	;Bildhöhe in SyncZeilen+Zeichen (interner Zähler)
.equ FPSize		=(313-YSize*(Height+Dummy))-VSize-BPSize	;Frontporchbreite in Zeilen
.equ FPStart	=YSize				;Frontporch Start in internen Zählerzeilen
.equ VSStart	=FPStart+FPSize		;Vsyncstart in internen Zählerzeilen
.equ BPStart	=VSStart+VSize		;Backporchstart in internen Zählerzeilen 

.dseg
DDRAM:	.byte	XSize*YSize			;DDRAM

;****************************************************************************
;	Interrupt Vektoren
;****************************************************************************

.cseg
.org 0
rjmp Reset

.org OC1Aaddr				;Bildbeginn
	in regsave, sreg

	cpi Y_Cnt, YSize		;Bildbereich oder schon VSync + Zubehör ?
	brsh handle_VSync

	mov tempi, ZH
	in ZL, TCNT1L			;Timerwert lesen
	in ZH, TCNT1H
	subi ZL, low(XStart-10-comp)	;und Korrekturwert berechnen
	sbci ZH, high(XStart-10-comp)
	ijmp 					;Wartezeit korrigieren
	nop
	nop
	nop
	nop
	nop
	nop
	nop
	nop
	nop
	nop
	nop
	nop
	nop
comp:
	mov ZH, tempi
	ldi tempi, XSize
	mov X_Cnt, tempi
hloop:						;Loop für 1 Zeile
	ld ZL, X+				;ASCII aus RAM lesen	2
	lpm tempi, Z			;Byte aus CGROM lesen	3
	out DDRB, spiaus		;SPI aus, Port an		1
	out SPDR, tempi			;Byte ausgeben			1
	out DDRB, spian			;SPI an, Port aus		1
#ifdef HOR_FILL
	sbrs tempi, 0			;Füllpixel setzen		1
	cbi PORTB, DOUT			;						1,5
	sbrc tempi, 0			;						1
	sbi PORTB, DOUT			;						1,5
#else
	nop						;						1
	nop						;						1
	nop						;						1
	nop						;						1
	nop						;						1
#endif
	nop						;						1
	nop						;						1
	dec X_Cnt				;						1
	brne hloop				;						2
							;					  =18, also 16 (für 1 Byte) + Pause dazwischen
	nop
	nop
	nop
	nop
	nop
	nop
	out DDRB, spiaus		;SPI abschalten
	cbi PORTB, DOUT			;Bild: schwarz
	dec C_Cnt				;Zähler für Zeichenhöhe erniedrigen
	breq skipcloop			;1 Textzeile fertig ausgegeben ?

	inc ZH					;Nein -> Bilddatenadresse für nächste Pixelzeile laden und
	subi XL, low(XSize)		;Textadresse wieder an Anfang der Textzeile setzen
	sbci XH, high(XSize)	;
	rjmp exit_int

skipcloop:					;Alles für neue Textzeile einrichten
	ldi ZH, 4				;1024Bytes CGROM Offset
	ldi C_Cnt, Height		;Zeichenhöhen Counter laden
	inc Y_Cnt				;Zeilencounter erhöhen
	rjmp exit_int

handle_VSync:
	inc Y_Cnt				;Zeilenzähler erhöhen

	cpi Y_Cnt, VSStart		;Beginn VSync ?
	breq VSyncstart	

	cpi Y_Cnt, BPStart		;Ende VSync ?
	breq VSyncende	

	cpi Y_Cnt, BildStart	;Bildende ?
	brsh Bildbeginn	

	rjmp exit_int

VSyncstart:
	ldi tempi, (1<<COM1B1)|(0<<COM1B0)|(1<<WGM11)|(1<<WGM10)
	out TCCR1A, tempi		;VSync Start: Sync Impulse High aktiv
	rjmp exit_int

VSyncende:
	ldi tempi, (1<<COM1B1)|(1<<COM1B0)|(1<<WGM11)|(1<<WGM10)
	out TCCR1A, tempi		;VSync Ende: Sync Impulse Low aktiv
	rjmp exit_int

Bildbeginn:
	clr Y_Cnt
	ldi XL, low(DDRAM)
	ldi XH, high(DDRAM)
	rjmp exit_int

exit_int:
	out sreg, regsave
reti
	

;****************************************************************************
;	CPU Register Initialisierung
;****************************************************************************

Reset:

ldi	temp, low(RAMEND)
out	SPL, temp					;setup stack pointer

ldi	temp, high(RAMEND)
out	SPH, temp					;setup stack pointer

ser temp
out portd, temp

clr temp
out portb, temp

ldi temp, (1<<Sync)|(1<<MOSI)
out DDRB, temp
mov spian, temp

ldi temp, (1<<Sync)|(1<<DOUT)
mov spiaus, temp

cbi PORTB, DOUT

ldi temp, (1<<SPE)|(1<<MSTR)|(1<<CPHA)	;fclk/2 Schiebetakt
out SPCR, temp					;Enable SPI Slave, Interrupt
sbi SPSR, SPI2X

ldi temp, high(1024)			;Timer Reloadwert
out ICR1H, temp

ldi temp, low(1024)				;Timer Reloadwert
out ICR1L, temp

ldi temp, high(SyncWidth)		;HSync Breite in CPU Takten
out OCR1BH, temp

ldi temp, low(SyncWidth)		;HSync Breite in CPU Takten
out OCR1BL, temp

ldi temp, high(XStart-30)		;H Shift
out OCR1AH, temp

ldi temp, low(XStart-30)		;H Shift
out OCR1AL, temp

ldi temp, (1<<COM1B1)|(1<<COM1B0)|(1<<WGM11)|(1<<WGM10)
out TCCR1A, temp

ldi temp, (1<<WGM12)|1			;10bit PWM bei 16MHz: 15,625kHz
out TCCR1B, temp

ldi temp, (1<<OCIE1A)			;CompareA Interrupt: Beginn der Datenausgabe
out timsk, temp

ldi temp, 0
out UBRRH, temp

ldi temp, (1000000+Baudrate/2)/Baudrate-1;Baudrate bei 16MHz berchnen und runden
out UBRRL, temp
ldi temp, (1<<RXEN)				;RX aktivieren
out UCSRB, temp 		



;****************************************************************************
;	Variablen Initialisierung
;****************************************************************************

				clr temp
				clr temp2
				clr col_count						;Spaltenzähler auf 0 voreinstellen

				ldi YL, low(DDRAM)
				ldi YH, high(DDRAM)

				ldi temp, 32						;Bildschirmspeicher mit Leerzeichen überschreiben
clrloop:
				st Y+, temp
			;	inc temp							;Bildschirm leer lassen, Hier kann der komplette Zeichensatz angezeigt werden
				ldi temp2, high(XSize*YSize+DDRAM)
				cpi YL, low(XSize*YSize+DDRAM)
				cpc YH, temp2
				brne clrloop
				ldi XL, low(DDRAM)
				ldi XH, high(DDRAM)
				ldi YL, low(DDRAM)					;Cursor auf
				ldi YH, high(DDRAM)					;Home setzen
				ldi temp, (1<<OCF1A)				;Interrupt Flag löschen
				out TIFR, temp
				sei

;****************************************************************************
;	Hauptprogramm
;****************************************************************************

Mainloop:		cli
				nop									; Irgendwas tun...
				nop									; Irgendwas tun...
				nop									; Irgendwas tun...
				nop									; Irgendwas tun...
				nop									; Irgendwas tun...
				sei									; ...um ein bisschen Latenzzeit hinzufügen
				ld csr, Y							;Bildspeicherwert unter Cursorposition sichern
				ldi temp, 95						;Byte für Cursordarstellung ("_") laden
				st Y, temp							;und an aktueller Position ausgeben
warten:			sbic UCSRA, RXC						;Daten im UART Puffer ?	
				rjmp rxuart							;dann Sprung zu xruart
				rjmp warten							;sonst warten


rxuart:												;UART Daten verarbeiten
				st Y, csr
				in RX, UDR							;RX-Puffer einlesen
				cpi RX, 91							;auf Cursortasten Prüfen
				breq crsrjmp						;Sprung zur Cursortastenroutine
rxuart_v:
				cpi RX, 32							;wenn Wert < 32
				brlo command						;Sprung zu command (Befehle auswerten)
				st Y+, RX							;ASCII-Daten
				inc col_count						;Spaltenzähler = Spaltenzähler + 1
				cpi col_count, 40					;Spaltenzähler = 40 ?
				breq colnull						;dann Spaltenzähler auf 0

rxuart_w:		ldi temp, high(XSize*YSize+DDRAM)	;Prüfung ob Zeilen und Spaltenende
				cpi YL, low(XSize*YSize+DDRAM)		;erreicht sind, falls Ja dann
				cpc YH, temp						;DDRAM Startadresse laden
				brlo skipwpreset					;falls nicht Sprung zu skipwpreset
				ldi YL, low(DDRAM)					;Cursorposition auf 0 setzen
				ldi YH, high(DDRAM)
				ldi col_count, 0					;Spaltenzähler auf 0

skipwpreset:
				rjmp Mainloop						;zurück zum Hauptprogramm

colnull:
				ldi col_count, 0					;Spaltenzähler auf 0
				rjmp rxuart_w						;

crsrjmp:
				rjmp crsrkeys
command:											;ASCII-Befehle
				cpi RX, 1							;Byte für Home ?
				brne com1							;sonst weiter
				ldi YL, low(DDRAM)					;Cursorposition auf 0
				ldi YH, high(DDRAM)
				clr col_count						;Spaltenzähler auf 0
				rjmp Mainloop

com1:
				cpi RX, 8							;Byte für Backspace ?
				brne com8							;sonst weiter
				cpi col_count, 0					;wenn Spaltenzähler = 0
				breq col40							;dann Spaltenzähler auf 40

col40w:
				dec col_count						;Spaltenzähler runterzählen
				sbiw YH:YL, 1						;Cursorposition runterzählen
				ldi temp, high(DDRAM)				;Prüfen ob Zeilen und Spaltenanfang
				cpi YL, low(DDRAM)					;erreicht sind
				cpc YH, temp						
				brsh exbs							;falls nicht Sprung zu exbs
				ldi YL, low(DDRAM)					;DDRAM Startadresse laden
				ldi YH, high(DDRAM)
				ldi col_count, 0					;Spaltenzähler auf 0


exbs:
				ldi temp, 32						;Leerzeichen laden
				st Y, temp							;und an aktueller Cursorposition ausgeben
				rjmp Mainloop						;zurück zum Hauptprogramm

col40:
				ldi col_count, 40					;Spaltenzähler auf 40
				rjmp col40w							;weitermachen

com8:
				cpi RX, 10							;Byte für Line Feed ?
				brne comCR							;sonst weiter
				subi YL, low(-XSize)				;Cursorposition um 1 Zeile erhöhen
				sbci YH, high(-XSize)
				ldi temp, high(XSize*YSize+DDRAM)	;prüfen ob Bildspeicherende erreicht ist
				cpi YL, low(XSize*YSize+DDRAM)
				cpc YH, temp
				brlo skipres						;falls nicht dann Sprung zu Hauptprogramm
				ldi YL, low(DDRAM)					;DDRAM Startadresse + Spaltenzähler laden
				ldi YH, high(DDRAM)
				adc YL, col_count				

skipres:
				rjmp Mainloop						;zurück zum Hauptprogramm

comCR:
				cpi RX, 13							;Byte für Carriage Return ?
				brne com10							;sonst weiter
				sbc YL, col_count					;Cursorposition - Spaltenzähler
				sbci YH, 0
				clr col_count						;Spaltenzähler auf Null
				rjmp Mainloop						;zurück zum Hauptprogramm

com10:
				cpi RX, 11							;Byte für Delete in place ?
				brne com11							;sonst weiter
				ldi temp, 32						;Leerzeichen laden
				st Y, temp							;und an aktueller Cursorposition ausgeben
				rjmp Mainloop						;zurück zum Hauptprogramm

com11:
				cpi RX, 12							;Byte für Clear all ?
				brne com12							;sonst weiter
				ldi YL, low(DDRAM)					;DDRAM Startadresse laden
				ldi YH, high(DDRAM)
				ldi temp, 32						;Byte für Leerzeichen laden
				ldi temp2, high(XSize*YSize+DDRAM)	;Bildspeicherende laden

clrloop2:
				st Y+, temp							;Leerzeichen ausgeben und Cursorposition erhöhen
				cpi YL, low(XSize*YSize+DDRAM)		;Bildspeicherende erreicht ?
				cpc YH, temp2
				brne clrloop2						;falls nein dann weiterlöschen
				ldi YL, low(DDRAM)					;DDRAM Startadresse laden
				ldi YH, high(DDRAM)
				clr col_count						;Spaltenzähler auf 0
				rjmp Mainloop						;zurück zum Hauptprogramm

com12:
				cpi RX, 14							;Hier können später noch andere Commando-Codes  
				brne com15							;implementiert werden
wl1:
				sbis UCSRA, RXC
				rjmp wl1

				rjmp Mainloop
com15:
				cpi RX, 15							;Hier können später noch andere Commando-Codes 
				brne com16							;implementiert werden
wl2:
				sbis UCSRA, RXC
				rjmp wl2
com16:
				cpi RX, 17							;Byte für Set Cursor ?
				brne com17							;sonst weiter
wl3:
				sbis UCSRA, RXC						;warten auf Byte für Spaltenposition (0-39)
				rjmp wl3
				in RX, UDR
wl4:
				sbis UCSRA, RXC						;warten auf Byte für Zeilenposition (0-24)
				rjmp wl4
				in temp, UDR
				mov col_count, RX					;Spaltenposition für Spaltenzähler übernehmen
				ldi temp2, XSize					;lade Spaltenenende
				mul temp, temp2						;multipliziere Spaltenposition mit Spaltenenende
				mov YH, r1							;Ergebnis steht in Register R0 und R1
				mov YL, r0
				subi YL, low(-DDRAM)				;Spaltenende abziehen
				sbci YH, high(-DDRAM)
				add YL, RX							;Zeilenposition aufaddieren
				ldi temp, 0
				adc YH, temp
				ldi temp, high(XSize*YSize+DDRAM)	;prüfen ob Bildspeicherende erreicht ist
				cpi YL, low(XSize*YSize+DDRAM)
				cpc YH, temp
				brlo skiprs							;falls nicht dann Sprung zu Hauptprogramm
				ldi YL, low(DDRAM)					;sonst DDRAM Startadresse laden
				ldi YH, high(DDRAM)
				clr col_count						;Spaltenzähler auf 0
skiprs:
				rjmp Mainloop						;zurück zum Hauptprogramm
com17:
				rjmp Mainloop						;zurück zum Hauptprogramm

;****************************************************************************
;	auswerten der Cursorkeys
;****************************************************************************
crsrkeys:
				sbis UCSRA, RXC						;warten auf Byte für Cursorkey (ABCD)
				rjmp crsrkeys
				in RX, UDR
crsrleft:		cpi RX, 68							;Cursortaste links ?
				brne crsrright						;sonst weiterprüfen
				cpi col_count, 0					;wenn Spaltenzähler = 0
				breq col40_1						;dann Spaltenzähler auf 40
col40_1a:		dec col_count						;Spaltenzähler runterzählen
				sbiw YH:YL, 1						;Cursorposition runterzählen
				ldi temp, high(DDRAM)				;Prüfen ob Zeilen und Spaltenanfang
				cpi YL, low(DDRAM)					;erreicht sind
				cpc YH, temp						
				brsh crsr_ret0						;falls nicht Sprung zu Mainloop
				ldi YL, low(DDRAM)					;DDRAM Startadresse laden
				ldi YH, high(DDRAM)
				ldi col_count, 0					;Spaltenzähler auf 0
crsr_ret0:		rjmp Mainloop						;zurück zum Hauptprogramm
col40_1:
				ldi col_count, 40					;Spaltenzähler auf 40
				rjmp col40_1a						;weiter

crsrright:		cpi RX, 67							;Cursortaste rechts ?
				brne crsrdown						;sonst weiterprüfen
				cpi col_count, 40					;wenn Spaltenzähler = 40
				breq col40_2						;dann Spaltenzähler auf 0
col40_2b:		inc col_count						;Spaltenzählern raufzählen
				adiw YH:YL, 1						;Cursorposition raufzählen
				ldi temp, high(XSize*YSize+DDRAM)	;Prüfung ob Zeilen und Spaltenende
				cpi YL, low(XSize*YSize+DDRAM)		;erreicht sind, falls Ja dann
				cpc YH, temp						;DDRAM Startadresse laden
				brlo crsr_ret1						;sonst zurück zum Hauptprogramm
				ldi YL, low(DDRAM)					;sonst DDRAM Startadresse laden
				ldi YH, high(DDRAM)
				clr col_count						;Spaltenzähler auf 0
crsr_ret1:		rjmp Mainloop						;zurück zum Hauptprogramm
col40_2:
				ldi col_count, 0					;Spaltenzähler auf 0
				rjmp col40_2b						;weiter

crsrdown:		cpi RX, 66							;Cursortaste unten ?
				brne crsrup							;sonst weiterprüfen
				adiw YH:YL, 40						;Cursorposition raufzählen
				ldi temp, high(XSize*YSize+DDRAM)	;Prüfung ob Zeilen und Spaltenende
				cpi YL, low(XSize*YSize+DDRAM)		;erreicht sind, falls Ja dann
				cpc YH, temp						;DDRAM Startadresse laden
				brlo crsr_ret2
				ldi YL, low(DDRAM)					;DDRAM Startadresse laden
				ldi YH, high(DDRAM)
				clr col_count						;Spaltenzähler auf 0
crsr_ret2:		rjmp Mainloop						;zurück zum Hauptprogramm

crsrup:			cpi RX, 65							;Cursortaste oben ?
				brne crsrend						;sonst Byte als ASCII-Zeichen ausgeben
				sbiw YH:YL, 40						;Cursorposition runterzählen
				ldi temp, high(DDRAM)				;Prüfen ob Zeilen und Spaltenanfang
				cpi YL, low(DDRAM)					;erreicht sind
				cpc YH, temp						
				brsh crsr_ret3						;falls nicht Sprung zu Mainloop
				ldi YL, low(DDRAM)					;DDRAM Startadresse laden
				ldi YH, high(DDRAM)
				ldi col_count, 0					;Spaltenzähler auf 0
crsr_ret3:		rjmp Mainloop						;zurück zum Hauptprogramm
crsrend:		rjmp rxuart_v						;Byte als ASCII-Zeichen ausgeben


;*** CG ROM Daten *** (8x8 Zeichensatz)

#ifdef LCD
.org 512
.db 0x00,0x7E,0x7E,0x6C,0x10,0x38,0x10,0x10,0xFF,0x00,0x00,0x00,0x00,0x00,0x7F,0x99,0x80,0x02,0x18,0x66,0x7F,0x3E,0x00,0x18,0x18,0x18,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x30,0x6C,0x6C,0x30,0x00,0x38,0x60,0x18,0x60,0x00,0x00,0x00,0x00,0x00,0x06,0x7C,0x30,0x78,0x78,0x1C,0xFC,0x38,0xFC,0x78,0x78,0x00,0x00,0x18,0x00,0x60,0x78 ;1
.db 0x7C,0x30,0xFC,0x3C,0xF8,0xFE,0xFE,0x3C,0xCC,0x78,0x1E,0xE6,0xF0,0xC6,0xC6,0x38,0xFC,0x78,0xFC,0x78,0xFC,0xCC,0xCC,0xC6,0xC6,0xCC,0xFE,0x78,0xC0,0x78,0x10,0x00,0x30,0x00,0xE0,0x00,0x1C,0x00,0x38,0x00,0xE0,0x30,0x0C,0xE0,0x70,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x10,0x00,0x00,0x00,0x00,0x00,0x00,0x1C,0x18,0xE0,0x76,0x00 
.db 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xFF,0x7E,0xCC,0xE0,0xCC,0x7C,0xE0,0xC6,0x30,0x1C,0x00,0x3E,0x78,0x00,0x00,0x78,0x00,0x00,0xC3,0xCC,0x18,0x38,0xCC,0xF8,0x0E,0x1C,0x38,0x00,0x00,0x00,0xFC,0x3C,0x38,0x30,0x00,0x00,0xC3,0xC3,0x18,0x00,0x00,0x22,0x55,0xDB,0x18,0x18,0x18,0x36,0x00,0x00,0x36,0x36,0x00,0x36,0x36,0x18,0x00
.db 0x18,0x18,0x00,0x18,0x00,0x18,0x18,0x36,0x36,0x00,0x36,0x00,0x36,0x00,0x36,0x18,0x36,0x00,0x00,0x36,0x18,0x00,0x00,0x36,0x18,0x18,0x00,0xFF,0x00,0xF0,0x0F,0xFF,0x00,0x00,0x00,0x00,0xFC,0x00,0x00,0x00,0xFC,0x38,0x38,0x1C,0x00,0x06,0x38,0x78,0x00,0x30,0x60,0x18,0x0E,0x18,0x30,0x00,0x38,0x00,0x00,0x0F,0x78,0x70,0x00,0x00 

.db 0x00,0x81,0xFF,0xFE,0x38,0x7C,0x10,0x10,0xFF,0x00,0x00,0x00,0x00,0x00,0x63,0x5A,0xE0,0x0E,0x3C,0x66,0xDB,0x63,0x00,0x3C,0x3C,0x18,0x18,0x30,0x30,0x30,0x30,0x30,0x00,0x78,0x6C,0x6C,0x7C,0xC6,0x6C,0x60,0x30,0x30,0x66,0x30,0x00,0x00,0x00,0x0C,0xC6,0x70,0xCC,0xCC,0x3C,0xC0,0x60,0xCC,0xCC,0xCC,0x30,0x30,0x30,0x00,0x30,0xCC ;2
.db 0xC6,0x78,0x66,0x66,0x6C,0x62,0x62,0x66,0xCC,0x30,0x0C,0x66,0x60,0xEE,0xE6,0x6C,0x66,0xCC,0x66,0xCC,0xB4,0xCC,0xCC,0xC6,0xC6,0xCC,0xC6,0x60,0x60,0x18,0x38,0x00,0x30,0x00,0x60,0x00,0x0C,0x00,0x6C,0x00,0x60,0x00,0x00,0x60,0x30,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x30,0x00,0x00,0x00,0x00,0x00,0x00,0x30,0x18,0x30,0xDC,0x10 
.db 0x00,0x00,0x00,0x00,0x00,0x00,0xFF,0xFF,0xC3,0x00,0x00,0x00,0xC6,0x00,0x38,0x30,0x00,0x00,0x6C,0xCC,0xCC,0xE0,0xCC,0xE0,0xCC,0x18,0x00,0x18,0x6C,0xCC,0xCC,0x1B,0x00,0x00,0x1C,0x1C,0xF8,0x00,0x6C,0x6C,0x00,0x00,0x00,0xC6,0xC6,0x18,0x33,0xCC,0x88,0xAA,0x77,0x18,0x18,0x18,0x36,0x00,0x00,0x36,0x36,0x00,0x36,0x36,0x18,0x00
.db 0x18,0x18,0x00,0x18,0x00,0x18,0x18,0x36,0x36,0x00,0x36,0x00,0x36,0x00,0x36,0x18,0x36,0x00,0x00,0x36,0x18,0x00,0x00,0x36,0x18,0x18,0x00,0xFF,0x00,0xF0,0x0F,0xFF,0x00,0x78,0xFC,0xFE,0xCC,0x00,0x66,0x76,0x30,0x6C,0x6C,0x30,0x00,0x0C,0x60,0xCC,0xFC,0x30,0x30,0x30,0x1B,0x18,0x30,0x76,0x6C,0x00,0x00,0x0C,0x6C,0x18,0x00,0x00 

.db 0x00,0xA5,0xDB,0xFE,0x7C,0x38,0x38,0x38,0xE7,0x00,0x00,0x00,0x00,0x00,0x7F,0x3C,0xF8,0x3E,0x7E,0x66,0xDB,0x38,0x00,0x7E,0x7E,0x18,0x0C,0x60,0x60,0x60,0x60,0x60,0x00,0x78,0x6C,0xFE,0xC0,0xCC,0x38,0xC0,0x60,0x18,0x3C,0x30,0x00,0x00,0x00,0x18,0xCE,0x30,0x0C,0x0C,0x6C,0xF8,0xC0,0x0C,0xCC,0xCC,0x30,0x30,0x60,0xFC,0x18,0x0C ;3
.db 0xDE,0xCC,0x66,0xC0,0x66,0x68,0x68,0xC0,0xCC,0x30,0x0C,0x6C,0x60,0xFE,0xF6,0xC6,0x66,0xCC,0x66,0xE0,0x30,0xCC,0xCC,0xC6,0x6C,0xCC,0x8C,0x60,0x30,0x18,0x6C,0x00,0x18,0x78,0x60,0x78,0x0C,0x78,0x60,0x76,0x6C,0x70,0x0C,0x66,0x30,0xCC,0xF8,0x78,0xDC,0x76,0xDC,0x7C,0x7C,0xCC,0xCC,0xC6,0xC6,0xCC,0xFC,0x30,0x18,0x30,0x00,0x38 
.db 0x00,0x00,0x00,0x00,0x00,0xFF,0xFF,0xFF,0x3C,0x78,0x78,0x70,0x38,0x70,0x6C,0x00,0xFC,0x7F,0xCC,0x00,0x00,0x00,0x00,0x00,0x00,0x3C,0xCC,0x7E,0x64,0x78,0xCC,0x18,0x78,0x70,0x00,0x00,0x00,0xCC,0x6C,0x6C,0x30,0x00,0x00,0xCC,0xCC,0x00,0x66,0x66,0x22,0x55,0xDB,0x18,0x18,0xF8,0x36,0x00,0xF8,0xF6,0x36,0xFE,0xF6,0x36,0xF8,0x00
.db 0x18,0x18,0x00,0x18,0x00,0x18,0x1F,0x36,0x37,0x3F,0xF7,0xFF,0x37,0xFF,0xF7,0xFF,0x36,0xFF,0x00,0x36,0x1F,0x1F,0x00,0x36,0xFF,0x18,0x00,0xFF,0x00,0xF0,0x0F,0xFF,0x76,0xCC,0xCC,0x6C,0x60,0x7E,0x66,0xDC,0x78,0xC6,0xC6,0x18,0x7E,0x7E,0xC0,0xCC,0x00,0xFC,0x18,0x60,0x1B,0x18,0x00,0xDC,0x6C,0x00,0x00,0x0C,0x6C,0x30,0x3C,0x00 

.db 0x00,0x81,0xFF,0xFE,0xFE,0xFE,0x7C,0x7C,0xC3,0x00,0x00,0x00,0x00,0x00,0x63,0xE7,0xFE,0xFE,0x18,0x66,0x7B,0x6C,0x00,0x18,0x18,0x18,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0x00,0x30,0x00,0x6C,0x78,0x18,0x76,0x00,0x60,0x18,0xFF,0xFC,0x00,0xFC,0x00,0x30,0xDE,0x30,0x38,0x38,0xCC,0x0C,0xF8,0x18,0x78,0x7C,0x00,0x00,0xC0,0x00,0x0C,0x18 ;4
.db 0xDE,0xCC,0x7C,0xC0,0x66,0x78,0x78,0xC0,0xFC,0x30,0x0C,0x78,0x60,0xFE,0xDE,0xC6,0x7C,0xCC,0x7C,0x70,0x30,0xCC,0xCC,0xD6,0x38,0x78,0x18,0x60,0x18,0x18,0xC6,0x00,0x00,0x0C,0x7C,0xCC,0x7C,0xCC,0xF0,0xCC,0x76,0x30,0x0C,0x6C,0x30,0xFE,0xCC,0xCC,0x66,0xCC,0x76,0xC0,0x30,0xCC,0xCC,0xD6,0x6C,0xCC,0x98,0xE0,0x00,0x1C,0x00,0x6C 
.db 0x00,0x00,0x00,0x00,0xFF,0xFF,0xFF,0xFF,0x66,0xCC,0xCC,0x30,0x18,0x30,0xC6,0x78,0x60,0x0C,0xFE,0x78,0x78,0x78,0xCC,0xCC,0xCC,0x66,0xCC,0xC0,0xF0,0xFC,0xFA,0x3C,0x0C,0x30,0x78,0xCC,0xF8,0xEC,0x3E,0x38,0x60,0xFC,0xFC,0xDE,0xDB,0x18,0xCC,0x33,0x88,0xAA,0xEE,0x18,0x18,0x18,0x36,0x00,0x18,0x06,0x36,0x06,0x06,0x36,0x18,0x00
.db 0x18,0x18,0x00,0x18,0x00,0x18,0x18,0x36,0x30,0x30,0x00,0x00,0x30,0x00,0x00,0x00,0x36,0x00,0x00,0x36,0x18,0x18,0x00,0x36,0x18,0x18,0x00,0xFF,0x00,0xF0,0x0F,0xFF,0xDC,0xF8,0xC0,0x6C,0x30,0xD8,0x66,0x18,0xCC,0xFE,0xC6,0x7C,0xDB,0xDB,0xF8,0xCC,0xFC,0x30,0x30,0x30,0x18,0x18,0xFC,0x00,0x38,0x18,0x00,0x0C,0x6C,0x60,0x3C,0x00
 
.db 0x00,0xBD,0xC3,0x7C,0x7C,0xFE,0xFE,0xFE,0xC3,0x00,0x00,0x00,0x00,0x00,0x63,0xE7,0xF8,0x3E,0x18,0x66,0x1B,0x6C,0x7E,0x7E,0x18,0x7E,0x0C,0x60,0x60,0x60,0x60,0x60,0x00,0x30,0x00,0xFE,0x0C,0x30,0xDC,0x00,0x60,0x18,0x3C,0x30,0x00,0x00,0x00,0x60,0xF6,0x30,0x60,0x0C,0xFE,0x0C,0xCC,0x30,0xCC,0x0C,0x00,0x00,0x60,0x00,0x18,0x30 ;5
.db 0xDE,0xFC,0x66,0xC0,0x66,0x68,0x68,0xCE,0xCC,0x30,0xCC,0x6C,0x62,0xD6,0xCE,0xC6,0x60,0xDC,0x6C,0x1C,0x30,0xCC,0xCC,0xFE,0x38,0x30,0x32,0x60,0x0C,0x18,0x00,0x00,0x00,0x7C,0x66,0xC0,0xCC,0xFC,0x60,0xCC,0x66,0x30,0x0C,0x78,0x30,0xFE,0xCC,0xCC,0x66,0xCC,0x66,0x78,0x30,0xCC,0xCC,0xFE,0x38,0xCC,0x30,0x30,0x18,0x30,0x00,0xC6 
.db 0x00,0x00,0x00,0xFF,0xFF,0xFF,0xFF,0xFF,0x7E,0xFC,0xFC,0x30,0x18,0x30,0xFE,0xCC,0x78,0x7F,0xCC,0xCC,0xCC,0xCC,0xCC,0xCC,0xCC,0x66,0xCC,0xC0,0x60,0x30,0xC6,0x18,0x7C,0x30,0xCC,0xCC,0xCC,0xFC,0x00,0x00,0xC0,0xC0,0x0C,0x33,0x37,0x18,0x66,0x66,0x22,0x55,0xDB,0x18,0xF8,0xF8,0xF6,0xFE,0xF8,0xF6,0x36,0xF6,0xFE,0xFE,0xF8,0xF8
.db 0x1F,0xFF,0xFF,0x1F,0xFF,0xFF,0x1F,0x37,0x3F,0x37,0xFF,0xF7,0x37,0xFF,0xF7,0xFF,0xFF,0xFF,0xFF,0x3F,0x1F,0x1F,0x3F,0xFF,0xFF,0xF8,0x1F,0xFF,0xFF,0xF0,0x0F,0x00,0xC8,0xCC,0xC0,0x6C,0x60,0xD8,0x66,0x18,0xCC,0xC6,0x6C,0xCC,0xDB,0xDB,0xC0,0xCC,0x00,0x30,0x60,0x18,0x18,0x18,0x00,0x76,0x00,0x18,0x18,0xEC,0x6C,0x78,0x3C,0x00 

.db 0x00,0x99,0xE7,0x38,0x38,0x7C,0x7C,0x7C,0xE7,0x00,0x00,0x00,0x00,0x00,0x67,0x3C,0xE0,0x0E,0x7E,0x00,0x1B,0x38,0x7E,0x3C,0x18,0x3C,0x18,0x30,0x30,0x30,0x30,0x30,0x00,0x00,0x00,0x6C,0xF8,0x66,0xCC,0x00,0x30,0x30,0x66,0x30,0x30,0x00,0x30,0xC0,0xE6,0x30,0xCC,0xCC,0x0C,0xCC,0xCC,0x30,0xCC,0x18,0x30,0x30,0x30,0xFC,0x30,0x00 ;6
.db 0xC0,0xCC,0x66,0x66,0x6C,0x62,0x60,0x66,0xCC,0x30,0xCC,0x66,0x66,0xC6,0xC6,0x6C,0x60,0x78,0x66,0xCC,0x30,0xCC,0x78,0xEE,0x6C,0x30,0x66,0x60,0x06,0x18,0x00,0x00,0x00,0xCC,0x66,0xCC,0xCC,0xC0,0x60,0x7C,0x66,0x30,0xCC,0x6C,0x30,0xD6,0xCC,0xCC,0x7C,0x7C,0x60,0x0C,0x34,0xCC,0x78,0xFE,0x6C,0x7C,0x64,0x30,0x18,0x30,0x00,0xC6 
.db 0x00,0x00,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0x60,0xC0,0xC0,0x30,0x18,0x30,0xC6,0xFC,0x60,0xCC,0xCC,0xCC,0xCC,0xCC,0xCC,0xCC,0x7C,0x3C,0xCC,0x7E,0xE6,0xFC,0xCF,0x18,0xCC,0x30,0xCC,0xCC,0xCC,0xDC,0x7E,0x7C,0xCC,0xC0,0x0C,0x66,0x6F,0x18,0x33,0xCC,0x88,0xAA,0x77,0x18,0x18,0x18,0x36,0x36,0x18,0x36,0x36,0x36,0x00,0x00,0x00,0x18
.db 0x00,0x00,0x18,0x18,0x00,0x18,0x18,0x36,0x00,0x36,0x00,0x36,0x36,0x00,0x36,0x00,0x00,0x18,0x36,0x00,0x00,0x18,0x36,0x36,0x18,0x00,0x18,0xFF,0xFF,0xF0,0x0F,0x00,0xDC,0xF8,0xC0,0x6C,0xCC,0xD8,0x7C,0x18,0x78,0x6C,0x6C,0xCC,0x7E,0x7E,0x60,0xCC,0xFC,0x00,0x00,0x00,0x18,0xD8,0x30,0xDC,0x00,0x00,0x00,0x6C,0x00,0x00,0x3C,0x00 

.db 0x00,0x81,0xFF,0x10,0x10,0x38,0x38,0x38,0xFF,0x00,0x00,0x00,0x00,0x00,0xE6,0x5A,0x80,0x02,0x3C,0x66,0x1B,0xCC,0x7E,0x18,0x18,0x18,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x30,0x00,0x6C,0x30,0xC6,0x76,0x00,0x18,0x60,0x00,0x00,0x30,0x00,0x30,0x80,0x7C,0xFC,0xFC,0x78,0x1E,0x78,0x78,0x30,0x78,0x70,0x30,0x30,0x18,0x00,0x60,0x30 ;7
.db 0x78,0xCC,0xFC,0x3C,0xF8,0xFE,0xF0,0x3E,0xCC,0x78,0x78,0xE6,0xFE,0xC6,0xC6,0x38,0xF0,0x1C,0xE6,0x78,0x78,0xFC,0x30,0xC6,0xC6,0x78,0xFE,0x78,0x02,0x78,0x00,0x00,0x00,0x76,0xDC,0x78,0x76,0x78,0xF0,0x0C,0xE6,0x78,0xCC,0xE6,0x78,0xC6,0xCC,0x78,0x60,0x0C,0xF0,0xF8,0x18,0x76,0x30,0x6C,0xC6,0x0C,0xFC,0x1C,0x18,0xE0,0x00,0xFE 
.db 0x00,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0x3C,0x78,0x78,0x78,0x3C,0x78,0xC6,0xCC,0xFC,0x7F,0xCE,0x78,0x78,0x78,0x7E,0x7E,0x0C,0x18,0x78,0x18,0xFC,0x30,0xC6,0xD8,0x7E,0x78,0x78,0x7E,0xCC,0xCC,0x00,0x00,0x78,0x00,0x00,0xCC,0xCF,0x18,0x00,0x00,0x22,0x55,0xDB,0x18,0x18,0x18,0x36,0x36,0x18,0x36,0x36,0x36,0x00,0x00,0x00,0x18
.db 0x00,0x00,0x18,0x18,0x00,0x18,0x18,0x36,0x00,0x36,0x00,0x36,0x36,0x00,0x36,0x00,0x00,0x18,0x36,0x00,0x00,0x18,0x36,0x36,0x18,0x00,0x18,0xFF,0xFF,0xF0,0x0F,0x00,0x76,0xC0,0xC0,0x6C,0xFC,0x70,0x60,0x18,0x30,0x38,0xEE,0x78,0x00,0x60,0x38,0xCC,0x00,0xFC,0xFC,0xFC,0x18,0xD8,0x30,0x00,0x00,0x00,0x00,0x3C,0x00,0x00,0x00,0x00 

.db 0x00,0x7E,0x7E,0x00,0x00,0x7C,0x7C,0x7C,0xFF,0x00,0x00,0x00,0x00,0x00,0xC0,0x99,0x00,0x00,0x18,0x00,0x00,0x78,0x00,0xFF,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x60,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x60,0x00,0x00,0x00,0x00 ;8
.db 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xFF,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xF8,0x00,0x00,0x78,0x00,0x00,0x00,0x00,0x00,0xF0,0x1E,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xF8,0x00,0x00,0x00,0x00,0x00,0x00 
.db 0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xF8,0x00,0x00,0x18,0x00,0x30,0xC7,0x70,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x0F,0x03,0x00,0x00,0x00,0x88,0xAA,0xEE,0x18,0x18,0x18,0x36,0x36,0x18,0x36,0x36,0x36,0x00,0x00,0x00,0x18  ;16
.db 0x00,0x00,0x18,0x18,0x00,0x18,0x18,0x36,0x00,0x36,0x00,0x36,0x36,0x00,0x36,0x00,0x00,0x18,0x36,0x00,0x00,0x18,0x36,0x36,0x18,0x00,0x18,0xFF,0xFF,0xF0,0x0F,0x00,0x00,0xC0,0x00,0x00,0x00,0x00,0xC0,0x00,0xFC,0x00,0x00,0x00,0x00,0xC0,0x00,0x00,0x00,0x00,0x00,0x00,0x18,0x70,0x00,0x00,0x00,0x00,0x00,0x1C,0x00,0x00,0x00,0x00 
#else
.org 512
.db 0x00,0x7E,0x7E,0x6C,0x10,0x38,0x10,0x10,0xFF,0x00,0x00,0x00,0x00,0x00,0x7F,0x99,0x80,0x02,0x18,0x66,0x7F,0x3E,0x00,0x18,0x18,0x18,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x30,0x6C,0x6C,0x30,0x00,0x38,0x60,0x18,0x60,0x00,0x00,0x00,0x00,0x00,0x06,0x7C,0x30,0x78,0x78,0x1C,0xFC,0x38,0xFC,0x78,0x78,0x00,0x00,0x18,0x00,0x60,0x78 
.db 0x7C,0x30,0xFC,0x3C,0xF8,0xFE,0xFE,0x3C,0xCC,0x78,0x1E,0xE6,0xF0,0xC6,0xC6,0x38,0xFC,0x78,0xFC,0x78,0xFC,0xCC,0xCC,0xC6,0xC6,0xCC,0xFE,0x78,0xC0,0x78,0x10,0x00,0x30,0x00,0xE0,0x00,0x1C,0x00,0x38,0x00,0xE0,0x30,0x0C,0xE0,0x70,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x10,0x00,0x00,0x00,0x00,0x00,0x00,0x1C,0x18,0xE0,0x76,0x00 
.db 0x78,0x00,0x1C,0x7E,0xCC,0xE0,0x30,0x00,0x7E,0xCC,0xE0,0xCC,0x7C,0xE0,0xC6,0x30,0x1C,0x00,0x3E,0x78,0x00,0x00,0x78,0x00,0x00,0xC3,0xCC,0x18,0x38,0xCC,0xF8,0x0E,0x1C,0x38,0x00,0x00,0x00,0xFC,0x3C,0x38,0x30,0x00,0x00,0xC3,0xC3,0x18,0x00,0x00,0x22,0x55,0xDB,0x18,0x18,0x18,0x36,0x00,0x00,0x36,0x36,0x00,0x36,0x36,0x18,0x00 
.db 0x18,0x18,0x00,0x18,0x00,0x18,0x18,0x36,0x36,0x00,0x36,0x00,0x36,0x00,0x36,0x18,0x36,0x00,0x00,0x36,0x18,0x00,0x00,0x36,0x18,0x18,0x00,0xFF,0x00,0xF0,0x0F,0xFF,0x00,0x00,0x00,0x00,0xFC,0x00,0x00,0x00,0xFC,0x38,0x38,0x1C,0x00,0x06,0x38,0x78,0x00,0x30,0x60,0x18,0x0E,0x18,0x30,0x00,0x38,0x00,0x00,0x0F,0x78,0x70,0x00,0x00 
.db 0x00,0x81,0xFF,0xFE,0x38,0x7C,0x10,0x10,0xFF,0x00,0x00,0x00,0x00,0x00,0x63,0x5A,0xE0,0x0E,0x3C,0x66,0xDB,0x63,0x00,0x3C,0x3C,0x18,0x18,0x30,0x30,0x30,0x30,0x30,0x00,0x78,0x6C,0x6C,0x7C,0xC6,0x6C,0x60,0x30,0x30,0x66,0x30,0x00,0x00,0x00,0x0C,0xC6,0x70,0xCC,0xCC,0x3C,0xC0,0x60,0xCC,0xCC,0xCC,0x30,0x30,0x30,0x00,0x30,0xCC 
.db 0xC6,0x78,0x66,0x66,0x6C,0x62,0x62,0x66,0xCC,0x30,0x0C,0x66,0x60,0xEE,0xE6,0x6C,0x66,0xCC,0x66,0xCC,0xB4,0xCC,0xCC,0xC6,0xC6,0xCC,0xC6,0x60,0x60,0x18,0x38,0x00,0x30,0x00,0x60,0x00,0x0C,0x00,0x6C,0x00,0x60,0x00,0x00,0x60,0x30,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x30,0x00,0x00,0x00,0x00,0x00,0x00,0x30,0x18,0x30,0xDC,0x10 
.db 0xCC,0xCC,0x00,0xC3,0x00,0x00,0x30,0x00,0xC3,0x00,0x00,0x00,0xC6,0x00,0x38,0x30,0x00,0x00,0x6C,0xCC,0xCC,0xE0,0xCC,0xE0,0xCC,0x18,0x00,0x18,0x6C,0xCC,0xCC,0x1B,0x00,0x00,0x1C,0x1C,0xF8,0x00,0x6C,0x6C,0x00,0x00,0x00,0xC6,0xC6,0x18,0x33,0xCC,0x88,0xAA,0x77,0x18,0x18,0x18,0x36,0x00,0x00,0x36,0x36,0x00,0x36,0x36,0x18,0x00 
.db 0x18,0x18,0x00,0x18,0x00,0x18,0x18,0x36,0x36,0x00,0x36,0x00,0x36,0x00,0x36,0x18,0x36,0x00,0x00,0x36,0x18,0x00,0x00,0x36,0x18,0x18,0x00,0xFF,0x00,0xF0,0x0F,0xFF,0x00,0x78,0xFC,0xFE,0xCC,0x00,0x66,0x76,0x30,0x6C,0x6C,0x30,0x00,0x0C,0x60,0xCC,0xFC,0x30,0x30,0x30,0x1B,0x18,0x30,0x76,0x6C,0x00,0x00,0x0C,0x6C,0x18,0x00,0x00 
.db 0x00,0xA5,0xDB,0xFE,0x7C,0x38,0x38,0x38,0xE7,0x00,0x00,0x00,0x00,0x00,0x7F,0x3C,0xF8,0x3E,0x7E,0x66,0xDB,0x38,0x00,0x7E,0x7E,0x18,0x0C,0x60,0x60,0x60,0x60,0x60,0x00,0x78,0x6C,0xFE,0xC0,0xCC,0x38,0xC0,0x60,0x18,0x3C,0x30,0x00,0x00,0x00,0x18,0xCE,0x30,0x0C,0x0C,0x6C,0xF8,0xC0,0x0C,0xCC,0xCC,0x30,0x30,0x60,0xFC,0x18,0x0C 
.db 0xDE,0xCC,0x66,0xC0,0x66,0x68,0x68,0xC0,0xCC,0x30,0x0C,0x6C,0x60,0xFE,0xF6,0xC6,0x66,0xCC,0x66,0xE0,0x30,0xCC,0xCC,0xC6,0x6C,0xCC,0x8C,0x60,0x30,0x18,0x6C,0x00,0x18,0x78,0x60,0x78,0x0C,0x78,0x60,0x76,0x6C,0x70,0x0C,0x66,0x30,0xCC,0xF8,0x78,0xDC,0x76,0xDC,0x7C,0x7C,0xCC,0xCC,0xC6,0xC6,0xCC,0xFC,0x30,0x18,0x30,0x00,0x38 
.db 0xC0,0x00,0x78,0x3C,0x78,0x78,0x78,0x78,0x3C,0x78,0x78,0x70,0x38,0x70,0x6C,0x00,0xFC,0x7F,0xCC,0x00,0x00,0x00,0x00,0x00,0x00,0x3C,0xCC,0x7E,0x64,0x78,0xCC,0x18,0x78,0x70,0x00,0x00,0x00,0xCC,0x6C,0x6C,0x30,0x00,0x00,0xCC,0xCC,0x00,0x66,0x66,0x22,0x55,0xDB,0x18,0x18,0xF8,0x36,0x00,0xF8,0xF6,0x36,0xFE,0xF6,0x36,0xF8,0x00 
.db 0x18,0x18,0x00,0x18,0x00,0x18,0x1F,0x36,0x37,0x3F,0xF7,0xFF,0x37,0xFF,0xF7,0xFF,0x36,0xFF,0x00,0x36,0x1F,0x1F,0x00,0x36,0xFF,0x18,0x00,0xFF,0x00,0xF0,0x0F,0xFF,0x76,0xCC,0xCC,0x6C,0x60,0x7E,0x66,0xDC,0x78,0xC6,0xC6,0x18,0x7E,0x7E,0xC0,0xCC,0x00,0xFC,0x18,0x60,0x1B,0x18,0x00,0xDC,0x6C,0x00,0x00,0x0C,0x6C,0x30,0x3C,0x00 
.db 0x00,0x81,0xFF,0xFE,0xFE,0xFE,0x7C,0x7C,0xC3,0x00,0x00,0x00,0x00,0x00,0x63,0xE7,0xFE,0xFE,0x18,0x66,0x7B,0x6C,0x00,0x18,0x18,0x18,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0x00,0x30,0x00,0x6C,0x78,0x18,0x76,0x00,0x60,0x18,0xFF,0xFC,0x00,0xFC,0x00,0x30,0xDE,0x30,0x38,0x38,0xCC,0x0C,0xF8,0x18,0x78,0x7C,0x00,0x00,0xC0,0x00,0x0C,0x18 
.db 0xDE,0xCC,0x7C,0xC0,0x66,0x78,0x78,0xC0,0xFC,0x30,0x0C,0x78,0x60,0xFE,0xDE,0xC6,0x7C,0xCC,0x7C,0x70,0x30,0xCC,0xCC,0xD6,0x38,0x78,0x18,0x60,0x18,0x18,0xC6,0x00,0x00,0x0C,0x7C,0xCC,0x7C,0xCC,0xF0,0xCC,0x76,0x30,0x0C,0x6C,0x30,0xFE,0xCC,0xCC,0x66,0xCC,0x76,0xC0,0x30,0xCC,0xCC,0xD6,0x6C,0xCC,0x98,0xE0,0x00,0x1C,0x00,0x6C 
.db 0xCC,0xCC,0xCC,0x06,0x0C,0x0C,0x0C,0xC0,0x66,0xCC,0xCC,0x30,0x18,0x30,0xC6,0x78,0x60,0x0C,0xFE,0x78,0x78,0x78,0xCC,0xCC,0xCC,0x66,0xCC,0xC0,0xF0,0xFC,0xFA,0x3C,0x0C,0x30,0x78,0xCC,0xF8,0xEC,0x3E,0x38,0x60,0xFC,0xFC,0xDE,0xDB,0x18,0xCC,0x33,0x88,0xAA,0xEE,0x18,0x18,0x18,0x36,0x00,0x18,0x06,0x36,0x06,0x06,0x36,0x18,0x00 
.db 0x18,0x18,0x00,0x18,0x00,0x18,0x18,0x36,0x30,0x30,0x00,0x00,0x30,0x00,0x00,0x00,0x36,0x00,0x00,0x36,0x18,0x18,0x00,0x36,0x18,0x18,0x00,0xFF,0x00,0xF0,0x0F,0xFF,0xDC,0xF8,0xC0,0x6C,0x30,0xD8,0x66,0x18,0xCC,0xFE,0xC6,0x7C,0xDB,0xDB,0xF8,0xCC,0xFC,0x30,0x30,0x30,0x18,0x18,0xFC,0x00,0x38,0x18,0x00,0x0C,0x6C,0x60,0x3C,0x00 
.db 0x00,0xBD,0xC3,0x7C,0x7C,0xFE,0xFE,0xFE,0xC3,0x00,0x00,0x00,0x00,0x00,0x63,0xE7,0xF8,0x3E,0x18,0x66,0x1B,0x6C,0x7E,0x7E,0x18,0x7E,0x0C,0x60,0x60,0x60,0x60,0x60,0x00,0x30,0x00,0xFE,0x0C,0x30,0xDC,0x00,0x60,0x18,0x3C,0x30,0x00,0x00,0x00,0x60,0xF6,0x30,0x60,0x0C,0xFE,0x0C,0xCC,0x30,0xCC,0x0C,0x00,0x00,0x60,0x00,0x18,0x30 
.db 0xDE,0xFC,0x66,0xC0,0x66,0x68,0x68,0xCE,0xCC,0x30,0xCC,0x6C,0x62,0xD6,0xCE,0xC6,0x60,0xDC,0x6C,0x1C,0x30,0xCC,0xCC,0xFE,0x38,0x30,0x32,0x60,0x0C,0x18,0x00,0x00,0x00,0x7C,0x66,0xC0,0xCC,0xFC,0x60,0xCC,0x66,0x30,0x0C,0x78,0x30,0xFE,0xCC,0xCC,0x66,0xCC,0x66,0x78,0x30,0xCC,0xCC,0xFE,0x38,0xCC,0x30,0x30,0x18,0x30,0x00,0xC6 
.db 0x78,0xCC,0xFC,0x3E,0x7C,0x7C,0x7C,0xC0,0x7E,0xFC,0xFC,0x30,0x18,0x30,0xFE,0xCC,0x78,0x7F,0xCC,0xCC,0xCC,0xCC,0xCC,0xCC,0xCC,0x66,0xCC,0xC0,0x60,0x30,0xC6,0x18,0x7C,0x30,0xCC,0xCC,0xCC,0xFC,0x00,0x00,0xC0,0xC0,0x0C,0x33,0x37,0x18,0x66,0x66,0x22,0x55,0xDB,0x18,0xF8,0xF8,0xF6,0xFE,0xF8,0xF6,0x36,0xF6,0xFE,0xFE,0xF8,0xF8 
.db 0x1F,0xFF,0xFF,0x1F,0xFF,0xFF,0x1F,0x37,0x3F,0x37,0xFF,0xF7,0x37,0xFF,0xF7,0xFF,0xFF,0xFF,0xFF,0x3F,0x1F,0x1F,0x3F,0xFF,0xFF,0xF8,0x1F,0xFF,0xFF,0xF0,0x0F,0x00,0xC8,0xCC,0xC0,0x6C,0x60,0xD8,0x66,0x18,0xCC,0xC6,0x6C,0xCC,0xDB,0xDB,0xC0,0xCC,0x00,0x30,0x60,0x18,0x18,0x18,0x00,0x76,0x00,0x18,0x18,0xEC,0x6C,0x78,0x3C,0x00 
.db 0x00,0x99,0xE7,0x38,0x38,0x7C,0x7C,0x7C,0xE7,0x00,0x00,0x00,0x00,0x00,0x67,0x3C,0xE0,0x0E,0x7E,0x00,0x1B,0x38,0x7E,0x3C,0x18,0x3C,0x18,0x30,0x30,0x30,0x30,0x30,0x00,0x00,0x00,0x6C,0xF8,0x66,0xCC,0x00,0x30,0x30,0x66,0x30,0x30,0x00,0x30,0xC0,0xE6,0x30,0xCC,0xCC,0x0C,0xCC,0xCC,0x30,0xCC,0x18,0x30,0x30,0x30,0xFC,0x30,0x00 
.db 0xC0,0xCC,0x66,0x66,0x6C,0x62,0x60,0x66,0xCC,0x30,0xCC,0x66,0x66,0xC6,0xC6,0x6C,0x60,0x78,0x66,0xCC,0x30,0xCC,0x78,0xEE,0x6C,0x30,0x66,0x60,0x06,0x18,0x00,0x00,0x00,0xCC,0x66,0xCC,0xCC,0xC0,0x60,0x7C,0x66,0x30,0xCC,0x6C,0x30,0xD6,0xCC,0xCC,0x7C,0x7C,0x60,0x0C,0x34,0xCC,0x78,0xFE,0x6C,0x7C,0x64,0x30,0x18,0x30,0x00,0xC6 
.db 0x18,0xCC,0xC0,0x66,0xCC,0xCC,0xCC,0x78,0x60,0xC0,0xC0,0x30,0x18,0x30,0xC6,0xFC,0x60,0xCC,0xCC,0xCC,0xCC,0xCC,0xCC,0xCC,0x7C,0x3C,0xCC,0x7E,0xE6,0xFC,0xCF,0x18,0xCC,0x30,0xCC,0xCC,0xCC,0xDC,0x7E,0x7C,0xCC,0xC0,0x0C,0x66,0x6F,0x18,0x33,0xCC,0x88,0xAA,0x77,0x18,0x18,0x18,0x36,0x36,0x18,0x36,0x36,0x36,0x00,0x00,0x00,0x18 
.db 0x00,0x00,0x18,0x18,0x00,0x18,0x18,0x36,0x00,0x36,0x00,0x36,0x36,0x00,0x36,0x00,0x00,0x18,0x36,0x00,0x00,0x18,0x36,0x36,0x18,0x00,0x18,0xFF,0xFF,0xF0,0x0F,0x00,0xDC,0xF8,0xC0,0x6C,0xCC,0xD8,0x7C,0x18,0x78,0x6C,0x6C,0xCC,0x7E,0x7E,0x60,0xCC,0xFC,0x00,0x00,0x00,0x18,0xD8,0x30,0xDC,0x00,0x00,0x00,0x6C,0x00,0x00,0x3C,0x00 
.db 0x00,0x81,0xFF,0x10,0x10,0x38,0x38,0x38,0xFF,0x00,0x00,0x00,0x00,0x00,0xE6,0x5A,0x80,0x02,0x3C,0x66,0x1B,0xCC,0x7E,0x18,0x18,0x18,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x30,0x00,0x6C,0x30,0xC6,0x76,0x00,0x18,0x60,0x00,0x00,0x30,0x00,0x30,0x80,0x7C,0xFC,0xFC,0x78,0x1E,0x78,0x78,0x30,0x78,0x70,0x30,0x30,0x18,0x00,0x60,0x30 
.db 0x78,0xCC,0xFC,0x3C,0xF8,0xFE,0xF0,0x3E,0xCC,0x78,0x78,0xE6,0xFE,0xC6,0xC6,0x38,0xF0,0x1C,0xE6,0x78,0x78,0xFC,0x30,0xC6,0xC6,0x78,0xFE,0x78,0x02,0x78,0x00,0x00,0x00,0x76,0xDC,0x78,0x76,0x78,0xF0,0x0C,0xE6,0x78,0xCC,0xE6,0x78,0xC6,0xCC,0x78,0x60,0x0C,0xF0,0xF8,0x18,0x76,0x30,0x6C,0xC6,0x0C,0xFC,0x1C,0x18,0xE0,0x00,0xFE 
.db 0x0C,0x7E,0x78,0x3F,0x7E,0x7E,0x7E,0x0C,0x3C,0x78,0x78,0x78,0x3C,0x78,0xC6,0xCC,0xFC,0x7F,0xCE,0x78,0x78,0x78,0x7E,0x7E,0x0C,0x18,0x78,0x18,0xFC,0x30,0xC6,0xD8,0x7E,0x78,0x78,0x7E,0xCC,0xCC,0x00,0x00,0x78,0x00,0x00,0xCC,0xCF,0x18,0x00,0x00,0x22,0x55,0xDB,0x18,0x18,0x18,0x36,0x36,0x18,0x36,0x36,0x36,0x00,0x00,0x00,0x18 
.db 0x00,0x00,0x18,0x18,0x00,0x18,0x18,0x36,0x00,0x36,0x00,0x36,0x36,0x00,0x36,0x00,0x00,0x18,0x36,0x00,0x00,0x18,0x36,0x36,0x18,0x00,0x18,0xFF,0xFF,0xF0,0x0F,0x00,0x76,0xC0,0xC0,0x6C,0xFC,0x70,0x60,0x18,0x30,0x38,0xEE,0x78,0x00,0x60,0x38,0xCC,0x00,0xFC,0xFC,0xFC,0x18,0xD8,0x30,0x00,0x00,0x00,0x00,0x3C,0x00,0x00,0x00,0x00 
.db 0x00,0x7E,0x7E,0x00,0x00,0x7C,0x7C,0x7C,0xFF,0x00,0x00,0x00,0x00,0x00,0xC0,0x99,0x00,0x00,0x18,0x00,0x00,0x78,0x00,0xFF,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x60,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x60,0x00,0x00,0x00,0x00 
.db 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xFF,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xF8,0x00,0x00,0x78,0x00,0x00,0x00,0x00,0x00,0xF0,0x1E,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xF8,0x00,0x00,0x00,0x00,0x00,0x00 
.db 0x78,0x00,0x00,0x00,0x00,0x00,0x00,0x38,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xF8,0x00,0x00,0x18,0x00,0x30,0xC7,0x70,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x0F,0x03,0x00,0x00,0x00,0x88,0xAA,0xEE,0x18,0x18,0x18,0x36,0x36,0x18,0x36,0x36,0x36,0x00,0x00,0x00,0x18 
.db 0x00,0x00,0x18,0x18,0x00,0x18,0x18,0x36,0x00,0x36,0x00,0x36,0x36,0x00,0x36,0x00,0x00,0x18,0x36,0x00,0x00,0x18,0x36,0x36,0x18,0x00,0x18,0xFF,0xFF,0xF0,0x0F,0x00,0x00,0xC0,0x00,0x00,0x00,0x00,0xC0,0x00,0xFC,0x00,0x00,0x00,0x00,0xC0,0x00,0x00,0x00,0x00,0x00,0x00,0x18,0x70,0x00,0x00,0x00,0x00,0x00,0x1C,0x00,0x00,0x00,0x00 
#endif