241 lines
9.7 KiB
PHP
241 lines
9.7 KiB
PHP
Temperance:
|
|
db 10, "TEMPERANCE"
|
|
db 10, " "
|
|
db 9, "balance "
|
|
db 9, "moderate "
|
|
db 9, "effort "
|
|
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 for waterfall
|
|
ld [hl+], a
|
|
ld [hl+], a ; CVS+2 frame of animation
|
|
ret
|
|
.fUpdate:
|
|
ld hl, CVS
|
|
call IncrementTimer
|
|
|
|
ld a, [CVS+1] ; checking the high byte of the timer
|
|
cp a, $01 ; $10 = 1 second, $02 = 1/8 of a second
|
|
jp c, :+
|
|
|
|
ld a, 0
|
|
ld [CVS], a
|
|
ld [CVS+1], a
|
|
|
|
ld b, 6
|
|
ld a, [CVS+2]
|
|
inc a
|
|
call ArrayClampLoopingB
|
|
ld [CVS+2], a
|
|
|
|
call .waterfall
|
|
|
|
:
|
|
|
|
ret
|
|
.fDraw:
|
|
ld a, [CVS+2]
|
|
sra a
|
|
cp a, 0
|
|
jp z, .frame0
|
|
cp a, 1
|
|
jp z, .frame1
|
|
cp a, 2
|
|
jp z, .frame2
|
|
|
|
.frame0
|
|
ld a, %10_01_00_00
|
|
ld [rOBP0], a
|
|
ret
|
|
.frame1
|
|
ld a, %01_00_10_00
|
|
ld [rOBP0], a
|
|
ret
|
|
.frame2
|
|
ld a, %00_10_01_00
|
|
ld [rOBP0], a
|
|
ret
|
|
|
|
.waterfall:
|
|
ld hl, .waterfall1
|
|
ld a, [CVS+2]
|
|
bit 0, a
|
|
jp nz, :+
|
|
ld hl, .waterfall2
|
|
:
|
|
ld de, MY_OAM
|
|
ld b, 4*8
|
|
ld c, 3*8
|
|
ld a, $83
|
|
call BuildMetaSprite
|
|
ret
|
|
|
|
.waterfall1
|
|
db $00, $00, $0f
|
|
db $13, $12, $11
|
|
db $15, $14, $00
|
|
db $16, $17, $00
|
|
db $18, $19, $00
|
|
db $1a, $1d, $00
|
|
db $1b, $1c, $00
|
|
db $01, $02, $00
|
|
.waterfall2
|
|
db $00, $00, $0f
|
|
db $0d, $0c, $0e
|
|
db $0a, $0b, $00
|
|
db $09, $03, $00
|
|
db $07, $08, $00
|
|
db $06, $05, $00
|
|
db $04, $10, $00
|
|
db $01, $02, $00
|
|
.SpriteTiles:
|
|
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
|
db $00,$07,$00,$03,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
|
db $00,$f0,$00,$e0,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
|
db $00,$f0,$00,$f0,$10,$f0,$f0,$f0,$f0,$f0,$f0,$f0,$f0,$f0,$f0,$f0
|
|
db $00,$07,$00,$07,$00,$07,$00,$07,$00,$07,$00,$07,$00,$07,$00,$07
|
|
db $e0,$00,$f0,$00,$f0,$00,$f0,$00,$e0,$10,$00,$f0,$00,$f0,$00,$f0
|
|
db $07,$00,$07,$00,$07,$00,$07,$00,$03,$04,$00,$07,$00,$07,$00,$07
|
|
db $03,$03,$03,$01,$03,$00,$03,$00,$03,$00,$03,$00,$07,$00,$07,$00
|
|
db $f0,$f0,$e0,$e0,$e0,$00,$e0,$00,$e0,$00,$e0,$00,$e0,$00,$e0,$00
|
|
db $00,$03,$00,$03,$02,$03,$03,$03,$03,$03,$03,$03,$03,$03,$03,$03
|
|
db $03,$03,$03,$01,$03,$00,$03,$00,$01,$02,$00,$03,$00,$03,$00,$03
|
|
db $fe,$fe,$fc,$f8,$fc,$00,$fc,$00,$fc,$00,$00,$f8,$00,$f8,$00,$f0
|
|
db $00,$00,$01,$01,$03,$03,$07,$03,$1f,$00,$3f,$40,$00,$ff,$01,$ff
|
|
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$01,$01,$01
|
|
db $80,$c0,$80,$e0,$c0,$e0,$e0,$e0,$e0,$00,$80,$60,$00,$80,$00,$00
|
|
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$80,$00,$c0
|
|
db $00,$f0,$00,$f0,$00,$f0,$00,$f0,$00,$f0,$00,$f0,$00,$f0,$00,$f0
|
|
db $00,$c0,$00,$e0,$00,$e0,$80,$e0,$e0,$e0,$e0,$00,$80,$00,$00,$00
|
|
db $00,$00,$01,$01,$03,$03,$07,$07,$1f,$03,$7f,$00,$ff,$00,$00,$ff
|
|
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$01,$00,$01
|
|
db $00,$fe,$fc,$fc,$fc,$fc,$fc,$f8,$fc,$00,$f8,$00,$f8,$00,$f0,$00
|
|
db $00,$03,$03,$03,$03,$03,$03,$01,$03,$00,$03,$00,$03,$00,$01,$02
|
|
db $00,$03,$00,$03,$00,$03,$00,$03,$00,$03,$02,$03,$03,$03,$03,$03
|
|
db $00,$f0,$00,$f0,$00,$f0,$00,$f0,$00,$f0,$10,$f0,$f0,$f0,$f0,$f0
|
|
db $03,$03,$03,$03,$03,$03,$03,$03,$03,$03,$03,$03,$07,$03,$07,$00
|
|
db $f0,$f0,$e0,$e0,$e0,$e0,$e0,$e0,$e0,$e0,$e0,$e0,$e0,$c0,$e0,$00
|
|
db $07,$00,$07,$00,$07,$00,$07,$00,$07,$00,$07,$00,$07,$00,$07,$00
|
|
db $07,$00,$07,$00,$07,$00,$03,$04,$00,$07,$00,$07,$00,$07,$00,$07
|
|
db $f0,$00,$f0,$00,$f0,$00,$e0,$10,$00,$f0,$00,$f0,$00,$f0,$00,$f0
|
|
db $e0,$00,$f0,$00,$f0,$00,$f0,$00,$f0,$00,$f0,$00,$f0,$00,$f0,$00
|
|
.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 $00,$01,$01,$01,$03,$03,$02,$03,$06,$06,$04,$06,$0f,$0f,$00,$00
|
|
db $09,$19,$09,$19,$0f,$0f,$06,$0f,$06,$0f,$06,$06,$ff,$ff,$00,$00
|
|
db $00,$80,$00,$80,$00,$00,$00,$00,$00,$00,$00,$00,$80,$80,$00,$00
|
|
db $00,$00,$f0,$f0,$60,$60,$40,$60,$c0,$c0,$80,$c0,$80,$c0,$80,$80
|
|
db $00,$00,$0f,$0f,$04,$06,$06,$06,$02,$03,$03,$03,$01,$01,$01,$01
|
|
db $00,$00,$ff,$ff,$60,$60,$20,$60,$30,$30,$10,$30,$10,$30,$19,$19
|
|
db $00,$00,$ff,$ff,$11,$33,$31,$33,$21,$63,$61,$63,$41,$c3,$81,$c3
|
|
db $c1,$c3,$41,$c3,$61,$63,$21,$63,$31,$33,$11,$33,$ff,$ff,$00,$00
|
|
db $00,$00,$00,$00,$00,$00,$00,$00,$01,$00,$03,$00,$07,$01,$02,$07
|
|
db $00,$00,$00,$00,$7f,$00,$ff,$3f,$c1,$7f,$80,$ff,$00,$ff,$00,$ff
|
|
db $00,$00,$00,$00,$80,$01,$c0,$01,$f0,$c3,$7c,$c3,$7c,$62,$3c,$32
|
|
db $00,$3f,$00,$f3,$00,$c7,$00,$9f,$00,$ff,$00,$bf,$00,$0f,$00,$00
|
|
db $00,$80,$00,$c0,$00,$e0,$00,$e0,$0c,$e0,$1f,$e0,$07,$f8,$07,$f8
|
|
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$80,$00,$c0,$00,$e0,$00
|
|
db $02,$07,$00,$07,$00,$07,$00,$07,$00,$07,$00,$03,$00,$02,$00,$06
|
|
db $00,$ff,$00,$fe,$00,$fc,$00,$f8,$00,$e0,$00,$80,$00,$00,$00,$00
|
|
db $3c,$32,$1d,$13,$1c,$13,$1e,$11,$0e,$11,$02,$1d,$01,$72,$01,$b2
|
|
db $00,$00,$b8,$b8,$00,$a0,$00,$00,$00,$00,$00,$71,$00,$83,$80,$7c
|
|
db $07,$f8,$07,$e8,$07,$e8,$07,$e8,$07,$e8,$07,$e8,$07,$d8,$00,$df
|
|
db $f0,$00,$f0,$08,$e0,$18,$e0,$18,$e0,$18,$c0,$30,$90,$70,$30,$f0
|
|
db $00,$01,$00,$03,$00,$02,$00,$03,$00,$02,$00,$06,$00,$04,$00,$0d
|
|
db $01,$e2,$00,$01,$00,$01,$00,$18,$00,$f8,$00,$e8,$00,$f8,$00,$fc
|
|
db $c0,$30,$00,$e0,$00,$e8,$40,$e8,$40,$c8,$c1,$c1,$7f,$ff,$00,$41
|
|
db $00,$d7,$00,$77,$03,$77,$00,$3f,$20,$3f,$e0,$e2,$70,$8e,$00,$38
|
|
db $60,$e0,$e0,$e0,$c0,$c0,$00,$80,$00,$80,$00,$c0,$00,$c0,$00,$40
|
|
db $00,$04,$00,$04,$00,$04,$00,$04,$00,$04,$00,$04,$00,$04,$00,$04
|
|
db $00,$0b,$00,$0f,$00,$08,$00,$08,$00,$08,$00,$08,$00,$09,$00,$0f
|
|
db $00,$78,$00,$3c,$00,$3c,$00,$3c,$00,$36,$0c,$32,$20,$f2,$ec,$f2
|
|
db $3f,$40,$00,$23,$00,$37,$00,$1c,$00,$08,$00,$00,$00,$00,$00,$00
|
|
db $80,$60,$00,$80,$00,$80,$00,$00,$00,$00,$00,$00,$00,$00,$02,$03
|
|
db $00,$20,$00,$20,$00,$20,$00,$20,$00,$20,$00,$60,$00,$c0,$00,$80
|
|
db $00,$04,$00,$04,$00,$04,$00,$04,$00,$04,$00,$0c,$00,$08,$00,$08
|
|
db $01,$1f,$07,$1f,$0c,$1c,$00,$10,$00,$10,$00,$10,$00,$10,$00,$10
|
|
db $80,$b1,$06,$39,$00,$38,$07,$38,$00,$38,$07,$38,$00,$18,$07,$18
|
|
db $00,$00,$00,$00,$00,$ff,$07,$f8,$00,$00,$ff,$00,$00,$00,$ff,$00
|
|
db $0e,$0e,$38,$7e,$f8,$e6,$f8,$06,$78,$06,$f8,$06,$38,$06,$f8,$06
|
|
db $00,$08,$00,$08,$00,$08,$00,$08,$00,$08,$00,$08,$00,$08,$00,$08
|
|
db $00,$18,$00,$08,$00,$08,$00,$08,$00,$08,$00,$08,$00,$08,$00,$08
|
|
db $00,$38,$0f,$30,$00,$30,$0f,$30,$00,$30,$0f,$30,$00,$30,$1f,$e0
|
|
db $18,$06,$f8,$06,$18,$06,$fc,$02,$0c,$02,$fc,$02,$04,$03,$fc,$03
|
|
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$01,$00,$01
|
|
db $00,$08,$00,$08,$00,$08,$00,$08,$00,$38,$00,$f8,$00,$f8,$00,$f8
|
|
db $00,$08,$00,$08,$00,$08,$00,$08,$00,$0c,$00,$0f,$00,$0f,$00,$0f
|
|
db $00,$e0,$1f,$e0,$00,$e0,$3f,$c0,$00,$c0,$3f,$c0,$00,$c0,$7f,$80
|
|
db $00,$03,$fe,$01,$00,$01,$fe,$01,$00,$01,$ff,$00,$00,$01,$ff,$00
|
|
db $00,$00,$00,$00,$00,$00,$00,$00,$00,$80,$00,$80,$00,$80,$00,$80
|
|
db $00,$01,$00,$01,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
|
db $00,$f8,$00,$fc,$40,$bf,$7e,$81,$3f,$c0,$1f,$60,$1f,$60,$0f,$70
|
|
db $00,$0f,$01,$1e,$03,$fc,$7e,$81,$fe,$01,$fc,$03,$fc,$03,$fd,$02
|
|
db $00,$c0,$bf,$40,$00,$c0,$7f,$80,$00,$80,$ff,$00,$00,$00,$ff,$00
|
|
db $00,$01,$fe,$01,$00,$01,$ff,$00,$00,$00,$ff,$00,$00,$00,$ff,$00
|
|
db $00,$80,$00,$80,$00,$80,$00,$80,$00,$80,$80,$40,$00,$c0,$80,$40
|
|
db $0f,$30,$0f,$30,$0f,$30,$0f,$30,$1f,$20,$1f,$20,$1f,$20,$1f,$20
|
|
db $fc,$02,$fd,$02,$fc,$02,$fd,$02,$fc,$02,$fd,$02,$fc,$02,$fc,$03
|
|
db $00,$c0,$80,$40,$00,$40,$80,$40,$00,$40,$80,$40,$00,$c0,$00,$c0
|
|
db $1f,$60,$3f,$40,$3f,$40,$7f,$00,$7f,$00,$7f,$00,$ff,$00,$ff,$00
|
|
db $fe,$01,$fe,$01,$fe,$01,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00
|
|
db $00,$00,$7f,$80,$00,$80,$3f,$c0,$80,$c0,$df,$e0,$e0,$e0,$f7,$f8
|
|
db $00,$03,$fc,$03,$00,$03,$fb,$07,$03,$07,$e7,$1f,$0f,$3f,$9f,$7f
|
|
db $40,$c0,$c0,$c0,$c0,$c0,$c0,$c0,$c0,$c0,$c0,$c0,$80,$c0,$80,$c0
|
|
db $00,$00,$00,$00,$00,$00,$01,$00,$01,$00,$01,$00,$01,$00,$01,$00
|
|
db $ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$7f,$80
|
|
db $f0,$7e,$b8,$7f,$8e,$5f,$87,$47,$83,$43,$80,$43,$80,$40,$80,$40
|
|
db $00,$00,$38,$c7,$00,$ff,$f4,$fe,$fc,$fe,$00,$07,$00,$83,$00,$c3
|
|
db $3f,$ff,$7e,$ff,$dc,$df,$00,$1f,$00,$0f,$00,$09,$00,$08,$00,$08
|
|
db $00,$c0,$00,$80,$00,$80,$00,$80,$00,$80,$00,$80,$00,$80,$00,$80
|
|
db $00,$01,$01,$01,$01,$01,$01,$01,$00,$00,$00,$00,$00,$00,$00,$00
|
|
db $7f,$80,$3f,$c0,$3f,$c0,$1f,$e0,$9f,$e0,$cf,$f0,$43,$7c,$60,$7f
|
|
db $ff,$00,$ff,$00,$ff,$00,$ff,$00,$fe,$01,$fc,$03,$ec,$13,$01,$ff
|
|
db $80,$40,$80,$40,$00,$c0,$40,$c3,$40,$c4,$c0,$c4,$80,$87,$80,$80
|
|
db $00,$41,$00,$c3,$00,$c6,$00,$0c,$00,$08,$00,$10,$00,$e1,$00,$01
|
|
db $00,$18,$00,$30,$00,$30,$00,$70,$00,$c0,$00,$80,$00,$00,$00,$03
|
|
db $00,$80,$00,$80,$00,$80,$00,$40,$00,$40,$00,$40,$00,$40,$00,$80
|
|
db $30,$3f,$18,$1f,$0f,$0f,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
|
db $03,$ff,$06,$fe,$fc,$fc,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
|
db $00,$01,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
|
db $00,$fe,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
|
db $ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00,$ff,$00
|
|
db $00,$00,$ff,$00,$00,$00,$ff,$00,$00,$00,$ff,$00,$00,$00,$ff,$00
|
|
.KeyArtTilesEnd:
|
|
|
|
.BackgroundCopy: ; tiles start at 26
|
|
db $1a, $1a, $1a, $1a, $1a, $1a, $1a, $1a
|
|
db $1a, $23, $24, $25, $26, $27, $28, $1a
|
|
db $1a, $29, $2a, $2b, $2c, $2d, $2e, $1a
|
|
db $1a, $34, $2f, $30, $31, $32, $33, $1a
|
|
db $1a, $34, $35, $36, $37, $38, $39, $1a
|
|
db $1a, $3a, $3b, $3c, $3d, $3e, $1a, $1a
|
|
db $1a, $3f, $40, $41, $69, $42, $1a, $1a
|
|
db $43, $44, $45, $46, $69, $47, $48, $1a
|
|
db $49, $4a, $4b, $4c, $69, $4d, $4e, $1a
|
|
db $1a, $4f, $50, $69, $69, $69, $51, $1a
|
|
db $1a, $52, $53, $54, $69, $55, $56, $1a
|
|
db $57, $58, $68, $59, $5a, $5b, $5c, $1a
|
|
db $5d, $5e, $5f, $60, $61, $62, $63, $1a
|
|
db $1a, $64, $65, $1a, $66, $67, $1a, $1a
|
|
db $1a, $1a, $1f, $21, $20, $1e, $1a, $1a
|
|
db $1a, $1a, $1b, $22, $1c, $1d, $1a, $1a
|
|
.BackgroundCopyEnd:
|