.NOLIST

#include	"ti83plus.inc"			;Standard TI-83 Plus include file
#include        "mirage.inc"			;Mirage include file
GMode		.equ 37h

	.org $9d93				;Origin
	.db $BB,$6D				;Compiled AsmPrgm token
	ret						;Header Byte 1 -- So TIOS wont run
	.db	1					;Header Byte 2 -- Identifies as MirageOS prog
button:						;Button - should be a 15x15 graphic
	.db	%00000111,%11100000
	.db	%00011111,%11110000
	.db	%00111111,%11111100
	.db	%01111000,%11111100
	.db	%01110110,%01111110
	.db	%11101001,%00111110
	.db	%11100110,%00111110
	.db	%11101001,%00111110
	.db	%11101001,%00111110
	.db	%11100110,%00111110
	.db	%01110000,%01111110
	.db	%01111111,%11111100
	.db	%00111111,%11111100
	.db	%00011111,%11111000
	.db	%00001111,%11100000

desc:						;Description - zero terminated
	.db "Magic 8 Ball by JMW",0

progstart:					;Program code starts here
 
  	ld	hl,titlescreen		
  	ld	de,PLOTSSCREEN
  	ld	bc,768
 	ldir
	call	ifastcopy
Mainloop:	
	call getakey
	cp	GMode
	jr z,quit
	call refresh
	call answer	;gets HL for the words to put
	call putanswer
	jr Mainloop
quit:
	ret 
getakey:
	bcall(_getcsc)
        or a
	jr z,getakey
	ret
putanswer:
	push hl
	ld hl,19*256+35
	ld (pencol),hl 
	pop hl
	bcall(_vputs)
	push hl
	ld hl,29*256+35
	ld (pencol),hl
	pop hl
	bcall(_vputs)
	ret
answer:
	ld b,51
 	call irandom
        ld bc,$ffff
 	ld hl,answer0
 	or a	;cp a to 0
        ret z
 	ld d,a	; load the random # into d
find:
 	sub a	;set a to 0, the rand# is in d  
 	cpir	;cp until hl=0 (the end of a text string), 
 	inc hl	;set to beginning of next text string
 	cpir
 	inc hl	;set to beginning of next text string
 	dec d
 	jr nz,find
	ret

refresh:
	ld	hl,picb		
  	ld	de,PLOTSSCREEN
  	ld	bc,768
 	ldir
	call	ifastcopy
	call    delay1
	call	delay1
	ld	hl,picc		
  	ld	de,PLOTSSCREEN
  	ld	bc,768
 	ldir
	call	ifastcopy
	call	delay1
	call	delay1
  	ld	hl,pica		
  	ld	de,PLOTSSCREEN
  	ld	bc,768
 	ldir
	call	ifastcopy
	ret

delay1:
	call delay
	call delay
	call delay
delay:
	ld a,255
delayloop:
	or a	
	ret z
	call delay3				
	call delay3
	call delay3
	call delay3
	call delay3
	dec a
	jr delayloop	
delay3:
	push ix
	pop ix
    	push iy
	pop iy
    	push af
	pop af
    	push bc
	pop bc
    	push de
	pop de
    	push hl
	pop hl
	ret

answer0:
        .db " Not",0
	.db "likely",0
answer1:
        .db " Of",0
	.db "Course",0
answer2:
	.db " Maybe",0
	.db " ",0
answer3:
	.db " Outlook",0
	.db "Cloudy",0
answer4:
        .db " Ask",0
	.db "again",0
answer5:
        .db " I am",0
	.db "certain",0
answer6:
        .db " No!",0
	.db " ",0
answer7:
        .db " Yes!",0
	.db " ",0
answer8:
        .db " A",0
	.db "chance",0
answer9:
        .db " Good",0
	.db "chance",0
answer10:
        .db " Looks",0
	.db "certain",0
answer11:
        .db " No...",0
	.db " ",0
answer12:
        .db " Yes...",0
	.db " ",0
answer13:
        .db " Somewhat",0
	.db " ",0
answer14:
        .db " Not",0
        .db "likely",0
answer15:
        .db " Very",0
        .db "likely",0
answer16:
        .db " Not too",0
        .db "clear",0
answer17:
        .db " I think",0
        .db "so",0
answer18:
        .db " I think",0
        .db "not",0
answer19:
        .db " Why ask",0
        .db "me?",0
answer20:
        .db " Why not?",0
        .db " ",0
answer21:
        .db " No!",0
 	.db "Ha ha ha!",0
answer22:
        .db " Nope",0
	.db " ",0
answer23:
        .db " Yep",0
	.db " ",0
answer24:
        .db " HaHaHa",0
	.db "  NO!",0
answer25:
        .db " Its true",0
	.db " ",0
answer26:
        .db " Definitely",0
	.db "   not",0
answer27:
        .db " Definitely",0
	.db " ",0
answer28:
        .db " Sure",0
	.db " ",0
answer29:
        .db " I guess",0
	.db " ",0
answer30:
        .db " Dont bet",0
        .db "on it",0
answer31:
        .db " I",0
        .db "bet!",0
answer32:
        .db " Id drink",0 
	.db "to that!",0
answer33:
        .db " Dont ask",0 
	.db "ME that!",0
answer34:
        .db " You dont",0
	.db "want2 know",0
answer35:
        .db " :)",0
	.db " ",0
answer36:
        .db " :(",0
	.db " ",0
answer37:
        .db " Maybe, ",0
	.db "maybe not",0
answer38:
        .db " Clearly",0
        .db "not",0
answer39:
        .db " It may",0 
        .db "be yes",0
answer40:
        .db " Probably",0
        .db "not",0
answer41:
        .db " Probably",0
	.db " ",0
answer42:
        .db " I",0
	.db "assume so",0
answer43:
        .db " Go flip",0 
        .db "a coin",0
answer44:
        .db " I dont",0 
        .db "care",0
answer45:
        .db " I dont",0 
        .db "know",0
answer46:
        .db " Guess",0 
        .db "not",0
answer47:
        .db " Ask",0
        .db "LOUDER",0
answer49:
        .db " Yeah",0 
        .db "right",0
answer50:
        .db " Could be",0
	.db " ",0
answer51:
        .db " If you",0 
        .db "insist",0
answer52:
        .db " Hi Mom!",0
	.db " ",0
answer53:
        .db " Could be",0
	.db " ",0

titlescreen:
 .db $00,$00,$09,$5B,$FF,$FF,$FF,$FF,$FF,$FF,$E0,$00,$00,$00,$A4,$AD
 .db $5B,$FF,$FF,$FF,$FF,$FF,$F8,$00,$C3,$00,$02,$D6,$EE,$06,$7F,$CF
 .db $DF,$C0,$F8,$33,$E7,$00,$11,$2B,$7C,$07,$FF,$CF,$9F,$C0,$7C,$33
 .db $E7,$1C,$3E,$D7,$AE,$7E,$70,$CB,$0F,$CE,$70,$33,$E7,$36,$7C,$CF
 .db $F6,$06,$60,$C1,$0F,$C0,$E4,$33,$FF,$0E,$6D,$DE,$BC,$06,$64,$C9
 .db $9F,$C0,$78,$33,$DB,$36,$6C,$CD,$D6,$7E,$64,$C9,$9F,$CE,$64,$B3
 .db $DB,$36,$7C,$DF,$BE,$02,$60,$C9,$8F,$C0,$64,$B3,$DB,$3E,$3C,$CF
 .db $DA,$06,$70,$C9,$8F,$C0,$E0,$F3,$00,$00,$0C,$56,$BF,$7F,$FC,$FF
 .db $FF,$FF,$FF,$C0,$02,$80,$78,$0A,$80,$7F,$E1,$FF,$FF,$FF,$FF,$C0
 .db $04,$00,$00,$6A,$00,$17,$FF,$FF,$FF,$FF,$FF,$F0,$0A,$80,$00,$08
 .db $00,$07,$FF,$FF,$FF,$FF,$FF,$E0,$14,$48,$01,$40,$00,$00,$FF,$FF
 .db $FF,$FF,$FF,$F0,$0B,$20,$00,$00,$00,$00,$7F,$FF,$FF,$FF,$FF,$F0
 .db $34,$92,$05,$00,$00,$00,$3F,$FF,$FF,$FF,$FF,$F8,$1B,$48,$90,$00
 .db $00,$00,$1F,$FF,$FF,$FF,$FF,$F8,$6D,$64,$08,$00,$FF,$80,$0F,$FF
 .db $FF,$FF,$FF,$FC,$36,$92,$C8,$03,$FF,$E0,$07,$FF,$FF,$FF,$FF,$F8
 .db $6D,$DA,$20,$07,$FF,$F8,$03,$FF,$FF,$FF,$FF,$FC,$76,$65,$90,$0F
 .db $FF,$FC,$03,$FF,$FF,$FF,$FF,$FE,$BB,$B6,$60,$0F,$FB,$FE,$01,$FF
 .db $FF,$FF,$FF,$FC,$6D,$AA,$80,$0F,$E0,$FE,$01,$FF,$FF,$FF,$FF,$FE
 .db $F6,$F7,$60,$1F,$C0,$FE,$00,$FF,$FF,$FF,$FF,$FE,$5F,$5A,$C0,$1F
 .db $C0,$FF,$00,$FF,$FF,$FF,$FF,$FE,$F5,$ED,$80,$0F,$C0,$FE,$00,$7F
 .db $FF,$FF,$FF,$FF,$BE,$B6,$80,$0F,$E0,$FE,$00,$7F,$FF,$FF,$FF,$FE
 .db $EB,$FB,$80,$07,$FB,$FE,$00,$7F,$FF,$FF,$FF,$FF,$BE,$DE,$80,$03
 .db $FF,$FC,$00,$7F,$FF,$FF,$FF,$FF,$ED,$EB,$80,$0F,$FF,$F8,$00,$7F
 .db $FF,$FF,$FF,$FF,$BF,$7E,$80,$1F,$FF,$F0,$00,$7F,$FF,$FF,$FF,$FF
 .db $EB,$B7,$00,$3F,$FF,$F0,$00,$7F,$FF,$FF,$FF,$FF,$BE,$FB,$80,$7F
 .db $C3,$F8,$00,$7F,$FF,$FF,$FF,$FF,$ED,$DE,$80,$7F,$81,$FC,$00,$7F
 .db $FF,$FF,$FF,$FF,$BF,$77,$80,$7F,$01,$FC,$00,$7F,$FF,$FF,$FF,$FF
 .db $F6,$FD,$C0,$7F,$01,$FC,$00,$7F,$FF,$FF,$FF,$FE,$BB,$D7,$80,$7F
 .db $01,$FC,$00,$FF,$FF,$FF,$FF,$FF,$EF,$7E,$E0,$7F,$01,$FC,$00,$FF
 .db $FF,$FF,$FF,$FE,$7D,$F7,$E0,$7F,$83,$FC,$01,$FF,$FF,$FF,$FF,$FF
 .db $EF,$BF,$60,$7F,$C7,$FC,$01,$FF,$FF,$FF,$FF,$FE,$7D,$F7,$F0,$3F
 .db $FF,$FC,$03,$FF,$FF,$FF,$FF,$FE,$DF,$BE,$F0,$1F,$FF,$F8,$03,$FF
 .db $FF,$FF,$FF,$FE,$7B,$F7,$E8,$0F,$FF,$F0,$07,$FF,$FF,$FF,$FF,$FC
 .db $6F,$7F,$BC,$03,$FF,$E0,$0F,$FF,$FF,$FF,$FF,$FC,$7F,$EE,$FE,$00
 .db $1F,$00,$1F,$FF,$FF,$FF,$FF,$FC,$3B,$BF,$FF,$00,$00,$00,$3F,$FF
 .db $FF,$FF,$FF,$F8,$3F,$FF,$FE,$80,$00,$00,$7F,$FF,$FF,$FF,$FF,$F8
 .db $37,$FB,$EF,$C0,$00,$00,$FF,$FF,$FF,$FF,$FF,$F8,$1F,$7F,$BF,$F8
 .db $00,$07,$FF,$FF,$FF,$FF,$FF,$F0,$1F,$FF,$FF,$FE,$00,$1F,$FF,$FF
 .db $FF,$FF,$FF,$F0,$1F,$FB,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$F0
 .db $0D,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$E0,$0F,$FF,$FF,$FF
 .db $FF,$FF,$FF,$FF,$FF,$FF,$FF,$E0,$07,$FF,$FF,$FF,$FF,$FF,$FF,$FF
 .db $FF,$FF,$FF,$C0,$07,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$C0
 .db $03,$FD,$FF,$FE,$FE,$FF,$FD,$DF,$FF,$FF,$FF,$80,$02,$FD,$FF,$FE
 .db $FE,$FF,$FD,$DF,$FF,$FF,$FF,$00,$01,$FC,$6D,$FE,$E6,$B5,$FD,$4D
 .db $8B,$87,$9F,$00,$00,$FD,$B5,$FE,$DA,$52,$FD,$55,$BA,$BB,$3E,$00
 .db $00,$FD,$B3,$FE,$DA,$D6,$FE,$B3,$BD,$43,$DE,$00,$00,$7C,$7B,$F9
 .db $E6,$D6,$FE,$BB,$BD,$43,$3C,$00,$00,$3F,$FB,$FF,$FF,$FF,$FF,$FB
 .db $FF,$FF,$F8,$00,$00,$1F,$E7,$FF,$FF,$FF,$FF,$E7,$FF,$FF,$F0,$00

pica:
 .db $FF,$AA,$AA,$AA,$AA,$A0,$00,$0A,$AA,$AA,$AB,$FF,$FF,$55,$55,$55
 .db $55,$40,$00,$05,$55,$55,$55,$FF,$FF,$AA,$AA,$AA,$AA,$80,$00,$02
 .db $AA,$AA,$AA,$FF,$FF,$55,$55,$55,$55,$00,$00,$05,$55,$55,$55,$FF
 .db $FE,$AA,$AA,$AA,$AA,$00,$00,$02,$AA,$AA,$AA,$FF,$FD,$55,$55,$55
 .db $55,$00,$00,$01,$55,$55,$55,$7F,$FE,$AA,$AA,$AA,$AA,$00,$00,$00
 .db $AA,$AA,$AA,$BF,$FD,$55,$55,$55,$54,$00,$00,$01,$55,$55,$55,$7F
 .db $FA,$AA,$AA,$AA,$A8,$00,$00,$00,$AA,$AA,$AA,$BF,$F5,$55,$55,$55
 .db $50,$00,$00,$00,$55,$55,$55,$5F,$FA,$AA,$AA,$AA,$A0,$00,$00,$00
 .db $2A,$AA,$AA,$AF,$F5,$55,$55,$55,$40,$00,$00,$00,$55,$55,$55,$5F
 .db $EA,$AA,$AA,$AA,$80,$00,$00,$00,$2A,$AA,$AA,$AF,$D5,$55,$55,$55
 .db $00,$00,$00,$00,$15,$55,$55,$57,$EA,$AA,$AA,$AA,$00,$00,$00,$00
 .db $0A,$AA,$AA,$AF,$D5,$55,$55,$55,$00,$00,$00,$00,$15,$55,$55,$57
 .db $AA,$AA,$AA,$AA,$00,$00,$00,$00,$0A,$AA,$AA,$AB,$D5,$55,$55,$54
 .db $00,$00,$00,$00,$05,$55,$55,$57,$AA,$AA,$AA,$A8,$00,$00,$00,$00
 .db $0A,$AA,$AA,$AB,$D5,$55,$55,$50,$00,$00,$00,$00,$05,$55,$55,$57
 .db $AA,$AA,$AA,$A0,$00,$00,$00,$00,$02,$AA,$AA,$AB,$55,$55,$55,$40
 .db $00,$00,$00,$00,$01,$55,$55,$55,$AA,$AA,$AA,$80,$00,$00,$00,$00
 .db $02,$AA,$AA,$AB,$55,$55,$55,$00,$00,$00,$00,$00,$01,$55,$55,$55
 .db $AA,$AA,$AA,$80,$00,$00,$00,$00,$00,$AA,$AA,$AB,$55,$55,$55,$00
 .db $00,$00,$00,$00,$00,$55,$55,$55,$AA,$AA,$AA,$00,$00,$00,$00,$00
 .db $00,$AA,$AA,$AB,$55,$55,$54,$00,$00,$00,$00,$00,$00,$55,$55,$55
 .db $AA,$AA,$A8,$00,$00,$00,$00,$00,$00,$2A,$AA,$AB,$55,$55,$50,$00
 .db $00,$00,$00,$00,$00,$15,$55,$55,$AA,$AA,$A0,$00,$00,$00,$00,$00
 .db $00,$2A,$AA,$AB,$55,$55,$40,$00,$00,$00,$00,$00,$00,$15,$55,$55
 .db $AA,$AA,$80,$00,$00,$00,$00,$00,$00,$0A,$AA,$AB,$55,$55,$00,$00
 .db $00,$00,$00,$00,$00,$15,$55,$55,$AA,$AA,$80,$00,$00,$00,$00,$00
 .db $00,$0A,$AA,$AB,$D5,$55,$00,$00,$00,$00,$00,$00,$00,$05,$55,$57
 .db $AA,$AA,$00,$00,$00,$00,$00,$00,$00,$02,$AA,$AB,$D5,$54,$00,$00
 .db $00,$00,$00,$00,$00,$05,$55,$57,$AA,$A8,$00,$00,$00,$00,$00,$00
 .db $00,$02,$AA,$AB,$D5,$50,$00,$00,$00,$00,$00,$00,$00,$01,$55,$57
 .db $EA,$A0,$00,$00,$00,$00,$00,$00,$00,$00,$AA,$AF,$D5,$40,$00,$00
 .db $00,$00,$00,$00,$00,$01,$55,$57,$EA,$80,$00,$00,$00,$00,$00,$00
 .db $00,$00,$AA,$AF,$F5,$00,$00,$00,$00,$00,$00,$00,$00,$00,$55,$57
 .db $EA,$80,$00,$00,$00,$00,$00,$00,$00,$00,$2A,$AF,$F5,$00,$00,$00
 .db $00,$00,$00,$00,$00,$00,$55,$5F,$FA,$00,$00,$00,$00,$00,$00,$00
 .db $00,$00,$2A,$BF,$FC,$00,$00,$00,$00,$00,$00,$00,$00,$00,$15,$5F
 .db $F8,$00,$00,$00,$00,$00,$00,$00,$00,$00,$2A,$BF,$FC,$00,$00,$00
 .db $00,$00,$00,$00,$00,$00,$15,$7F,$FC,$00,$00,$00,$00,$00,$00,$00
 .db $00,$00,$0A,$FF,$FE,$00,$00,$00,$00,$00,$00,$00,$00,$00,$05,$7F
 .db $FE,$AA,$80,$00,$00,$00,$00,$00,$00,$00,$0A,$FF,$FF,$55,$55,$40
 .db $00,$00,$00,$00,$00,$00,$05,$FF,$FF,$AA,$AA,$AA,$A0,$00,$00,$00
 .db $00,$00,$03,$FF,$FF,$D5,$55,$55,$55,$50,$00,$00,$00,$00,$03,$FF
 .db $FF,$EA,$AA,$AA,$AA,$AA,$A8,$00,$00,$00,$07,$FF,$FF,$D5,$55,$55
 .db $55,$55,$55,$55,$00,$00,$07,$FF,$FF,$EA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$80,$1F,$FF,$FF,$F5,$55,$55,$55,$55,$55,$55,$55,$55,$5F,$FF
 .db $FF,$FA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$BF,$FF,$FF,$FD,$55,$55
 .db $55,$55,$55,$55,$55,$55,$7F,$FF,$FF,$FE,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$FF,$FF,$FF,$FF,$55,$55,$55,$55,$55,$55,$55,$55,$FF,$FF

picb:
 .db $FF,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$FF,$FF,$55,$55,$55
 .db $54,$00,$00,$01,$55,$55,$55,$FF,$FF,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$FF,$FF,$55,$55,$55,$40,$00,$00,$00,$55,$55,$55,$FF
 .db $FE,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$FF,$FD,$55,$55,$55
 .db $00,$00,$00,$00,$15,$55,$55,$7F,$FE,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$BF,$FD,$55,$55,$54,$00,$00,$00,$00,$15,$55,$55,$7F
 .db $FA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$BF,$F5,$55,$55,$50
 .db $00,$00,$00,$00,$05,$55,$55,$5F,$FA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AF,$F5,$55,$55,$40,$00,$00,$00,$00,$01,$55,$55,$5F
 .db $EA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AF,$D5,$55,$55,$00
 .db $00,$00,$00,$00,$01,$55,$55,$57,$EA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AF,$D5,$55,$50,$00,$00,$00,$00,$00,$00,$55,$55,$57
 .db $AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$D5,$55,$40,$00
 .db $00,$00,$00,$00,$00,$15,$55,$57,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AB,$D5,$55,$00,$00,$00,$00,$00,$00,$00,$15,$55,$57
 .db $AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$55,$54,$00,$00
 .db $00,$00,$00,$00,$00,$05,$55,$55,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AB,$55,$50,$00,$00,$00,$00,$00,$00,$00,$01,$55,$55
 .db $AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$55,$40,$00,$00
 .db $00,$00,$00,$00,$00,$01,$55,$55,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AB,$55,$00,$00,$00,$00,$00,$00,$00,$00,$00,$55,$55
 .db $AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$50,$00,$00,$00
 .db $00,$00,$00,$00,$00,$00,$15,$55,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AB,$40,$00,$00,$00,$00,$00,$00,$00,$00,$00,$15,$55
 .db $AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$5F,$FF,$F5,$55
 .db $00,$00,$00,$00,$00,$00,$05,$55,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AB,$FF,$FF,$FF,$FF,$FF,$F5,$55,$00,$00,$00,$01,$57
 .db $AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$DF,$FF,$FF,$FF
 .db $FF,$FF,$FF,$FF,$F5,$55,$01,$57,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AB,$D7,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$57
 .db $EA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AF,$D7,$FF,$FF,$FF
 .db $FF,$FF,$FF,$FF,$FF,$FF,$FF,$57,$EA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AF,$F5,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$FD,$57
 .db $EA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AF,$F5,$7F,$FF,$FF
 .db $FF,$FF,$FF,$FF,$FF,$FF,$D5,$5F,$FA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$BF,$FD,$7F,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$55,$5F
 .db $FA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$BF,$FD,$5F,$FF,$FF
 .db $FF,$FF,$FF,$FF,$FF,$FD,$55,$7F,$FE,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$FF,$FF,$57,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$F5,$55,$7F
 .db $FE,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$FF,$FF,$57,$FF,$FF
 .db $FF,$FF,$FF,$FF,$FF,$D5,$55,$FF,$FF,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AB,$FF,$FF,$D5,$FF,$FF,$FF,$FF,$FF,$FF,$FF,$55,$57,$FF
 .db $FF,$EA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$FF,$FF,$D5,$7F,$FF
 .db $FF,$FF,$FF,$FF,$F5,$55,$57,$FF,$FF,$EA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AF,$FF,$FF,$F5,$7F,$FF,$FF,$FF,$FF,$FF,$D5,$55,$5F,$FF
 .db $FF,$FA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$BF,$FF,$FF,$FD,$5F,$FF
 .db $FF,$FF,$FF,$FF,$55,$55,$7F,$FF,$FF,$FE,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$FF,$FF,$FF,$FF,$57,$FF,$FF,$FF,$FF,$FD,$55,$55,$FF,$FF

picc:
 .db $FF,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$FF,$FF,$55,$55,$55
 .db $55,$55,$55,$55,$55,$55,$55,$FF,$FF,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$FF,$FF,$45,$7D,$55,$55,$55,$55,$55,$55,$55,$55,$FF
 .db $FE,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$FF,$FD,$40,$7F,$FF
 .db $55,$55,$55,$55,$55,$55,$55,$7F,$FE,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$BF,$FD,$40,$17,$FF,$FF,$D5,$55,$55,$55,$55,$55,$7F
 .db $FA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$BF,$F5,$40,$05,$FF
 .db $FF,$FF,$D5,$55,$55,$55,$55,$5F,$FA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AF,$F5,$40,$00,$7F,$FF,$FF,$FD,$55,$55,$55,$55,$5F
 .db $EA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AF,$D5,$40,$00,$17
 .db $FF,$FF,$FF,$55,$55,$55,$55,$57,$EA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AF,$D5,$40,$00,$01,$FF,$FF,$FF,$55,$55,$55,$55,$57
 .db $AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$D5,$40,$00,$00
 .db $5F,$FF,$FF,$D5,$55,$55,$55,$57,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AB,$D5,$40,$00,$00,$17,$FF,$FF,$F5,$55,$55,$55,$57
 .db $AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$55,$40,$00,$00
 .db $01,$7F,$FF,$F5,$55,$55,$55,$55,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AB,$55,$40,$00,$00,$00,$5F,$FF,$FD,$55,$55,$55,$55
 .db $AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$55,$40,$00,$00
 .db $00,$15,$FF,$FD,$55,$55,$55,$55,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AB,$55,$40,$00,$00,$00,$01,$7F,$FF,$55,$55,$55,$55
 .db $AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$55,$50,$00,$00
 .db $00,$00,$5F,$FF,$D5,$55,$55,$55,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AB,$55,$50,$00,$00,$00,$00,$05,$FF,$D5,$55,$55,$55
 .db $AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$55,$50,$00,$00
 .db $00,$00,$01,$7F,$F5,$55,$55,$55,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AB,$D5,$50,$00,$00,$00,$00,$00,$57,$F5,$55,$55,$57
 .db $AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$D5,$50,$00,$00
 .db $00,$00,$00,$05,$FD,$55,$55,$57,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AB,$D5,$50,$00,$00,$00,$00,$00,$01,$5F,$55,$55,$57
 .db $EA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AF,$D5,$50,$00,$00
 .db $00,$00,$00,$00,$15,$55,$55,$57,$EA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$AF,$F5,$50,$00,$00,$00,$00,$00,$00,$05,$55,$55,$57
 .db $EA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AF,$F5,$50,$00,$00
 .db $00,$00,$00,$00,$01,$55,$55,$5F,$FA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$BF,$FD,$50,$00,$00,$00,$00,$00,$15,$55,$55,$55,$5F
 .db $FA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$BF,$FD,$50,$00,$00
 .db $00,$00,$15,$55,$55,$55,$55,$7F,$FE,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AA,$FF,$FF,$50,$00,$00,$00,$55,$55,$55,$55,$55,$55,$7F
 .db $FE,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$FF,$FF,$50,$00,$01
 .db $55,$55,$55,$55,$55,$55,$55,$FF,$FF,$AA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AB,$FF,$FF,$D0,$05,$55,$55,$55,$55,$55,$55,$55,$57,$FF
 .db $FF,$EA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AB,$FF,$FF,$D5,$55,$55
 .db $55,$55,$55,$55,$55,$55,$57,$FF,$FF,$EA,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$AF,$FF,$FF,$F5,$55,$55,$55,$55,$55,$55,$55,$55,$5F,$FF
 .db $FF,$FA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$BF,$FF,$FF,$FD,$55,$55
 .db $55,$55,$55,$55,$55,$55,$7F,$FF,$FF,$FE,$AA,$AA,$AA,$AA,$AA,$AA
 .db $AA,$AA,$FF,$FF,$FF,$FF,$55,$55,$55,$55,$55,$55,$55,$55,$FF,$FF

.end
END