mirror of https://github.com/pret/pokecrystal.git
888 lines
13 KiB
NASM
888 lines
13 KiB
NASM
Function170000:
|
|
ld a, [$c62b]
|
|
ld [wPlayerTrademonSpecies], a
|
|
ld hl, $c62e
|
|
ld de, wPlayerTrademonSenderName
|
|
ld bc, $0005
|
|
call CopyBytes
|
|
ld a, $50
|
|
ld [de], a
|
|
ld hl, $c663
|
|
ld de, wPlayerTrademonOTName
|
|
ld bc, $0005
|
|
call CopyBytes
|
|
ld a, $50
|
|
ld [de], a
|
|
ld hl, $c648
|
|
ld a, [hli]
|
|
ld [wPlayerTrademonDVs], a
|
|
ld a, [hl]
|
|
ld [wPlayerTrademonDVs + 1], a
|
|
ld hl, $c639
|
|
ld a, [hli]
|
|
ld [wPlayerTrademonID], a
|
|
ld a, [hl]
|
|
ld [wPlayerTrademonID + 1], a
|
|
ld bc, $c633
|
|
farcall GetCaughtGender
|
|
ld a, c
|
|
ld [wPlayerTrademonCaughtData], a
|
|
ld a, [wcd81]
|
|
ld [wc74e], a
|
|
ld hl, $c608
|
|
ld de, $d800
|
|
ld bc, $008f
|
|
call CopyBytes
|
|
ret
|
|
|
|
Function17005a:
|
|
ld a, $5
|
|
call GetSRAMBank
|
|
ld a, [$a824]
|
|
ld [wOTTrademonSpecies], a
|
|
ld hl, $a827
|
|
ld de, wOTTrademonSenderName
|
|
ld bc, NAME_LENGTH_JAPANESE - 1
|
|
call CopyBytes
|
|
ld a, "@"
|
|
ld [de], a
|
|
ld hl, $a85c
|
|
ld de, wOTTrademonOTName
|
|
ld bc, NAME_LENGTH_JAPANESE - 1
|
|
call CopyBytes
|
|
ld a, "@"
|
|
ld [de], a
|
|
ld hl, $a841
|
|
ld a, [hli]
|
|
ld [wOTTrademonDVs], a
|
|
ld a, [hl]
|
|
ld [wOTTrademonDVs + 1], a
|
|
ld hl, $a832
|
|
ld a, [hli]
|
|
ld [wOTTrademonID], a
|
|
ld a, [hl]
|
|
ld [wOTTrademonID + 1], a
|
|
ld bc, $a82c
|
|
farcall GetCaughtGender
|
|
ld a, c
|
|
ld [wOTTrademonCaughtData], a
|
|
ld a, [wcd81]
|
|
ld [wc74e], a
|
|
call CloseSRAM
|
|
ret
|
|
|
|
INCLUDE "engine/events/battle_tower/battle_tower.asm"
|
|
|
|
Function170be4:
|
|
ld a, $5
|
|
call GetSRAMBank
|
|
xor a
|
|
ld hl, $a894
|
|
ld bc, $0008
|
|
call ByteFill
|
|
call CloseSRAM
|
|
ret
|
|
|
|
Clears5_a89a:
|
|
ld a, $5
|
|
call GetSRAMBank
|
|
ld hl, $a89a
|
|
xor a
|
|
ld [hli], a
|
|
ld [hl], a
|
|
call CloseSRAM
|
|
ret
|
|
|
|
Function170c06:
|
|
ld a, $5
|
|
call GetSRAMBank
|
|
ld hl, $a894
|
|
ld a, [wBattleResult]
|
|
and a ; WIN?
|
|
jr nz, .asm_170c15
|
|
inc [hl]
|
|
|
|
.asm_170c15
|
|
inc hl
|
|
inc hl
|
|
ld a, [$a89b]
|
|
add [hl]
|
|
ld [hld], a
|
|
ld a, [$a89a]
|
|
adc [hl]
|
|
ld [hli], a
|
|
jr nc, .asm_170c27
|
|
ld a, $ff
|
|
ld [hld], a
|
|
ld [hli], a
|
|
|
|
.asm_170c27
|
|
inc hl
|
|
push hl
|
|
ld de, 0
|
|
xor a
|
|
ld [wTempByteValue], a
|
|
.asm_170c30
|
|
ld hl, wPartyMon1HP
|
|
ld a, [wTempByteValue]
|
|
call GetPartyLocation
|
|
ld a, [hli]
|
|
ld b, a
|
|
ld c, [hl]
|
|
inc hl
|
|
inc hl
|
|
ld a, [hld]
|
|
sub c
|
|
ld c, a
|
|
ld a, [hl]
|
|
sbc b
|
|
ld b, a
|
|
push de
|
|
pop hl
|
|
add hl, bc
|
|
push hl
|
|
pop de
|
|
jr c, .asm_170c58
|
|
ld a, [wTempByteValue]
|
|
inc a
|
|
ld [wTempByteValue], a
|
|
cp $3
|
|
jr c, .asm_170c30
|
|
jr .asm_170c5b
|
|
|
|
.asm_170c58
|
|
ld de, -1
|
|
|
|
.asm_170c5b
|
|
pop hl
|
|
inc hl
|
|
ld a, e
|
|
add [hl]
|
|
ld [hld], a
|
|
ld a, d
|
|
adc [hl]
|
|
ld [hli], a
|
|
jr nc, .asm_170c69
|
|
ld a, $ff
|
|
ld [hld], a
|
|
ld [hli], a
|
|
|
|
.asm_170c69
|
|
inc hl
|
|
push hl
|
|
ld b, $0
|
|
ld c, $0
|
|
.asm_170c6f
|
|
ld hl, wPartyMon1HP
|
|
ld a, b
|
|
push bc
|
|
call GetPartyLocation
|
|
pop bc
|
|
ld a, [hli]
|
|
or [hl]
|
|
jr nz, .asm_170c7d
|
|
inc c
|
|
|
|
.asm_170c7d
|
|
inc b
|
|
ld a, b
|
|
cp $3
|
|
jr c, .asm_170c6f
|
|
pop hl
|
|
ld a, [hl]
|
|
add c
|
|
ld [hl], a
|
|
call CloseSRAM
|
|
ret
|
|
|
|
Function170c8b:
|
|
ld hl, wLastEnemyCounterMove
|
|
ld b, $5
|
|
.asm_170c90
|
|
ld a, [hl]
|
|
xor $ff
|
|
ld [hli], a
|
|
dec b
|
|
jr nz, .asm_170c90
|
|
ret
|
|
|
|
CheckBTMonMovesForErrors:
|
|
ld c, BATTLETOWER_PARTY_LENGTH
|
|
ld hl, wBT_OTTempMon1Moves
|
|
.loop
|
|
push hl
|
|
ld a, [hl]
|
|
cp NUM_ATTACKS + 1
|
|
jr c, .okay
|
|
ld a, POUND
|
|
ld [hl], a
|
|
|
|
.okay
|
|
inc hl
|
|
ld b, NUM_MOVES - 1
|
|
.loop2
|
|
ld a, [hl]
|
|
and a
|
|
jr z, .loop3
|
|
cp NUM_ATTACKS + 1
|
|
jr c, .next
|
|
|
|
.loop3
|
|
xor a
|
|
ld [hl], a
|
|
inc hl
|
|
dec b
|
|
jr nz, .loop3
|
|
jr .done
|
|
|
|
.next
|
|
inc hl
|
|
dec b
|
|
jr nz, .loop2
|
|
|
|
.done
|
|
pop hl
|
|
ld de, NICKNAMED_MON_STRUCT_LENGTH
|
|
add hl, de
|
|
dec c
|
|
jr nz, .loop
|
|
ret
|
|
|
|
Function170cc6:
|
|
ldh a, [rSVBK]
|
|
push af
|
|
ld a, BANK(wDecompressScratch)
|
|
ldh [rSVBK], a
|
|
ld hl, PichuAnimatedMobileGFX
|
|
ld de, wDecompressScratch
|
|
call Decompress
|
|
ld a, 1
|
|
ldh [rVBK], a
|
|
ld de, wDecompressScratch
|
|
ld hl, vTiles0
|
|
lb bc, BANK(wDecompressScratch), 193
|
|
call Get2bpp
|
|
xor a
|
|
ldh [rVBK], a
|
|
ld hl, ElectroBallMobileGFX
|
|
ld de, wDecompressScratch
|
|
call Decompress
|
|
ld de, wBGPals1
|
|
ld hl, vTiles0
|
|
lb bc, BANK(wDecompressScratch), 83
|
|
call Get2bpp
|
|
pop af
|
|
ldh [rSVBK], a
|
|
ret
|
|
|
|
Function170d02:
|
|
ld a, $1
|
|
ldh [rVBK], a
|
|
ld de, PichuBorderMobileGFX
|
|
ld hl, vTiles0 tile $c1
|
|
lb bc, BANK(PichuBorderMobileGFX), 24
|
|
call Get2bpp
|
|
xor a
|
|
ldh [rVBK], a
|
|
ret
|
|
|
|
PichuAnimatedMobileGFX:
|
|
INCBIN "gfx/mobile/pichu_animated.2bpp.lz"
|
|
|
|
ElectroBallMobileGFX:
|
|
INCBIN "gfx/mobile/electro_ball.2bpp.lz"
|
|
|
|
PichuBorderMobileGFX:
|
|
INCBIN "gfx/mobile/pichu_border.2bpp"
|
|
|
|
Function1719c8:
|
|
ldh a, [hInMenu]
|
|
push af
|
|
ld a, $1
|
|
ldh [hInMenu], a
|
|
call Function1719d6
|
|
pop af
|
|
ldh [hInMenu], a
|
|
ret
|
|
|
|
Function1719d6:
|
|
farcall BattleTowerRoomMenu_InitRAM
|
|
call Function1719ed
|
|
ldh a, [rSVBK]
|
|
push af
|
|
ld a, $5
|
|
ldh [rSVBK], a
|
|
call Function171a11
|
|
pop af
|
|
ldh [rSVBK], a
|
|
ret
|
|
|
|
Function1719ed:
|
|
xor a
|
|
ld [wcd49], a
|
|
ld [wcd4a], a
|
|
dec a
|
|
ld [wcd4b], a
|
|
call ClearBGPalettes
|
|
call ClearSprites
|
|
farcall Function171d2b
|
|
farcall ReloadMapPart
|
|
farcall ClearSpriteAnims
|
|
ret
|
|
|
|
Function171a11:
|
|
.loop
|
|
call JoyTextDelay
|
|
ld a, [wcd49]
|
|
bit 7, a
|
|
jr nz, .done
|
|
call Function171a36
|
|
farcall PlaySpriteAnimations
|
|
farcall ReloadMapPart
|
|
jr .loop
|
|
.done
|
|
farcall ClearSpriteAnims
|
|
call ClearSprites
|
|
ret
|
|
|
|
Function171a36:
|
|
ld a, [wcd49]
|
|
ld e, a
|
|
ld d, 0
|
|
ld hl, Jumptable_171a45
|
|
add hl, de
|
|
add hl, de
|
|
ld a, [hli]
|
|
ld h, [hl]
|
|
ld l, a
|
|
jp hl
|
|
|
|
Jumptable_171a45:
|
|
dw Function171a95
|
|
dw Function171ac9
|
|
dw Function171a5d
|
|
dw Function171ad7
|
|
dw Function171a5d
|
|
dw Function171aec
|
|
dw Function171b4b
|
|
dw Function171b85
|
|
dw Function171bcc
|
|
dw Function171c2c
|
|
dw Function171c39
|
|
dw Function171c41
|
|
|
|
Function171a5d:
|
|
ld a, [wc821]
|
|
bit 1, a
|
|
jr nz, .asm_171a6a
|
|
bit 0, a
|
|
ret nz
|
|
jp Function171c66
|
|
|
|
.asm_171a6a
|
|
ld a, $0
|
|
call Function3e32
|
|
ld [wMobileErrorCodeBuffer], a
|
|
ld a, l
|
|
ld [wMobileErrorCodeBuffer + 1], a
|
|
ld a, h
|
|
ld [wMobileErrorCodeBuffer + 2], a
|
|
ld a, $a
|
|
call Function3e32
|
|
ldh a, [rSVBK]
|
|
push af
|
|
ld a, $1
|
|
ldh [rSVBK], a
|
|
farcall BattleTowerRoomMenu_Cleanup
|
|
pop af
|
|
ldh [rSVBK], a
|
|
ld a, $a
|
|
ld [wcd49], a
|
|
ret
|
|
|
|
Function171a95:
|
|
farcall Function171ccd
|
|
hlcoord 2, 8
|
|
ld de, String_171aa7
|
|
call PlaceString
|
|
jp Function171c66
|
|
|
|
String_171aa7:
|
|
db "モバイルアダプタに"
|
|
next "せつぞく しています"
|
|
next "しばらく おまちください"
|
|
db "@"
|
|
|
|
Function171ac9:
|
|
ld de, wcd81
|
|
ld hl, $5c
|
|
ld a, $2
|
|
call Function3e32
|
|
jp Function171c66
|
|
|
|
Function171ad7:
|
|
xor a
|
|
ld hl, $c608
|
|
ld bc, $66
|
|
call ByteFill
|
|
ld de, $c608
|
|
ld a, $c
|
|
call Function3e32
|
|
jp Function171c66
|
|
|
|
Function171aec:
|
|
ldh a, [rSVBK]
|
|
push af
|
|
ld a, $1
|
|
ldh [rSVBK], a
|
|
farcall BattleTowerRoomMenu_Cleanup
|
|
pop af
|
|
ldh [rSVBK], a
|
|
hlcoord 2, 6
|
|
ld a, $8
|
|
.asm_171b01
|
|
push af
|
|
push hl
|
|
xor a
|
|
ld bc, $10
|
|
call ByteFill
|
|
pop hl
|
|
ld de, $14
|
|
add hl, de
|
|
pop af
|
|
dec a
|
|
jr nz, .asm_171b01
|
|
hlcoord 2, 7
|
|
ld a, $3
|
|
ld de, $c608
|
|
.asm_171b1b
|
|
push af
|
|
push hl
|
|
ld a, [de]
|
|
and a
|
|
jr z, .asm_171b34
|
|
ld a, [wcd4b]
|
|
inc a
|
|
ld [wcd4b], a
|
|
push hl
|
|
call Function171b42
|
|
pop hl
|
|
ld bc, $ffec
|
|
add hl, bc
|
|
call Function171b42
|
|
.asm_171b34
|
|
pop hl
|
|
ld bc, $14
|
|
add hl, bc
|
|
add hl, bc
|
|
add hl, bc
|
|
pop af
|
|
dec a
|
|
jr nz, .asm_171b1b
|
|
jp Function171c66
|
|
|
|
Function171b42:
|
|
ld a, [de]
|
|
inc de
|
|
and a
|
|
ret z
|
|
sub $20
|
|
ld [hli], a
|
|
jr Function171b42
|
|
|
|
Function171b4b:
|
|
depixel 8, 2
|
|
ld a, SPRITE_ANIM_INDEX_EZCHAT_CURSOR
|
|
call InitSpriteAnimStruct
|
|
ld hl, SPRITEANIMSTRUCT_0C
|
|
add hl, bc
|
|
ld a, $8
|
|
ld [hl], a
|
|
|
|
depixel 8, 19
|
|
ld a, SPRITE_ANIM_INDEX_EZCHAT_CURSOR
|
|
call InitSpriteAnimStruct
|
|
ld hl, SPRITEANIMSTRUCT_0C
|
|
add hl, bc
|
|
ld a, $9
|
|
ld [hl], a
|
|
|
|
depixel 17, 14, 2, 0
|
|
ld a, SPRITE_ANIM_INDEX_EZCHAT_CURSOR
|
|
call InitSpriteAnimStruct
|
|
ld hl, SPRITEANIMSTRUCT_0C
|
|
add hl, bc
|
|
ld a, $a
|
|
ld [hl], a
|
|
|
|
ld a, $4
|
|
ld [wcd23], a
|
|
ld a, $8
|
|
ld [wcd24], a
|
|
jp Function171c66
|
|
|
|
Function171b85:
|
|
ld hl, hJoyPressed
|
|
ld a, [hl]
|
|
and $2
|
|
jp nz, Function171b9f
|
|
ld a, [hl]
|
|
and $1
|
|
jp nz, Function171bbd
|
|
ld a, [hl]
|
|
and $40
|
|
jr nz, asm_171ba5
|
|
ld a, [hl]
|
|
and $80
|
|
jr nz, asm_171baf
|
|
ret
|
|
|
|
Function171b9f:
|
|
ld a, $80
|
|
ld [wcd49], a
|
|
ret
|
|
|
|
asm_171ba5:
|
|
ld a, [wcd4a]
|
|
and a
|
|
ret z
|
|
dec a
|
|
ld [wcd4a], a
|
|
ret
|
|
|
|
asm_171baf:
|
|
ld a, [wcd4b]
|
|
ld c, a
|
|
ld a, [wcd4a]
|
|
cp c
|
|
ret z
|
|
inc a
|
|
ld [wcd4a], a
|
|
ret
|
|
|
|
Function171bbd:
|
|
call PlayClickSFX
|
|
ld a, $8
|
|
ld [wcd23], a
|
|
xor a
|
|
ld [wcd24], a
|
|
jp Function171c66
|
|
|
|
Function171bcc:
|
|
ld hl, hJoyPressed
|
|
ld a, [hl]
|
|
and $2
|
|
jp nz, Function171bdc
|
|
ld a, [hl]
|
|
and $1
|
|
jp nz, Function171beb
|
|
ret
|
|
|
|
Function171bdc:
|
|
ld a, $4
|
|
ld [wcd23], a
|
|
ld a, $8
|
|
ld [wcd24], a
|
|
ld hl, wcd49
|
|
dec [hl]
|
|
ret
|
|
|
|
Function171beb:
|
|
ld a, $5
|
|
call GetSRAMBank
|
|
ld a, [wcd4a]
|
|
ld [$aa4a], a
|
|
call CloseSRAM
|
|
ld hl, MenuHeader_171c6b
|
|
call LoadMenuHeader
|
|
call MenuBox
|
|
call MenuBoxCoord2Tile
|
|
farcall ReloadMapPart
|
|
hlcoord 1, 14
|
|
ld de, String_171c73
|
|
call PlaceString
|
|
ld a, [wcd4a]
|
|
cp $2
|
|
jr z, .asm_171c1f
|
|
ld a, $8
|
|
jr .asm_171c21
|
|
.asm_171c1f
|
|
ld a, $c
|
|
.asm_171c21
|
|
ld [wcd24], a
|
|
ld a, $1e
|
|
ld [wcd4c], a
|
|
call Function171c66
|
|
|
|
Function171c2c:
|
|
ld hl, wcd4c
|
|
dec [hl]
|
|
ret nz
|
|
call ExitMenu
|
|
call ClearBGPalettes
|
|
jr asm_171c60
|
|
|
|
Function171c39:
|
|
ld a, $28
|
|
ld [wcd4c], a
|
|
call Function171c66
|
|
|
|
Function171c41:
|
|
ld hl, wcd4c
|
|
dec [hl]
|
|
ret nz
|
|
call ClearBGPalettes
|
|
farcall Stubbed_Function106462
|
|
farcall Function106464
|
|
ld a, $2
|
|
ld [wc303], a
|
|
farcall DisplayMobileError
|
|
asm_171c60:
|
|
ld a, $80
|
|
ld [wcd49], a
|
|
ret
|
|
|
|
Function171c66:
|
|
ld hl, wcd49
|
|
inc [hl]
|
|
ret
|
|
|
|
MenuHeader_171c6b:
|
|
db MENU_BACKUP_TILES ; flags
|
|
menu_coords 0, 12, SCREEN_WIDTH - 1, SCREEN_HEIGHT - 1
|
|
dw NULL
|
|
db 0 ; default option
|
|
|
|
String_171c73:
|
|
db "モバイルセンターを けってい"
|
|
next "しました@"
|
|
|
|
Function171c87:
|
|
call DisableLCD
|
|
ld hl, AsciiFontGFX
|
|
ld de, vTiles2 tile $00
|
|
ld bc, $6e0
|
|
call CopyBytes
|
|
ld hl, PasswordSlowpokeLZ
|
|
ld de, vTiles0 tile $00
|
|
call Decompress
|
|
call EnableLCD
|
|
ld hl, PasswordTopTilemap
|
|
decoord 0, 0
|
|
ld bc, $168
|
|
call CopyBytes
|
|
ld hl, MobilePasswordAttrmap
|
|
decoord 0, 0, wAttrmap
|
|
ld bc, $168
|
|
call CopyBytes
|
|
hlcoord 3, 2
|
|
ld de, String_172e31
|
|
call PlaceString
|
|
hlcoord 3, 16
|
|
ld de, String_172e3f
|
|
call PlaceString
|
|
ret
|
|
|
|
Function171ccd:
|
|
ldh a, [rSVBK]
|
|
push af
|
|
ld a, $5
|
|
ldh [rSVBK], a
|
|
ld hl, MobilePasswordPalettes
|
|
ld de, wBGPals1
|
|
ld bc, 8 palettes
|
|
call CopyBytes
|
|
ld hl, wOBPals1 palette 0 color 1
|
|
ld a, LOW(PALRGB_WHITE)
|
|
ld [hli], a
|
|
ld a, HIGH(PALRGB_WHITE)
|
|
ld [hl], a
|
|
call SetPalettes
|
|
pop af
|
|
ldh [rSVBK], a
|
|
ret
|
|
|
|
Function171cf0:
|
|
xor a
|
|
hlcoord 4, 15
|
|
ld [hli], a
|
|
ld [hli], a
|
|
ld a, [wcd4b]
|
|
xor $1
|
|
ld [wcd4b], a
|
|
and a
|
|
jr nz, .shifted
|
|
ld hl, PasswordBottomTilemap
|
|
decoord 0, 7
|
|
ld bc, $8c
|
|
call CopyBytes
|
|
hlcoord 3, 16
|
|
ld de, String_172e3f
|
|
jp PlaceString
|
|
|
|
.shifted
|
|
ld hl, PasswordShiftTilemap
|
|
decoord 0, 7
|
|
ld bc, $8c
|
|
call CopyBytes
|
|
hlcoord 3, 16
|
|
ld de, String_172e4e
|
|
jp PlaceString
|
|
|
|
Function171d2b:
|
|
call DisableLCD
|
|
ld hl, AsciiFontGFX
|
|
ld de, vTiles2 tile $00
|
|
ld bc, $6e0
|
|
call CopyBytes
|
|
ld hl, PasswordSlowpokeLZ
|
|
ld de, vTiles0 tile $00
|
|
call Decompress
|
|
call EnableLCD
|
|
ld hl, ChooseMobileCenterTilemap
|
|
decoord 0, 0
|
|
ld bc, $168
|
|
call CopyBytes
|
|
ld hl, ChooseMobileCenterAttrmap
|
|
decoord 0, 0, wAttrmap
|
|
ld bc, $168
|
|
call CopyBytes
|
|
hlcoord 2, 2
|
|
ld de, String_172e5d
|
|
call PlaceString
|
|
hlcoord 14, 16
|
|
ld de, String_172e58
|
|
call PlaceString
|
|
ret
|
|
|
|
MobilePasswordPalettes:
|
|
INCLUDE "gfx/mobile/mobile_password.pal"
|
|
|
|
AsciiFontGFX:
|
|
INCBIN "gfx/mobile/ascii_font.2bpp"
|
|
|
|
PasswordTopTilemap:
|
|
INCBIN "gfx/mobile/password_top.tilemap"
|
|
|
|
PasswordBottomTilemap:
|
|
INCBIN "gfx/mobile/password_bottom.tilemap"
|
|
|
|
PasswordShiftTilemap:
|
|
INCBIN "gfx/mobile/password_shift.tilemap"
|
|
|
|
ChooseMobileCenterTilemap:
|
|
INCBIN "gfx/mobile/mobile_center.tilemap"
|
|
|
|
MobilePasswordAttrmap:
|
|
INCBIN "gfx/mobile/password.attrmap"
|
|
|
|
ChooseMobileCenterAttrmap:
|
|
INCBIN "gfx/mobile/mobile_center.attrmap"
|
|
|
|
PasswordSlowpokeLZ:
|
|
INCBIN "gfx/pokedex/slowpoke.2bpp.lz"
|
|
|
|
String_172e31:
|
|
db "パスワード<WO>いれてください@"
|
|
String_172e3f:
|
|
db "きりかえ やめる けってい@"
|
|
String_172e4e:
|
|
db "きりかえ やめる "
|
|
String_172e58:
|
|
db "けってい@"
|
|
String_172e5d:
|
|
db "せつぞくする モバイルセンターを"
|
|
next "えらんで ください@"
|
|
|
|
Function172e78:
|
|
ld a, $7f
|
|
hlcoord 0, 0
|
|
ld bc, $168
|
|
call ByteFill
|
|
ld a, $7
|
|
hlcoord 0, 0, wAttrmap
|
|
ld bc, $168
|
|
call ByteFill
|
|
call DisableLCD
|
|
ld hl, Stadium2N64GFX
|
|
ld de, vTiles2 tile $00
|
|
ld bc, $610
|
|
call CopyBytes
|
|
call EnableLCD
|
|
ld hl, Stadium2N64Tilemap
|
|
decoord 0, 0
|
|
ld bc, $168
|
|
call CopyBytes
|
|
ld hl, Stadium2N64Attrmap
|
|
decoord 0, 0, wAttrmap
|
|
ld bc, $168
|
|
call CopyBytes
|
|
ret
|
|
|
|
Function172eb9:
|
|
ldh a, [rSVBK]
|
|
push af
|
|
ld a, $5
|
|
ldh [rSVBK], a
|
|
ld hl, Palette_172edf
|
|
ld de, wBGPals1
|
|
ld bc, 8 palettes
|
|
call CopyBytes
|
|
ld hl, Palette_172edf
|
|
ld de, wBGPals2
|
|
ld bc, 8 palettes
|
|
call CopyBytes
|
|
call SetPalettes
|
|
pop af
|
|
ldh [rSVBK], a
|
|
ret
|
|
|
|
Palette_172edf:
|
|
RGB 5, 12, 17
|
|
RGB 31, 31, 31
|
|
RGB 18, 25, 28
|
|
RGB 10, 17, 21
|
|
RGB 6, 13, 18
|
|
RGB 31, 31, 31
|
|
RGB 20, 26, 28
|
|
RGB 12, 19, 23
|
|
RGB 3, 10, 16
|
|
RGB 31, 31, 31
|
|
RGB 6, 13, 18
|
|
RGB 20, 26, 28
|
|
RGB 0, 0, 0
|
|
RGB 0, 0, 0
|
|
RGB 0, 0, 0
|
|
RGB 0, 0, 0
|
|
RGB 0, 0, 0
|
|
RGB 0, 0, 0
|
|
RGB 0, 0, 0
|
|
RGB 0, 0, 0
|
|
RGB 0, 0, 0
|
|
RGB 0, 0, 0
|
|
RGB 0, 0, 0
|
|
RGB 0, 0, 0
|
|
RGB 5, 5, 16
|
|
RGB 8, 19, 28
|
|
RGB 0, 0, 0
|
|
RGB 31, 31, 31
|
|
RGB 31, 31, 31
|
|
RGB 0, 0, 0
|
|
RGB 0, 0, 0
|
|
RGB 0, 0, 0
|
|
|
|
Stadium2N64GFX:
|
|
INCBIN "gfx/mobile/stadium2_n64.2bpp"
|
|
|
|
Stadium2N64Tilemap:
|
|
if DEF(_CRYSTAL11)
|
|
; Crystal 1.1 corrupted this tilemap by treating $0a bytes as Unix newlines,
|
|
; and converting them to $0d $0a Windows newlines.
|
|
INCBIN "gfx/mobile/stadium2_n64_corrupt.tilemap"
|
|
else
|
|
INCBIN "gfx/mobile/stadium2_n64.tilemap"
|
|
endc
|
|
|
|
Stadium2N64Attrmap:
|
|
INCBIN "gfx/mobile/stadium2_n64.attrmap"
|