nop nop TheHierophant: db 10, "THE " db 10, "HIEROPHANT" db 9, "tradition" db 9, "marriage " db 9, "religion " dw .BackgroundCopyEnd - .BackgroundCopy dw .BackgroundCopy dw .KeyArtTilesEnd - .KeyArtTiles dw .KeyArtTiles dw .SpriteTilesEnd - .SpriteTiles dw .SpriteTiles dw .fInit dw .fUpdate dw .fDraw dw .fPrintPrep .fInit: ld hl, CVS ld a, 0 ld [hl+], a ; CVS timer for halo ld [hl+], a ld [hl+], a ; CVS+2 frame of halo ret .fUpdate: ld hl, CVS call IncrementTimer ld a, [CVS+1] ; checking the high byte of the timer cp a, $07 ; $10 = 1 second, $02 = 1/8 of a second jp c, .doneWithTimer1 ; if the timer is less than $0600, skip ; if the timer is greater or equal to $0700, reset it ld a, 0 ld [CVS], a ld [CVS+1], a ; and increment frame number ld b, 4 ld a, [CVS+2] inc a call ArrayClampLoopingB ld [CVS+2], a .doneWithTimer1 call .updateHalo ret .updateHalo ld a, [CVS+2] ; this is the frame number, we need to multiply it by 35 ; to get the memory index ld b, a ; a = b add a, b ;a = 2b add a, a ; a = 4b add a, a ; a = 8b add a, a ; a = 16b add a, a ; a = 32b add a, b add a, b add a, b ; a = 35b ld b, 0 ld c, a ; add offset to .halo to get the metasprite we're interested in ld hl, .halo add hl, bc ld de, MY_OAM ld b, 3*8 ld c, 2*8 ld a, $57 call BuildMetaSprite ret .fDraw: ret .fPrintPrep: ret .halo ; 5 tall 7 wide sprites db $00, $2a, $2b, $1c, $2c, $2d, $00 db $19, $1d, $1e, $00, $1f, $20, $00 db $2e, $21, $22, $00, $23, $24, $1a db $2f, $30, $25, $00, $26, $27, $31 db $28, $00, $00, $00, $00, $1b, $32 db $00, $2a, $2b, $1c, $2c, $2d, $00 db $19, $03, $02, $00, $0a, $0b, $00 db $2e, $04, $01, $00, $29, $08, $1a db $2f, $30, $05, $00, $06, $07, $31 db $28, $00, $00, $00, $00, $1b, $32 db $00, $2a, $2b, $1c, $2c, $2d, $00 db $19, $0e, $0f, $00, $10, $16, $00 db $2e, $0c, $0d, $00, $09, $15, $18 db $2f, $17, $11, $00, $12, $13, $14 db $28, $00, $00, $00, $00, $1b, $32 db $00, $2a, $2b, $1c, $2c, $2d, $00 db $19, $03, $02, $00, $0a, $0b, $00 db $2e, $04, $01, $00, $29, $08, $1a db $2f, $30, $05, $00, $06, $07, $31 db $28, $00, $00, $00, $00, $1b, $32 .SpriteTiles: db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 db $34,$40,$14,$60,$1c,$20,$0c,$70,$7c,$80,$cc,$00,$6c,$00,$3c,$00 db $80,$40,$00,$80,$00,$00,$00,$00,$00,$f8,$f0,$0c,$dc,$00,$74,$80 db $19,$20,$3b,$40,$76,$81,$5c,$82,$f8,$05,$90,$09,$f0,$09,$a0,$10 db $60,$10,$c0,$20,$40,$20,$c0,$20,$80,$43,$83,$4c,$80,$70,$80,$60 db $1e,$00,$26,$00,$3f,$00,$07,$00,$03,$04,$00,$03,$00,$00,$00,$00 db $02,$00,$02,$00,$03,$00,$06,$01,$0c,$02,$00,$0c,$00,$00,$00,$00 db $4e,$01,$f8,$06,$c0,$38,$00,$c0,$00,$00,$00,$00,$00,$00,$00,$00 db $80,$00,$80,$00,$80,$00,$80,$00,$00,$80,$80,$60,$e0,$18,$f8,$06 db $03,$00,$02,$00,$02,$00,$03,$00,$03,$00,$00,$00,$01,$00,$03,$00 db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$03,$03,$00,$03,$00 db $30,$40,$1c,$20,$0c,$10,$00,$00,$00,$60,$60,$80,$e0,$00,$20,$10 db $60,$10,$c0,$20,$40,$20,$c0,$21,$81,$4e,$8f,$70,$b0,$40,$80,$60 db $6c,$80,$64,$80,$3c,$40,$7c,$80,$ec,$00,$5c,$00,$74,$00,$34,$00 db $19,$20,$3b,$40,$76,$81,$5c,$83,$f8,$07,$91,$0a,$f0,$09,$a0,$11 db $80,$40,$00,$80,$00,$00,$00,$f0,$f0,$0c,$dc,$00,$9c,$00,$f4,$00 db $00,$00,$00,$00,$00,$00,$00,$00,$00,$03,$03,$00,$03,$00,$02,$00 db $3e,$00,$2a,$00,$23,$00,$05,$00,$06,$00,$03,$04,$00,$00,$00,$00 db $01,$00,$07,$00,$05,$00,$03,$00,$0e,$01,$0c,$02,$00,$00,$00,$00 db $23,$00,$ee,$01,$f8,$06,$c0,$38,$00,$c0,$00,$00,$00,$00,$00,$00 db $20,$c0,$20,$c0,$20,$40,$20,$40,$20,$40,$60,$80,$40,$80,$40,$80 db $80,$00,$80,$00,$00,$00,$80,$00,$80,$60,$e0,$18,$f8,$06,$ae,$01 db $30,$40,$1c,$20,$0c,$10,$00,$60,$60,$80,$e0,$00,$80,$00,$b0,$08 db $80,$60,$80,$40,$80,$40,$80,$40,$80,$40,$c0,$00,$00,$00,$00,$00 db $00,$00,$00,$00,$00,$00,$00,$00,$20,$40,$20,$40,$20,$40,$20,$c0 db $00,$00,$00,$00,$00,$00,$00,$00,$00,$01,$00,$01,$01,$02,$01,$02 db $00,$00,$00,$00,$00,$00,$00,$00,$20,$40,$20,$40,$20,$40,$20,$40 db $00,$01,$00,$01,$01,$02,$01,$00,$00,$00,$00,$00,$00,$00,$00,$00 db $00,$c0,$80,$00,$80,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 db $19,$20,$3b,$40,$76,$81,$5c,$82,$f8,$05,$90,$08,$f0,$08,$a0,$10 db $80,$40,$00,$80,$00,$00,$00,$00,$00,$e0,$60,$98,$38,$c4,$3c,$40 db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$03,$03,$00 db $30,$40,$1c,$20,$0c,$10,$00,$00,$00,$00,$00,$60,$60,$80,$c0,$20 db $60,$10,$c0,$20,$40,$20,$c0,$20,$80,$40,$80,$41,$80,$48,$80,$70 db $18,$20,$0c,$30,$0c,$10,$04,$18,$04,$78,$7c,$80,$6c,$00,$1c,$00 db $00,$00,$03,$00,$01,$00,$03,$00,$02,$01,$02,$01,$03,$00,$03,$00 db $80,$00,$80,$00,$00,$80,$00,$80,$00,$00,$00,$c0,$c0,$30,$70,$0c db $26,$00,$3e,$00,$0f,$30,$03,$0c,$00,$03,$00,$00,$00,$00,$00,$00 db $01,$00,$07,$00,$07,$00,$00,$07,$00,$0c,$00,$00,$00,$00,$00,$00 db $bc,$03,$e0,$1c,$00,$e0,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 db $03,$04,$01,$02,$01,$02,$00,$01,$00,$00,$00,$00,$00,$00,$00,$00 db $01,$00,$01,$00,$02,$00,$03,$00,$01,$00,$03,$00,$01,$00,$02,$00 db $00,$00,$00,$00,$00,$00,$00,$01,$01,$02,$03,$04,$06,$08,$0f,$10 db $00,$07,$07,$18,$1f,$60,$75,$80,$e7,$00,$bc,$03,$70,$0c,$c0,$30 db $00,$3c,$3c,$03,$1f,$00,$03,$00,$0e,$00,$07,$08,$01,$06,$00,$01 db $00,$00,$00,$00,$00,$c0,$c0,$30,$70,$08,$58,$04,$dc,$00,$6c,$80 db $03,$04,$03,$04,$02,$04,$02,$04,$07,$08,$04,$08,$06,$08,$04,$08 db $06,$08,$04,$08,$06,$08,$04,$08,$07,$08,$03,$04,$02,$04,$03,$04 db $80,$40,$80,$40,$80,$40,$80,$40,$80,$40,$c0,$00,$00,$00,$00,$00 db $20,$c0,$20,$40,$20,$40,$20,$40,$20,$40,$60,$80,$40,$80,$40,$80 db $c0,$00,$80,$00,$80,$00,$80,$00,$00,$00,$00,$00,$00,$00,$00,$00 .SpriteTilesEnd: .KeyArtTiles: db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 db $00,$00,$18,$19,$3c,$3f,$26,$27,$42,$43,$43,$43,$41,$41,$40,$40 db $00,$00,$00,$80,$00,$80,$00,$c0,$00,$c0,$00,$e0,$80,$e0,$80,$f0 db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$01,$01 db $00,$00,$00,$00,$00,$00,$0f,$0f,$0f,$09,$0f,$09,$0f,$09,$ff,$f9 db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$f8,$f8 db $00,$00,$00,$00,$00,$00,$00,$00,$01,$01,$01,$01,$01,$01,$01,$01 db $80,$80,$80,$80,$80,$80,$80,$80,$00,$00,$00,$00,$00,$00,$00,$00 db $c0,$f0,$40,$78,$60,$78,$20,$38,$30,$38,$10,$18,$18,$18,$08,$08 db $01,$01,$00,$00,$00,$00,$00,$00,$0f,$0f,$0f,$0f,$00,$00,$00,$00 db $ff,$f9,$0f,$09,$0f,$09,$0f,$09,$ff,$f9,$ff,$f9,$0f,$09,$0f,$09 db $f8,$f8,$00,$00,$00,$00,$00,$00,$ff,$ff,$ff,$ff,$00,$00,$00,$00 db $01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$01,$80,$80 db $00,$00,$00,$3f,$1e,$61,$3f,$c0,$7f,$80,$76,$89,$7f,$99,$7f,$80 db $08,$08,$08,$08,$08,$c8,$88,$68,$c8,$38,$e8,$18,$e0,$98,$e0,$18 db $00,$00,$3f,$3f,$3f,$3f,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 db $0f,$09,$ff,$f9,$ff,$f9,$0f,$09,$0f,$09,$0f,$09,$0f,$09,$0f,$09 db $00,$00,$ff,$ff,$ff,$ff,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 db $c0,$c0,$c0,$40,$c0,$40,$c0,$40,$d8,$58,$e8,$78,$d8,$68,$7b,$cb db $39,$c6,$3f,$40,$18,$67,$1f,$20,$0f,$30,$0f,$1f,$00,$1f,$c6,$f9 db $e0,$18,$e0,$10,$c0,$30,$e0,$20,$c0,$40,$80,$80,$00,$80,$3c,$ff db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$c0 db $7b,$44,$6b,$54,$6b,$54,$3f,$38,$1f,$30,$1f,$18,$0b,$0c,$0b,$0c db $fe,$1e,$fa,$1e,$f2,$1e,$f1,$3f,$a1,$7f,$a0,$7f,$40,$ff,$80,$7f db $0f,$30,$0f,$10,$0f,$10,$06,$19,$00,$1f,$89,$8f,$89,$8f,$89,$8f db $04,$87,$04,$87,$04,$87,$08,$8f,$08,$8f,$10,$1f,$10,$1f,$12,$1f db $00,$e0,$00,$f0,$00,$f8,$00,$f8,$04,$fc,$04,$fe,$02,$fe,$02,$fe db $0e,$0f,$1b,$1f,$1f,$17,$1f,$1c,$10,$3f,$1f,$30,$31,$5e,$3f,$90 db $00,$00,$80,$80,$c0,$c0,$c0,$40,$c0,$40,$c0,$40,$c0,$40,$c0,$40 db $0f,$08,$1f,$18,$17,$18,$1f,$10,$1f,$10,$3f,$30,$3f,$20,$3f,$20 db $80,$7f,$80,$7f,$80,$7f,$90,$7f,$90,$7f,$90,$7f,$90,$7f,$b0,$7f db $89,$8f,$89,$8f,$89,$8f,$89,$8f,$89,$8f,$89,$8f,$89,$8f,$89,$8f db $12,$1f,$12,$1f,$12,$1f,$12,$1f,$12,$1f,$12,$1f,$12,$1f,$12,$1f db $02,$ff,$04,$fe,$09,$fc,$17,$f8,$2f,$f0,$6f,$f0,$5f,$e0,$7f,$c0 db $71,$1e,$ff,$1f,$ef,$19,$ef,$19,$cf,$29,$cf,$29,$8f,$49,$8f,$49 db $c0,$40,$c0,$c0,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 db $3f,$20,$7f,$60,$7f,$40,$ff,$c0,$bf,$c0,$bf,$c0,$be,$c1,$bc,$c3 db $b0,$7f,$70,$ff,$70,$ff,$70,$ff,$f1,$ff,$e1,$ff,$e1,$ff,$e1,$ff db $89,$8f,$89,$8f,$89,$8f,$89,$8f,$09,$0f,$09,$0f,$09,$0f,$09,$0f db $13,$1f,$13,$1f,$13,$1f,$13,$1f,$09,$0f,$09,$0f,$09,$0f,$09,$0f db $7f,$c0,$7f,$c0,$7e,$c1,$fe,$c1,$fd,$c3,$db,$e7,$c7,$ff,$ff,$ff db $4f,$c9,$4f,$c9,$cf,$c9,$cf,$c9,$cf,$c9,$cf,$c9,$cf,$c9,$cf,$c9 db $91,$ef,$c7,$ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff,$7f,$7f,$7f,$7f db $e1,$ff,$e1,$ff,$c1,$ff,$80,$80,$80,$80,$00,$00,$00,$7f,$00,$7f db $ff,$ff,$ff,$ff,$ff,$ff,$00,$00,$00,$00,$00,$00,$00,$ff,$00,$ff db $8f,$89,$8f,$89,$8f,$89,$8f,$89,$8f,$89,$8f,$89,$0f,$09,$0f,$09 db $3e,$3e,$1e,$1e,$0c,$0c,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 db $20,$3f,$55,$7f,$4f,$7f,$47,$7f,$63,$7f,$61,$7f,$60,$7f,$60,$7f db $ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00 db $82,$7e,$d4,$7c,$f8,$78,$f0,$70,$e0,$70,$c0,$70,$80,$78,$80,$78 db $0f,$09,$0f,$09,$0f,$09,$0f,$09,$0f,$09,$0f,$09,$0f,$09,$0f,$09 db $60,$7f,$60,$7f,$60,$7f,$60,$7f,$60,$7f,$60,$7f,$60,$7f,$60,$7f db $80,$78,$80,$78,$80,$78,$80,$78,$80,$78,$80,$78,$80,$7c,$80,$7c db $60,$7f,$60,$7f,$60,$7f,$e0,$ff,$e0,$ff,$e0,$ff,$e0,$ff,$e0,$ff db $80,$7c,$80,$7c,$80,$7c,$80,$7c,$80,$7c,$80,$7c,$80,$7c,$80,$7c db $e0,$ff,$e0,$ff,$f4,$ff,$f4,$ff,$f4,$ff,$f4,$ff,$f4,$ff,$f4,$ff db $03,$ff,$03,$ff,$03,$ff,$03,$ff,$03,$ff,$03,$ff,$03,$ff,$03,$ff db $ff,$7f,$ff,$ff,$ff,$ff,$ff,$fc,$ff,$80,$ff,$01,$ff,$03,$fe,$02 db $c0,$c0,$c0,$c0,$c0,$40,$c0,$40,$80,$80,$00,$00,$00,$00,$00,$00 db $9f,$7f,$ff,$7f,$ff,$7b,$ff,$6b,$fe,$4e,$fc,$4c,$fe,$5e,$f7,$5f db $e1,$7f,$c0,$7f,$80,$ff,$80,$ff,$80,$ff,$80,$ff,$00,$ff,$00,$ff db $01,$ff,$01,$ff,$03,$ff,$82,$ff,$c6,$7f,$fe,$7f,$fe,$7f,$fe,$7f db $80,$7c,$80,$7c,$80,$7c,$80,$7c,$81,$7d,$81,$7d,$83,$7e,$83,$7e db $0f,$09,$0f,$09,$3f,$3f,$ff,$f1,$ff,$80,$ff,$00,$ff,$00,$ff,$7f db $00,$00,$00,$00,$00,$00,$80,$80,$c0,$40,$c0,$40,$c0,$c0,$c0,$c0 db $ff,$c3,$fe,$c2,$fe,$82,$fe,$e6,$3c,$3c,$00,$00,$00,$00,$00,$00 db $fc,$fc,$3e,$3e,$16,$1e,$12,$1e,$12,$1e,$33,$3f,$23,$3f,$61,$7f db $e1,$e1,$3f,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff db $c3,$ff,$01,$ff,$01,$ff,$01,$ff,$01,$ff,$01,$ff,$03,$ff,$03,$ff db $00,$00,$00,$00,$00,$00,$01,$01,$03,$03,$03,$02,$03,$03,$03,$03 db $00,$00,$00,$00,$fc,$fc,$ff,$8f,$ff,$01,$ff,$00,$ff,$00,$ff,$fe db $03,$03,$03,$03,$03,$02,$03,$02,$01,$01,$00,$00,$00,$00,$00,$00 db $ff,$fe,$ff,$ff,$ff,$ff,$ff,$3f,$ff,$01,$ff,$80,$ff,$c0,$ff,$c0 db $c0,$ff,$c0,$ff,$c0,$ff,$c0,$ff,$c0,$ff,$c0,$ff,$c0,$ff,$c0,$ff db $3f,$3f,$7c,$7c,$68,$78,$48,$78,$48,$78,$cc,$fc,$c4,$fc,$86,$fe db $ff,$c3,$7f,$43,$7f,$41,$7f,$67,$3c,$3c,$00,$00,$00,$00,$00,$00 db $fc,$ff,$fe,$ff,$fe,$df,$fe,$d7,$7e,$73,$3e,$33,$7e,$7b,$ee,$fb db $c3,$ff,$80,$ff,$80,$ff,$80,$ff,$80,$ff,$80,$ff,$c0,$ff,$c0,$ff db $87,$87,$fc,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff db $86,$ff,$02,$ff,$01,$ff,$01,$ff,$01,$ff,$01,$ff,$00,$ff,$00,$ff db $80,$ff,$80,$ff,$c0,$ff,$41,$ff,$63,$ff,$7f,$ff,$7f,$ff,$7f,$ff db $83,$7e,$83,$7e,$83,$7e,$83,$7e,$83,$7e,$83,$7e,$87,$7e,$8f,$7e db $f4,$7f,$f4,$7f,$fc,$7f,$fc,$7f,$fc,$7f,$fc,$7f,$fc,$7f,$fc,$7f db $00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$03,$03 db $06,$05,$06,$05,$06,$05,$06,$05,$06,$05,$0e,$0d,$1f,$1c,$3f,$20 db $08,$0f,$08,$0f,$08,$0f,$00,$00,$00,$00,$00,$00,$00,$ff,$00,$ff db $09,$0f,$09,$0f,$09,$0f,$00,$00,$00,$00,$00,$00,$00,$ff,$00,$ff db $ff,$00,$ff,$fc,$ff,$10,$ff,$10,$ff,$30,$ef,$30,$ff,$21,$ff,$21 db $ff,$61,$df,$61,$ff,$41,$ff,$c0,$bf,$c0,$ff,$80,$ff,$f0,$ff,$00 db $ff,$00,$ff,$3f,$ff,$08,$ff,$08,$ff,$0c,$f7,$0c,$ff,$84,$ff,$84 db $ff,$86,$fb,$86,$ff,$82,$ff,$03,$fd,$03,$ff,$01,$ff,$0f,$ff,$00 db $ff,$00,$ff,$00,$ff,$08,$ff,$1c,$ff,$36,$ff,$0f,$ff,$19,$ff,$03 db $ff,$00,$ff,$00,$ff,$08,$ff,$1c,$ff,$36,$ff,$f8,$ff,$cc,$ff,$60 db $ff,$06,$ff,$7e,$cf,$7c,$f7,$4c,$f7,$6c,$ff,$3c,$ff,$00,$ff,$00 db $ff,$30,$ff,$3f,$f9,$1f,$f7,$19,$f7,$1b,$ff,$1e,$ff,$00,$ff,$00 .KeyArtTilesEnd: .BackgroundCopy: ; tiles start at 26 db $1a, $1a, $1a, $1b, $1c, $1d, $1e, $1f db $1a, $1a, $20, $21, $22, $23, $24, $25 db $1a, $6e, $26, $27, $28, $29, $2a, $2b db $1a, $6f, $2c, $2d, $2e, $2f, $4c, $1a db $1a, $30, $31, $32, $33, $34, $35, $36 db $1a, $37, $38, $39, $3a, $3b, $3c, $3d db $1a, $3e, $3f, $40, $41, $42, $43, $1a db $1a, $44, $45, $71, $70, $46, $47, $1a db $1a, $48, $49, $4a, $4a, $4b, $4c, $1a db $1a, $1a, $4d, $76, $77, $4e, $4c, $1a db $1a, $1a, $4f, $78, $79, $50, $4c, $1a db $5f, $60, $51, $4a, $4a, $58, $59, $5a db $61, $62, $6c, $4a, $4a, $6b, $53, $54 db $64, $65, $66, $4a, $4a, $55, $5b, $5c db $67, $68, $69, $74, $72, $56, $5d, $5e db $63, $6d, $6a, $75, $73, $57, $6d, $52 .BackgroundCopyEnd: