mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-11-16 11:27:33 -08:00
Placeholder non-generic names for engine/color functions
This commit is contained in:
parent
76819398a9
commit
295604cbb5
@ -1800,8 +1800,10 @@ Music_Vibrato: ; e8882
|
||||
; e88bd
|
||||
|
||||
Music_SlidePitchTo: ; e88bd
|
||||
; ????
|
||||
; set the target for pitch wheel
|
||||
; params: 2
|
||||
; note duration
|
||||
; target note
|
||||
call GetMusicByte
|
||||
ld [wCurNoteDuration], a
|
||||
|
||||
@ -1830,7 +1832,7 @@ Music_SlidePitchTo: ; e88bd
|
||||
|
||||
Music_Tone: ; e88e4
|
||||
; tone
|
||||
; params: 2
|
||||
; params: 1 (dw)
|
||||
ld hl, Channel1Flags2 - Channel1
|
||||
add hl, bc
|
||||
set SOUND_CRY_PITCH, [hl]
|
||||
@ -1859,9 +1861,8 @@ MusicE7: ; e88f7
|
||||
; e8906
|
||||
|
||||
Music_SoundDuty: ; e8906
|
||||
; ???? + duty cycle
|
||||
; params: 1
|
||||
;
|
||||
; sequence of 4 duty cycles to be looped
|
||||
; params: 1 (4 2-bit duty cycle arguments)
|
||||
ld hl, Channel1Flags2 - Channel1
|
||||
add hl, bc
|
||||
set SOUND_DUTY, [hl] ; duty cycle
|
||||
|
@ -84,7 +84,7 @@ Predef_StartBattle: ; 8c20f
|
||||
.NonMobile_LoadPokeballTiles: ; 8c2a0
|
||||
call LoadTrainerBattlePokeballTiles
|
||||
hlbgcoord 0, 0
|
||||
call Function8c2cf
|
||||
call ConvertTrainerBattlePokeballTilesTo2bpp
|
||||
ret
|
||||
; 8c2aa
|
||||
|
||||
@ -113,7 +113,7 @@ LoadTrainerBattlePokeballTiles:
|
||||
ret
|
||||
; 8c2cf
|
||||
|
||||
Function8c2cf: ; 8c2cf
|
||||
ConvertTrainerBattlePokeballTilesTo2bpp: ; 8c2cf
|
||||
ld a, [rSVBK]
|
||||
push af
|
||||
ld a, $6
|
||||
@ -132,7 +132,7 @@ Function8c2cf: ; 8c2cf
|
||||
|
||||
pop hl
|
||||
ld de, wDecompressScratch
|
||||
ld b, BANK(Function8c2cf) ; BANK(@)
|
||||
ld b, BANK(ConvertTrainerBattlePokeballTilesTo2bpp) ; BANK(@)
|
||||
ld c, $28
|
||||
call Request2bpp
|
||||
pop af
|
||||
|
168
engine/color.asm
168
engine/color.asm
@ -79,6 +79,7 @@ CheckContestMon:
|
||||
ret
|
||||
|
||||
Function8aa4:
|
||||
; XXX
|
||||
push de
|
||||
push bc
|
||||
ld hl, PalPacket_9ce6
|
||||
@ -96,9 +97,9 @@ Function8aa4:
|
||||
ld a, d
|
||||
ld [wSGBPals + 6], a
|
||||
ld hl, wSGBPals
|
||||
call Function9809
|
||||
call PushSGBPals_
|
||||
ld hl, BlkPacket_9a86
|
||||
call Function9809
|
||||
call PushSGBPals_
|
||||
ret
|
||||
|
||||
InitPartyMenuPalettes:
|
||||
@ -176,16 +177,17 @@ Function8b3f:
|
||||
and a
|
||||
ret z
|
||||
ld hl, BlkPacket_9a86
|
||||
jp Function9809
|
||||
jp PushSGBPals_
|
||||
|
||||
Function8b4d:
|
||||
; XXX
|
||||
call CheckCGB
|
||||
jr nz, .cgb
|
||||
ld a, [hSGB]
|
||||
and a
|
||||
ret z
|
||||
ld hl, PalPacket_9c26
|
||||
jp Function9809
|
||||
jp PushSGBPals_
|
||||
|
||||
.cgb
|
||||
ld de, UnknOBPals
|
||||
@ -194,13 +196,14 @@ Function8b4d:
|
||||
jp LoadHLPaletteIntoDE
|
||||
|
||||
Function8b67:
|
||||
; XXX
|
||||
call CheckCGB
|
||||
jr nz, .cgb
|
||||
ld a, [hSGB]
|
||||
and a
|
||||
ret z
|
||||
ld hl, PalPacket_9c36
|
||||
jp Function9809
|
||||
jp PushSGBPals_
|
||||
|
||||
.cgb
|
||||
ld de, UnknOBPals
|
||||
@ -209,8 +212,9 @@ Function8b67:
|
||||
jp LoadHLPaletteIntoDE
|
||||
|
||||
Function8b81:
|
||||
; XXX
|
||||
call CheckCGB
|
||||
jr nz, .asm_8bb2
|
||||
jr nz, .cgb
|
||||
ld a, [hSGB]
|
||||
and a
|
||||
ret z
|
||||
@ -231,45 +235,45 @@ Function8b81:
|
||||
ld a, [hl]
|
||||
ld [wSGBPals + 6], a
|
||||
ld hl, wSGBPals
|
||||
jp Function9809
|
||||
jp PushSGBPals_
|
||||
|
||||
.asm_8bb2
|
||||
.cgb
|
||||
ld de, UnknOBPals
|
||||
ld a, c
|
||||
call GetMonPalettePointer_
|
||||
call LoadPalette_White_Col1_Col2_Black
|
||||
ret
|
||||
|
||||
Function8bbd:
|
||||
LoadTrainerClassPaletteAsNthBGPal:
|
||||
ld a, [TrainerClass]
|
||||
call GetTrainerPalettePointer
|
||||
ld a, e
|
||||
jr asm_8bd7
|
||||
jr got_palette_pointer_8bd7
|
||||
|
||||
Function8bc6:
|
||||
LoadMonPaletteAsNthBGPal:
|
||||
ld a, [CurPartySpecies]
|
||||
call GetMonPalettePointer
|
||||
ld a, e
|
||||
bit 7, a
|
||||
jr z, .asm_8bd7
|
||||
jr z, got_palette_pointer_8bd7
|
||||
and $7f
|
||||
rept 4
|
||||
inc hl
|
||||
endr
|
||||
.asm_8bd7
|
||||
inc hl
|
||||
inc hl
|
||||
inc hl
|
||||
|
||||
asm_8bd7
|
||||
got_palette_pointer_8bd7
|
||||
push hl
|
||||
ld hl, UnknBGPals
|
||||
ld de, $8
|
||||
.asm_8bde
|
||||
ld de, 1 palettes
|
||||
.loop
|
||||
and a
|
||||
jr z, .asm_8be5
|
||||
jr z, .got_addr
|
||||
add hl, de
|
||||
dec a
|
||||
jr .asm_8bde
|
||||
jr .loop
|
||||
|
||||
.asm_8be5
|
||||
.got_addr
|
||||
ld e, l
|
||||
ld d, h
|
||||
pop hl
|
||||
@ -277,30 +281,31 @@ asm_8bd7
|
||||
ret
|
||||
|
||||
Function8bec:
|
||||
; XXX
|
||||
ld a, [hCGB]
|
||||
and a
|
||||
jr nz, .asm_8bf7
|
||||
jr nz, .cgb
|
||||
ld hl, PlayerLightScreenCount
|
||||
jp Function9809
|
||||
jp PushSGBPals_
|
||||
|
||||
.asm_8bf7
|
||||
ld a, [EnemyLightScreenCount]
|
||||
.cgb
|
||||
ld a, [EnemyLightScreenCount] ; col
|
||||
ld c, a
|
||||
ld a, [EnemyReflectCount]
|
||||
ld a, [EnemyReflectCount] ; row
|
||||
hlcoord 0, 0, AttrMap
|
||||
ld de, $14
|
||||
.asm_8c04
|
||||
ld de, SCREEN_WIDTH
|
||||
.loop
|
||||
and a
|
||||
jr z, .asm_8c0b
|
||||
jr z, .done
|
||||
add hl, de
|
||||
dec a
|
||||
jr .asm_8c04
|
||||
jr .loop
|
||||
|
||||
.asm_8c0b
|
||||
.done
|
||||
ld b, $0
|
||||
add hl, bc
|
||||
lb bc, 6, 4
|
||||
ld a, [EnemySafeguardCount]
|
||||
ld a, [EnemySafeguardCount] ; value
|
||||
and $3
|
||||
call FillBoxCGB
|
||||
call LoadEDTile
|
||||
@ -402,16 +407,16 @@ LoadStatsScreenPals:
|
||||
ld a, $1
|
||||
ret
|
||||
|
||||
Function8cb4:
|
||||
LoadMailPalettes:
|
||||
ld l, e
|
||||
ld h, 0
|
||||
add hl, hl
|
||||
add hl, hl
|
||||
add hl, hl
|
||||
ld de, Palettes_8d05
|
||||
ld de, .MailPals
|
||||
add hl, de
|
||||
call CheckCGB
|
||||
jr nz, .asm_8cf0
|
||||
jr nz, .cgb
|
||||
push hl
|
||||
ld hl, PalPacket_9ce6
|
||||
ld de, wSGBPals
|
||||
@ -429,12 +434,12 @@ Function8cb4:
|
||||
ld a, [hli]
|
||||
ld [wSGBPals + 6], a
|
||||
ld hl, wSGBPals
|
||||
call Function9809
|
||||
call PushSGBPals_
|
||||
ld hl, BlkPacket_9a86
|
||||
call Function9809
|
||||
call PushSGBPals_
|
||||
ret
|
||||
|
||||
.asm_8cf0
|
||||
.cgb
|
||||
ld de, UnknBGPals
|
||||
ld bc, 1 palettes
|
||||
ld a, $5
|
||||
@ -444,7 +449,7 @@ Function8cb4:
|
||||
call ApplyAttrMap
|
||||
ret
|
||||
|
||||
Palettes_8d05:
|
||||
.MailPals:
|
||||
RGB 20, 31, 11
|
||||
RGB 31, 19, 00
|
||||
RGB 31, 10, 09
|
||||
@ -498,7 +503,8 @@ Palettes_8d05:
|
||||
INCLUDE "predef/cgb.asm"
|
||||
|
||||
Function95f0:
|
||||
ld hl, Palette_9608
|
||||
; XXX
|
||||
ld hl, .Palette
|
||||
ld de, UnknBGPals
|
||||
ld bc, 8
|
||||
ld a, $5
|
||||
@ -508,7 +514,7 @@ Function95f0:
|
||||
call ApplyAttrMap
|
||||
ret
|
||||
|
||||
Palette_9608:
|
||||
.Palette:
|
||||
RGB 31, 31, 31
|
||||
RGB 09, 31, 31
|
||||
RGB 10, 12, 31
|
||||
@ -605,30 +611,36 @@ FillBoxCGB:
|
||||
jr nz, .row
|
||||
ret
|
||||
|
||||
Function9673:
|
||||
ResetBGPals:
|
||||
push af
|
||||
push bc
|
||||
push de
|
||||
push hl
|
||||
|
||||
ld a, [rSVBK]
|
||||
push af
|
||||
ld a, $5
|
||||
ld [rSVBK], a
|
||||
|
||||
ld hl, UnknBGPals
|
||||
ld c, 8
|
||||
.loop
|
||||
ld a, $ff
|
||||
rept 4
|
||||
ld [hli], a
|
||||
endr
|
||||
ld [hli], a
|
||||
ld [hli], a
|
||||
ld [hli], a
|
||||
xor a
|
||||
rept 4
|
||||
ld [hli], a
|
||||
endr
|
||||
ld [hli], a
|
||||
ld [hli], a
|
||||
ld [hli], a
|
||||
dec c
|
||||
jr nz, .loop
|
||||
|
||||
pop af
|
||||
ld [rSVBK], a
|
||||
|
||||
pop hl
|
||||
pop de
|
||||
pop bc
|
||||
@ -831,19 +843,20 @@ Palettes_979c:
|
||||
RGB 00, 00, 00
|
||||
|
||||
Function97cc:
|
||||
; XXX
|
||||
call CheckCGB
|
||||
ret z
|
||||
ld a, $90
|
||||
ld [rOBPI], a
|
||||
ld a, $1c
|
||||
call GetPredefPal
|
||||
call Function97e5
|
||||
call .PushPalette
|
||||
ld a, $21
|
||||
call GetPredefPal
|
||||
call Function97e5
|
||||
call .PushPalette
|
||||
ret
|
||||
|
||||
Function97e5:
|
||||
.PushPalette:
|
||||
ld c, 1 palettes
|
||||
.loop
|
||||
ld a, [hli]
|
||||
@ -875,7 +888,7 @@ rept 4
|
||||
endr
|
||||
ret
|
||||
|
||||
Function9809:
|
||||
PushSGBPals_:
|
||||
ld a, [wcfbe]
|
||||
push af
|
||||
set 7, a
|
||||
@ -937,17 +950,17 @@ InitSGBBorder:
|
||||
xor a
|
||||
ld [rJOYP], a
|
||||
ld [hSGB], a
|
||||
call Function994a
|
||||
call PushSGBBorderPalsAndWait
|
||||
jr nc, .skip
|
||||
ld a, $1
|
||||
ld [hSGB], a
|
||||
call Function98eb
|
||||
call Function99b4
|
||||
call _InitSGBBorderPals
|
||||
call SGBBorder_PushBGPals
|
||||
call SGBDelayCycles
|
||||
call Function993f
|
||||
call Function992c
|
||||
call SGB_ClearVRAM
|
||||
call PushSGBBorder
|
||||
call SGBDelayCycles
|
||||
call Function993f
|
||||
call SGB_ClearVRAM
|
||||
ld hl, PalPacket_9d66
|
||||
call PushSGBPals
|
||||
|
||||
@ -1012,7 +1025,7 @@ InitCGBPals::
|
||||
jr nz, .loop
|
||||
ret
|
||||
|
||||
Function98eb:
|
||||
_InitSGBBorderPals:
|
||||
ld hl, .PalPacketPointerTable
|
||||
ld c, 9
|
||||
.loop
|
||||
@ -1041,25 +1054,26 @@ Function98eb:
|
||||
dw PalPacket_9de6
|
||||
|
||||
Function9911:
|
||||
; XXX
|
||||
di
|
||||
xor a
|
||||
ld [rJOYP], a
|
||||
ld hl, PalPacket_9d56
|
||||
call PushSGBPals
|
||||
call Function992c
|
||||
call PushSGBBorder
|
||||
call SGBDelayCycles
|
||||
call Function993f
|
||||
call SGB_ClearVRAM
|
||||
ld hl, PalPacket_9d66
|
||||
call PushSGBPals
|
||||
ei
|
||||
ret
|
||||
|
||||
Function992c:
|
||||
PushSGBBorder:
|
||||
call .LoadSGBBorderPointers
|
||||
push de
|
||||
call Function9a24
|
||||
call SGBBorder_YetMorePalPushing
|
||||
pop hl
|
||||
call Function99d8
|
||||
call SGBBorder_MorePalPushing
|
||||
ret
|
||||
|
||||
.LoadSGBBorderPointers:
|
||||
@ -1067,21 +1081,21 @@ Function992c:
|
||||
ld de, SGBBorderMap
|
||||
ret
|
||||
|
||||
Function993f:
|
||||
SGB_ClearVRAM:
|
||||
ld hl, VTiles0
|
||||
ld bc, $2000
|
||||
xor a
|
||||
call ByteFill
|
||||
ret
|
||||
|
||||
Function994a:
|
||||
PushSGBBorderPalsAndWait:
|
||||
ld hl, PalPacket_9d26
|
||||
call PushSGBPals
|
||||
call SGBDelayCycles
|
||||
ld a, [rJOYP]
|
||||
and $3
|
||||
cp $3
|
||||
jr nz, .asm_99a6
|
||||
jr nz, .carry
|
||||
ld a, $20
|
||||
ld [rJOYP], a
|
||||
ld a, [rJOYP]
|
||||
@ -1109,22 +1123,22 @@ endr
|
||||
ld a, [rJOYP]
|
||||
and $3
|
||||
cp $3
|
||||
jr nz, .asm_99a6
|
||||
call Function99ab
|
||||
jr nz, .carry
|
||||
call .FinalPush
|
||||
and a
|
||||
ret
|
||||
|
||||
.asm_99a6
|
||||
call Function99ab
|
||||
.carry
|
||||
call .FinalPush
|
||||
scf
|
||||
ret
|
||||
|
||||
Function99ab:
|
||||
.FinalPush:
|
||||
ld hl, PalPacket_9d16
|
||||
call PushSGBPals
|
||||
jp SGBDelayCycles
|
||||
|
||||
Function99b4:
|
||||
SGBBorder_PushBGPals:
|
||||
call DisableLCD
|
||||
ld a, %11100100
|
||||
ld [rBGP], a
|
||||
@ -1141,7 +1155,7 @@ Function99b4:
|
||||
ld [rBGP], a
|
||||
ret
|
||||
|
||||
Function99d8:
|
||||
SGBBorder_MorePalPushing:
|
||||
call DisableLCD
|
||||
ld a, $e4
|
||||
ld [rBGP], a
|
||||
@ -1149,7 +1163,7 @@ Function99d8:
|
||||
ld bc, 20 tiles
|
||||
call CopyData
|
||||
ld b, 18
|
||||
.asm_99ea
|
||||
.loop
|
||||
push bc
|
||||
ld bc, $c
|
||||
call CopyData
|
||||
@ -1159,7 +1173,7 @@ Function99d8:
|
||||
call CopyData
|
||||
pop bc
|
||||
dec b
|
||||
jr nz, .asm_99ea
|
||||
jr nz, .loop
|
||||
ld bc, $140
|
||||
call CopyData
|
||||
ld bc, Start
|
||||
@ -1175,13 +1189,13 @@ Function99d8:
|
||||
ld [rBGP], a
|
||||
ret
|
||||
|
||||
Function9a24:
|
||||
SGBBorder_YetMorePalPushing:
|
||||
call DisableLCD
|
||||
ld a, %11100100
|
||||
ld [rBGP], a
|
||||
ld de, VTiles1
|
||||
ld b, $80
|
||||
.asm_9a30
|
||||
.loop
|
||||
push bc
|
||||
ld bc, 1 tiles
|
||||
call CopyData
|
||||
@ -1189,7 +1203,7 @@ Function9a24:
|
||||
call ClearBytes
|
||||
pop bc
|
||||
dec b
|
||||
jr nz, .asm_9a30
|
||||
jr nz, .loop
|
||||
call DrawDefaultTiles
|
||||
ld a, $e3
|
||||
ld [rLCDC], a
|
||||
|
@ -582,7 +582,7 @@ SpriteAnimSeqData: ; 8d1c4
|
||||
db SPRITE_ANIM_FRAMESET_25, SPRITE_ANIM_SEQ_NULL, $00 ; 1b headbutt
|
||||
db SPRITE_ANIM_FRAMESET_20, SPRITE_ANIM_SEQ_13, $00 ; 1c
|
||||
db SPRITE_ANIM_FRAMESET_26, SPRITE_ANIM_SEQ_1A, $00 ; 1d
|
||||
db SPRITE_ANIM_FRAMESET_2D, SPRITE_ANIM_SEQ_NULL, $00 ; 1e
|
||||
db SPRITE_ANIM_FRAMESET_2D, SPRITE_ANIM_SEQ_NULL, $00 ; 1e kris on map
|
||||
db SPRITE_ANIM_FRAMESET_2E, SPRITE_ANIM_SEQ_NULL, $00 ; 1f kris on magnet train
|
||||
db SPRITE_ANIM_FRAMESET_2F, SPRITE_ANIM_SEQ_NULL, $00 ; 20
|
||||
db SPRITE_ANIM_FRAMESET_30, SPRITE_ANIM_SEQ_NULL, $00 ; 21
|
||||
|
@ -37,7 +37,7 @@ ReadAnyMail: ; b9237
|
||||
call WaitBGMap
|
||||
ld a, [Buffer3]
|
||||
ld e, a
|
||||
callba Function8cb4
|
||||
callba LoadMailPalettes
|
||||
call SetPalettes
|
||||
xor a
|
||||
ld [hJoyPressed], a
|
||||
|
@ -1492,7 +1492,7 @@ Function17d93a: ; 17d93a
|
||||
ld [CurPartySpecies], a
|
||||
ld a, [$c70c]
|
||||
ld e, a
|
||||
callba Function8bc6
|
||||
callba LoadMonPaletteAsNthBGPal
|
||||
call SetPalettes
|
||||
ld a, [$c708]
|
||||
ld l, a
|
||||
@ -1528,7 +1528,7 @@ Function17d98b: ; 17d98b
|
||||
ld [TrainerClass], a
|
||||
ld a, [$c70b]
|
||||
ld e, a
|
||||
callba Function8bbd
|
||||
callba LoadTrainerClassPaletteAsNthBGPal
|
||||
call SetPalettes
|
||||
ld a, [$c708]
|
||||
ld e, a
|
||||
|
@ -14,7 +14,7 @@ Predef_LoadSGBLayoutCGB: ; 8d59
|
||||
.not_ram
|
||||
cp SCGB_PARTY_MENU_HP_PALS
|
||||
jp z, CGB_ApplyPartyMenuHPPals
|
||||
call Function9673
|
||||
call ResetBGPals
|
||||
ld l, a
|
||||
ld h, 0
|
||||
add hl, hl
|
||||
|
@ -5,7 +5,7 @@ GetMysteryGift_MobileAdapterLayout: ; 4930f (mobile)
|
||||
ld a, [SGBPredef]
|
||||
.not_ram
|
||||
push af
|
||||
callba Function9673
|
||||
callba ResetBGPals
|
||||
pop af
|
||||
ld l, a
|
||||
ld h, 0
|
||||
|
@ -65,7 +65,7 @@ Predef_LoadSGBLayout: ; 864c
|
||||
|
||||
.SGB_BattleColors: ; 86b4
|
||||
ld hl, BlkPacket_9aa6
|
||||
call Function9809
|
||||
call PushSGBPals_
|
||||
|
||||
ld hl, PalPacket_9ce6
|
||||
ld de, wSGBPals
|
||||
@ -627,7 +627,7 @@ endr
|
||||
|
||||
.Finish: ; 8a60
|
||||
push de
|
||||
call Function9809
|
||||
call PushSGBPals_
|
||||
pop hl
|
||||
jp Function9809
|
||||
jp PushSGBPals_
|
||||
; 8a68
|
||||
|
Loading…
Reference in New Issue
Block a user