shoofle/gb-tarot
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
e44d7e492b
gb-tarot/08Strength.inc

263 lines
9.8 KiB
PHP
Raw Blame History

Strength:
db 10, "STRENGTH "
db 10, " "
db 9, "courage "
db 9, "mercy "
db 9, "grace "
dw .BackgroundCopyEnd - .BackgroundCopy
dw .BackgroundCopy
dw .KeyArtTilesEnd - .KeyArtTiles
dw .KeyArtTiles
dw .SpriteTilesEnd - .SpriteTiles
dw .SpriteTiles
dw .fInit
dw .fUpdate
dw .fDraw
.fInit:
ld hl, CVS
ld a, 0
ld [hl+], a ; CVS timer
ld [hl+], a ;
ld [hl+], a ; CVS + 2 frame index for clouds goin back and forth
ld [hl+], a ; CVS + 3 frame index for clouds goin back and forth
ld [hl+], a ; CVS + 4 frame index for clouds goin back and forth
ld [hl+], a ; CVS + 5 frame index for clouds goin back and forth
ld a, %00_00_00_00
ld [rOBP0], a
ret
.fUpdate:
ld hl, CVS
call IncrementTimer
ld a, [CVS+1] ; checking the high byte of the timer
cp a, $28 ; $10 = 1 second, $02 = 1/8 of a second
ret c
; if the timer is greater or equal to $0600, reset it
ld a, 0
ld [CVS], a
ld [CVS+1], a
ld hl, .cloud1Anim
ld a, [CVS+2]
inc a
call ArrayClampLooping
ld [CVS+2], a
ld b, 0
ld c, a
inc hl
add hl, bc
add hl, bc
ld b, [hl]
inc hl
ld c, [hl]
ld hl, .cloud1
ld de, MY_OAM
ld a, $13
call BuildMetaSprite
ld hl, .cloud2Anim
ld a, [CVS+3]
inc a
call ArrayClampLooping
ld [CVS+3], a
ld b, 0
ld c, a
inc hl
add hl, bc
add hl, bc
ld b, [hl]
inc hl
ld a, [hl]
add a, 5
ld c, a
ld hl, .cloud2
ld de, MY_OAM+3*4
ld a, $13
call BuildMetaSprite
ld hl, .cloud3Anim
ld a, [CVS+4]
inc a
call ArrayClampLooping
ld [CVS+4], a
ld b, 0
ld c, a
inc hl
add hl, bc
add hl, bc
ld b, [hl]
inc hl
ld c, [hl]
ld hl, .cloud3
ld de, MY_OAM+6*4
ld a, $13
call BuildMetaSprite
ld hl, .cloud4Anim
ld a, [CVS+5]
inc a
call ArrayClampLooping
ld [CVS+5], a
ld b, 0
ld c, a
inc hl
add hl, bc
add hl, bc
ld b, [hl]
inc hl
ld c, [hl]
ld hl, .cloud4
ld de, MY_OAM+9*4
ld a, $13
call BuildMetaSprite
ret
.fDraw: ret
.cloud1
db $09, $05, $06
.cloud1Anim
db 8, 24, 16, 24, 17, 24, 18, 24, 19, 24, 19, 24, 18, 24, 17, 24, 16,
.cloud2
db $01, $03, $02
.cloud2Anim
db 6, 28, 48, 28, 49, 28, 50, 28, 50, 28, 49, 28, 48,
.cloud3
db $04, $07, $00
.cloud3Anim
db 8, 48, 64, 48, 64, 48, 65, 48, 65, 48, 66, 48, 66, 48, 65, 48, 65,
.cloud4
db $08, $00, $00
.cloud4Anim
db 6, 69, 59, 69, 59, 69, 59, 69, 60, 69, 60, 69, 60,
.SpriteTiles:
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$7f,$7f
db $00,$00,$00,$00,$00,$00,$00,$00,$f0,$f0,$f8,$f8,$fe,$fe,$ff,$ff
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$03,$03,$3f,$3f,$ff,$ff
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$ff,$ff
db $00,$00,$00,$00,$00,$00,$00,$00,$03,$03,$3f,$3f,$ff,$ff,$ff,$ff
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$e0,$e0,$f8,$f8,$ff,$ff
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$70,$70,$f8,$f8
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$3c,$3c
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$30,$30,$ff,$ff
.SpriteTilesEnd:
; original export script by gabriel reis, modified by shoofle
.KeyArtTiles:
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
db $80,$80,$00,$00,$00,$00,$00,$00,$00,$01,$03,$03,$00,$04,$00,$04
db $01,$05,$00,$07,$00,$01,$01,$01,$0d,$1d,$1c,$1c,$10,$30,$30,$31
db $80,$83,$00,$80,$80,$fc,$90,$fe,$30,$fe,$20,$ff,$00,$ff,$00,$ff
db $00,$04,$00,$08,$00,$10,$00,$30,$00,$20,$00,$60,$00,$40,$00,$40
db $00,$60,$c0,$30,$e0,$10,$f0,$08,$f0,$0c,$78,$86,$0c,$f3,$e0,$1f
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$80,$00,$e0
db $07,$00,$07,$00,$01,$02,$00,$0f,$07,$18,$cf,$30,$df,$20,$df,$60
db $fe,$01,$fc,$03,$c0,$3e,$00,$f0,$c0,$30,$00,$e0,$00,$80,$00,$80
db $00,$e0,$00,$c0,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
db $00,$01,$00,$03,$00,$06,$00,$0c,$00,$18,$00,$10,$00,$30,$00,$60
db $00,$00,$00,$00,$f8,$00,$ef,$f0,$3f,$ff,$00,$ff,$00,$ff,$00,$ff
db $00,$00,$00,$00,$00,$00,$ff,$00,$9f,$ff,$f0,$ff,$00,$ff,$00,$ff
db $07,$01,$1f,$03,$fc,$0f,$f0,$7f,$80,$ff,$00,$ff,$00,$ff,$00,$ff
db $c3,$fc,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff
db $00,$80,$00,$8c,$00,$ff,$00,$ff,$00,$f0,$00,$e0,$00,$c0,$00,$e0
db $00,$01,$00,$7f,$00,$fe,$00,$00,$00,$00,$00,$00,$00,$00,$00,$01
db $00,$c1,$00,$03,$00,$07,$00,$0f,$00,$1f,$00,$3f,$00,$7f,$00,$ff
db $00,$00,$00,$00,$00,$10,$00,$30,$10,$60,$30,$c0,$f0,$00,$f0,$00
db $00,$c1,$00,$b8,$00,$60,$00,$40,$00,$c0,$00,$fe,$00,$03,$00,$01
db $11,$ae,$1c,$e3,$1e,$61,$1c,$23,$00,$1e,$00,$00,$00,$00,$00,$00
db $00,$c0,$00,$80,$00,$80,$00,$00,$00,$00,$00,$00,$00,$0b,$01,$0e
db $00,$03,$01,$06,$03,$0c,$07,$18,$0f,$10,$0f,$30,$0f,$30,$1e,$21
db $00,$00,$00,$80,$80,$40,$80,$60,$c0,$30,$c0,$3f,$c3,$2c,$87,$68
db $f8,$00,$f8,$00,$f8,$00,$f8,$00,$fc,$00,$fc,$00,$fe,$00,$7f,$80
db $ce,$31,$ea,$15,$09,$f6,$04,$0b,$00,$0e,$00,$00,$00,$00,$00,$00
db $80,$5f,$00,$f0,$00,$c0,$00,$c0,$00,$00,$00,$00,$00,$00,$00,$00
db $3f,$c0,$9f,$60,$cf,$30,$f3,$0c,$39,$06,$3c,$03,$0f,$00,$03,$00
db $07,$f8,$b4,$4b,$a5,$5a,$3c,$c3,$00,$ff,$b8,$47,$80,$78,$80,$70
db $00,$f3,$00,$03,$01,$02,$00,$03,$01,$02,$00,$03,$01,$02,$00,$07
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$7f,$31,$fe,$78,$7f,$28,$79
db $00,$e6,$00,$c6,$80,$4e,$00,$ce,$80,$5f,$00,$ff,$96,$69,$74,$8b
db $16,$e9,$30,$ce,$04,$fa,$84,$7b,$b4,$4b,$a4,$5b,$bc,$42,$00,$fe
db $07,$08,$01,$1e,$05,$7a,$87,$f8,$f0,$8f,$12,$ed,$b3,$4c,$80,$7f
db $80,$ff,$80,$ff,$40,$fe,$43,$fb,$1f,$1f,$ff,$f1,$f9,$07,$e3,$1a
db $07,$08,$07,$08,$ff,$ff,$00,$00,$00,$00,$00,$00,$00,$0e,$00,$7f
db $fa,$07,$e3,$1e,$fe,$0d,$f0,$ff,$0c,$33,$05,$1a,$04,$1b,$00,$3f
db $03,$02,$03,$02,$03,$02,$03,$03,$00,$00,$00,$00,$00,$00,$00,$00
db $f3,$ff,$fc,$1f,$ff,$07,$7f,$80,$ff,$00,$ff,$06,$ff,$03,$ff,$00
db $fe,$ff,$fb,$ff,$ff,$ff,$ff,$fe,$7f,$7e,$7f,$7e,$7f,$7e,$7e,$7f
db $7e,$7e,$7c,$7c,$7c,$7c,$7c,$7c,$ec,$ee,$f0,$ff,$f0,$fc,$80,$86
db $fc,$ff,$ff,$ff,$fe,$ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff,$1f,$ff
db $ff,$00,$7d,$82,$bf,$d2,$fb,$cf,$ff,$67,$ff,$3f,$f0,$08,$00,$f0
db $3d,$3f,$1e,$1f,$0f,$0f,$07,$07,$01,$e1,$c0,$30,$f0,$08,$40,$bc
db $df,$d4,$9f,$94,$9f,$94,$9f,$94,$1f,$14,$1f,$1c,$07,$06,$03,$03
db $ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00
db $ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$01,$ff,$07
db $ff,$0f,$ff,$0f,$ff,$1f,$ff,$1f,$ff,$1f,$ff,$1f,$ff,$3f,$fe,$3f
db $3f,$f0,$3f,$f8,$1f,$fc,$8f,$fe,$cf,$fe,$8f,$fe,$cf,$ff,$c3,$ff
db $ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$01,$ff,$03
db $f9,$3f,$f3,$3f,$f4,$7f,$fd,$7e,$fd,$7a,$fc,$ff,$fe,$fd,$fe,$fd
db $f3,$ff,$03,$ff,$ff,$ff,$ff,$fe,$ff,$0c,$fb,$0c,$ff,$88,$ff,$78
db $ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$01
db $ff,$07,$fe,$0f,$f8,$0f,$e7,$1f,$fe,$3e,$e0,$70,$c0,$c0,$80,$80
db $df,$70,$ff,$78,$ff,$78,$ff,$fc,$ff,$fc,$ff,$fe,$fb,$ff,$f9,$ff
db $ff,$03,$ff,$03,$ff,$07,$fe,$06,$fe,$06,$fc,$0c,$fc,$0c,$f8,$08
db $ff,$80,$ff,$80,$ff,$c0,$7f,$40,$ff,$c0,$7f,$c0,$7f,$c0,$7f,$c0
db $f8,$18,$f0,$30,$e0,$20,$e0,$20,$e0,$60,$c0,$40,$c0,$c0,$00,$00
db $7f,$c0,$7f,$c0,$ff,$c0,$bf,$c0,$bf,$c0,$bf,$c0,$bf,$c0,$9f,$e0
db $ff,$e0,$3f,$30,$1f,$18,$0f,$0c,$0f,$0e,$07,$07,$01,$03,$00,$00
db $ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$80,$ff,$c0
db $ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$fc,$93,$ff,$41,$ff
db $ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$3f,$c0,$ff,$e0
db $00,$00,$00,$0c,$00,$0b,$0d,$0f,$07,$07,$00,$00,$00,$00,$00,$00
db $23,$63,$67,$e5,$5f,$f9,$bf,$fb,$ff,$fb,$0f,$11,$07,$08,$07,$08
db $03,$0c,$07,$18,$07,$38,$07,$38,$07,$78,$3b,$c4,$f9,$06,$fc,$03
db $00,$07,$00,$03,$00,$03,$00,$01,$00,$00,$00,$00,$00,$00,$00,$00
db $80,$ff,$80,$ff,$80,$ff,$80,$bf,$80,$9f,$80,$9f,$80,$8f,$80,$87
db $60,$7f,$10,$7f,$7c,$8f,$fe,$07,$fe,$03,$fd,$03,$ff,$31,$ff,$75
db $b0,$4e,$a3,$5f,$b1,$49,$00,$f0,$00,$e0,$00,$00,$00,$00,$00,$00
db $00,$00,$00,$00,$f0,$f0,$18,$19,$07,$06,$03,$02,$03,$02,$03,$02
db $00,$00,$00,$00,$07,$07,$f8,$ff,$f0,$f0,$10,$f0,$10,$f0,$10,$f0
db $10,$f0,$10,$f1,$10,$f1,$10,$f1,$10,$f1,$10,$f0,$10,$f0,$10,$f0
db $78,$e0,$3f,$f0,$1f,$fe,$03,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff
db $10,$f0,$18,$f8,$08,$f8,$0c,$fc,$04,$fc,$06,$fe,$02,$fe,$02,$fe
db $02,$fe,$03,$ff,$04,$ff,$1c,$fc,$f0,$f0,$00,$00,$00,$00,$00,$00
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$60,$00,$f0,$c0
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,$00
db $07,$00,$03,$00,$01,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
db $00,$ff,$00,$ff,$0f,$ff,$06,$ff,$06,$ff,$03,$ff,$03,$ff,$01,$ff
db $00,$ff,$00,$ff,$ff,$ff,$06,$ff,$06,$ff,$0c,$ff,$0c,$ff,$98,$ff
db $01,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$01,$ff,$00,$ff,$00,$ff
db $98,$ff,$f0,$ff,$f0,$ff,$f0,$ff,$60,$ff,$ff,$ff,$00,$ff,$00,$ff
db $00,$ff,$00,$ff,$ff,$ff,$66,$ff,$66,$ff,$66,$ff,$66,$ff,$66,$ff
db $66,$ff,$66,$ff,$66,$ff,$66,$ff,$66,$ff,$ff,$ff,$00,$ff,$00,$ff
db $00,$ff,$00,$ff,$f0,$ff,$60,$ff,$60,$ff,$60,$ff,$60,$ff,$60,$ff
db $60,$ff,$60,$ff,$60,$ff,$60,$ff,$60,$ff,$f0,$ff,$00,$ff,$00,$ff
.KeyArtTilesEnd:
.BackgroundCopy: ; tiles start at 26
db $47, $47, $47, $47, $47, $47, $47, $47
db $47, $47, $48, $57, $58, $47, $47, $47
db $47, $47, $49, $43, $4a, $47, $47, $47
db $47, $4b, $4c, $40, $4d, $47, $47, $47
db $4e, $4f, $41, $44, $50, $47, $47, $47
db $51, $1b, $42, $38, $45, $52, $47, $47
db $53, $1c, $1d, $37, $39, $54, $47, $47
db $59, $5a, $3c, $3b, $3a, $55, $56, $47
db $61, $3d, $3e, $36, $5f, $60, $5e, $67
db $62, $2d, $2e, $2f, $2c, $3f, $46, $5d
db $64, $30, $31, $5b, $32, $1e, $1a, $5c
db $65, $33, $34, $69, $35, $1f, $20, $1a
db $66, $1a, $1a, $68, $21, $22, $23, $24
db $63, $25, $26, $27, $28, $29, $2a, $2b
db $67, $67, $6a, $6b, $6e, $70, $67, $67
db $67, $67, $6c, $6d, $6f, $71, $67, $67
.BackgroundCopyEnd:
Reference in New Issue View Git Blame Copy Permalink