2012-01-14 20:36:00 +00:00
|
|
|
|
INCLUDE "constants.asm"
|
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
NPC_SPRITES_1 EQU $4
|
|
|
|
|
NPC_SPRITES_2 EQU $5
|
|
|
|
|
|
|
|
|
|
GFX EQU $4
|
|
|
|
|
|
|
|
|
|
PICS_1 EQU $9
|
|
|
|
|
PICS_2 EQU $A
|
|
|
|
|
PICS_3 EQU $B
|
|
|
|
|
PICS_4 EQU $C
|
|
|
|
|
PICS_5 EQU $D
|
|
|
|
|
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 17:26:42 +00:00
|
|
|
|
INCLUDE "home.asm"
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-05-26 04:53:02 +00:00
|
|
|
|
|
2013-08-12 18:38:03 +00:00
|
|
|
|
SECTION "bank1",ROMX,BANK[$1]
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-26 00:37:29 +00:00
|
|
|
|
INCLUDE "data/facing.asm"
|
2014-05-26 00:27:02 +00:00
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ResetStatusAndHalveMoneyOnBlackout::
|
2014-05-26 00:27:02 +00:00
|
|
|
|
; Reset player status on blackout.
|
2013-03-12 00:52:32 +00:00
|
|
|
|
xor a
|
2014-08-09 05:39:13 +00:00
|
|
|
|
ld [wBattleResult], a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [wWalkBikeSurfState], a
|
2014-05-26 00:27:02 +00:00
|
|
|
|
ld [W_ISINBATTLE], a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [wMapPalOffset], a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld [wNPCMovementScriptFunctionNum], a
|
2014-05-25 17:51:53 +00:00
|
|
|
|
ld [hJoyHeld], a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld [wNPCMovementScriptPointerTableNum], a
|
2013-12-05 06:18:14 +00:00
|
|
|
|
ld [wFlags_0xcd60], a
|
2014-05-26 00:27:02 +00:00
|
|
|
|
|
2014-03-30 23:30:30 +00:00
|
|
|
|
ld [$ff9f], a
|
2014-05-26 00:27:02 +00:00
|
|
|
|
ld [$ff9f + 1], a
|
|
|
|
|
ld [$ff9f + 2], a
|
2013-03-17 21:54:12 +00:00
|
|
|
|
call HasEnoughMoney
|
2014-05-26 00:27:02 +00:00
|
|
|
|
jr c, .lostmoney ; never happens
|
|
|
|
|
|
|
|
|
|
; Halve the player's money.
|
|
|
|
|
ld a, [wPlayerMoney]
|
2014-03-30 23:30:30 +00:00
|
|
|
|
ld [$ff9f], a
|
2014-05-26 00:27:02 +00:00
|
|
|
|
ld a, [wPlayerMoney + 1]
|
|
|
|
|
ld [$ff9f + 1], a
|
|
|
|
|
ld a, [wPlayerMoney + 2]
|
|
|
|
|
ld [$ff9f + 2], a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
xor a
|
2014-03-30 23:30:30 +00:00
|
|
|
|
ld [$ffa2], a
|
|
|
|
|
ld [$ffa3], a
|
2014-05-26 00:27:02 +00:00
|
|
|
|
ld a, 2
|
2014-03-30 23:30:30 +00:00
|
|
|
|
ld [$ffa4], a
|
2014-06-16 20:57:26 +00:00
|
|
|
|
predef DivideBCDPredef3
|
2014-03-30 23:30:30 +00:00
|
|
|
|
ld a, [$ffa2]
|
2014-05-26 00:27:02 +00:00
|
|
|
|
ld [wPlayerMoney], a
|
|
|
|
|
ld a, [$ffa2 + 1]
|
|
|
|
|
ld [wPlayerMoney + 1], a
|
|
|
|
|
ld a, [$ffa2 + 2]
|
|
|
|
|
ld [wPlayerMoney + 2], a
|
|
|
|
|
|
|
|
|
|
.lostmoney
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd732
|
2013-03-12 00:52:32 +00:00
|
|
|
|
set 2, [hl]
|
|
|
|
|
res 3, [hl]
|
|
|
|
|
set 6, [hl]
|
2014-05-26 00:27:02 +00:00
|
|
|
|
ld a, %11111111
|
2014-05-25 17:51:53 +00:00
|
|
|
|
ld [wJoyIgnore], a
|
2014-06-16 20:57:26 +00:00
|
|
|
|
predef_jump HealParty
|
2013-11-09 19:21:51 +00:00
|
|
|
|
|
2014-05-26 04:53:02 +00:00
|
|
|
|
|
2014-05-25 04:01:59 +00:00
|
|
|
|
MewPicFront:: INCBIN "pic/bmon/mew.pic"
|
|
|
|
|
MewPicBack:: INCBIN "pic/monback/mewb.pic"
|
2014-05-17 02:26:26 +00:00
|
|
|
|
INCLUDE "data/baseStats/mew.asm"
|
2012-01-28 04:15:45 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/battle/safari_zone.asm"
|
2013-04-07 02:01:08 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/titlescreen.asm"
|
2012-01-15 07:47:47 +00:00
|
|
|
|
|
2014-05-25 17:09:39 +00:00
|
|
|
|
NintenText: db "NINTEN@"
|
|
|
|
|
SonyText: db "SONY@"
|
2012-02-09 23:23:12 +00:00
|
|
|
|
|
2014-05-26 04:53:02 +00:00
|
|
|
|
|
|
|
|
|
LoadMonData_:
|
2014-05-26 21:04:56 +00:00
|
|
|
|
; Load monster [wWhichPokemon] from list [wcc49]:
|
2014-05-26 04:53:02 +00:00
|
|
|
|
; 0: partymon
|
|
|
|
|
; 1: enemymon
|
|
|
|
|
; 2: boxmon
|
|
|
|
|
; 3: daycaremon
|
2015-02-08 02:37:40 +00:00
|
|
|
|
; Return monster id at wcf91 and its data at wLoadedMon.
|
2014-05-26 21:04:56 +00:00
|
|
|
|
; Also load base stats at W_MONHDEXNUM for convenience.
|
2014-05-26 04:53:02 +00:00
|
|
|
|
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld a, [wDayCareMonSpecies]
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcf91], a
|
|
|
|
|
ld a, [wcc49]
|
2014-05-26 04:53:02 +00:00
|
|
|
|
cp 3
|
|
|
|
|
jr z, .GetMonHeader
|
|
|
|
|
|
|
|
|
|
ld a, [wWhichPokemon]
|
|
|
|
|
ld e, a
|
2015-02-08 09:44:41 +00:00
|
|
|
|
callab GetMonSpecies
|
2014-05-26 04:53:02 +00:00
|
|
|
|
|
2013-03-13 14:11:41 +00:00
|
|
|
|
.GetMonHeader
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf91]
|
|
|
|
|
ld [wd0b5], a ; input for GetMonHeader
|
2014-05-26 04:53:02 +00:00
|
|
|
|
call GetMonHeader
|
|
|
|
|
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMons
|
|
|
|
|
ld bc, wPartyMon2 - wPartyMon1
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcc49]
|
2014-05-26 04:53:02 +00:00
|
|
|
|
cp 1
|
|
|
|
|
jr c, .getMonEntry
|
|
|
|
|
|
|
|
|
|
ld hl, wEnemyMons
|
|
|
|
|
jr z, .getMonEntry
|
|
|
|
|
|
|
|
|
|
cp 2
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wBoxMons
|
|
|
|
|
ld bc, wBoxMon2 - wBoxMon1
|
2014-05-26 04:53:02 +00:00
|
|
|
|
jr z, .getMonEntry
|
|
|
|
|
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wDayCareMon
|
2012-10-02 19:20:37 +00:00
|
|
|
|
jr .copyMonData
|
2014-05-26 04:53:02 +00:00
|
|
|
|
|
|
|
|
|
.getMonEntry
|
|
|
|
|
ld a, [wWhichPokemon]
|
2012-02-09 23:23:12 +00:00
|
|
|
|
call AddNTimes
|
2014-05-26 04:53:02 +00:00
|
|
|
|
|
2012-10-02 19:20:37 +00:00
|
|
|
|
.copyMonData
|
2015-02-08 02:37:40 +00:00
|
|
|
|
ld de, wLoadedMon
|
2015-02-08 00:24:16 +00:00
|
|
|
|
ld bc, wPartyMon2 - wPartyMon1
|
2012-02-09 23:23:12 +00:00
|
|
|
|
jp CopyData
|
|
|
|
|
|
2014-05-16 23:50:38 +00:00
|
|
|
|
|
2014-05-26 04:53:02 +00:00
|
|
|
|
INCLUDE "data/item_prices.asm"
|
2014-05-16 23:50:38 +00:00
|
|
|
|
INCLUDE "text/item_names.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-26 04:53:02 +00:00
|
|
|
|
UnusedNames:
|
2012-01-14 20:36:00 +00:00
|
|
|
|
db "かみなりバッヂ@"
|
|
|
|
|
db "かいがらバッヂ@"
|
|
|
|
|
db "おじぞうバッヂ@"
|
|
|
|
|
db "はやぶさバッヂ@"
|
|
|
|
|
db "ひんやりバッヂ@"
|
|
|
|
|
db "なかよしバッヂ@"
|
|
|
|
|
db "バラバッヂ@"
|
|
|
|
|
db "ひのたまバッヂ@"
|
|
|
|
|
db "ゴールドバッヂ@"
|
|
|
|
|
db "たまご@"
|
|
|
|
|
db "ひよこ@"
|
|
|
|
|
db "ブロンズ@"
|
|
|
|
|
db "シルバー@"
|
|
|
|
|
db "ゴールド@"
|
|
|
|
|
db "プチキャプテン@"
|
|
|
|
|
db "キャプテン@"
|
|
|
|
|
db "プチマスター@"
|
|
|
|
|
db "マスター@"
|
2013-12-09 15:55:50 +00:00
|
|
|
|
db "エクセレント"
|
2012-01-18 02:56:48 +00:00
|
|
|
|
|
2014-05-26 02:23:12 +00:00
|
|
|
|
INCLUDE "engine/overworld/oam.asm"
|
|
|
|
|
INCLUDE "engine/oam_dma.asm"
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
PrintWaitingText:
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 3, 10
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld b, $1
|
|
|
|
|
ld c, $b
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld a, [W_ISINBATTLE]
|
2013-03-12 00:52:32 +00:00
|
|
|
|
and a
|
|
|
|
|
jr z, .asm_4c17
|
2012-01-14 20:36:00 +00:00
|
|
|
|
call TextBoxBorder
|
2013-03-12 00:52:32 +00:00
|
|
|
|
jr .asm_4c1a
|
|
|
|
|
.asm_4c17
|
2015-02-07 10:43:08 +00:00
|
|
|
|
call CableClub_TextBoxBorder
|
2013-03-12 00:52:32 +00:00
|
|
|
|
.asm_4c1a
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 4, 11
|
2014-05-16 05:33:16 +00:00
|
|
|
|
ld de, WaitingText
|
2012-01-14 20:36:00 +00:00
|
|
|
|
call PlaceString
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld c, 50
|
2013-03-12 00:52:32 +00:00
|
|
|
|
jp DelayFrames
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-25 17:09:39 +00:00
|
|
|
|
WaitingText:
|
2013-09-01 20:34:39 +00:00
|
|
|
|
db "Waiting...!@"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2013-03-17 21:54:12 +00:00
|
|
|
|
_UpdateSprites: ; 4c34 (1:4c34)
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld h, $c1
|
|
|
|
|
inc h
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, $e ; wSpriteStateData2 + $0e
|
2013-03-17 21:54:12 +00:00
|
|
|
|
.spriteLoop
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld l, a
|
|
|
|
|
sub $e
|
|
|
|
|
ld c, a
|
2013-03-17 21:54:12 +00:00
|
|
|
|
ld [H_CURRENTSPRITEOFFSET], a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, [hl]
|
|
|
|
|
and a
|
2013-03-17 21:54:12 +00:00
|
|
|
|
jr z, .skipSprite ; tests $c2Xe
|
2013-03-12 00:52:32 +00:00
|
|
|
|
push hl
|
|
|
|
|
push de
|
|
|
|
|
push bc
|
2013-03-17 21:54:12 +00:00
|
|
|
|
call .updateCurrentSprite
|
2013-03-12 00:52:32 +00:00
|
|
|
|
pop bc
|
|
|
|
|
pop de
|
|
|
|
|
pop hl
|
2013-03-17 21:54:12 +00:00
|
|
|
|
.skipSprite
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, l
|
2013-03-17 21:54:12 +00:00
|
|
|
|
add $10 ; move to next sprite
|
|
|
|
|
cp $e ; test for overflow (back at $0e)
|
|
|
|
|
jr nz, .spriteLoop
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
2013-03-17 21:54:12 +00:00
|
|
|
|
.updateCurrentSprite ; 4c54 (1:4c54)
|
2013-03-12 00:52:32 +00:00
|
|
|
|
cp $1
|
2013-03-17 21:54:12 +00:00
|
|
|
|
jp nz, UpdateNonPlayerSprite
|
|
|
|
|
jp UpdatePlayerSprite
|
2012-01-18 02:56:48 +00:00
|
|
|
|
|
2014-05-25 17:09:39 +00:00
|
|
|
|
UpdateNonPlayerSprite:
|
2013-03-12 00:52:32 +00:00
|
|
|
|
dec a
|
|
|
|
|
swap a
|
2014-03-30 23:30:30 +00:00
|
|
|
|
ld [$ff93], a ; $10 * sprite#
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld a, [wNPCMovementScriptSpriteOffset] ; some sprite offset?
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld b, a
|
2013-03-17 21:54:12 +00:00
|
|
|
|
ld a, [H_CURRENTSPRITEOFFSET]
|
2013-03-12 00:52:32 +00:00
|
|
|
|
cp b
|
2013-03-17 21:54:12 +00:00
|
|
|
|
jr nz, .unequal
|
2013-03-12 00:52:32 +00:00
|
|
|
|
jp Func_5236
|
2013-03-17 21:54:12 +00:00
|
|
|
|
.unequal
|
2013-03-12 00:52:32 +00:00
|
|
|
|
jp Func_4ed1
|
2012-02-13 00:28:29 +00:00
|
|
|
|
|
2014-07-28 09:09:14 +00:00
|
|
|
|
; This detects if the current sprite (whose offset is at H_CURRENTSPRITEOFFSET)
|
|
|
|
|
; is going to collide with another sprite by looping over the other sprites.
|
|
|
|
|
; The current sprite's offset will be labelled with i (e.g. $c1i0).
|
|
|
|
|
; The loop sprite's offset will labelled with j (e.g. $c1j0).
|
|
|
|
|
;
|
|
|
|
|
; Note that the Y coordinate of the sprite (in [$c1k4]) is one of the following
|
|
|
|
|
; 9 values when the sprite is aligned with the grid: $fc, $0c, $1c, $2c, ..., $7c.
|
|
|
|
|
; The reason that 4 is added below to the coordinate is to make it align with a
|
|
|
|
|
; multiple of $10 to make comparisons easier.
|
|
|
|
|
DetectCollisionBetweenSprites:
|
2013-03-12 00:52:32 +00:00
|
|
|
|
nop
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld h, wSpriteStateData1 / $100
|
2013-03-17 21:54:12 +00:00
|
|
|
|
ld a, [H_CURRENTSPRITEOFFSET]
|
2014-05-26 21:04:56 +00:00
|
|
|
|
add wSpriteStateData1 % $100
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld l, a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [hl] ; a = [$c1i0] (picture) (0 if slot is unused)
|
|
|
|
|
and a ; is this sprite slot slot used?
|
|
|
|
|
ret z ; return if not used
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, l
|
2014-05-25 17:09:39 +00:00
|
|
|
|
add 3
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld l, a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [hli] ; a = [$c1i3] (delta Y) (-1, 0, or 1)
|
|
|
|
|
call SetSpriteCollisionValues
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [hli] ; a = [$C1i4] (Y screen coordinate)
|
|
|
|
|
add 4 ; align with multiple of $10
|
|
|
|
|
|
|
|
|
|
; The effect of the following 3 lines is to
|
|
|
|
|
; add 7 to a if moving south or
|
|
|
|
|
; subtract 7 from a if moving north.
|
2013-03-12 00:52:32 +00:00
|
|
|
|
add b
|
|
|
|
|
and $f0
|
|
|
|
|
or c
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld [$ff90], a ; store Y coordinate adjusted for direction of movement
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [hli] ; a = [$c1i5] (delta X) (-1, 0, or 1)
|
|
|
|
|
call SetSpriteCollisionValues
|
|
|
|
|
ld a, [hl] ; a = [$C1i6] (X screen coordinate)
|
|
|
|
|
|
|
|
|
|
; The effect of the following 3 lines is to
|
|
|
|
|
; add 7 to a if moving east or
|
|
|
|
|
; subtract 7 from a if moving west.
|
2013-03-12 00:52:32 +00:00
|
|
|
|
add b
|
|
|
|
|
and $f0
|
|
|
|
|
or c
|
2014-07-28 09:09:14 +00:00
|
|
|
|
|
|
|
|
|
ld [$ff91], a ; store X coordinate adjusted for direction of movement
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, l
|
2014-05-25 17:09:39 +00:00
|
|
|
|
add 7
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld l, a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2012-02-13 00:28:29 +00:00
|
|
|
|
xor a
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld [hld], a ; zero [$c1id] XXX what's [$c1id] for?
|
|
|
|
|
ld [hld], a ; zero [$c1ic] (directions in which collisions occurred)
|
|
|
|
|
|
2014-03-30 23:30:30 +00:00
|
|
|
|
ld a, [$ff91]
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld [hld], a ; [$c1ib] = adjusted X coordiate
|
2014-03-30 23:30:30 +00:00
|
|
|
|
ld a, [$ff90]
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld [hl], a ; [$c1ia] = adjusted Y coordinate
|
|
|
|
|
|
|
|
|
|
xor a ; zero the loop counter
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-25 17:09:39 +00:00
|
|
|
|
.loop
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld [$ff8f], a ; store loop counter
|
2013-03-12 00:52:32 +00:00
|
|
|
|
swap a
|
|
|
|
|
ld e, a
|
2013-03-17 21:54:12 +00:00
|
|
|
|
ld a, [H_CURRENTSPRITEOFFSET]
|
2014-07-28 09:09:14 +00:00
|
|
|
|
cp e ; does the loop sprite match the current sprite?
|
|
|
|
|
jp z, .next ; go to the next sprite if they match
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld d, h
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [de] ; a = [$c1j0] (picture) (0 if slot is unused)
|
|
|
|
|
and a ; is this sprite slot slot used?
|
|
|
|
|
jp z, .next ; go the next sprite if not used
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc e
|
|
|
|
|
inc e
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [de] ; a = [$c1j2] ($ff means the sprite is offscreen)
|
2012-02-13 00:28:29 +00:00
|
|
|
|
inc a
|
2014-07-28 09:09:14 +00:00
|
|
|
|
jp z, .next ; go the next sprite if offscreen
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2013-03-17 21:54:12 +00:00
|
|
|
|
ld a, [H_CURRENTSPRITEOFFSET]
|
2014-05-25 17:09:39 +00:00
|
|
|
|
add 10
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld l, a
|
2014-07-28 09:09:14 +00:00
|
|
|
|
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc e
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [de] ; a = [$c1j3] (delta Y)
|
|
|
|
|
call SetSpriteCollisionValues
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc e
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [de] ; a = [$C1j4] (Y screen coordinate)
|
|
|
|
|
add 4 ; align with multiple of $10
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-07-28 09:09:14 +00:00
|
|
|
|
; The effect of the following 3 lines is to
|
|
|
|
|
; add 7 to a if moving south or
|
|
|
|
|
; subtract 7 from a if moving north.
|
2013-03-12 00:52:32 +00:00
|
|
|
|
add b
|
|
|
|
|
and $f0
|
|
|
|
|
or c
|
2014-07-28 09:09:14 +00:00
|
|
|
|
|
|
|
|
|
sub [hl] ; subtract the adjusted Y coordinate of sprite i ([$c1ia]) from that of sprite j
|
|
|
|
|
|
|
|
|
|
; calculate the absolute value of the difference to get the distance
|
|
|
|
|
jr nc, .noCarry1
|
2013-03-12 00:52:32 +00:00
|
|
|
|
cpl
|
|
|
|
|
inc a
|
2014-07-28 09:09:14 +00:00
|
|
|
|
.noCarry1
|
|
|
|
|
ld [$ff90], a ; store the distance between the two sprites' adjusted Y values
|
|
|
|
|
|
|
|
|
|
; Use the carry flag set by the above subtraction to determine which sprite's
|
|
|
|
|
; Y coordinate is larger. This information is used later to set [$c1ic],
|
|
|
|
|
; which stores which direction the collision occurred in.
|
|
|
|
|
; The following 5 lines set the lowest 2 bits of c, which are later shifted left by 2.
|
|
|
|
|
; If sprite i's Y is larger, set lowest 2 bits of c to 10.
|
|
|
|
|
; If sprite j's Y is larger or both are equal, set lowest 2 bits of c to 01.
|
2013-03-12 00:52:32 +00:00
|
|
|
|
push af
|
|
|
|
|
rl c
|
|
|
|
|
pop af
|
|
|
|
|
ccf
|
|
|
|
|
rl c
|
2014-07-28 09:09:14 +00:00
|
|
|
|
|
|
|
|
|
; If sprite i's delta Y is 0, then b = 7, else b = 9.
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld b, 7
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [hl] ; a = [$c1ia] (adjusted Y coordinate)
|
2013-03-12 00:52:32 +00:00
|
|
|
|
and $f
|
2014-07-28 09:09:14 +00:00
|
|
|
|
jr z, .next1
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld b, 9
|
2014-07-28 09:09:14 +00:00
|
|
|
|
|
|
|
|
|
.next1
|
|
|
|
|
ld a, [$ff90] ; a = distance between adjusted Y coordinates
|
2013-03-12 00:52:32 +00:00
|
|
|
|
sub b
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld [$ff92], a ; store distance adjusted using sprite i's direction
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, b
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld [$ff90], a ; store 7 or 9 depending on sprite i's delta Y
|
|
|
|
|
jr c, .checkXDistance
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-07-28 09:09:14 +00:00
|
|
|
|
; If sprite j's delta Y is 0, then b = 7, else b = 9.
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld b, 7
|
2013-03-12 00:52:32 +00:00
|
|
|
|
dec e
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [de] ; a = [$c1j3] (delta Y)
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc e
|
|
|
|
|
and a
|
2014-07-28 09:09:14 +00:00
|
|
|
|
jr z, .next2
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld b, 9
|
|
|
|
|
|
2014-07-28 09:09:14 +00:00
|
|
|
|
.next2
|
|
|
|
|
ld a, [$ff92] ; a = distance adjusted using sprite i's direction
|
|
|
|
|
sub b ; adjust distance using sprite j's direction
|
|
|
|
|
jr z, .checkXDistance
|
|
|
|
|
jr nc, .next ; go to next sprite if distance is still positive after both adjustments
|
|
|
|
|
|
|
|
|
|
.checkXDistance
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc e
|
|
|
|
|
inc l
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [de] ; a = [$c1j5] (delta X)
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2013-03-12 00:52:32 +00:00
|
|
|
|
push bc
|
2014-07-28 09:09:14 +00:00
|
|
|
|
|
|
|
|
|
call SetSpriteCollisionValues
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc e
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [de] ; a = [$c1j6] (X screen coordinate)
|
|
|
|
|
|
|
|
|
|
; The effect of the following 3 lines is to
|
|
|
|
|
; add 7 to a if moving east or
|
|
|
|
|
; subtract 7 from a if moving west.
|
2013-03-12 00:52:32 +00:00
|
|
|
|
add b
|
|
|
|
|
and $f0
|
|
|
|
|
or c
|
2014-07-28 09:09:14 +00:00
|
|
|
|
|
2013-03-12 00:52:32 +00:00
|
|
|
|
pop bc
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-07-28 09:09:14 +00:00
|
|
|
|
sub [hl] ; subtract the adjusted X coordinate of sprite i ([$c1ib]) from that of sprite j
|
|
|
|
|
|
|
|
|
|
; calculate the absolute value of the difference to get the distance
|
|
|
|
|
jr nc, .noCarry2
|
2013-03-12 00:52:32 +00:00
|
|
|
|
cpl
|
|
|
|
|
inc a
|
2014-07-28 09:09:14 +00:00
|
|
|
|
.noCarry2
|
|
|
|
|
ld [$ff91], a ; store the distance between the two sprites' adjusted X values
|
|
|
|
|
|
|
|
|
|
; Use the carry flag set by the above subtraction to determine which sprite's
|
|
|
|
|
; X coordinate is larger. This information is used later to set [$c1ic],
|
|
|
|
|
; which stores which direction the collision occurred in.
|
|
|
|
|
; The following 5 lines set the lowest 2 bits of c.
|
|
|
|
|
; If sprite i's X is larger, set lowest 2 bits of c to 10.
|
|
|
|
|
; If sprite j's X is larger or both are equal, set lowest 2 bits of c to 01.
|
2013-03-12 00:52:32 +00:00
|
|
|
|
push af
|
|
|
|
|
rl c
|
|
|
|
|
pop af
|
|
|
|
|
ccf
|
|
|
|
|
rl c
|
2014-07-28 09:09:14 +00:00
|
|
|
|
|
|
|
|
|
; If sprite i's delta X is 0, then b = 7, else b = 9.
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld b, 7
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [hl] ; a = [$c1ib] (adjusted X coordinate)
|
2013-03-12 00:52:32 +00:00
|
|
|
|
and $f
|
2014-07-28 09:09:14 +00:00
|
|
|
|
jr z, .next3
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld b, 9
|
2014-07-28 09:09:14 +00:00
|
|
|
|
|
|
|
|
|
.next3
|
|
|
|
|
ld a, [$ff91] ; a = distance between adjusted X coordinates
|
2013-03-12 00:52:32 +00:00
|
|
|
|
sub b
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld [$ff92], a ; store distance adjusted using sprite i's direction
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, b
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld [$ff91], a ; store 7 or 9 depending on sprite i's delta X
|
|
|
|
|
jr c, .collision
|
|
|
|
|
|
|
|
|
|
; If sprite j's delta X is 0, then b = 7, else b = 9.
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld b, 7
|
2013-03-12 00:52:32 +00:00
|
|
|
|
dec e
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [de] ; a = [$c1j5] (delta X)
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc e
|
|
|
|
|
and a
|
2014-07-28 09:09:14 +00:00
|
|
|
|
jr z, .next4
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld b, 9
|
|
|
|
|
|
2014-07-28 09:09:14 +00:00
|
|
|
|
.next4
|
|
|
|
|
ld a, [$ff92] ; a = distance adjusted using sprite i's direction
|
|
|
|
|
sub b ; adjust distance using sprite j's direction
|
|
|
|
|
jr z, .collision
|
|
|
|
|
jr nc, .next ; go to next sprite if distance is still positive after both adjustments
|
|
|
|
|
|
|
|
|
|
.collision
|
|
|
|
|
ld a, [$ff91] ; a = 7 or 9 depending on sprite i's delta X
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld b, a
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [$ff90] ; a = 7 or 9 depending on sprite i's delta Y
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc l
|
2014-07-28 09:09:14 +00:00
|
|
|
|
|
|
|
|
|
; If delta X isn't 0 and delta Y is 0, then b = %0011, else b = %1100.
|
|
|
|
|
; (note that normally if delta X isn't 0, then delta Y must be 0 and vice versa)
|
2013-03-12 00:52:32 +00:00
|
|
|
|
cp b
|
2014-07-28 09:09:14 +00:00
|
|
|
|
jr c, .next5
|
|
|
|
|
ld b, %1100
|
|
|
|
|
jr .next6
|
|
|
|
|
.next5
|
|
|
|
|
ld b, %0011
|
|
|
|
|
|
|
|
|
|
.next6
|
|
|
|
|
ld a, c ; c has 2 bits set (one of bits 0-1 is set for the X axis and one of bits 2-3 for the Y axis)
|
|
|
|
|
and b ; we select either the bit in bits 0-1 or bits 2-3 based on the calculation immediately above
|
|
|
|
|
or [hl] ; or with existing collision direction bits in [$c1ic]
|
|
|
|
|
ld [hl], a ; store new value
|
|
|
|
|
ld a, c ; useless code because a is overwritten before being used again
|
|
|
|
|
|
|
|
|
|
; set bit in [$c1ie] or [$c1if] to indicate which sprite the collision occurred with
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc l
|
|
|
|
|
inc l
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [$ff8f] ; a = loop counter
|
|
|
|
|
ld de, SpriteCollisionBitTable
|
2013-03-12 00:52:32 +00:00
|
|
|
|
add a
|
|
|
|
|
add e
|
|
|
|
|
ld e, a
|
2014-07-28 09:09:14 +00:00
|
|
|
|
jr nc, .noCarry3
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc d
|
2014-07-28 09:09:14 +00:00
|
|
|
|
.noCarry3
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, [de]
|
|
|
|
|
or [hl]
|
|
|
|
|
ld [hli], a
|
|
|
|
|
inc de
|
|
|
|
|
ld a, [de]
|
|
|
|
|
or [hl]
|
|
|
|
|
ld [hl], a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
.next
|
2014-07-28 09:09:14 +00:00
|
|
|
|
ld a, [$ff8f] ; a = loop counter
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc a
|
|
|
|
|
cp $10
|
2014-05-25 17:09:39 +00:00
|
|
|
|
jp nz, .loop
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-07-28 09:09:14 +00:00
|
|
|
|
; takes delta X or delta Y in a
|
|
|
|
|
; b = delta X/Y
|
|
|
|
|
; c = 0 if delta X/Y is 0
|
|
|
|
|
; c = 7 if delta X/Y is 1
|
|
|
|
|
; c = 9 if delta X/Y is -1
|
|
|
|
|
SetSpriteCollisionValues:
|
2013-03-12 00:52:32 +00:00
|
|
|
|
and a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld b, 0
|
|
|
|
|
ld c, 0
|
|
|
|
|
jr z, .done
|
|
|
|
|
ld c, 9
|
|
|
|
|
cp -1
|
|
|
|
|
jr z, .ok
|
|
|
|
|
ld c, 7
|
|
|
|
|
ld a, 0
|
|
|
|
|
.ok
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld b, a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
.done
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-07-28 09:09:14 +00:00
|
|
|
|
SpriteCollisionBitTable:
|
|
|
|
|
db %00000000,%00000001
|
|
|
|
|
db %00000000,%00000010
|
|
|
|
|
db %00000000,%00000100
|
|
|
|
|
db %00000000,%00001000
|
|
|
|
|
db %00000000,%00010000
|
|
|
|
|
db %00000000,%00100000
|
|
|
|
|
db %00000000,%01000000
|
|
|
|
|
db %00000000,%10000000
|
|
|
|
|
db %00000001,%00000000
|
|
|
|
|
db %00000010,%00000000
|
|
|
|
|
db %00000100,%00000000
|
|
|
|
|
db %00001000,%00000000
|
|
|
|
|
db %00010000,%00000000
|
|
|
|
|
db %00100000,%00000000
|
|
|
|
|
db %01000000,%00000000
|
|
|
|
|
db %10000000,%00000000
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
TestBattle:
|
2013-12-09 15:55:50 +00:00
|
|
|
|
ret
|
2013-11-15 06:56:54 +00:00
|
|
|
|
|
2014-05-25 17:09:39 +00:00
|
|
|
|
.loop
|
2013-11-15 06:56:54 +00:00
|
|
|
|
call GBPalNormal
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
; Don't mess around
|
|
|
|
|
; with obedience.
|
|
|
|
|
ld a, %10000000 ; EARTHBADGE
|
2013-11-15 06:56:54 +00:00
|
|
|
|
ld [W_OBTAINEDBADGES], a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2013-11-15 06:56:54 +00:00
|
|
|
|
ld hl, W_FLAGS_D733
|
|
|
|
|
set 0, [hl]
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
; Reset the party.
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyCount
|
2013-11-15 06:56:54 +00:00
|
|
|
|
xor a
|
|
|
|
|
ld [hli], a
|
|
|
|
|
dec a
|
|
|
|
|
ld [hl], a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
; Give the player a
|
|
|
|
|
; level 20 Rhydon.
|
|
|
|
|
ld a, RHYDON
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcf91], a
|
2014-05-16 20:15:59 +00:00
|
|
|
|
ld a, 20
|
2013-11-15 06:56:54 +00:00
|
|
|
|
ld [W_CURENEMYLVL], a
|
|
|
|
|
xor a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcc49], a
|
2013-11-15 06:56:54 +00:00
|
|
|
|
ld [W_CURMAP], a
|
2014-06-16 20:03:05 +00:00
|
|
|
|
call AddPartyMon
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
; Fight against a
|
|
|
|
|
; level 20 Rhydon.
|
2014-05-16 20:15:59 +00:00
|
|
|
|
ld a, RHYDON
|
2013-11-15 06:56:54 +00:00
|
|
|
|
ld [W_CUROPPONENT], a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-06-16 20:25:46 +00:00
|
|
|
|
predef InitOpponent
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
; When the battle ends,
|
|
|
|
|
; do it all again.
|
|
|
|
|
ld a, 1
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [wUpdateSpritesEnabled], a
|
2013-11-15 06:56:54 +00:00
|
|
|
|
ld [H_AUTOBGTRANSFERENABLED], a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
jr .loop
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-26 02:48:35 +00:00
|
|
|
|
INCLUDE "engine/overworld/item.asm"
|
2014-05-26 02:45:59 +00:00
|
|
|
|
INCLUDE "engine/overworld/movement.asm"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/cable_club.asm"
|
2014-01-03 20:02:18 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
LoadTrainerInfoTextBoxTiles: ; 5ae6 (1:5ae6)
|
|
|
|
|
ld de, TrainerInfoTextBoxTileGraphics ; $7b98
|
2014-05-29 08:31:46 +00:00
|
|
|
|
ld hl, vChars2 + $760
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld bc, (BANK(TrainerInfoTextBoxTileGraphics) << 8) +$09
|
|
|
|
|
jp CopyVideoData
|
|
|
|
|
|
|
|
|
|
INCLUDE "engine/menu/main_menu.asm"
|
|
|
|
|
|
|
|
|
|
INCLUDE "engine/oak_speech.asm"
|
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
SpecialWarpIn: ; 62ce (1:62ce)
|
|
|
|
|
call LoadSpecialWarpData
|
|
|
|
|
predef LoadTilesetHeader
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl,wd732
|
2014-09-13 07:50:56 +00:00
|
|
|
|
bit 2,[hl] ; dungeon warp or fly warp?
|
2014-05-22 22:13:20 +00:00
|
|
|
|
res 2,[hl]
|
|
|
|
|
jr z,.next
|
2014-09-13 07:50:56 +00:00
|
|
|
|
; if dungeon warp or fly warp
|
|
|
|
|
ld a,[wDestinationMap]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr .next2
|
|
|
|
|
.next
|
|
|
|
|
bit 1,[hl]
|
|
|
|
|
jr z,.next3
|
2014-09-13 07:50:56 +00:00
|
|
|
|
call EmptyFunc
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.next3
|
|
|
|
|
ld a,0
|
|
|
|
|
.next2
|
|
|
|
|
ld b,a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a,[wd72d]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and a
|
|
|
|
|
jr nz,.next4
|
|
|
|
|
ld a,b
|
|
|
|
|
.next4
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl,wd732
|
2014-09-13 07:50:56 +00:00
|
|
|
|
bit 4,[hl] ; dungeon warp?
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret nz
|
2014-09-13 07:50:56 +00:00
|
|
|
|
; if not dungeon warp
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [wLastMap],a
|
|
|
|
|
ret
|
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
; gets the map ID, tile block map view pointer, tileset, and coordinates
|
|
|
|
|
LoadSpecialWarpData: ; 62ff (1:62ff)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wd72d]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp BATTLE_CENTER
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .notBattleCenter
|
|
|
|
|
ld hl, BattleCenterSpec1
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld a, [hSerialConnectionStatus]
|
|
|
|
|
cp USING_INTERNAL_CLOCK ; which gameboy is clocking determines who is on the left and who is on the right
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .copyWarpData
|
|
|
|
|
ld hl, BattleCenterSpec2
|
|
|
|
|
jr .copyWarpData
|
|
|
|
|
.notBattleCenter
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp TRADE_CENTER
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .notTradeCenter
|
|
|
|
|
ld hl, TradeCenterSpec1
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld a, [hSerialConnectionStatus]
|
|
|
|
|
cp USING_INTERNAL_CLOCK
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .copyWarpData
|
|
|
|
|
ld hl, TradeCenterSpec2
|
|
|
|
|
jr .copyWarpData
|
|
|
|
|
.notTradeCenter
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wd732]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
bit 1, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .notFirstMap
|
2014-05-22 22:13:20 +00:00
|
|
|
|
bit 2, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .notFirstMap
|
|
|
|
|
ld hl, FirstMapSpec
|
|
|
|
|
.copyWarpData
|
|
|
|
|
ld de, W_CURMAP
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, $7
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.copyWarpDataLoop
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
|
|
|
|
dec c
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .copyWarpDataLoop
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, [hli]
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [W_CURMAPTILESET], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
xor a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .done
|
|
|
|
|
.notFirstMap
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [wLastMap]
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd732
|
2014-09-13 07:50:56 +00:00
|
|
|
|
bit 4, [hl] ; used dungeon warp (jumped down hole/waterfall)?
|
|
|
|
|
jr nz, .usedDunegonWarp
|
|
|
|
|
bit 6, [hl] ; return to last pokemon center (or player's house)?
|
2014-05-22 22:13:20 +00:00
|
|
|
|
res 6, [hl]
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .otherDestination
|
|
|
|
|
; return to last pokemon center or player's house
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [wLastBlackoutMap]
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .usedFlyWarp
|
|
|
|
|
.usedDunegonWarp
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd72d
|
2014-05-22 22:13:20 +00:00
|
|
|
|
res 4, [hl]
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [wDungeonWarpDestinationMap]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [W_CURMAP], a
|
|
|
|
|
ld a, [wWhichDungeonWarp]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld hl, DungeonWarpList
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld de, $0
|
|
|
|
|
ld a, $6
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd12f], a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.dungeonWarpListLoop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
cp b
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .matchedDungeonWarpDestinationMap
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc hl
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .nextDungeonWarp
|
|
|
|
|
.matchedDungeonWarpDestinationMap
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
cp c
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .matchedDungeonWarpID
|
|
|
|
|
.nextDungeonWarp
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wd12f]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add e
|
|
|
|
|
ld e, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .dungeonWarpListLoop
|
|
|
|
|
.matchedDungeonWarpID
|
|
|
|
|
ld hl, DungeonWarpData
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, de
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .copyWarpData2
|
|
|
|
|
.otherDestination
|
|
|
|
|
ld a, [wDestinationMap]
|
|
|
|
|
.usedFlyWarp
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [W_CURMAP], a
|
|
|
|
|
ld hl, FlyWarpDataPtr
|
|
|
|
|
.flyWarpDataPtrLoop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
inc hl
|
|
|
|
|
cp b
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .foundFlyWarpMatch
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc hl
|
|
|
|
|
inc hl
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .flyWarpDataPtrLoop
|
|
|
|
|
.foundFlyWarpMatch
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld h, [hl]
|
|
|
|
|
ld l, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.copyWarpData2
|
|
|
|
|
ld de, wCurrentTileBlockMapViewPointer
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, $6
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.copyWarpDataLoop2
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
|
|
|
|
dec c
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .copyWarpDataLoop2
|
|
|
|
|
xor a ; OVERWORLD
|
|
|
|
|
ld [W_CURMAPTILESET], a
|
|
|
|
|
.done
|
|
|
|
|
ld [wYOffsetSinceLastSpecialWarp], a
|
|
|
|
|
ld [wXOffsetSinceLastSpecialWarp], a
|
|
|
|
|
ld a, $ff ; the player's coordinates have already been updated using a special warp, so don't use any of the normal warps
|
|
|
|
|
ld [wDestinationWarpID], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
INCLUDE "data/special_warps.asm"
|
|
|
|
|
|
|
|
|
|
; This function appears to never be used.
|
|
|
|
|
; It is likely a debugging feature to give the player Tsunekazu Ishihara's
|
|
|
|
|
; favorite Pokemon. This is indicated by the overpowered Exeggutor, which
|
|
|
|
|
; Ishihara (president of Creatures Inc.) said was his favorite Pokemon in an ABC
|
|
|
|
|
; interview on February 8, 2000.
|
|
|
|
|
; "Exeggutor is my favorite. That's because I was always using this character
|
|
|
|
|
; while I was debugging the program."
|
|
|
|
|
; http://www.ign.com/articles/2000/02/09/abc-news-pokamon-chat-transcript
|
|
|
|
|
|
|
|
|
|
SetIshiharaTeam: ; 64ca (1:64ca)
|
|
|
|
|
ld de, IshiharaTeam
|
|
|
|
|
.loop
|
|
|
|
|
ld a, [de]
|
|
|
|
|
cp $ff
|
|
|
|
|
ret z
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcf91], a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc de
|
|
|
|
|
ld a, [de]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [W_CURENEMYLVL], a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc de
|
2014-06-16 20:03:05 +00:00
|
|
|
|
call AddPartyMon
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr .loop
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
IshiharaTeam: ; 64df (1:64df)
|
|
|
|
|
db EXEGGUTOR,90
|
|
|
|
|
db MEW,20
|
|
|
|
|
db JOLTEON,56
|
|
|
|
|
db DUGTRIO,56
|
|
|
|
|
db ARTICUNO,57
|
|
|
|
|
db $FF
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
EmptyFunc: ; 64ea (1:64ea)
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/menu/naming_screen.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/oak_speech2.asm"
|
2013-09-02 14:40:37 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; subtracts the amount the player paid from their money
|
|
|
|
|
; sets carry flag if there is enough money and unsets carry flag if not
|
|
|
|
|
SubtractAmountPaidFromMoney_: ; 6b21 (1:6b21)
|
|
|
|
|
ld de,wPlayerMoney
|
|
|
|
|
ld hl,$ff9f ; total price of items
|
|
|
|
|
ld c,3 ; length of money in bytes
|
|
|
|
|
call StringCmp
|
|
|
|
|
ret c
|
|
|
|
|
ld de,wPlayerMoney + 2
|
|
|
|
|
ld hl,$ffa1 ; total price of items
|
|
|
|
|
ld c,3 ; length of money in bytes
|
2014-06-16 20:57:26 +00:00
|
|
|
|
predef SubBCDPredef ; subtract total price from money
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld a,MONEY_BOX
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld [wTextBoxID],a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call DisplayTextBoxID ; redraw money text box
|
|
|
|
|
and a
|
2013-09-02 14:53:04 +00:00
|
|
|
|
ret
|
2013-09-02 14:40:37 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
HandleItemListSwapping: ; 6b44 (1:6b44)
|
|
|
|
|
ld a,[wListMenuID]
|
|
|
|
|
cp a,ITEMLISTMENU
|
|
|
|
|
jp nz,DisplayListMenuIDLoop ; only rearrange item list menus
|
2013-09-02 15:27:06 +00:00
|
|
|
|
push hl
|
2015-02-08 02:37:40 +00:00
|
|
|
|
ld hl,wList
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a,[hli]
|
|
|
|
|
ld h,[hl]
|
|
|
|
|
ld l,a
|
|
|
|
|
inc hl ; hl = beginning of list entries
|
|
|
|
|
ld a,[wCurrentMenuItem]
|
|
|
|
|
ld b,a
|
|
|
|
|
ld a,[wListScrollOffset]
|
|
|
|
|
add b
|
|
|
|
|
add a
|
|
|
|
|
ld c,a
|
|
|
|
|
ld b,0
|
|
|
|
|
add hl,bc ; hl = address of currently selected item entry
|
|
|
|
|
ld a,[hl]
|
2013-09-02 15:27:06 +00:00
|
|
|
|
pop hl
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc a
|
|
|
|
|
jp z,DisplayListMenuIDLoop ; ignore attempts to swap the Cancel menu item
|
2014-08-09 05:39:13 +00:00
|
|
|
|
ld a,[wMenuItemToSwap] ; ID of item chosen for swapping (counts from 1)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and a ; has the first item to swap already been chosen?
|
|
|
|
|
jr nz,.swapItems
|
|
|
|
|
; if not, set the currently selected item as the first item
|
|
|
|
|
ld a,[wCurrentMenuItem]
|
|
|
|
|
inc a
|
|
|
|
|
ld b,a
|
|
|
|
|
ld a,[wListScrollOffset] ; index of top (visible) menu item within the list
|
|
|
|
|
add b
|
2014-08-09 05:39:13 +00:00
|
|
|
|
ld [wMenuItemToSwap],a ; ID of item chosen for swapping (counts from 1)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c,20
|
|
|
|
|
call DelayFrames
|
|
|
|
|
jp DisplayListMenuIDLoop
|
|
|
|
|
.swapItems
|
|
|
|
|
ld a,[wCurrentMenuItem]
|
|
|
|
|
inc a
|
|
|
|
|
ld b,a
|
|
|
|
|
ld a,[wListScrollOffset]
|
|
|
|
|
add b
|
|
|
|
|
ld b,a
|
2014-08-09 05:39:13 +00:00
|
|
|
|
ld a,[wMenuItemToSwap] ; ID of item chosen for swapping (counts from 1)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp b ; is the currently selected item the same as the first item to swap?
|
|
|
|
|
jp z,DisplayListMenuIDLoop ; ignore attempts to swap an item with itself
|
2013-09-02 15:27:06 +00:00
|
|
|
|
dec a
|
2014-08-09 05:39:13 +00:00
|
|
|
|
ld [wMenuItemToSwap],a ; ID of item chosen for swapping (counts from 1)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c,20
|
2013-09-02 15:27:06 +00:00
|
|
|
|
call DelayFrames
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
|
|
|
|
push de
|
2015-02-08 02:37:40 +00:00
|
|
|
|
ld hl,wList
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a,[hli]
|
|
|
|
|
ld h,[hl]
|
|
|
|
|
ld l,a
|
|
|
|
|
inc hl ; hl = beginning of list entries
|
|
|
|
|
ld d,h
|
|
|
|
|
ld e,l ; de = beginning of list entries
|
|
|
|
|
ld a,[wCurrentMenuItem]
|
|
|
|
|
ld b,a
|
|
|
|
|
ld a,[wListScrollOffset]
|
|
|
|
|
add b
|
|
|
|
|
add a
|
|
|
|
|
ld c,a
|
|
|
|
|
ld b,0
|
|
|
|
|
add hl,bc ; hl = address of currently selected item entry
|
2014-08-09 05:39:13 +00:00
|
|
|
|
ld a,[wMenuItemToSwap] ; ID of item chosen for swapping (counts from 1)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add a
|
|
|
|
|
add e
|
|
|
|
|
ld e,a
|
|
|
|
|
jr nc,.noCarry
|
|
|
|
|
inc d
|
|
|
|
|
.noCarry ; de = address of first item to swap
|
|
|
|
|
ld a,[de]
|
|
|
|
|
ld b,a
|
|
|
|
|
ld a,[hli]
|
|
|
|
|
cp b
|
|
|
|
|
jr z,.swapSameItemType
|
|
|
|
|
.swapDifferentItems
|
|
|
|
|
ld [$ff95],a ; [$ff95] = second item ID
|
|
|
|
|
ld a,[hld]
|
|
|
|
|
ld [$ff96],a ; [$ff96] = second item quantity
|
|
|
|
|
ld a,[de]
|
|
|
|
|
ld [hli],a ; put first item ID in second item slot
|
|
|
|
|
inc de
|
|
|
|
|
ld a,[de]
|
|
|
|
|
ld [hl],a ; put first item quantity in second item slot
|
|
|
|
|
ld a,[$ff96]
|
|
|
|
|
ld [de],a ; put second item quantity in first item slot
|
|
|
|
|
dec de
|
|
|
|
|
ld a,[$ff95]
|
|
|
|
|
ld [de],a ; put second item ID in first item slot
|
2013-09-02 15:27:06 +00:00
|
|
|
|
xor a
|
2014-08-09 05:39:13 +00:00
|
|
|
|
ld [wMenuItemToSwap],a ; 0 means no item is currently being swapped
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop de
|
|
|
|
|
pop hl
|
|
|
|
|
jp DisplayListMenuIDLoop
|
|
|
|
|
.swapSameItemType
|
|
|
|
|
inc de
|
|
|
|
|
ld a,[hl]
|
|
|
|
|
ld b,a
|
|
|
|
|
ld a,[de]
|
|
|
|
|
add b ; a = sum of both item quantities
|
|
|
|
|
cp a,100 ; is the sum too big for one item slot?
|
|
|
|
|
jr c,.combineItemSlots
|
|
|
|
|
; swap enough items from the first slot to max out the second slot if they can't be combined
|
|
|
|
|
sub a,99
|
|
|
|
|
ld [de],a
|
|
|
|
|
ld a,99
|
|
|
|
|
ld [hl],a
|
|
|
|
|
jr .done
|
|
|
|
|
.combineItemSlots
|
|
|
|
|
ld [hl],a ; put the sum in the second item slot
|
2015-02-08 02:37:40 +00:00
|
|
|
|
ld hl,wList
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a,[hli]
|
|
|
|
|
ld h,[hl]
|
|
|
|
|
ld l,a
|
|
|
|
|
dec [hl] ; decrease the number of items
|
|
|
|
|
ld a,[hl]
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd12a],a ; update number of items variable
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp a,1
|
|
|
|
|
jr nz,.skipSettingMaxMenuItemID
|
|
|
|
|
ld [wMaxMenuItem],a ; if the number of items is only one now, update the max menu item ID
|
|
|
|
|
.skipSettingMaxMenuItemID
|
|
|
|
|
dec de
|
|
|
|
|
ld h,d
|
|
|
|
|
ld l,e
|
|
|
|
|
inc hl
|
|
|
|
|
inc hl ; hl = address of item after first item to swap
|
|
|
|
|
.moveItemsUpLoop ; erase the first item slot and move up all the following item slots to fill the gap
|
|
|
|
|
ld a,[hli]
|
|
|
|
|
ld [de],a
|
|
|
|
|
inc de
|
|
|
|
|
inc a ; reached the $ff terminator?
|
|
|
|
|
jr z,.afterMovingItemsUp
|
|
|
|
|
ld a,[hli]
|
|
|
|
|
ld [de],a
|
|
|
|
|
inc de
|
|
|
|
|
jr .moveItemsUpLoop
|
|
|
|
|
.afterMovingItemsUp
|
2013-09-02 15:27:06 +00:00
|
|
|
|
xor a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [wListScrollOffset],a
|
|
|
|
|
ld [wCurrentMenuItem],a
|
|
|
|
|
.done
|
2013-09-02 15:31:34 +00:00
|
|
|
|
xor a
|
2014-08-09 05:39:13 +00:00
|
|
|
|
ld [wMenuItemToSwap],a ; 0 means no item is currently being swapped
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop de
|
|
|
|
|
pop hl
|
|
|
|
|
jp DisplayListMenuIDLoop
|
2013-04-07 02:01:08 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/overworld/pokemart.asm"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/learn_move.asm"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/overworld/pokecenter.asm"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SetLastBlackoutMap:
|
|
|
|
|
; Set the map to return to when
|
|
|
|
|
; blacking out or using Teleport or Dig.
|
|
|
|
|
; Safari rest houses don't count.
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
|
|
|
|
push hl
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, SafariZoneRestHouses
|
|
|
|
|
ld a, [W_CURMAP]
|
|
|
|
|
ld b, a
|
|
|
|
|
.loop
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
cp -1
|
|
|
|
|
jr z, .notresthouse
|
|
|
|
|
cp b
|
|
|
|
|
jr nz, .loop
|
|
|
|
|
jr .done
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.notresthouse
|
|
|
|
|
ld a, [wLastMap]
|
|
|
|
|
ld [wLastBlackoutMap], a
|
|
|
|
|
.done
|
|
|
|
|
pop hl
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SafariZoneRestHouses:
|
|
|
|
|
db SAFARI_ZONE_REST_HOUSE_2
|
|
|
|
|
db SAFARI_ZONE_REST_HOUSE_3
|
|
|
|
|
db SAFARI_ZONE_REST_HOUSE_4
|
|
|
|
|
db -1
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; function that performs initialization for DisplayTextID
|
|
|
|
|
DisplayTextIDInit: ; 7096 (1:7096)
|
2013-03-12 00:52:32 +00:00
|
|
|
|
xor a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wListMenuID],a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a,[wAutoTextBoxDrawingControl]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
bit 0,a
|
|
|
|
|
jr nz,.skipDrawingTextBoxBorder
|
|
|
|
|
ld a,[$ff8c] ; text ID (or sprite ID)
|
|
|
|
|
and a
|
|
|
|
|
jr nz,.notStartMenu
|
|
|
|
|
; if text ID is 0 (i.e. the start menu)
|
|
|
|
|
; Note that the start menu text border is also drawn in the function directly
|
|
|
|
|
; below this, so this seems unnecessary.
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a,[wd74b]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
bit 5,a ; does the player have the pokedex?
|
|
|
|
|
; start menu with pokedex
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 10, 0
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b,$0e
|
|
|
|
|
ld c,$08
|
|
|
|
|
jr nz,.drawTextBoxBorder
|
|
|
|
|
; start menu without pokedex
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 10, 0
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b,$0c
|
|
|
|
|
ld c,$08
|
|
|
|
|
jr .drawTextBoxBorder
|
|
|
|
|
; if text ID is not 0 (i.e. not the start menu) then do a standard dialogue text box
|
|
|
|
|
.notStartMenu
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 0, 12
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b,$04
|
|
|
|
|
ld c,$12
|
|
|
|
|
.drawTextBoxBorder
|
2013-03-12 00:52:32 +00:00
|
|
|
|
call TextBoxBorder
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.skipDrawingTextBoxBorder
|
2015-02-09 02:40:08 +00:00
|
|
|
|
ld hl,wFontLoaded
|
2014-05-22 22:13:20 +00:00
|
|
|
|
set 0,[hl]
|
|
|
|
|
ld hl,wFlags_0xcd60
|
|
|
|
|
bit 4,[hl]
|
|
|
|
|
res 4,[hl]
|
|
|
|
|
jr nz,.skipMovingSprites
|
|
|
|
|
call UpdateSprites ; move sprites
|
|
|
|
|
.skipMovingSprites
|
|
|
|
|
; loop to copy C1X9 (direction the sprite is facing) to C2X9 for each sprite
|
|
|
|
|
; this is done because when you talk to an NPC, they turn to look your way
|
|
|
|
|
; the original direction they were facing must be restored after the dialogue is over
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl,wSpriteStateData1 + $19
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c,$0f
|
|
|
|
|
ld de,$0010
|
|
|
|
|
.spriteFacingDirectionCopyLoop
|
|
|
|
|
ld a,[hl]
|
|
|
|
|
inc h
|
|
|
|
|
ld [hl],a
|
|
|
|
|
dec h
|
|
|
|
|
add hl,de
|
|
|
|
|
dec c
|
|
|
|
|
jr nz,.spriteFacingDirectionCopyLoop
|
|
|
|
|
; loop to force all the sprites in the middle of animation to stand still
|
|
|
|
|
; (so that they don't like they're frozen mid-step during the dialogue)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl,wSpriteStateData1 + 2
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld de,$0010
|
|
|
|
|
ld c,e
|
|
|
|
|
.spriteStandStillLoop
|
|
|
|
|
ld a,[hl]
|
|
|
|
|
cp a,$ff ; is the sprite visible?
|
|
|
|
|
jr z,.nextSprite
|
|
|
|
|
; if it is visible
|
|
|
|
|
and a,$fc
|
|
|
|
|
ld [hl],a
|
|
|
|
|
.nextSprite
|
|
|
|
|
add hl,de
|
|
|
|
|
dec c
|
|
|
|
|
jr nz,.spriteStandStillLoop
|
|
|
|
|
ld b,$9c ; window background address
|
|
|
|
|
call CopyScreenTileBufferToVRAM ; transfer background in WRAM to VRAM
|
2013-03-12 00:52:32 +00:00
|
|
|
|
xor a
|
2014-09-23 22:02:03 +00:00
|
|
|
|
ld [hWY],a ; put the window on the screen
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call LoadFontTilePatterns
|
|
|
|
|
ld a,$01
|
|
|
|
|
ld [H_AUTOBGTRANSFERENABLED],a ; enable continuous WRAM to VRAM transfer each V-blank
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; function that displays the start menu
|
|
|
|
|
DrawStartMenu: ; 710b (1:710b)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a,[wd74b]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
bit 5,a ; does the player have the pokedex?
|
|
|
|
|
; menu with pokedex
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 10, 0
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b,$0e
|
|
|
|
|
ld c,$08
|
|
|
|
|
jr nz,.drawTextBoxBorder
|
|
|
|
|
; shorter menu if the player doesn't have the pokedex
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 10, 0
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b,$0c
|
|
|
|
|
ld c,$08
|
|
|
|
|
.drawTextBoxBorder
|
2013-03-12 00:52:32 +00:00
|
|
|
|
call TextBoxBorder
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a,%11001011 ; bit mask for down, up, start, B, and A buttons
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wMenuWatchedKeys],a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a,$02
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wTopMenuItemY],a ; Y position of first menu choice
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a,$0b
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wTopMenuItemX],a ; X position of first menu choice
|
|
|
|
|
ld a,[wcc2d] ; remembered menu selection from last time
|
|
|
|
|
ld [wCurrentMenuItem],a
|
|
|
|
|
ld [wLastMenuItem],a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
xor a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcc37],a
|
|
|
|
|
ld hl,wd730
|
2014-05-22 22:13:20 +00:00
|
|
|
|
set 6,[hl] ; no pauses between printing each letter
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 12, 2
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a,[wd74b]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
bit 5,a ; does the player have the pokedex?
|
|
|
|
|
; case for not having pokdex
|
|
|
|
|
ld a,$06
|
|
|
|
|
jr z,.storeMenuItemCount
|
|
|
|
|
; case for having pokedex
|
|
|
|
|
ld de,StartMenuPokedexText
|
|
|
|
|
call PrintStartMenuItem
|
|
|
|
|
ld a,$07
|
|
|
|
|
.storeMenuItemCount
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wMaxMenuItem],a ; number of menu items
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld de,StartMenuPokemonText
|
|
|
|
|
call PrintStartMenuItem
|
|
|
|
|
ld de,StartMenuItemText
|
|
|
|
|
call PrintStartMenuItem
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld de,wPlayerName ; player's name
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call PrintStartMenuItem
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a,[wd72e]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
bit 6,a ; is the player using the link feature?
|
|
|
|
|
; case for not using link feature
|
|
|
|
|
ld de,StartMenuSaveText
|
|
|
|
|
jr z,.printSaveOrResetText
|
|
|
|
|
; case for using link feature
|
|
|
|
|
ld de,StartMenuResetText
|
|
|
|
|
.printSaveOrResetText
|
|
|
|
|
call PrintStartMenuItem
|
|
|
|
|
ld de,StartMenuOptionText
|
|
|
|
|
call PrintStartMenuItem
|
|
|
|
|
ld de,StartMenuExitText
|
|
|
|
|
call PlaceString
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl,wd730
|
2014-05-22 22:13:20 +00:00
|
|
|
|
res 6,[hl] ; turn pauses between printing letters back on
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
2013-10-25 18:15:25 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
StartMenuPokedexText: ; 718f (1:718f)
|
|
|
|
|
db "POKéDEX@"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
StartMenuPokemonText: ; 7197 (1:7197)
|
|
|
|
|
db "POKéMON@"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
StartMenuItemText: ; 719f (1:719f)
|
|
|
|
|
db "ITEM@"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
StartMenuSaveText: ; 71a4 (1:71a4)
|
|
|
|
|
db "SAVE@"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
StartMenuResetText: ; 71a9 (1:71a9)
|
|
|
|
|
db "RESET@"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
StartMenuExitText: ; 71af (1:71af)
|
|
|
|
|
db "EXIT@"
|
2013-04-07 02:01:08 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
StartMenuOptionText: ; 71b4 (1:71b4)
|
2014-01-22 06:21:41 +00:00
|
|
|
|
db "OPTION@"
|
2013-04-07 02:01:08 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
PrintStartMenuItem: ; 71bb (1:71bb)
|
2013-03-12 00:52:32 +00:00
|
|
|
|
push hl
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call PlaceString
|
2013-03-12 00:52:32 +00:00
|
|
|
|
pop hl
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld de,$28
|
|
|
|
|
add hl,de
|
|
|
|
|
ret
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/overworld/cable_club_npc.asm"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; function to draw various text boxes
|
|
|
|
|
DisplayTextBoxID_: ; 72ea (1:72ea)
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld a,[wTextBoxID]
|
2015-02-07 20:27:36 +00:00
|
|
|
|
cp a,TWO_OPTION_MENU
|
2015-02-07 10:43:08 +00:00
|
|
|
|
jp z,DisplayTwoOptionMenu
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c,a
|
|
|
|
|
ld hl,TextBoxFunctionTable
|
|
|
|
|
ld de,3
|
|
|
|
|
call SearchTextBoxTable
|
|
|
|
|
jr c,.functionTableMatch
|
|
|
|
|
ld hl,TextBoxCoordTable
|
|
|
|
|
ld de,5
|
|
|
|
|
call SearchTextBoxTable
|
|
|
|
|
jr c,.coordTableMatch
|
|
|
|
|
ld hl,TextBoxTextAndCoordTable
|
|
|
|
|
ld de,9
|
|
|
|
|
call SearchTextBoxTable
|
|
|
|
|
jr c,.textAndCoordTableMatch
|
|
|
|
|
.done
|
|
|
|
|
ret
|
|
|
|
|
.functionTableMatch
|
|
|
|
|
ld a,[hli]
|
|
|
|
|
ld h,[hl]
|
|
|
|
|
ld l,a ; hl = address of function
|
|
|
|
|
ld de,.done
|
|
|
|
|
push de
|
|
|
|
|
jp [hl] ; jump to the function
|
|
|
|
|
.coordTableMatch
|
|
|
|
|
call GetTextBoxIDCoords
|
|
|
|
|
call GetAddressOfScreenCoords
|
2013-03-12 00:52:32 +00:00
|
|
|
|
call TextBoxBorder
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret
|
|
|
|
|
.textAndCoordTableMatch
|
|
|
|
|
call GetTextBoxIDCoords
|
|
|
|
|
push hl
|
|
|
|
|
call GetAddressOfScreenCoords
|
2013-03-12 00:52:32 +00:00
|
|
|
|
call TextBoxBorder
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop hl
|
|
|
|
|
call GetTextBoxIDText
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a,[wd730]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push af
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a,[wd730]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
set 6,a ; no pauses between printing each letter
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd730],a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
call PlaceString
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop af
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd730],a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call UpdateSprites ; move sprites
|
2012-02-13 00:28:29 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; function to search a table terminated with $ff for a byte matching c in increments of de
|
|
|
|
|
; sets carry flag if a match is found and clears carry flag if not
|
|
|
|
|
SearchTextBoxTable: ; 734c (1:734c)
|
|
|
|
|
dec de
|
|
|
|
|
.loop
|
|
|
|
|
ld a,[hli]
|
|
|
|
|
cp a,$ff
|
|
|
|
|
jr z,.notFound
|
2012-02-13 00:28:29 +00:00
|
|
|
|
cp c
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr z,.found
|
|
|
|
|
add hl,de
|
2012-10-02 19:20:37 +00:00
|
|
|
|
jr .loop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.found
|
|
|
|
|
scf
|
|
|
|
|
.notFound
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
; function to load coordinates from the TextBoxCoordTable or the TextBoxTextAndCoordTable
|
|
|
|
|
; INPUT:
|
|
|
|
|
; hl = address of coordinates
|
|
|
|
|
; OUTPUT:
|
|
|
|
|
; b = height
|
|
|
|
|
; c = width
|
|
|
|
|
; d = row of upper left corner
|
|
|
|
|
; e = column of upper left corner
|
|
|
|
|
GetTextBoxIDCoords: ; 735a (1:735a)
|
|
|
|
|
ld a,[hli] ; column of upper left corner
|
|
|
|
|
ld e,a
|
|
|
|
|
ld a,[hli] ; row of upper left corner
|
2012-02-13 00:28:29 +00:00
|
|
|
|
ld d,a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a,[hli] ; column of lower right corner
|
|
|
|
|
sub e
|
2012-02-13 00:28:29 +00:00
|
|
|
|
dec a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c,a ; c = width
|
|
|
|
|
ld a,[hli] ; row of lower right corner
|
|
|
|
|
sub d
|
2012-02-13 00:28:29 +00:00
|
|
|
|
dec a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b,a ; b = height
|
2012-02-13 00:28:29 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; function to load a text address and text coordinates from the TextBoxTextAndCoordTable
|
|
|
|
|
GetTextBoxIDText: ; 7367 (1:7367)
|
|
|
|
|
ld a,[hli]
|
|
|
|
|
ld e,a
|
|
|
|
|
ld a,[hli]
|
|
|
|
|
ld d,a ; de = address of text
|
|
|
|
|
push de ; save text address
|
|
|
|
|
ld a,[hli]
|
|
|
|
|
ld e,a ; column of upper left corner of text
|
|
|
|
|
ld a,[hl]
|
|
|
|
|
ld d,a ; row of upper left corner of text
|
|
|
|
|
call GetAddressOfScreenCoords
|
|
|
|
|
pop de ; restore text address
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
; function to point hl to the screen coordinates
|
|
|
|
|
; INPUT:
|
|
|
|
|
; d = row
|
|
|
|
|
; e = column
|
|
|
|
|
; OUTPUT:
|
|
|
|
|
; hl = address of upper left corner of text box
|
|
|
|
|
GetAddressOfScreenCoords: ; 7375 (1:7375)
|
2012-02-13 00:28:29 +00:00
|
|
|
|
push bc
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl,wTileMap
|
|
|
|
|
ld bc,20
|
|
|
|
|
.loop ; loop to add d rows to the base address
|
|
|
|
|
ld a,d
|
|
|
|
|
and a
|
|
|
|
|
jr z,.addedRows
|
|
|
|
|
add hl,bc
|
|
|
|
|
dec d
|
|
|
|
|
jr .loop
|
|
|
|
|
.addedRows
|
2012-02-13 00:28:29 +00:00
|
|
|
|
pop bc
|
|
|
|
|
add hl,de
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
; Format:
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; 00: text box ID
|
|
|
|
|
; 01-02: function address
|
|
|
|
|
TextBoxFunctionTable: ; 7387 (1:7387)
|
2015-02-07 20:27:36 +00:00
|
|
|
|
dbw MONEY_BOX, DisplayMoneyBox
|
|
|
|
|
dbw BUY_SELL_QUIT_MENU, DoBuySellQuitMenu
|
|
|
|
|
dbw FIELD_MOVE_MON_MENU, DisplayFieldMoveMonMenu
|
2012-02-13 00:28:29 +00:00
|
|
|
|
db $ff ; terminator
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; Format:
|
|
|
|
|
; 00: text box ID
|
|
|
|
|
; 01: column of upper left corner
|
|
|
|
|
; 02: row of upper left corner
|
|
|
|
|
; 03: column of lower right corner
|
|
|
|
|
; 04: row of lower right corner
|
|
|
|
|
TextBoxCoordTable: ; 7391 (1:7391)
|
2015-02-07 20:27:36 +00:00
|
|
|
|
db MESSAGE_BOX, 0, 12, 19, 17
|
|
|
|
|
db $03, 0, 0, 19, 14
|
|
|
|
|
db $07, 0, 0, 11, 6
|
|
|
|
|
db LIST_MENU_BOX, 4, 2, 19, 12
|
|
|
|
|
db $10, 7, 0, 19, 17
|
|
|
|
|
db MON_SPRITE_POPUP, 6, 4, 14, 13
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db $ff ; terminator
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; Format:
|
|
|
|
|
; 00: text box ID
|
|
|
|
|
; 01: column of upper left corner
|
|
|
|
|
; 02: row of upper left corner
|
|
|
|
|
; 03: column of lower right corner
|
|
|
|
|
; 04: row of lower right corner
|
|
|
|
|
; 05-06: address of text
|
|
|
|
|
; 07: column of beginning of text
|
|
|
|
|
; 08: row of beginning of text
|
|
|
|
|
; table of window positions and corresponding text [key, start column, start row, end column, end row, text pointer [2 bytes], text column, text row]
|
|
|
|
|
TextBoxTextAndCoordTable: ; 73b0 (1:73b0)
|
2015-02-07 20:27:36 +00:00
|
|
|
|
db JP_MOCHIMONO_MENU_TEMPLATE
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db 0,0,14,17 ; text box coordinates
|
|
|
|
|
dw JapaneseMochimonoText
|
|
|
|
|
db 3,0 ; text coordinates
|
2013-03-17 21:54:12 +00:00
|
|
|
|
|
2015-02-07 20:27:36 +00:00
|
|
|
|
db USE_TOSS_MENU_TEMPLATE
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db 13,10,19,14 ; text box coordinates
|
|
|
|
|
dw UseTossText
|
|
|
|
|
db 15,11 ; text coordinates
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2015-02-07 20:27:36 +00:00
|
|
|
|
db JP_SAVE_MESSAGE_MENU_TEMPLATE
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db 0,0,7,5 ; text box coordinates
|
|
|
|
|
dw JapaneseSaveMessageText
|
|
|
|
|
db 2,2 ; text coordinates
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2015-02-07 20:27:36 +00:00
|
|
|
|
db JP_SPEED_OPTIONS_MENU_TEMPLATE
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db 0,6,5,10 ; text box coordinates
|
|
|
|
|
dw JapaneseSpeedOptionsText
|
|
|
|
|
db 2,7 ; text coordinates
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2015-02-07 20:27:36 +00:00
|
|
|
|
db BATTLE_MENU_TEMPLATE
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db 8,12,19,17 ; text box coordinates
|
|
|
|
|
dw BattleMenuText
|
|
|
|
|
db 10,14 ; text coordinates
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2015-02-07 20:27:36 +00:00
|
|
|
|
db SAFARI_BATTLE_MENU_TEMPLATE
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db 0,12,19,17 ; text box coordinates
|
|
|
|
|
dw SafariZoneBattleMenuText
|
|
|
|
|
db 2,14 ; text coordinates
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2015-02-07 20:27:36 +00:00
|
|
|
|
db SWITCH_STATS_CANCEL_MENU_TEMPLATE
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db 11,11,19,17 ; text box coordinates
|
|
|
|
|
dw SwitchStatsCancelText
|
|
|
|
|
db 13,12 ; text coordinates
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2015-02-07 20:27:36 +00:00
|
|
|
|
db BUY_SELL_QUIT_MENU_TEMPLATE
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db 0,0,10,6 ; text box coordinates
|
|
|
|
|
dw BuySellQuitText
|
|
|
|
|
db 2,1 ; text coordinates
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2015-02-07 20:27:36 +00:00
|
|
|
|
db MONEY_BOX_TEMPLATE
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db 11,0,19,2 ; text box coordinates
|
|
|
|
|
dw MoneyText
|
|
|
|
|
db 13,0 ; text coordinates
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2015-02-07 20:27:36 +00:00
|
|
|
|
db JP_AH_MENU_TEMPLATE
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db 7,6,11,10 ; text box coordinates
|
|
|
|
|
dw JapaneseAhText
|
|
|
|
|
db 8,8 ; text coordinates
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2015-02-07 20:27:36 +00:00
|
|
|
|
db JP_POKEDEX_MENU_TEMPLATE
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db 11,8,19,17 ; text box coordinates
|
|
|
|
|
dw JapanesePokedexMenu
|
|
|
|
|
db 12,10 ; text coordinates
|
2013-11-26 18:32:08 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; note that there is no terminator
|
2013-11-15 06:56:54 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
BuySellQuitText: ; 7413 (1:7413)
|
|
|
|
|
db "BUY"
|
|
|
|
|
next "SELL"
|
|
|
|
|
next "QUIT@@"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
UseTossText: ; 7422 (1:7422)
|
|
|
|
|
db "USE"
|
|
|
|
|
next "TOSS@"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
JapaneseSaveMessageText: ; 742b (1:742b)
|
|
|
|
|
db "きろく"
|
|
|
|
|
next "メッセージ@"
|
2013-10-25 18:15:25 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
JapaneseSpeedOptionsText: ; 7435 (1:7435)
|
|
|
|
|
db "はやい"
|
|
|
|
|
next "おそい@"
|
2012-01-18 02:56:48 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
MoneyText: ; 743d (1:743d)
|
|
|
|
|
db "MONEY@"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
JapaneseMochimonoText: ; 7443 (1:7443)
|
|
|
|
|
db "もちもの@"
|
|
|
|
|
|
|
|
|
|
JapaneseMainMenuText: ; 7448 (1:7448)
|
|
|
|
|
db "つづきから"
|
|
|
|
|
next "さいしょから@"
|
|
|
|
|
|
|
|
|
|
BattleMenuText: ; 7455 (1:7455)
|
|
|
|
|
db "FIGHT ",$E1,$E2
|
|
|
|
|
next "ITEM RUN@"
|
|
|
|
|
|
|
|
|
|
SafariZoneBattleMenuText: ; 7468 (1:7468)
|
|
|
|
|
db "BALL× BAIT"
|
|
|
|
|
next "THROW ROCK RUN@"
|
|
|
|
|
|
|
|
|
|
SwitchStatsCancelText: ; 7489 (1:7489)
|
|
|
|
|
db "SWITCH"
|
|
|
|
|
next "STATS"
|
|
|
|
|
next "CANCEL@"
|
|
|
|
|
|
|
|
|
|
JapaneseAhText: ; 749d (1:749d)
|
|
|
|
|
db "アッ!@"
|
|
|
|
|
|
|
|
|
|
JapanesePokedexMenu: ; 74a1 (1:74a1)
|
|
|
|
|
db "データをみる"
|
|
|
|
|
next "なきごえ"
|
|
|
|
|
next "ぶんぷをみる"
|
|
|
|
|
next "キャンセル@"
|
|
|
|
|
|
2015-02-07 20:27:36 +00:00
|
|
|
|
DisplayMoneyBox: ; 74ba (1:74ba)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd730
|
2013-03-12 00:52:32 +00:00
|
|
|
|
set 6, [hl]
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld a, MONEY_BOX_TEMPLATE
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld [wTextBoxID], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call DisplayTextBoxID
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 13, 1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, $1
|
|
|
|
|
ld c, $6
|
|
|
|
|
call ClearScreenArea
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 12, 1
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld de, wPlayerMoney
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, $a3
|
|
|
|
|
call PrintBCDNumber
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd730
|
2014-05-22 22:13:20 +00:00
|
|
|
|
res 6, [hl]
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
CurrencyString: ; 74e2 (1:74e2)
|
|
|
|
|
db " ¥@"
|
|
|
|
|
|
2015-02-07 20:27:36 +00:00
|
|
|
|
DoBuySellQuitMenu: ; 74ea (1:74ea)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wd730]
|
2015-02-07 10:43:08 +00:00
|
|
|
|
set 6, a ; no printing delay
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd730], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
xor a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd12d], a
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld a, BUY_SELL_QUIT_MENU_TEMPLATE
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld [wTextBoxID], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call DisplayTextBoxID
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld a, A_BUTTON | B_BUTTON
|
|
|
|
|
ld [wMenuWatchedKeys], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $2
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld [wMaxMenuItem], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $1
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld [wTopMenuItemY], a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, $1
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld [wTopMenuItemX], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
xor a
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld [wCurrentMenuItem], a
|
|
|
|
|
ld [wLastMenuItem], a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcc37], a
|
|
|
|
|
ld a, [wd730]
|
2015-02-07 10:43:08 +00:00
|
|
|
|
res 6, a ; turn on the printing delay
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd730], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call HandleMenuInput
|
|
|
|
|
call PlaceUnfilledArrowMenuCursor
|
2015-02-07 20:27:36 +00:00
|
|
|
|
bit 0, a ; was A pressed?
|
|
|
|
|
jr nz, .pressedA
|
|
|
|
|
bit 1, a ; was B pressed? (always true since only A/B are watched)
|
|
|
|
|
jr z, .pressedA
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $2
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd12e], a
|
2015-02-07 20:27:36 +00:00
|
|
|
|
jr .quit
|
|
|
|
|
.pressedA
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $1
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd12e], a
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld a, [wCurrentMenuItem]
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd12d], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, a
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld a, [wMaxMenuItem]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp b
|
2015-02-07 20:27:36 +00:00
|
|
|
|
jr z, .quit
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret
|
2015-02-07 20:27:36 +00:00
|
|
|
|
.quit
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $2
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd12e], a
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld a, [wCurrentMenuItem]
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd12d], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
scf
|
|
|
|
|
ret
|
|
|
|
|
|
2015-02-07 10:43:08 +00:00
|
|
|
|
; displays a menu with two options to choose from
|
|
|
|
|
; b = Y of upper left corner of text region
|
|
|
|
|
; c = X of upper left corner of text region
|
|
|
|
|
; hl = address where the text box border should be drawn
|
|
|
|
|
DisplayTwoOptionMenu: ; 7559 (1:7559)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wd730]
|
2015-02-07 10:43:08 +00:00
|
|
|
|
set 6, a ; no printing delay
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd730], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
xor a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd12d], a
|
|
|
|
|
ld [wd12e], a
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld a, A_BUTTON | B_BUTTON
|
|
|
|
|
ld [wMenuWatchedKeys], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $1
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld [wMaxMenuItem], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, b
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld [wTopMenuItemY], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, c
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld [wTopMenuItemX], a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
xor a
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld [wLastMenuItem], a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcc37], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld hl, wTwoOptionMenuID
|
|
|
|
|
bit 7, [hl] ; select second menu item by default?
|
2014-05-22 22:13:20 +00:00
|
|
|
|
res 7, [hl]
|
2015-02-07 10:43:08 +00:00
|
|
|
|
jr z, .storeCurrentMenuItem
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc a
|
2015-02-07 10:43:08 +00:00
|
|
|
|
.storeCurrentMenuItem
|
|
|
|
|
ld [wCurrentMenuItem], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop hl
|
|
|
|
|
push hl
|
|
|
|
|
push hl
|
2015-02-07 10:43:08 +00:00
|
|
|
|
call TwoOptionMenu_SaveScreenTiles
|
|
|
|
|
ld a, [wTwoOptionMenuID]
|
|
|
|
|
ld hl, TwoOptionMenuStrings
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld e, a
|
|
|
|
|
ld d, $0
|
|
|
|
|
ld a, $5
|
2015-02-07 10:43:08 +00:00
|
|
|
|
.menuStringLoop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, de
|
|
|
|
|
dec a
|
2015-02-07 10:43:08 +00:00
|
|
|
|
jr nz, .menuStringLoop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld c, a
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld b, a
|
|
|
|
|
ld e, l
|
|
|
|
|
ld d, h
|
|
|
|
|
pop hl
|
|
|
|
|
push de
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld a, [wTwoOptionMenuID]
|
|
|
|
|
cp TRADE_CANCEL_MENU
|
|
|
|
|
jr nz, .notTradeCancelMenu
|
|
|
|
|
call CableClub_TextBoxBorder
|
|
|
|
|
jr .afterTextBoxBorder
|
|
|
|
|
.notTradeCancelMenu
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call TextBoxBorder
|
2015-02-07 10:43:08 +00:00
|
|
|
|
.afterTextBoxBorder
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call UpdateSprites
|
|
|
|
|
pop hl
|
|
|
|
|
ld a, [hli]
|
2015-02-07 10:43:08 +00:00
|
|
|
|
and a ; put blank line before first menu item?
|
|
|
|
|
ld bc, 20 + 2
|
|
|
|
|
jr z, .noBlankLine
|
|
|
|
|
ld bc, 2 * 20 + 2
|
|
|
|
|
.noBlankLine
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld e, a
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld d, a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop hl
|
|
|
|
|
add hl, bc
|
|
|
|
|
call PlaceString
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd730
|
2015-02-07 10:43:08 +00:00
|
|
|
|
res 6, [hl] ; turn on the printing delay
|
|
|
|
|
ld a, [wTwoOptionMenuID]
|
|
|
|
|
cp NO_YES_MENU
|
|
|
|
|
jr nz, .notNoYesMenu
|
|
|
|
|
; No/Yes menu
|
|
|
|
|
; this menu type ignores the B button
|
|
|
|
|
; it only seems to be used when confirming the deletion of a save file
|
2014-05-22 22:13:20 +00:00
|
|
|
|
xor a
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld [wTwoOptionMenuID], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [wFlags_0xcd60]
|
|
|
|
|
push af
|
2013-03-12 00:52:32 +00:00
|
|
|
|
push hl
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, wFlags_0xcd60
|
|
|
|
|
bit 5, [hl]
|
2015-02-07 10:43:08 +00:00
|
|
|
|
set 5, [hl] ; don't play sound when A or B is pressed in menu
|
2013-03-12 00:52:32 +00:00
|
|
|
|
pop hl
|
2015-02-07 10:43:08 +00:00
|
|
|
|
.noYesMenuInputLoop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call HandleMenuInput
|
2015-02-07 10:43:08 +00:00
|
|
|
|
bit 1, a ; A button pressed?
|
|
|
|
|
jr nz, .noYesMenuInputLoop ; try again if A was not pressed
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop af
|
|
|
|
|
pop hl
|
|
|
|
|
ld [wFlags_0xcd60], a
|
2014-04-07 20:16:45 +00:00
|
|
|
|
ld a, (SFX_02_40 - SFX_Headers_02) / 3
|
2013-03-17 21:54:12 +00:00
|
|
|
|
call PlaySound
|
2015-02-07 10:43:08 +00:00
|
|
|
|
jr .pressedAButton
|
|
|
|
|
.notNoYesMenu
|
2014-05-22 22:13:20 +00:00
|
|
|
|
xor a
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld [wTwoOptionMenuID], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call HandleMenuInput
|
|
|
|
|
pop hl
|
2015-02-07 10:43:08 +00:00
|
|
|
|
bit 1, a ; A button pressed?
|
|
|
|
|
jr nz, .choseSecondMenuItem ; automatically choose the second option if B is pressed
|
|
|
|
|
.pressedAButton
|
|
|
|
|
ld a, [wCurrentMenuItem]
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd12d], a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
and a
|
2015-02-07 10:43:08 +00:00
|
|
|
|
jr nz, .choseSecondMenuItem
|
|
|
|
|
; chose first menu item
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, $1
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd12e], a
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld c, 15
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call DelayFrames
|
2015-02-07 10:43:08 +00:00
|
|
|
|
call TwoOptionMenu_RestoreScreenTiles
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and a
|
|
|
|
|
ret
|
2015-02-07 10:43:08 +00:00
|
|
|
|
.choseSecondMenuItem
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, $1
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld [wCurrentMenuItem], a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd12d], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $2
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd12e], a
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld c, 15
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call DelayFrames
|
2015-02-07 10:43:08 +00:00
|
|
|
|
call TwoOptionMenu_RestoreScreenTiles
|
2014-05-22 22:13:20 +00:00
|
|
|
|
scf
|
|
|
|
|
ret
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2015-02-07 10:43:08 +00:00
|
|
|
|
; Some of the wider/taller two option menus will not have the screen areas
|
|
|
|
|
; they cover be fully saved/restored by the two functions below.
|
|
|
|
|
; The bottom and right edges of the menu may remain after the function returns.
|
|
|
|
|
|
|
|
|
|
TwoOptionMenu_SaveScreenTiles: ; 763e (1:763e)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld de, wHPBarMaxHP
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld bc, $506
|
|
|
|
|
.asm_7644
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld [de], a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc de
|
|
|
|
|
dec c
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .asm_7644
|
|
|
|
|
push bc
|
2015-02-07 10:43:08 +00:00
|
|
|
|
ld bc, 14
|
2013-03-12 00:52:32 +00:00
|
|
|
|
add hl, bc
|
|
|
|
|
pop bc
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, $6
|
2013-03-12 00:52:32 +00:00
|
|
|
|
dec b
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .asm_7644
|
|
|
|
|
ret
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2015-02-07 10:43:08 +00:00
|
|
|
|
TwoOptionMenu_RestoreScreenTiles: ; 7656 (1:7656)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld de, wHPBarMaxHP
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld bc, $506
|
|
|
|
|
.asm_765c
|
|
|
|
|
ld a, [de]
|
|
|
|
|
inc de
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld [hli], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec c
|
|
|
|
|
jr nz, .asm_765c
|
|
|
|
|
push bc
|
|
|
|
|
ld bc, $e
|
2013-03-12 00:52:32 +00:00
|
|
|
|
add hl, bc
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop bc
|
|
|
|
|
ld c, $6
|
|
|
|
|
dec b
|
|
|
|
|
jr nz, .asm_765c
|
|
|
|
|
call UpdateSprites
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2015-02-07 10:43:08 +00:00
|
|
|
|
; Format:
|
|
|
|
|
; 00: byte width
|
|
|
|
|
; 01: byte height
|
|
|
|
|
; 02: byte put blank line before first menu item
|
|
|
|
|
; 03: word text pointer
|
|
|
|
|
TwoOptionMenuStrings: ; 7671 (1:7671)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db 4,3,0
|
|
|
|
|
dw .YesNoMenu
|
|
|
|
|
db 6,3,0
|
|
|
|
|
dw .NorthWestMenu
|
|
|
|
|
db 6,3,0
|
|
|
|
|
dw .SouthEastMenu
|
|
|
|
|
db 6,3,0
|
|
|
|
|
dw .YesNoMenu
|
|
|
|
|
db 6,3,0
|
|
|
|
|
dw .NorthEastMenu
|
|
|
|
|
db 7,3,0
|
|
|
|
|
dw .TradeCancelMenu
|
|
|
|
|
db 7,4,1
|
|
|
|
|
dw .HealCancelMenu
|
|
|
|
|
db 4,3,0
|
|
|
|
|
dw .NoYesMenu
|
2013-04-07 02:01:08 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.NoYesMenu ; 7699 (1:3699)
|
|
|
|
|
db "NO",$4E,"YES@"
|
|
|
|
|
.YesNoMenu ; 76a0 (1:36a0)
|
|
|
|
|
db "YES",$4E,"NO@"
|
|
|
|
|
.NorthWestMenu ; 76a7 (1:36a7)
|
|
|
|
|
db "NORTH",$4E,"WEST@"
|
|
|
|
|
.SouthEastMenu ; 76b2 (1:36b2)
|
|
|
|
|
db "SOUTH",$4E,"EAST@"
|
|
|
|
|
.NorthEastMenu ; 76bd (1:36bd)
|
|
|
|
|
db "NORTH",$4E,"EAST@"
|
|
|
|
|
.TradeCancelMenu ; 76c8 (1:36c8)
|
|
|
|
|
db "TRADE",$4E,"CANCEL@"
|
|
|
|
|
.HealCancelMenu ; 76d5 (1:36d5)
|
|
|
|
|
db "HEAL",$4E,"CANCEL@"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2015-02-07 20:27:36 +00:00
|
|
|
|
DisplayFieldMoveMonMenu: ; 76e1 (1:36e1)
|
2013-03-12 00:52:32 +00:00
|
|
|
|
xor a
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld hl, wWhichTrade
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [hli], a
|
|
|
|
|
ld [hli], a
|
|
|
|
|
ld [hli], a
|
|
|
|
|
ld [hli], a
|
|
|
|
|
ld [hli], a
|
|
|
|
|
ld [hl], $c
|
|
|
|
|
call GetMonFieldMoves
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wTrainerScreenX]
|
2013-03-12 00:52:32 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .asm_770f
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 11, 11
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, $5
|
|
|
|
|
ld c, $7
|
|
|
|
|
call TextBoxBorder
|
|
|
|
|
call UpdateSprites
|
|
|
|
|
ld a, $c
|
|
|
|
|
ld [$fff7], a
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 13, 12
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld de, PokemonMenuEntries
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jp PlaceString
|
|
|
|
|
.asm_770f
|
|
|
|
|
push af
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 0, 11
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcd42]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec a
|
|
|
|
|
ld e, a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld d, $0
|
|
|
|
|
add hl, de
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, $5
|
|
|
|
|
ld a, $12
|
|
|
|
|
sub e
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld c, a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop af
|
|
|
|
|
ld de, $ffd8
|
|
|
|
|
.asm_7725
|
|
|
|
|
add hl, de
|
|
|
|
|
inc b
|
|
|
|
|
inc b
|
2013-03-12 00:52:32 +00:00
|
|
|
|
dec a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .asm_7725
|
|
|
|
|
ld de, $ffec
|
|
|
|
|
add hl, de
|
|
|
|
|
inc b
|
2013-03-12 00:52:32 +00:00
|
|
|
|
call TextBoxBorder
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call UpdateSprites
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 0, 12
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcd42]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc a
|
|
|
|
|
ld e, a
|
|
|
|
|
ld d, $0
|
|
|
|
|
add hl, de
|
|
|
|
|
ld de, $ffd8
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wTrainerScreenX]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_7747
|
|
|
|
|
add hl, de
|
|
|
|
|
dec a
|
|
|
|
|
jr nz, .asm_7747
|
|
|
|
|
xor a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wTrainerScreenX], a
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld de, wWhichTrade
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_7752
|
|
|
|
|
push hl
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld hl, FieldMoveNames
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [de]
|
|
|
|
|
and a
|
|
|
|
|
jr z, .asm_7776
|
|
|
|
|
inc de
|
|
|
|
|
ld b, a
|
|
|
|
|
.asm_775c
|
|
|
|
|
dec b
|
|
|
|
|
jr z, .asm_7766
|
|
|
|
|
.asm_775f
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
cp $50
|
|
|
|
|
jr nz, .asm_775f
|
|
|
|
|
jr .asm_775c
|
|
|
|
|
.asm_7766
|
|
|
|
|
ld b, h
|
|
|
|
|
ld c, l
|
|
|
|
|
pop hl
|
|
|
|
|
push de
|
|
|
|
|
ld d, b
|
|
|
|
|
ld e, c
|
2013-03-12 00:52:32 +00:00
|
|
|
|
call PlaceString
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld bc, $28
|
|
|
|
|
add hl, bc
|
2013-03-12 00:52:32 +00:00
|
|
|
|
pop de
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr .asm_7752
|
|
|
|
|
.asm_7776
|
|
|
|
|
pop hl
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcd42]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [$fff7], a
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 0, 12
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcd42]
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld e, a
|
|
|
|
|
ld d, $0
|
|
|
|
|
add hl, de
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld de, PokemonMenuEntries
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jp PlaceString
|
2012-01-15 07:47:47 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
FieldMoveNames: ; 778d (1:778d)
|
|
|
|
|
db "CUT@"
|
|
|
|
|
db "FLY@"
|
|
|
|
|
db "@"
|
|
|
|
|
db "SURF@"
|
|
|
|
|
db "STRENGTH@"
|
|
|
|
|
db "FLASH@"
|
|
|
|
|
db "DIG@"
|
|
|
|
|
db "TELEPORT@"
|
|
|
|
|
db "SOFTBOILED@"
|
2014-01-22 06:21:41 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
PokemonMenuEntries: ; 77c2 (1:77c2)
|
|
|
|
|
db "STATS"
|
|
|
|
|
next "SWITCH"
|
|
|
|
|
next "CANCEL@"
|
2012-01-15 07:47:47 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
GetMonFieldMoves: ; 77d6 (1:77d6)
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld a, [wWhichPokemon]
|
|
|
|
|
ld hl, wPartyMon1Moves
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld bc, $2c
|
|
|
|
|
call AddNTimes
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld d, h
|
|
|
|
|
ld e, l
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, $5
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld hl, wWhichTrade
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_77e9
|
|
|
|
|
push hl
|
|
|
|
|
.asm_77ea
|
|
|
|
|
dec c
|
|
|
|
|
jr z, .asm_7821
|
|
|
|
|
ld a, [de] ; de is RAM address of move
|
|
|
|
|
and a
|
|
|
|
|
jr z, .asm_7821
|
|
|
|
|
ld b, a
|
|
|
|
|
inc de ; go to next move
|
2015-02-07 20:27:36 +00:00
|
|
|
|
ld hl, FieldMoveDisplayData
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_77f6
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, [hli]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp $ff
|
|
|
|
|
jr z, .asm_77ea
|
|
|
|
|
cp b
|
|
|
|
|
jr z, .asm_7802
|
|
|
|
|
inc hl
|
|
|
|
|
inc hl
|
|
|
|
|
jr .asm_77f6
|
|
|
|
|
.asm_7802
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, b
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcd43], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld b, [hl]
|
|
|
|
|
pop hl
|
|
|
|
|
ld [hli], a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wTrainerScreenX]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wTrainerScreenX], a
|
|
|
|
|
ld a, [wcd42]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp b
|
|
|
|
|
jr c, .asm_781b
|
|
|
|
|
ld a, b
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcd42], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_781b
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcd43]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, a
|
|
|
|
|
jr .asm_77e9
|
|
|
|
|
.asm_7821
|
|
|
|
|
pop hl
|
|
|
|
|
ret
|
2012-01-15 07:47:47 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; Format: [Move id], [list priority], [leftmost tile]
|
|
|
|
|
; Move id = id of move
|
|
|
|
|
; List priority = lower number means higher priority when field moves are displayed
|
|
|
|
|
; these priorities must be unique
|
|
|
|
|
; Leftmost tile = -1 + tile column in which the first letter of the move's name should be displayed
|
|
|
|
|
; "SOFTBOILED" is $08 because it has 4 more letters than "SURF", for example, whose value is $0C
|
|
|
|
|
FieldMoveDisplayData: ; 7823 (1:7823)
|
|
|
|
|
db CUT, $01, $0C
|
|
|
|
|
db FLY, $02, $0C
|
|
|
|
|
db $B4, $03, $0C ; unused field move
|
|
|
|
|
db SURF, $04, $0C
|
|
|
|
|
db STRENGTH, $05, $0A
|
|
|
|
|
db FLASH, $06, $0C
|
|
|
|
|
db DIG, $07, $0C
|
|
|
|
|
db TELEPORT, $08, $0A
|
|
|
|
|
db SOFTBOILED, $09, $08
|
|
|
|
|
db $ff ; list terminator
|
2013-04-07 02:01:08 +00:00
|
|
|
|
|
2012-02-06 03:10:12 +00:00
|
|
|
|
|
2015-04-01 09:23:27 +00:00
|
|
|
|
INCLUDE "engine/battle/moveEffects/drain_hp_effect.asm"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
INCLUDE "engine/menu/players_pc.asm"
|
|
|
|
|
|
|
|
|
|
_RemovePokemon: ; 7b68 (1:7b68)
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyCount ; wPartyCount
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and a
|
|
|
|
|
jr z, .asm_7b74
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, W_NUMINBOX ; wda80
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_7b74
|
|
|
|
|
ld a, [hl]
|
2012-02-06 03:10:12 +00:00
|
|
|
|
dec a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [hli], a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wWhichPokemon] ; wWhichPokemon
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, a
|
|
|
|
|
ld b, $0
|
|
|
|
|
add hl, bc
|
|
|
|
|
ld e, l
|
|
|
|
|
ld d, h
|
2012-02-06 03:10:12 +00:00
|
|
|
|
inc de
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_7b81
|
|
|
|
|
ld a, [de]
|
2012-02-06 03:10:12 +00:00
|
|
|
|
inc de
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [hli], a
|
2012-02-06 03:10:12 +00:00
|
|
|
|
inc a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .asm_7b81
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMonOT ; wd273
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld d, $5
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2012-02-06 03:10:12 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr z, .asm_7b97
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wBoxMonOT
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld d, $13
|
|
|
|
|
.asm_7b97
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wWhichPokemon] ; wWhichPokemon
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call SkipFixedLengthTextEntries
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wWhichPokemon] ; wWhichPokemon
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp d
|
|
|
|
|
jr nz, .asm_7ba6
|
|
|
|
|
ld [hl], $ff
|
|
|
|
|
ret
|
|
|
|
|
.asm_7ba6
|
|
|
|
|
ld d, h
|
|
|
|
|
ld e, l
|
|
|
|
|
ld bc, $b
|
|
|
|
|
add hl, bc
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld bc, wPartyMonNicks ; wPartyMonNicks
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2012-02-06 03:10:12 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr z, .asm_7bb8
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld bc, wBoxMonNicks
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_7bb8
|
|
|
|
|
call CopyDataUntil
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMons
|
|
|
|
|
ld bc, wPartyMon2 - wPartyMon1
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2012-02-06 03:10:12 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr z, .asm_7bcd
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wBoxMons
|
|
|
|
|
ld bc, wBoxMon2 - wBoxMon1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_7bcd
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wWhichPokemon] ; wWhichPokemon
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call AddNTimes
|
|
|
|
|
ld d, h
|
|
|
|
|
ld e, l
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2012-02-06 03:10:12 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr z, .asm_7be4
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld bc, wBoxMon2 - wBoxMon1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, bc
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld bc, wBoxMonOT
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr .asm_7beb
|
|
|
|
|
.asm_7be4
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld bc, wPartyMon2 - wPartyMon1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, bc
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld bc, wPartyMonOT ; wd273
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_7beb
|
|
|
|
|
call CopyDataUntil
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMonNicks ; wPartyMonNicks
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and a
|
|
|
|
|
jr z, .asm_7bfa
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wBoxMonNicks
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_7bfa
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld bc, $b
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wWhichPokemon] ; wWhichPokemon
|
2013-03-12 00:52:32 +00:00
|
|
|
|
call AddNTimes
|
|
|
|
|
ld d, h
|
|
|
|
|
ld e, l
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld bc, $b
|
2013-03-12 00:52:32 +00:00
|
|
|
|
add hl, bc
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld bc, wPokedexOwned ; wPokedexOwned
|
|
|
|
|
ld a, [wcf95]
|
2013-03-12 00:52:32 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr z, .asm_7c15
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld bc, wBoxMonNicksEnd
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_7c15
|
|
|
|
|
jp CopyDataUntil
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
Func_7c18: ; 7c18 (1:7c18)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd730
|
2014-05-22 22:13:20 +00:00
|
|
|
|
set 6, [hl]
|
2014-06-16 20:57:26 +00:00
|
|
|
|
predef ShowPokedexData
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd730
|
2014-05-22 22:13:20 +00:00
|
|
|
|
res 6, [hl]
|
|
|
|
|
call ReloadMapData
|
|
|
|
|
ld c, $a
|
|
|
|
|
call DelayFrames
|
2014-06-16 20:57:26 +00:00
|
|
|
|
predef IndexToPokedex
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wd11e]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec a
|
|
|
|
|
ld c, a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld b, $1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, wPokedexSeen
|
2014-06-16 20:57:26 +00:00
|
|
|
|
predef FlagActionPredef
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $1
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
SECTION "bank3",ROMX,BANK[$3]
|
|
|
|
|
|
2014-05-31 08:31:08 +00:00
|
|
|
|
INCLUDE "engine/joypad.asm"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/map_songs.asm"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/map_header_banks.asm"
|
2012-01-18 02:56:48 +00:00
|
|
|
|
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ClearVariablesAfterLoadingMapData: ; c335 (3:4335)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $90
|
2014-09-23 22:02:03 +00:00
|
|
|
|
ld [hWY], a
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld [rWY], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
xor a
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld [H_AUTOBGTRANSFERENABLED], a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [wStepCounter], a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [W_LONEATTACKNO], a ; W_GYMLEADERNO
|
2014-05-25 17:51:53 +00:00
|
|
|
|
ld [hJoyPressed], a
|
|
|
|
|
ld [hJoyReleased], a
|
|
|
|
|
ld [hJoyHeld], a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcd6a], a
|
|
|
|
|
ld [wd5a3], a
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld hl, wCardKeyDoorY
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [hli], a
|
|
|
|
|
ld [hl], a
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld hl, wWhichTrade
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld bc, $1e
|
|
|
|
|
call FillMemory
|
2012-01-24 00:45:02 +00:00
|
|
|
|
ret
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
; only used for setting bit 2 of wd736 upon entering a new map
|
|
|
|
|
IsPlayerStandingOnWarp: ; c35f (3:435f)
|
|
|
|
|
ld a, [wNumberOfWarps]
|
2012-01-24 00:45:02 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret z
|
2012-01-24 00:45:02 +00:00
|
|
|
|
ld c, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld hl, wWarpEntries
|
|
|
|
|
.loop
|
|
|
|
|
ld a, [W_YCOORD]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp [hl]
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .nextWarp1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc hl
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [W_XCOORD]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp [hl]
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .nextWarp2
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc hl
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [hli] ; target warp
|
|
|
|
|
ld [wDestinationWarpID], a
|
|
|
|
|
ld a, [hl] ; target map
|
|
|
|
|
ld [$ff8b], a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd736
|
2014-09-13 07:50:56 +00:00
|
|
|
|
set 2, [hl] ; standing on warp flag
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.nextWarp1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc hl
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.nextWarp2
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc hl
|
|
|
|
|
inc hl
|
|
|
|
|
inc hl
|
|
|
|
|
dec c
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .loop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
CheckForceBikeOrSurf: ; c38b (3:438b)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd732
|
2014-05-22 22:13:20 +00:00
|
|
|
|
bit 5, [hl]
|
|
|
|
|
ret nz
|
|
|
|
|
ld hl, ForcedBikeOrSurfMaps
|
|
|
|
|
ld a, [W_YCOORD]
|
|
|
|
|
ld b, a
|
|
|
|
|
ld a, [W_XCOORD]
|
|
|
|
|
ld c, a
|
|
|
|
|
ld a, [W_CURMAP]
|
|
|
|
|
ld d, a
|
|
|
|
|
.loop
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
cp $ff
|
|
|
|
|
ret z ;if we reach FF then it's not part of the list
|
|
|
|
|
cp d ;compare to current map
|
|
|
|
|
jr nz, .incorrectMap
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
cp b ;compare y-coord
|
|
|
|
|
jr nz, .incorrectY
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
cp c ;compare x-coord
|
|
|
|
|
jr nz, .loop ; incorrect x-coord, check next item
|
|
|
|
|
ld a, [W_CURMAP]
|
|
|
|
|
cp SEAFOAM_ISLANDS_4
|
|
|
|
|
ld a, $2
|
|
|
|
|
ld [W_SEAFOAMISLANDS4CURSCRIPT], a
|
|
|
|
|
jr z, .forceSurfing
|
|
|
|
|
ld a, [W_CURMAP]
|
|
|
|
|
cp SEAFOAM_ISLANDS_5
|
|
|
|
|
ld a, $2
|
|
|
|
|
ld [W_SEAFOAMISLANDS5CURSCRIPT], a
|
|
|
|
|
jr z, .forceSurfing
|
|
|
|
|
;force bike riding
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd732
|
2014-05-22 22:13:20 +00:00
|
|
|
|
set 5, [hl]
|
|
|
|
|
ld a, $1
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [wWalkBikeSurfState], a
|
|
|
|
|
ld [wWalkBikeSurfStateCopy], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jp ForceBikeOrSurf
|
|
|
|
|
.incorrectMap
|
|
|
|
|
inc hl
|
|
|
|
|
.incorrectY
|
|
|
|
|
inc hl
|
|
|
|
|
jr .loop
|
|
|
|
|
.forceSurfing
|
|
|
|
|
ld a, $2
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [wWalkBikeSurfState], a
|
|
|
|
|
ld [wWalkBikeSurfStateCopy], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jp ForceBikeOrSurf
|
2012-01-18 02:56:48 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/force_bike_surf.asm"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
IsPlayerFacingEdgeOfMap: ; c3ff (3:43ff)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
|
|
|
|
push de
|
|
|
|
|
push bc
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [wSpriteStateData1 + 9] ; player sprite's facing direction
|
2014-05-22 22:13:20 +00:00
|
|
|
|
srl a
|
|
|
|
|
ld c, a
|
|
|
|
|
ld b, $0
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld hl, .functionPointerTable
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, bc
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld h, [hl]
|
|
|
|
|
ld l, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [W_YCOORD]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [W_XCOORD]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld de, .asm_c41e
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push de
|
|
|
|
|
jp [hl]
|
|
|
|
|
.asm_c41e
|
|
|
|
|
pop bc
|
|
|
|
|
pop de
|
|
|
|
|
pop hl
|
|
|
|
|
ret
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.functionPointerTable
|
|
|
|
|
dw .facingDown
|
|
|
|
|
dw .facingUp
|
|
|
|
|
dw .facingLeft
|
|
|
|
|
dw .facingRight
|
2012-01-18 02:56:48 +00:00
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.facingDown
|
|
|
|
|
ld a, [W_CURMAPHEIGHT]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add a
|
|
|
|
|
dec a
|
|
|
|
|
cp b
|
|
|
|
|
jr z, .setCarry
|
|
|
|
|
jr .resetCarry
|
2012-01-18 02:56:48 +00:00
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.facingUp
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, b
|
|
|
|
|
and a
|
|
|
|
|
jr z, .setCarry
|
|
|
|
|
jr .resetCarry
|
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.facingLeft
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, c
|
|
|
|
|
and a
|
|
|
|
|
jr z, .setCarry
|
|
|
|
|
jr .resetCarry
|
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.facingRight
|
|
|
|
|
ld a, [W_CURMAPWIDTH]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add a
|
|
|
|
|
dec a
|
|
|
|
|
cp c
|
|
|
|
|
jr z, .setCarry
|
|
|
|
|
jr .resetCarry
|
|
|
|
|
.resetCarry
|
|
|
|
|
and a
|
|
|
|
|
ret
|
|
|
|
|
.setCarry
|
|
|
|
|
scf
|
|
|
|
|
ret
|
2014-04-27 06:44:29 +00:00
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
IsWarpTileInFrontOfPlayer: ; c44e (3:444e)
|
2012-01-24 00:45:02 +00:00
|
|
|
|
push hl
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push de
|
|
|
|
|
push bc
|
2014-09-13 07:50:56 +00:00
|
|
|
|
call _GetTileAndCoordsInFrontOfPlayer
|
|
|
|
|
ld a, [W_CURMAP]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp SS_ANNE_5
|
|
|
|
|
jr z, .ssAnne5
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [wSpriteStateData1 + 9] ; player sprite's facing direction
|
2014-05-22 22:13:20 +00:00
|
|
|
|
srl a
|
|
|
|
|
ld c, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld b, 0
|
|
|
|
|
ld hl, .warpTileListPointers
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, bc
|
2012-01-24 00:45:02 +00:00
|
|
|
|
ld a, [hli]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld h, [hl]
|
|
|
|
|
ld l, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [wTileInFrontOfPlayer]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld de, $1
|
|
|
|
|
call IsInArray
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.done
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop bc
|
|
|
|
|
pop de
|
2012-01-24 00:45:02 +00:00
|
|
|
|
pop hl
|
|
|
|
|
ret
|
2012-01-18 02:56:48 +00:00
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.warpTileListPointers: ; c477 (3:4477)
|
|
|
|
|
dw .facingDownWarpTiles
|
|
|
|
|
dw .facingUpWarpTiles
|
|
|
|
|
dw .facingLeftWarpTiles
|
|
|
|
|
dw .facingRightWarpTiles
|
2012-01-23 17:41:39 +00:00
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.facingDownWarpTiles
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db $01,$12,$17,$3D,$04,$18,$33,$FF
|
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.facingUpWarpTiles
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db $01,$5C,$FF
|
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.facingLeftWarpTiles
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db $1A,$4B,$FF
|
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.facingRightWarpTiles
|
2014-05-22 22:13:20 +00:00
|
|
|
|
db $0F,$4E,$FF
|
|
|
|
|
|
|
|
|
|
.ssAnne5
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [wTileInFrontOfPlayer]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp $15
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .notSSAnne5Warp
|
2014-05-22 22:13:20 +00:00
|
|
|
|
scf
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .done
|
|
|
|
|
.notSSAnne5Warp
|
2012-01-23 17:41:39 +00:00
|
|
|
|
and a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .done
|
2012-01-23 03:08:37 +00:00
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
IsPlayerStandingOnDoorTileOrWarpTile: ; c49d (3:449d)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
|
|
|
|
push de
|
|
|
|
|
push bc
|
2014-09-13 07:50:56 +00:00
|
|
|
|
callba IsPlayerStandingOnDoorTile
|
|
|
|
|
jr c, .done
|
|
|
|
|
ld a, [W_CURMAPTILESET]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add a
|
|
|
|
|
ld c, a
|
|
|
|
|
ld b, $0
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld hl, WarpTileIDPointers
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, bc
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld h, [hl]
|
|
|
|
|
ld l, a
|
|
|
|
|
ld de, $1
|
2014-06-25 20:58:27 +00:00
|
|
|
|
aCoord 8, 9
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call IsInArray
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nc, .done
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd736
|
2014-05-22 22:13:20 +00:00
|
|
|
|
res 2, [hl]
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.done
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop bc
|
|
|
|
|
pop de
|
|
|
|
|
pop hl
|
2012-01-23 03:08:37 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/warp_tile_ids.asm"
|
2012-01-23 03:08:37 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
PrintSafariZoneSteps: ; c52f (3:452f)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [W_CURMAP] ; W_CURMAP
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp SAFARI_ZONE_EAST
|
|
|
|
|
ret c
|
|
|
|
|
cp UNKNOWN_DUNGEON_2
|
|
|
|
|
ret nc
|
|
|
|
|
ld hl, wTileMap
|
|
|
|
|
ld b, $3
|
|
|
|
|
ld c, $7
|
|
|
|
|
call TextBoxBorder
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 1, 1
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld de, wSafariSteps ; wd70d
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld bc, $203
|
|
|
|
|
call PrintNumber
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 4, 1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld de, SafariSteps ; $4579
|
|
|
|
|
call PlaceString
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 1, 3
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld de, SafariBallText
|
|
|
|
|
call PlaceString
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [W_NUMSAFARIBALLS] ; W_NUMSAFARIBALLS
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp $a
|
|
|
|
|
jr nc, .asm_c56d
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 5, 3
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $7f
|
|
|
|
|
ld [hl], a
|
|
|
|
|
.asm_c56d
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 6, 3
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld de, W_NUMSAFARIBALLS ; W_NUMSAFARIBALLS
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld bc, $102
|
|
|
|
|
jp PrintNumber
|
2012-01-23 03:08:37 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SafariSteps: ; c579 (3:4579)
|
|
|
|
|
db "/500@"
|
2012-01-23 03:08:37 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SafariBallText: ; c57e (3:457e)
|
|
|
|
|
db "BALL×× @"
|
2012-01-23 03:08:37 +00:00
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
GetTileAndCoordsInFrontOfPlayer: ; c586 (3:4586)
|
2014-05-23 22:11:09 +00:00
|
|
|
|
call GetPredefRegisters
|
2012-01-23 03:08:37 +00:00
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
_GetTileAndCoordsInFrontOfPlayer: ; c589 (3:4589)
|
|
|
|
|
ld a, [W_YCOORD]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld d, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [W_XCOORD]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld e, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [wSpriteStateData1 + 9] ; player's sprite facing direction
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .notFacingDown
|
|
|
|
|
; facing down
|
2014-06-25 20:58:27 +00:00
|
|
|
|
aCoord 8, 11
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc d
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .storeTile
|
|
|
|
|
.notFacingDown
|
|
|
|
|
cp SPRITE_FACING_UP
|
|
|
|
|
jr nz, .notFacingUp
|
|
|
|
|
; facing up
|
2014-06-25 20:58:27 +00:00
|
|
|
|
aCoord 8, 7
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec d
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .storeTile
|
|
|
|
|
.notFacingUp
|
|
|
|
|
cp SPRITE_FACING_LEFT
|
|
|
|
|
jr nz, .notFacingLeft
|
|
|
|
|
; facing left
|
2014-06-25 20:58:27 +00:00
|
|
|
|
aCoord 6, 9
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec e
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .storeTile
|
|
|
|
|
.notFacingLeft
|
|
|
|
|
cp SPRITE_FACING_RIGHT
|
|
|
|
|
jr nz, .storeTile
|
|
|
|
|
; facing right
|
2014-06-25 20:58:27 +00:00
|
|
|
|
aCoord 10, 9
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc e
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.storeTile
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [wTileInFrontOfPlayer], a
|
2012-01-23 03:08:37 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
GetTileTwoStepsInFrontOfPlayer: ; c5be (3:45be)
|
2012-01-24 00:45:02 +00:00
|
|
|
|
xor a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [$ffdb], a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld hl, W_YCOORD
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld d, a
|
|
|
|
|
ld e, [hl]
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [wSpriteStateData1 + 9] ; player's sprite facing direction
|
2012-01-24 00:45:02 +00:00
|
|
|
|
and a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .notFacingDown
|
|
|
|
|
; facing down
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, $ffdb
|
|
|
|
|
set 0, [hl]
|
2014-06-25 20:58:27 +00:00
|
|
|
|
aCoord 8, 13
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc d
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .storeTile
|
|
|
|
|
.notFacingDown
|
|
|
|
|
cp SPRITE_FACING_UP
|
|
|
|
|
jr nz, .notFacingUp
|
|
|
|
|
; facing up
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, $ffdb
|
|
|
|
|
set 1, [hl]
|
2014-06-25 20:58:27 +00:00
|
|
|
|
aCoord 8, 5
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec d
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .storeTile
|
|
|
|
|
.notFacingUp
|
|
|
|
|
cp SPRITE_FACING_LEFT
|
|
|
|
|
jr nz, .notFacingLeft
|
|
|
|
|
; facing left
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, $ffdb
|
|
|
|
|
set 2, [hl]
|
2014-06-25 20:58:27 +00:00
|
|
|
|
aCoord 4, 9
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec e
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .storeTile
|
|
|
|
|
.notFacingLeft
|
|
|
|
|
cp SPRITE_FACING_RIGHT
|
|
|
|
|
jr nz, .storeTile
|
|
|
|
|
; facing right
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, $ffdb
|
|
|
|
|
set 3, [hl]
|
2014-06-25 20:58:27 +00:00
|
|
|
|
aCoord 12, 9
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc e
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.storeTile
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [wTileInFrontOfBoulderAndBoulderCollisionResult], a
|
|
|
|
|
ld [wTileInFrontOfPlayer], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
CheckForCollisionWhenPushingBoulder: ; c60b (3:460b)
|
|
|
|
|
call GetTileTwoStepsInFrontOfPlayer
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, W_TILESETCOLLISIONPTR
|
2012-01-24 00:45:02 +00:00
|
|
|
|
ld a, [hli]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld h, [hl]
|
|
|
|
|
ld l, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.loop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
cp $ff
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .done ; if the tile two steps ahead is not passable
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp c
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .loop
|
|
|
|
|
ld hl, TilePairCollisionsLand
|
|
|
|
|
call CheckForTilePairCollisions2
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $ff
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr c, .done ; if there is an elevation difference between the current tile and the one two steps ahead
|
|
|
|
|
ld a, [wTileInFrontOfBoulderAndBoulderCollisionResult]
|
|
|
|
|
cp $15 ; stairs tile
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $ff
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .done ; if the tile two steps ahead is stairs
|
|
|
|
|
call CheckForBoulderCollisionWithSprites
|
|
|
|
|
.done
|
|
|
|
|
ld [wTileInFrontOfBoulderAndBoulderCollisionResult], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
; sets a to $ff if there is a collision and $00 if there is no collision
|
|
|
|
|
CheckForBoulderCollisionWithSprites: ; c636 (3:4636)
|
|
|
|
|
ld a, [wBoulderSpriteIndex]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec a
|
|
|
|
|
swap a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld d, 0
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld e, a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wSpriteStateData2 + $14
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, de
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [hli] ; map Y position
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [$ffdc], a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [hl] ; map X position
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [$ffdd], a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [W_NUMSPRITES]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, a
|
|
|
|
|
ld de, $f
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wSpriteStateData2 + $14
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [$ffdb]
|
2014-09-13 07:50:56 +00:00
|
|
|
|
and $3 ; facing up or down?
|
|
|
|
|
jr z, .pushingHorizontallyLoop
|
|
|
|
|
.pushingVerticallyLoop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc hl
|
|
|
|
|
ld a, [$ffdd]
|
|
|
|
|
cp [hl]
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .nextSprite1 ; if X coordinates don't match
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec hl
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld b, a
|
|
|
|
|
ld a, [$ffdb]
|
|
|
|
|
rrca
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr c, .pushingDown
|
|
|
|
|
; pushing up
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [$ffdc]
|
|
|
|
|
dec a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .compareYCoords
|
|
|
|
|
.pushingDown
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [$ffdc]
|
2012-01-24 00:45:02 +00:00
|
|
|
|
inc a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.compareYCoords
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp b
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .failure
|
|
|
|
|
.nextSprite1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec c
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .success
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, de
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .pushingVerticallyLoop
|
|
|
|
|
.pushingHorizontallyLoop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld b, a
|
|
|
|
|
ld a, [$ffdc]
|
|
|
|
|
cp b
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .nextSprite2
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, [hl]
|
|
|
|
|
ld a, [$ffdb]
|
|
|
|
|
bit 2, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .pushingLeft
|
|
|
|
|
; pushing right
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [$ffdd]
|
|
|
|
|
inc a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .compareXCoords
|
|
|
|
|
.pushingLeft
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [$ffdd]
|
|
|
|
|
dec a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.compareXCoords
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp b
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .failure
|
|
|
|
|
.nextSprite2
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec c
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .success
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, de
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .pushingHorizontallyLoop
|
|
|
|
|
.failure
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $ff
|
|
|
|
|
ret
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.success
|
2012-01-24 00:45:02 +00:00
|
|
|
|
xor a
|
|
|
|
|
ret
|
2013-03-17 21:54:12 +00:00
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ApplyOutOfBattlePoisonDamage: ; c69c (3:469c)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wd730]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add a
|
2014-09-14 18:29:18 +00:00
|
|
|
|
jp c, .noBlackOut ; no black out if joypad states are being simulated
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [wPartyCount]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jp z, .noBlackOut
|
|
|
|
|
call IncrementDayCareMonExp
|
|
|
|
|
ld a, [wStepCounter]
|
|
|
|
|
and $3 ; is the counter a multiple of 4?
|
|
|
|
|
jp nz, .noBlackOut ; only apply poison damage every fourth step
|
|
|
|
|
ld [wWhichPokemon], a
|
|
|
|
|
ld hl, wPartyMon1Status
|
|
|
|
|
ld de, wPartySpecies
|
|
|
|
|
.applyDamageLoop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hl]
|
2014-09-13 07:50:56 +00:00
|
|
|
|
and (1 << PSN)
|
|
|
|
|
jr z, .nextMon2 ; not poisoned
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec hl
|
|
|
|
|
dec hl
|
|
|
|
|
ld a, [hld]
|
|
|
|
|
ld b, a
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
or b
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .nextMon ; already fainted
|
|
|
|
|
; subtract 1 from HP
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hl]
|
|
|
|
|
dec a
|
2012-01-24 00:45:02 +00:00
|
|
|
|
ld [hld], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .noBorrow
|
|
|
|
|
; borrow 1 from upper byte of HP
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec [hl]
|
|
|
|
|
inc hl
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .nextMon
|
|
|
|
|
.noBorrow
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
or [hl]
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .nextMon ; didn't faint from damage
|
|
|
|
|
; the mon fainted from the damage
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
|
|
|
|
inc hl
|
|
|
|
|
inc hl
|
2012-01-24 00:45:02 +00:00
|
|
|
|
ld [hl], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [de]
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd11e], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push de
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [wWhichPokemon]
|
|
|
|
|
ld hl, wPartyMonNicks
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call GetPartyMonName
|
2013-03-12 00:52:32 +00:00
|
|
|
|
xor a
|
2014-05-25 17:51:53 +00:00
|
|
|
|
ld [wJoyIgnore], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call EnableAutoTextBoxDrawing
|
|
|
|
|
ld a, $d0
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [$ff8c], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call DisplayTextID
|
|
|
|
|
pop de
|
|
|
|
|
pop hl
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.nextMon
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc hl
|
|
|
|
|
inc hl
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.nextMon2
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc de
|
|
|
|
|
ld a, [de]
|
|
|
|
|
inc a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .applyDamageLoopDone
|
|
|
|
|
ld bc, wPartyMon2 - wPartyMon1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, bc
|
2012-02-03 07:10:50 +00:00
|
|
|
|
push hl
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld hl, wWhichPokemon
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc [hl]
|
2012-02-03 07:10:50 +00:00
|
|
|
|
pop hl
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .applyDamageLoop
|
|
|
|
|
.applyDamageLoopDone
|
|
|
|
|
ld hl, wPartyMon1Status
|
|
|
|
|
ld a, [wPartyCount]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld d, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld e, 0
|
|
|
|
|
.countPoisonedLoop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hl]
|
2014-09-13 07:50:56 +00:00
|
|
|
|
and (1 << PSN)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
or e
|
|
|
|
|
ld e, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld bc, wPartyMon2 - wPartyMon1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, bc
|
|
|
|
|
dec d
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .countPoisonedLoop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, e
|
2014-09-13 07:50:56 +00:00
|
|
|
|
and a ; are any party members poisoned?
|
|
|
|
|
jr z, .skipPoisonEffectAndSound
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, $2
|
2014-09-13 07:50:56 +00:00
|
|
|
|
predef ChangeBGPalColor0_4Frames ; change BG white to dark grey for 4 frames
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, (SFX_02_43 - SFX_Headers_02) / 3
|
|
|
|
|
call PlaySound
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.skipPoisonEffectAndSound
|
2014-06-16 20:57:26 +00:00
|
|
|
|
predef AnyPartyAlive
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, d
|
|
|
|
|
and a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .noBlackOut
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call EnableAutoTextBoxDrawing
|
|
|
|
|
ld a, $d1
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [$ff8c], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call DisplayTextID
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd72e
|
2014-05-22 22:13:20 +00:00
|
|
|
|
set 5, [hl]
|
|
|
|
|
ld a, $ff
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr .done
|
|
|
|
|
.noBlackOut
|
2014-05-22 22:13:20 +00:00
|
|
|
|
xor a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.done
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd12d], a
|
2012-02-03 07:10:50 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
LoadTilesetHeader: ; c754 (3:4754)
|
2014-05-23 22:11:09 +00:00
|
|
|
|
call GetPredefRegisters
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld d, 0
|
|
|
|
|
ld a, [W_CURMAPTILESET]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add a
|
|
|
|
|
add a
|
|
|
|
|
ld b, a
|
|
|
|
|
add a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
add b ; a = tileset * 12
|
|
|
|
|
jr nc, .noCarry
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc d
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.noCarry
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld e, a
|
|
|
|
|
ld hl, Tilesets
|
|
|
|
|
add hl, de
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld de, W_TILESETBANK
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, $b
|
2014-09-13 07:50:56 +00:00
|
|
|
|
.copyTilesetHeaderLoop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
|
|
|
|
dec c
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr nz, .copyTilesetHeaderLoop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hl]
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld [hTilesetType], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
xor a
|
|
|
|
|
ld [$ffd8], a
|
|
|
|
|
pop hl
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [W_CURMAPTILESET]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
|
|
|
|
push de
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld hl, DungeonTilesets
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld de, $1
|
|
|
|
|
call IsInArray
|
|
|
|
|
pop de
|
|
|
|
|
pop hl
|
|
|
|
|
jr c, .asm_c797
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [W_CURMAPTILESET]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [$ff8b]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp b
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .done
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_c797
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [wDestinationWarpID]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp $ff
|
2014-09-13 07:50:56 +00:00
|
|
|
|
jr z, .done
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call LoadDestinationWarpPosition
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [W_YCOORD]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and $1
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [W_YBLOCKCOORD], a
|
|
|
|
|
ld a, [W_XCOORD]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and $1
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [W_XBLOCKCOORD], a
|
|
|
|
|
.done
|
2012-02-03 07:10:50 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/dungeon_tilesets.asm"
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/tileset_headers.asm"
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-09-13 07:50:56 +00:00
|
|
|
|
IncrementDayCareMonExp: ; c8de (3:48de)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [W_DAYCARE_IN_USE]
|
2012-02-03 07:10:50 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret z
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wDayCareMonExp + 2
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc [hl]
|
|
|
|
|
ret nz
|
|
|
|
|
dec hl
|
|
|
|
|
inc [hl]
|
|
|
|
|
ret nz
|
|
|
|
|
dec hl
|
|
|
|
|
inc [hl]
|
|
|
|
|
ld a, [hl]
|
|
|
|
|
cp $50
|
|
|
|
|
ret c
|
|
|
|
|
ld a, $50
|
|
|
|
|
ld [hl], a
|
2012-02-03 07:10:50 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/hide_show_data.asm"
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-06-16 20:03:05 +00:00
|
|
|
|
PrintStrengthTxt: ; cd99 (3:4d99)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd728
|
2014-05-22 22:13:20 +00:00
|
|
|
|
set 0, [hl]
|
|
|
|
|
ld hl, UsedStrengthText
|
|
|
|
|
call PrintText
|
|
|
|
|
ld hl, CanMoveBouldersText
|
|
|
|
|
jp PrintText
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
UsedStrengthText: ; cdaa (3:4daa)
|
|
|
|
|
TX_FAR _UsedStrengthText
|
|
|
|
|
db $08 ; asm
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf91]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call PlayCry
|
|
|
|
|
call Delay3
|
|
|
|
|
jp TextScriptEnd
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
CanMoveBouldersText: ; cdbb (3:4dbb)
|
|
|
|
|
TX_FAR _CanMoveBouldersText
|
|
|
|
|
db "@"
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
CheckForForcedBikeSurf: ; cdc0 (3:4dc0)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd728
|
2014-05-22 22:13:20 +00:00
|
|
|
|
set 1, [hl]
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wd732]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
bit 5, a
|
|
|
|
|
jr nz, .asm_cdec
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [W_CURMAP] ; W_CURMAP
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp SEAFOAM_ISLANDS_5
|
|
|
|
|
ret nz
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wd881]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and $3
|
|
|
|
|
cp $3
|
|
|
|
|
ret z
|
|
|
|
|
ld hl, CoordsData_cdf7 ; $4df7
|
|
|
|
|
call ArePlayerCoordsInArray
|
|
|
|
|
ret nc
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd728
|
2014-05-22 22:13:20 +00:00
|
|
|
|
res 1, [hl]
|
|
|
|
|
ld hl, CurrentTooFastText
|
|
|
|
|
jp PrintText
|
|
|
|
|
.asm_cdec
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd728
|
2014-05-22 22:13:20 +00:00
|
|
|
|
res 1, [hl]
|
|
|
|
|
ld hl, CyclingIsFunText
|
|
|
|
|
jp PrintText
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
CoordsData_cdf7: ; cdf7 (3:4df7)
|
|
|
|
|
db $0B,$07,$FF
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
CurrentTooFastText: ; cdfa (3:4dfa)
|
|
|
|
|
TX_FAR _CurrentTooFastText
|
|
|
|
|
db "@"
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
CyclingIsFunText: ; cdff (3:4dff)
|
|
|
|
|
TX_FAR _CyclingIsFunText
|
|
|
|
|
db "@"
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; function to add an item (in varying quantities) to the player's bag or PC box
|
|
|
|
|
; INPUT:
|
|
|
|
|
; hl = address of inventory (either wNumBagItems or wNumBoxItems)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
; [wcf91] = item ID
|
|
|
|
|
; [wcf96] = item quantity
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; sets carry flag if successful, unsets carry flag if unsuccessful
|
|
|
|
|
AddItemToInventory_: ; ce04 (3:4e04)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a,[wcf96] ; a = item quantity
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push af
|
|
|
|
|
push bc
|
|
|
|
|
push de
|
|
|
|
|
push hl
|
|
|
|
|
push hl
|
|
|
|
|
ld d,50 ; PC box can hold 50 items
|
|
|
|
|
ld a,wNumBagItems & $FF
|
|
|
|
|
cp l
|
|
|
|
|
jr nz,.checkIfInventoryFull
|
|
|
|
|
ld a,wNumBagItems >> 8
|
|
|
|
|
cp h
|
|
|
|
|
jr nz,.checkIfInventoryFull
|
|
|
|
|
; if the destination is the bag
|
|
|
|
|
ld d,20 ; bag can hold 20 items
|
|
|
|
|
.checkIfInventoryFull
|
|
|
|
|
ld a,[hl]
|
|
|
|
|
sub d
|
|
|
|
|
ld d,a
|
|
|
|
|
ld a,[hli]
|
|
|
|
|
and a
|
|
|
|
|
jr z,.addNewItem
|
|
|
|
|
.loop
|
|
|
|
|
ld a,[hli]
|
|
|
|
|
ld b,a ; b = ID of current item in table
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a,[wcf91] ; a = ID of item being added
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp b ; does the current item in the table match the item being added?
|
|
|
|
|
jp z,.increaseItemQuantity ; if so, increase the item's quantity
|
|
|
|
|
inc hl
|
|
|
|
|
ld a,[hl]
|
|
|
|
|
cp a,$ff ; is it the end of the table?
|
|
|
|
|
jr nz,.loop
|
|
|
|
|
.addNewItem ; add an item not yet in the inventory
|
|
|
|
|
pop hl
|
|
|
|
|
ld a,d
|
|
|
|
|
and a ; is there room for a new item slot?
|
|
|
|
|
jr z,.done
|
|
|
|
|
; if there is room
|
|
|
|
|
inc [hl] ; increment the number of items in the inventory
|
|
|
|
|
ld a,[hl] ; the number of items will be the index of the new item
|
|
|
|
|
add a
|
|
|
|
|
dec a
|
|
|
|
|
ld c,a
|
|
|
|
|
ld b,0
|
|
|
|
|
add hl,bc ; hl = address to store the item
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a,[wcf91]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [hli],a ; store item ID
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a,[wcf96]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [hli],a ; store item quantity
|
|
|
|
|
ld [hl],$ff ; store terminator
|
|
|
|
|
jp .success
|
|
|
|
|
.increaseItemQuantity ; increase the quantity of an item already in the inventory
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a,[wcf96]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b,a ; b = quantity to add
|
|
|
|
|
ld a,[hl] ; a = existing item quantity
|
|
|
|
|
add b ; a = new item quantity
|
|
|
|
|
cp a,100
|
|
|
|
|
jp c,.storeNewQuantity ; if the new quantity is less than 100, store it
|
|
|
|
|
; if the new quantity is greater than or equal to 100,
|
|
|
|
|
; try to max out the current slot and add the rest in a new slot
|
|
|
|
|
sub a,99
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcf96],a ; a = amount left over (to put in the new slot)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a,d
|
|
|
|
|
and a ; is there room for a new item slot?
|
|
|
|
|
jr z,.increaseItemQuantityFailed
|
|
|
|
|
; if so, store 99 in the current slot and store the rest in a new slot
|
|
|
|
|
ld a,99
|
|
|
|
|
ld [hli],a
|
|
|
|
|
jp .loop
|
|
|
|
|
.increaseItemQuantityFailed
|
|
|
|
|
pop hl
|
|
|
|
|
and a
|
|
|
|
|
jr .done
|
|
|
|
|
.storeNewQuantity
|
|
|
|
|
ld [hl],a
|
|
|
|
|
pop hl
|
|
|
|
|
.success
|
|
|
|
|
scf
|
|
|
|
|
.done
|
|
|
|
|
pop hl
|
|
|
|
|
pop de
|
|
|
|
|
pop bc
|
|
|
|
|
pop bc
|
|
|
|
|
ld a,b
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcf96],a ; restore the initial value from when the function was called
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; function to remove an item (in varying quantities) from the player's bag or PC box
|
|
|
|
|
; INPUT:
|
|
|
|
|
; hl = address of inventory (either wNumBagItems or wNumBoxItems)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
; [wWhichPokemon] = index (within the inventory) of the item to remove
|
|
|
|
|
; [wcf96] = quantity to remove
|
2014-05-22 22:13:20 +00:00
|
|
|
|
RemoveItemFromInventory_: ; ce74 (3:4e74)
|
|
|
|
|
push hl
|
|
|
|
|
inc hl
|
|
|
|
|
ld a,[wWhichPokemon] ; index (within the inventory) of the item being removed
|
|
|
|
|
sla a
|
|
|
|
|
add l
|
|
|
|
|
ld l,a
|
|
|
|
|
jr nc,.noCarry
|
|
|
|
|
inc h
|
|
|
|
|
.noCarry
|
|
|
|
|
inc hl
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a,[wcf96] ; quantity being removed
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld e,a
|
|
|
|
|
ld a,[hl] ; a = current quantity
|
|
|
|
|
sub e
|
|
|
|
|
ld [hld],a ; store new quantity
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcf97],a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and a
|
|
|
|
|
jr nz,.skipMovingUpSlots
|
|
|
|
|
; if the remaining quantity is 0,
|
|
|
|
|
; remove the emptied item slot and move up all the following item slots
|
|
|
|
|
.moveSlotsUp
|
|
|
|
|
ld e,l
|
|
|
|
|
ld d,h
|
|
|
|
|
inc de
|
|
|
|
|
inc de ; de = address of the slot following the emptied one
|
|
|
|
|
.loop ; loop to move up the following slots
|
|
|
|
|
ld a,[de]
|
|
|
|
|
inc de
|
|
|
|
|
ld [hli],a
|
|
|
|
|
cp a,$ff
|
|
|
|
|
jr nz,.loop
|
|
|
|
|
; update menu info
|
|
|
|
|
xor a
|
|
|
|
|
ld [wListScrollOffset],a
|
|
|
|
|
ld [wCurrentMenuItem],a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcc2c],a
|
|
|
|
|
ld [wd07e],a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop hl
|
|
|
|
|
ld a,[hl] ; a = number of items in inventory
|
|
|
|
|
dec a ; decrement the number of items
|
|
|
|
|
ld [hl],a ; store new number of items
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd12a],a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp a,2
|
|
|
|
|
jr c,.done
|
|
|
|
|
ld [wMaxMenuItem],a
|
|
|
|
|
jr .done
|
|
|
|
|
.skipMovingUpSlots
|
|
|
|
|
pop hl
|
|
|
|
|
.done
|
|
|
|
|
ret
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; wild pokemon data: from 4EB8 to 55C7
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
LoadWildData: ; ceb8 (3:4eb8)
|
|
|
|
|
ld hl,WildDataPointers
|
|
|
|
|
ld a,[W_CURMAP]
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; get wild data for current map
|
|
|
|
|
ld c,a
|
|
|
|
|
ld b,0
|
|
|
|
|
add hl,bc
|
|
|
|
|
add hl,bc
|
|
|
|
|
ld a,[hli]
|
|
|
|
|
ld h,[hl]
|
|
|
|
|
ld l,a ; hl now points to wild data for current map
|
|
|
|
|
ld a,[hli]
|
|
|
|
|
ld [W_GRASSRATE],a
|
|
|
|
|
and a
|
|
|
|
|
jr z,.NoGrassData ; if no grass data, skip to surfing data
|
|
|
|
|
push hl
|
|
|
|
|
ld de,W_GRASSMONS ; otherwise, load grass data
|
|
|
|
|
ld bc,$0014
|
|
|
|
|
call CopyData
|
|
|
|
|
pop hl
|
|
|
|
|
ld bc,$0014
|
|
|
|
|
add hl,bc
|
|
|
|
|
.NoGrassData
|
|
|
|
|
ld a,[hli]
|
|
|
|
|
ld [W_WATERRATE],a
|
|
|
|
|
and a
|
|
|
|
|
ret z ; if no water data, we're done
|
|
|
|
|
ld de,W_WATERMONS ; otherwise, load surfing data
|
|
|
|
|
ld bc,$0014
|
|
|
|
|
jp CopyData
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/wild_mons.asm"
|
2012-02-03 07:10:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/items/items.asm"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
DrawBadges: ; ea03 (3:6a03)
|
|
|
|
|
; Draw 4x2 gym leader faces, with the faces replaced by
|
|
|
|
|
; badges if they are owned. Used in the player status screen.
|
2013-05-13 05:30:33 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; In Japanese versions, names are displayed above faces.
|
|
|
|
|
; Instead of removing relevant code, the name graphics were erased.
|
|
|
|
|
|
|
|
|
|
; Tile ids for face/badge graphics.
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld de, wTrainerFacingDirection
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, .FaceBadgeTiles
|
|
|
|
|
ld bc, 8
|
|
|
|
|
call CopyData
|
|
|
|
|
|
|
|
|
|
; Booleans for each badge.
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wcd49
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld bc, 8
|
2013-03-12 00:52:32 +00:00
|
|
|
|
xor a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call FillMemory
|
|
|
|
|
|
|
|
|
|
; Alter these based on owned badges.
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld de, wcd49
|
|
|
|
|
ld hl, wTrainerFacingDirection
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [W_OBTAINEDBADGES]
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld b, a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, 8
|
|
|
|
|
.CheckBadge
|
|
|
|
|
srl b
|
|
|
|
|
jr nc, .NextBadge
|
|
|
|
|
ld a, [hl]
|
|
|
|
|
add 4 ; Badge graphics are after each face
|
|
|
|
|
ld [hl], a
|
|
|
|
|
ld a, 1
|
|
|
|
|
ld [de], a
|
|
|
|
|
.NextBadge
|
|
|
|
|
inc hl
|
|
|
|
|
inc de
|
|
|
|
|
dec c
|
|
|
|
|
jr nz, .CheckBadge
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; Draw two rows of badges.
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wWhichTrade
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $d8 ; [1]
|
|
|
|
|
ld [hli], a
|
|
|
|
|
ld [hl], $60 ; First name
|
|
|
|
|
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 2, 11
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld de, wcd49
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call .DrawBadgeRow
|
|
|
|
|
|
2014-06-25 20:58:27 +00:00
|
|
|
|
hlCoord 2, 14
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld de, wcd49 + 4
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; call .DrawBadgeRow
|
|
|
|
|
; ret
|
|
|
|
|
|
|
|
|
|
.DrawBadgeRow ; ea4c (3:6a4c)
|
|
|
|
|
; Draw 4 badges.
|
|
|
|
|
|
|
|
|
|
ld c, 4
|
|
|
|
|
.DrawBadge
|
|
|
|
|
push de
|
2013-03-12 00:52:32 +00:00
|
|
|
|
push hl
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
; Badge no.
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wWhichTrade]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [hli], a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wWhichTrade], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
; Names aren't printed if the badge is owned.
|
|
|
|
|
ld a, [de]
|
2013-03-12 00:52:32 +00:00
|
|
|
|
and a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wTrainerEngageDistance]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .SkipName
|
|
|
|
|
call .PlaceTiles
|
|
|
|
|
jr .PlaceBadge
|
|
|
|
|
|
|
|
|
|
.SkipName
|
|
|
|
|
inc a
|
|
|
|
|
inc a
|
|
|
|
|
inc hl
|
|
|
|
|
|
|
|
|
|
.PlaceBadge
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wTrainerEngageDistance], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld de, 20 - 1
|
|
|
|
|
add hl, de
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wTrainerFacingDirection]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call .PlaceTiles
|
|
|
|
|
add hl, de
|
|
|
|
|
call .PlaceTiles
|
|
|
|
|
|
|
|
|
|
; Shift badge array back one byte.
|
|
|
|
|
push bc
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wTrainerFacingDirection + 1
|
|
|
|
|
ld de, wTrainerFacingDirection
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld bc, 8
|
|
|
|
|
call CopyData
|
|
|
|
|
pop bc
|
|
|
|
|
|
2013-03-12 00:52:32 +00:00
|
|
|
|
pop hl
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld de, 4
|
|
|
|
|
add hl, de
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop de
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc de
|
|
|
|
|
dec c
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .DrawBadge
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.PlaceTiles
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld [hli], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc a
|
|
|
|
|
ld [hl], a
|
|
|
|
|
inc a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.FaceBadgeTiles
|
|
|
|
|
db $20, $28, $30, $38, $40, $48, $50, $58
|
2013-05-13 05:30:33 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
GymLeaderFaceAndBadgeTileGraphics: ; ea9e (3:6a9e)
|
2014-05-30 08:30:10 +00:00
|
|
|
|
INCBIN "gfx/badges.2bpp"
|
2013-05-13 05:30:33 +00:00
|
|
|
|
|
2014-09-14 18:29:18 +00:00
|
|
|
|
; replaces a tile block with the one specified in [wNewTileBlockID]
|
|
|
|
|
; and redraws the map view if necessary
|
|
|
|
|
; b = Y
|
|
|
|
|
; c = X
|
|
|
|
|
ReplaceTileBlock: ; ee9e (3:6e9e)
|
2014-05-23 22:11:09 +00:00
|
|
|
|
call GetPredefRegisters
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wOverworldMap
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld a, [W_CURMAPWIDTH]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add $6
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld e, a
|
|
|
|
|
ld d, $0
|
|
|
|
|
add hl, de
|
|
|
|
|
add hl, de
|
|
|
|
|
add hl, de
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld e, $3
|
|
|
|
|
add hl, de
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld e, a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, b
|
|
|
|
|
and a
|
2014-09-14 18:29:18 +00:00
|
|
|
|
jr z, .addX
|
|
|
|
|
; add width * Y
|
|
|
|
|
.addWidthYTimesLoop
|
2013-03-12 00:52:32 +00:00
|
|
|
|
add hl, de
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec b
|
2014-09-14 18:29:18 +00:00
|
|
|
|
jr nz, .addWidthYTimesLoop
|
|
|
|
|
.addX
|
|
|
|
|
add hl, bc ; add X
|
|
|
|
|
ld a, [wNewTileBlockID]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [hl], a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [wCurrentTileBlockMapViewPointer]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, a
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [wCurrentTileBlockMapViewPointer + 1]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, a
|
2014-09-14 18:29:18 +00:00
|
|
|
|
call CompareHLWithBC
|
|
|
|
|
ret c ; return if the replaced tile block is below the map view in memory
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
|
|
|
|
ld l, e
|
|
|
|
|
ld h, $0
|
|
|
|
|
ld e, $6
|
|
|
|
|
ld d, h
|
|
|
|
|
add hl, hl
|
|
|
|
|
add hl, hl
|
2013-03-12 00:52:32 +00:00
|
|
|
|
add hl, de
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, bc
|
|
|
|
|
pop bc
|
2014-09-14 18:29:18 +00:00
|
|
|
|
call CompareHLWithBC
|
|
|
|
|
ret c ; return if the replaced tile block is above the map view in memory
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
2014-09-14 18:29:18 +00:00
|
|
|
|
RedrawMapView: ; eedc (3:6edc)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [W_ISINBATTLE] ; W_ISINBATTLE
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc a
|
|
|
|
|
ret z
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld a, [H_AUTOBGTRANSFERENABLED]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push af
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld a, [hTilesetType]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push af
|
2013-03-12 00:52:32 +00:00
|
|
|
|
xor a
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld [H_AUTOBGTRANSFERENABLED], a
|
|
|
|
|
ld [hTilesetType], a ; no flower/water BG tile animations
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call LoadCurrentMapView
|
|
|
|
|
call GoPAL_SET_CF1C
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld hl, wMapViewVRAMPointer
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, [hli]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld h, [hl]
|
|
|
|
|
ld l, a
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld de, -2 * 32
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, de
|
|
|
|
|
ld a, h
|
|
|
|
|
and $3
|
|
|
|
|
or $98
|
|
|
|
|
ld a, l
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wHPBarMaxHP], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, h
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wHPBarMaxHP + 1], a
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld a, 2
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [$ffbe], a
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld c, 9 ; number of rows of 2x2 tiles (this covers the whole screen)
|
|
|
|
|
.redrawRowLoop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push bc
|
|
|
|
|
push hl
|
|
|
|
|
push hl
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld hl, wTileMap - 2 * 20
|
|
|
|
|
ld de, 20
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [$ffbe]
|
|
|
|
|
.asm_ef1a
|
|
|
|
|
add hl, de
|
|
|
|
|
dec a
|
|
|
|
|
jr nz, .asm_ef1a
|
2014-09-14 18:29:18 +00:00
|
|
|
|
call CopyToScreenEdgeTiles
|
2013-03-12 00:52:32 +00:00
|
|
|
|
pop hl
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld de, $20
|
|
|
|
|
ld a, [$ffbe]
|
|
|
|
|
ld c, a
|
|
|
|
|
.asm_ef28
|
2013-03-12 00:52:32 +00:00
|
|
|
|
add hl, de
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, h
|
|
|
|
|
and $3
|
|
|
|
|
or $98
|
|
|
|
|
dec c
|
|
|
|
|
jr nz, .asm_ef28
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld [H_SCREENEDGEREDRAWADDR + 1], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, l
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld [H_SCREENEDGEREDRAWADDR], a
|
|
|
|
|
ld a, REDRAWROW
|
|
|
|
|
ld [H_SCREENEDGEREDRAW], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call DelayFrame
|
|
|
|
|
ld hl, $ffbe
|
|
|
|
|
inc [hl]
|
|
|
|
|
inc [hl]
|
|
|
|
|
pop hl
|
|
|
|
|
pop bc
|
|
|
|
|
dec c
|
2014-09-14 18:29:18 +00:00
|
|
|
|
jr nz, .redrawRowLoop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop af
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld [hTilesetType], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop af
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld [H_AUTOBGTRANSFERENABLED], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret
|
2013-11-09 19:21:51 +00:00
|
|
|
|
|
2014-09-14 18:29:18 +00:00
|
|
|
|
CompareHLWithBC: ; ef4e (3:6f4e)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, h
|
|
|
|
|
sub b
|
|
|
|
|
ret nz
|
|
|
|
|
ld a, l
|
|
|
|
|
sub c
|
|
|
|
|
ret
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/overworld/cut.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-09-14 18:29:18 +00:00
|
|
|
|
MarkTownVisitedAndLoadMissableObjects: ; f113 (3:7113)
|
|
|
|
|
ld a, [W_CURMAP]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp ROUTE_1
|
|
|
|
|
jr nc, .notInTown
|
|
|
|
|
ld c, a
|
|
|
|
|
ld b, $1
|
|
|
|
|
ld hl, W_TOWNVISITEDFLAG ; mark town as visited (for flying)
|
2014-06-16 20:57:26 +00:00
|
|
|
|
predef FlagActionPredef
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.notInTown
|
|
|
|
|
ld hl, MapHSPointers
|
2014-09-14 18:29:18 +00:00
|
|
|
|
ld a, [W_CURMAP]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, $0
|
|
|
|
|
ld c, a
|
|
|
|
|
add hl, bc
|
|
|
|
|
add hl, bc
|
|
|
|
|
ld a, [hli] ; load missable objects pointer in hl
|
|
|
|
|
ld h, [hl]
|
2014-09-14 18:29:18 +00:00
|
|
|
|
; fall through
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
2014-09-14 18:29:18 +00:00
|
|
|
|
LoadMissableObjects: ; f132 (3:7132)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld l, a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
push hl
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld de, MapHS00 ; calculate difference between out pointer and the base pointer
|
|
|
|
|
ld a, l
|
|
|
|
|
sub e
|
|
|
|
|
jr nc, .asm_f13c
|
|
|
|
|
dec h
|
|
|
|
|
.asm_f13c
|
|
|
|
|
ld l, a
|
|
|
|
|
ld a, h
|
|
|
|
|
sub d
|
|
|
|
|
ld h, a
|
|
|
|
|
ld a, h
|
|
|
|
|
ld [H_DIVIDEND], a
|
|
|
|
|
ld a, l
|
|
|
|
|
ld [H_DIVIDEND+1], a
|
|
|
|
|
xor a
|
|
|
|
|
ld [H_DIVIDEND+2], a
|
|
|
|
|
ld [H_DIVIDEND+3], a
|
|
|
|
|
ld a, $3
|
|
|
|
|
ld [H_DIVISOR], a
|
|
|
|
|
ld b, $2
|
|
|
|
|
call Divide ; divide difference by 3, resulting in the global offset (number of missable items before ours)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [W_CURMAP] ; W_CURMAP
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld b, a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [H_DIVIDEND+3]
|
|
|
|
|
ld c, a ; store global offset in c
|
|
|
|
|
ld de, W_MISSABLEOBJECTLIST
|
|
|
|
|
pop hl
|
|
|
|
|
.writeMissableObjectsListLoop
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
cp $ff
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr z, .done ; end of list
|
2013-03-12 00:52:32 +00:00
|
|
|
|
cp b
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .done ; not for current map anymore
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, [hli]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc hl
|
|
|
|
|
ld [de], a ; write (map-local) sprite ID
|
|
|
|
|
inc de
|
|
|
|
|
ld a, c
|
|
|
|
|
inc c
|
|
|
|
|
ld [de], a ; write (global) missable object index
|
|
|
|
|
inc de
|
|
|
|
|
jr .writeMissableObjectsListLoop
|
|
|
|
|
.done
|
|
|
|
|
ld a, $ff
|
|
|
|
|
ld [de], a ; write sentinel
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
InitializeMissableObjectsFlags: ; f175 (3:7175)
|
|
|
|
|
ld hl, W_MISSABLEOBJECTFLAGS
|
|
|
|
|
ld bc, $20
|
|
|
|
|
xor a
|
|
|
|
|
call FillMemory ; clear missable objects flags
|
|
|
|
|
ld hl, MapHS00
|
|
|
|
|
xor a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd048], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.missableObjectsLoop
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
cp $ff ; end of list
|
|
|
|
|
ret z
|
|
|
|
|
push hl
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc hl
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hl]
|
|
|
|
|
cp Hide
|
|
|
|
|
jr nz, .asm_f19d
|
|
|
|
|
ld hl, W_MISSABLEOBJECTFLAGS
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wd048]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, a
|
|
|
|
|
ld b, $1
|
2014-05-25 17:09:39 +00:00
|
|
|
|
call MissableObjectFlagAction ; set flag iff Item is hidden
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_f19d
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wd048
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc [hl]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop hl
|
|
|
|
|
inc hl
|
|
|
|
|
inc hl
|
|
|
|
|
jr .missableObjectsLoop
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; tests if current sprite is a missable object that is hidden/has been removed
|
2014-06-16 20:03:05 +00:00
|
|
|
|
IsObjectHidden: ; f1a6 (3:71a6)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [H_CURRENTSPRITEOFFSET]
|
|
|
|
|
swap a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld b, a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, W_MISSABLEOBJECTLIST
|
|
|
|
|
.loop
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, [hli]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp $ff
|
|
|
|
|
jr z, .notHidden ; not missable -> not hidden
|
|
|
|
|
cp b
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
jr nz, .loop
|
|
|
|
|
ld c, a
|
|
|
|
|
ld b, $2
|
|
|
|
|
ld hl, W_MISSABLEOBJECTFLAGS
|
2014-05-25 17:09:39 +00:00
|
|
|
|
call MissableObjectFlagAction
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, c
|
2013-03-12 00:52:32 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .hidden
|
|
|
|
|
.notHidden
|
2013-03-12 00:52:32 +00:00
|
|
|
|
xor a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.hidden
|
|
|
|
|
ld [$ffe5], a
|
|
|
|
|
ret
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; adds missable object (items, leg. pokemon, etc.) to the map
|
2014-05-26 21:04:56 +00:00
|
|
|
|
; [wcc4d]: index of the missable object to be added (global index)
|
2014-06-16 20:03:05 +00:00
|
|
|
|
ShowObject: ; f1c8 (3:71c8)
|
2014-06-16 20:25:46 +00:00
|
|
|
|
ShowObject2:
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, W_MISSABLEOBJECTFLAGS
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcc4d]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, a
|
|
|
|
|
ld b, $0
|
2014-05-25 17:09:39 +00:00
|
|
|
|
call MissableObjectFlagAction ; reset "removed" flag
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jp UpdateSprites
|
2012-01-18 02:56:48 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; removes missable object (items, leg. pokemon, etc.) from the map
|
2014-05-26 21:04:56 +00:00
|
|
|
|
; [wcc4d]: index of the missable object to be removed (global index)
|
2014-06-16 20:03:05 +00:00
|
|
|
|
HideObject: ; f1d7 (3:71d7)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, W_MISSABLEOBJECTFLAGS
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcc4d]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld c, a
|
|
|
|
|
ld b, $1
|
2014-05-25 17:09:39 +00:00
|
|
|
|
call MissableObjectFlagAction ; set "removed" flag
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jp UpdateSprites
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 17:09:39 +00:00
|
|
|
|
MissableObjectFlagAction:
|
|
|
|
|
; identical to FlagAction
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
|
|
|
|
push de
|
|
|
|
|
push bc
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
; bit
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, c
|
|
|
|
|
ld d, a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
and 7
|
|
|
|
|
ld e, a
|
|
|
|
|
|
|
|
|
|
; byte
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, d
|
|
|
|
|
srl a
|
|
|
|
|
srl a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
srl a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add l
|
|
|
|
|
ld l, a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
jr nc, .ok
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc h
|
2014-05-25 17:09:39 +00:00
|
|
|
|
.ok
|
|
|
|
|
|
|
|
|
|
; d = 1 << e (bitmask)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc e
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld d, 1
|
|
|
|
|
.shift
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec e
|
2014-05-25 17:09:39 +00:00
|
|
|
|
jr z, .shifted
|
2014-05-22 22:13:20 +00:00
|
|
|
|
sla d
|
2014-05-25 17:09:39 +00:00
|
|
|
|
jr .shift
|
|
|
|
|
.shifted
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, b
|
|
|
|
|
and a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
jr z, .reset
|
|
|
|
|
cp 2
|
|
|
|
|
jr z, .read
|
|
|
|
|
|
|
|
|
|
.set
|
|
|
|
|
ld a, [hl]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, a
|
|
|
|
|
ld a, d
|
|
|
|
|
or b
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld [hl], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr .done
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
.reset
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hl]
|
|
|
|
|
ld b, a
|
|
|
|
|
ld a, d
|
|
|
|
|
xor $ff
|
|
|
|
|
and b
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld [hl], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr .done
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
.read
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hl]
|
|
|
|
|
ld b, a
|
|
|
|
|
ld a, d
|
|
|
|
|
and b
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.done
|
|
|
|
|
pop bc
|
|
|
|
|
pop de
|
|
|
|
|
pop hl
|
|
|
|
|
ld c, a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-09-10 03:55:19 +00:00
|
|
|
|
TryPushingBoulder: ; f225 (3:7225)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wd728]
|
2014-09-10 03:55:19 +00:00
|
|
|
|
bit 0, a ; using Strength?
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret z
|
|
|
|
|
ld a, [wFlags_0xcd60]
|
2014-09-10 03:55:19 +00:00
|
|
|
|
bit 1, a ; has boulder dust animation from previous push played yet?
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret nz
|
2013-03-12 00:52:32 +00:00
|
|
|
|
xor a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld [$ff8c], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call IsSpriteInFrontOfPlayer
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld a, [$ff8c]
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld [wBoulderSpriteIndex], a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
and a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
jp z, ResetBoulderPushFlags
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wSpriteStateData1 + 1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld d, $0
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld a, [$ff8c]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
swap a
|
|
|
|
|
ld e, a
|
|
|
|
|
add hl, de
|
|
|
|
|
res 7, [hl]
|
|
|
|
|
call GetSpriteMovementByte2Pointer
|
|
|
|
|
ld a, [hl]
|
2014-09-10 03:55:19 +00:00
|
|
|
|
cp BOULDER_MOVEMENT_BYTE_2
|
|
|
|
|
jp nz, ResetBoulderPushFlags
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, wFlags_0xcd60
|
|
|
|
|
bit 6, [hl]
|
2014-09-10 03:55:19 +00:00
|
|
|
|
set 6, [hl] ; indicate that the player has tried pushing
|
|
|
|
|
ret z ; the player must try pushing twice before the boulder will move
|
2014-05-25 17:51:53 +00:00
|
|
|
|
ld a, [hJoyHeld]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and $f0
|
|
|
|
|
ret z
|
2014-09-13 07:50:56 +00:00
|
|
|
|
predef CheckForCollisionWhenPushingBoulder
|
|
|
|
|
ld a, [wTileInFrontOfBoulderAndBoulderCollisionResult]
|
|
|
|
|
and a ; was there a collision?
|
2014-09-10 03:55:19 +00:00
|
|
|
|
jp nz, ResetBoulderPushFlags
|
2014-05-25 17:51:53 +00:00
|
|
|
|
ld a, [hJoyHeld]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld a, [wSpriteStateData1 + 9] ; player's sprite facing direction
|
|
|
|
|
cp SPRITE_FACING_UP
|
|
|
|
|
jr z, .pushBoulderUp
|
|
|
|
|
cp SPRITE_FACING_LEFT
|
|
|
|
|
jr z, .pushBoulderLeft
|
|
|
|
|
cp SPRITE_FACING_RIGHT
|
|
|
|
|
jr z, .pushBoulderRight
|
|
|
|
|
.pushBoulderDown
|
2014-05-22 22:13:20 +00:00
|
|
|
|
bit 7, b
|
|
|
|
|
ret z
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld de, PushBoulderDownMovementData
|
|
|
|
|
jr .done
|
|
|
|
|
.pushBoulderUp
|
2014-05-22 22:13:20 +00:00
|
|
|
|
bit 6, b
|
|
|
|
|
ret z
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld de, PushBoulderUpMovementData
|
|
|
|
|
jr .done
|
|
|
|
|
.pushBoulderLeft
|
2014-05-22 22:13:20 +00:00
|
|
|
|
bit 5, b
|
|
|
|
|
ret z
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld de, PushBoulderLeftMovementData
|
|
|
|
|
jr .done
|
|
|
|
|
.pushBoulderRight
|
2014-05-22 22:13:20 +00:00
|
|
|
|
bit 4, b
|
|
|
|
|
ret z
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld de, PushBoulderRightMovementData
|
|
|
|
|
.done
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call MoveSprite
|
|
|
|
|
ld a, (SFX_02_53 - SFX_Headers_02) / 3
|
2013-03-17 21:54:12 +00:00
|
|
|
|
call PlaySound
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, wFlags_0xcd60
|
|
|
|
|
set 1, [hl]
|
|
|
|
|
ret
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-09-10 03:55:19 +00:00
|
|
|
|
PushBoulderUpMovementData: ; f2ad (3:72ad)
|
|
|
|
|
db NPC_MOVEMENT_UP,$FF
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-09-10 03:55:19 +00:00
|
|
|
|
PushBoulderDownMovementData: ; f2af (3:72af)
|
|
|
|
|
db NPC_MOVEMENT_DOWN,$FF
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-09-10 03:55:19 +00:00
|
|
|
|
PushBoulderLeftMovementData: ; f2b1 (3:72b1)
|
|
|
|
|
db NPC_MOVEMENT_LEFT,$FF
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-09-10 03:55:19 +00:00
|
|
|
|
PushBoulderRightMovementData: ; f2b3 (3:72b3)
|
|
|
|
|
db NPC_MOVEMENT_RIGHT,$FF
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-09-10 03:55:19 +00:00
|
|
|
|
DoBoulderDustAnimation: ; f2b5 (3:72b5)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wd730]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
bit 0, a
|
|
|
|
|
ret nz
|
2014-09-10 03:55:19 +00:00
|
|
|
|
callab AnimateBoulderDust
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call DiscardButtonPresses
|
2014-05-25 17:51:53 +00:00
|
|
|
|
ld [wJoyIgnore], a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
call ResetBoulderPushFlags
|
2014-05-22 22:13:20 +00:00
|
|
|
|
set 7, [hl]
|
2014-09-13 07:50:56 +00:00
|
|
|
|
ld a, [wBoulderSpriteIndex]
|
|
|
|
|
ld [H_SPRITEINDEX], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call GetSpriteMovementByte2Pointer
|
|
|
|
|
ld [hl], $10
|
|
|
|
|
ld a, (SFX_02_56 - SFX_Headers_02) / 3
|
|
|
|
|
jp PlaySound
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ResetBoulderPushFlags: ; f2dd (3:72dd)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, wFlags_0xcd60
|
|
|
|
|
res 1, [hl]
|
|
|
|
|
res 6, [hl]
|
|
|
|
|
ret
|
2012-01-18 02:56:48 +00:00
|
|
|
|
|
2014-06-16 20:03:05 +00:00
|
|
|
|
_AddPartyMon: ; f2e5 (3:72e5)
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld de, wPartyCount ; wPartyCount
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcc49]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and $f
|
|
|
|
|
jr z, .asm_f2f2
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld de, wEnemyPartyCount ; wEnemyPartyCount
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_f2f2
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, [de]
|
|
|
|
|
inc a
|
2014-08-23 06:17:47 +00:00
|
|
|
|
cp PARTY_LENGTH + 1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret nc
|
|
|
|
|
ld [de], a
|
|
|
|
|
ld a, [de]
|
|
|
|
|
ld [$ffe4], a
|
|
|
|
|
add e
|
|
|
|
|
ld e, a
|
|
|
|
|
jr nc, .asm_f300
|
|
|
|
|
inc d
|
|
|
|
|
.asm_f300
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf91]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
|
|
|
|
ld a, $ff
|
|
|
|
|
ld [de], a
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMonOT ; wd273
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcc49]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and $f
|
|
|
|
|
jr z, .asm_f315
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wEnemyMonOT
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_f315
|
|
|
|
|
ld a, [$ffe4]
|
|
|
|
|
dec a
|
2013-03-17 21:54:12 +00:00
|
|
|
|
call SkipFixedLengthTextEntries
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld d, h
|
|
|
|
|
ld e, l
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPlayerName ; wd158
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld bc, $b
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call CopyData
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcc49]
|
2013-03-12 00:52:32 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .asm_f33f
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMonNicks ; wPartyMonNicks
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [$ffe4]
|
|
|
|
|
dec a
|
|
|
|
|
call SkipFixedLengthTextEntries
|
|
|
|
|
ld a, $2
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd07d], a
|
2014-06-16 20:57:26 +00:00
|
|
|
|
predef AskName
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_f33f
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMons
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcc49]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and $f
|
|
|
|
|
jr z, .asm_f34c
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wEnemyMons
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_f34c
|
|
|
|
|
ld a, [$ffe4]
|
|
|
|
|
dec a
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld bc, wPartyMon2 - wPartyMon1
|
2013-03-12 00:52:32 +00:00
|
|
|
|
call AddNTimes
|
|
|
|
|
ld e, l
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld d, h
|
|
|
|
|
push hl
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf91]
|
|
|
|
|
ld [wd0b5], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call GetMonHeader
|
|
|
|
|
ld hl, W_MONHEADER
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
|
|
|
|
pop hl
|
|
|
|
|
push hl
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcc49]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and $f
|
|
|
|
|
ld a, $98 ; set enemy trainer mon IVs to fixed average values
|
|
|
|
|
ld b, $88
|
|
|
|
|
jr nz, .writeFreshMonData
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf91]
|
|
|
|
|
ld [wd11e], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push de
|
2014-06-16 20:57:26 +00:00
|
|
|
|
predef IndexToPokedex
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop de
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wd11e]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec a
|
|
|
|
|
ld c, a
|
|
|
|
|
ld b, $2
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wPokedexOwned ; wPokedexOwned
|
2014-05-25 17:09:39 +00:00
|
|
|
|
call FlagAction
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, c
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd153], a
|
|
|
|
|
ld a, [wd11e]
|
2013-03-17 21:54:12 +00:00
|
|
|
|
dec a
|
|
|
|
|
ld c, a
|
|
|
|
|
ld b, $1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push bc
|
2014-05-25 17:09:39 +00:00
|
|
|
|
call FlagAction
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop bc
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wPokedexSeen ; wd30a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
call FlagAction
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop hl
|
|
|
|
|
push hl
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [W_ISINBATTLE] ; W_ISINBATTLE
|
2013-10-12 18:40:37 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .copyEnemyMonData
|
2014-05-24 18:40:38 +00:00
|
|
|
|
call Random ; generate random IVs
|
2014-01-07 03:34:14 +00:00
|
|
|
|
ld b, a
|
2014-05-24 18:40:38 +00:00
|
|
|
|
call Random
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.writeFreshMonData ; f3b3
|
|
|
|
|
push bc
|
|
|
|
|
ld bc, $1b
|
|
|
|
|
add hl, bc
|
|
|
|
|
pop bc
|
|
|
|
|
ld [hli], a
|
|
|
|
|
ld [hl], b ; write IVs
|
|
|
|
|
ld bc, $fff4
|
|
|
|
|
add hl, bc
|
|
|
|
|
ld a, $1
|
|
|
|
|
ld c, a
|
2013-10-12 18:40:37 +00:00
|
|
|
|
xor a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, a
|
|
|
|
|
call CalcStat ; calc HP stat (set cur Hp to max HP)
|
|
|
|
|
ld a, [H_MULTIPLICAND+1]
|
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
|
|
|
|
ld a, [H_MULTIPLICAND+2]
|
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
2013-03-12 00:52:32 +00:00
|
|
|
|
xor a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [de], a ; level (?)
|
|
|
|
|
inc de
|
|
|
|
|
ld [de], a ; status ailments
|
|
|
|
|
inc de
|
|
|
|
|
jr .copyMonTypesAndMoves
|
|
|
|
|
.copyEnemyMonData
|
|
|
|
|
ld bc, $1b
|
|
|
|
|
add hl, bc
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld a, [wEnemyMonDVs] ; copy IVs from cur enemy mon
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld [hli], a
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld a, [wEnemyMonDVs + 1]
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld [hl], a
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld a, [wEnemyMonHP] ; copy HP from cur enemy mon
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld a, [wEnemyMonHP+1]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
|
|
|
|
xor a
|
|
|
|
|
ld [de], a ; level (?)
|
|
|
|
|
inc de
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld a, [wEnemyMonStatus] ; copy status ailments from cur enemy mon
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
|
|
|
|
.copyMonTypesAndMoves
|
|
|
|
|
ld hl, W_MONHTYPES
|
|
|
|
|
ld a, [hli] ; type 1
|
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
|
|
|
|
ld a, [hli] ; type 2
|
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
|
|
|
|
ld a, [hli] ; unused (?)
|
|
|
|
|
ld [de], a
|
|
|
|
|
ld hl, W_MONHMOVES
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, [hli]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc de
|
|
|
|
|
push de
|
|
|
|
|
ld [de], a
|
2012-03-31 02:36:54 +00:00
|
|
|
|
ld a, [hli]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc de
|
|
|
|
|
ld [de], a
|
2012-03-31 02:36:54 +00:00
|
|
|
|
ld a, [hli]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc de
|
|
|
|
|
ld [de], a
|
2012-03-31 02:36:54 +00:00
|
|
|
|
ld a, [hli]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc de
|
|
|
|
|
ld [de], a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
push de
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec de
|
|
|
|
|
dec de
|
|
|
|
|
dec de
|
|
|
|
|
xor a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wHPBarMaxHP], a
|
2014-06-16 20:57:26 +00:00
|
|
|
|
predef WriteMonMoves
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop de
|
|
|
|
|
ld a, [wPlayerID] ; set trainer ID to player ID
|
|
|
|
|
inc de
|
|
|
|
|
ld [de], a
|
|
|
|
|
ld a, [wPlayerID + 1]
|
|
|
|
|
inc de
|
|
|
|
|
ld [de], a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
push de
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [W_CURENEMYLVL]
|
|
|
|
|
ld d, a
|
|
|
|
|
callab CalcExperience
|
2013-03-12 00:52:32 +00:00
|
|
|
|
pop de
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc de
|
|
|
|
|
ld a, [H_MULTIPLICAND] ; write experience
|
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
|
|
|
|
ld a, [H_MULTIPLICAND+1]
|
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
|
|
|
|
ld a, [H_MULTIPLICAND+2]
|
|
|
|
|
ld [de], a
|
|
|
|
|
xor a
|
|
|
|
|
ld b, $a
|
|
|
|
|
.writeEVsLoop ; set all EVs to 0
|
|
|
|
|
inc de
|
|
|
|
|
ld [de], a
|
|
|
|
|
dec b
|
|
|
|
|
jr nz, .writeEVsLoop
|
|
|
|
|
inc de
|
|
|
|
|
inc de
|
2013-03-12 00:52:32 +00:00
|
|
|
|
pop hl
|
2014-06-16 20:03:05 +00:00
|
|
|
|
call AddPartyMon_WriteMovePP
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc de
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [W_CURENEMYLVL] ; W_CURENEMYLVL
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [W_ISINBATTLE] ; W_ISINBATTLE
|
2013-03-12 00:52:32 +00:00
|
|
|
|
dec a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .calcFreshStats
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wEnemyMonMaxHP ; wEnemyMonMaxHP
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld bc, $a
|
|
|
|
|
call CopyData ; copy stats of cur enemy mon
|
|
|
|
|
pop hl
|
|
|
|
|
jr .done
|
|
|
|
|
.calcFreshStats
|
|
|
|
|
pop hl
|
|
|
|
|
ld bc, $10
|
|
|
|
|
add hl, bc
|
|
|
|
|
ld b, $0
|
|
|
|
|
call CalcStats ; calculate fresh set of stats
|
|
|
|
|
.done
|
2013-03-12 00:52:32 +00:00
|
|
|
|
scf
|
|
|
|
|
ret
|
2013-03-18 00:09:28 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
LoadMovePPs: ; f473 (3:7473)
|
2014-05-23 22:11:09 +00:00
|
|
|
|
call GetPredefRegisters
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; fallthrough
|
2014-06-16 20:03:05 +00:00
|
|
|
|
AddPartyMon_WriteMovePP: ; f476 (3:7476)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, $4
|
|
|
|
|
.pploop
|
|
|
|
|
ld a, [hli] ; read move ID
|
|
|
|
|
and a
|
|
|
|
|
jr z, .empty
|
|
|
|
|
dec a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
push hl
|
|
|
|
|
push de
|
|
|
|
|
push bc
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, Moves
|
|
|
|
|
ld bc, $6
|
|
|
|
|
call AddNTimes
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld de, wcd6d
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, BANK(Moves)
|
|
|
|
|
call FarCopyData
|
2013-03-12 00:52:32 +00:00
|
|
|
|
pop bc
|
|
|
|
|
pop de
|
|
|
|
|
pop hl
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcd72] ; sixth move byte = pp
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.empty
|
|
|
|
|
inc de
|
|
|
|
|
ld [de], a
|
|
|
|
|
dec b
|
|
|
|
|
jr nz, .pploop ; there are still moves to read
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-05-26 21:04:56 +00:00
|
|
|
|
; adds enemy mon [wcf91] (at position [wWhichPokemon] in enemy list) to own party
|
2014-05-22 22:13:20 +00:00
|
|
|
|
; used in the cable club trade center
|
|
|
|
|
_AddEnemyMonToPlayerParty: ; f49d (3:749d)
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyCount
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hl]
|
2014-08-23 06:17:47 +00:00
|
|
|
|
cp PARTY_LENGTH
|
2013-03-12 00:52:32 +00:00
|
|
|
|
scf
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret z ; party full, return failure
|
|
|
|
|
inc a
|
|
|
|
|
ld [hl], a ; add 1 to party members
|
|
|
|
|
ld c, a
|
|
|
|
|
ld b, $0
|
|
|
|
|
add hl, bc
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf91]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [hli], a ; add mon as last list entry
|
|
|
|
|
ld [hl], $ff ; write new sentinel
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMons
|
|
|
|
|
ld a, [wPartyCount]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec a
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld bc, wPartyMon2 - wPartyMon1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call AddNTimes
|
|
|
|
|
ld e, l
|
|
|
|
|
ld d, h
|
2015-02-08 02:37:40 +00:00
|
|
|
|
ld hl, wLoadedMon
|
|
|
|
|
call CopyData ; write new mon's data (from wLoadedMon)
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMonOT
|
|
|
|
|
ld a, [wPartyCount]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec a
|
|
|
|
|
call SkipFixedLengthTextEntries
|
|
|
|
|
ld d, h
|
|
|
|
|
ld e, l
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wEnemyMonOT
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [wWhichPokemon]
|
|
|
|
|
call SkipFixedLengthTextEntries
|
|
|
|
|
ld bc, $000b
|
|
|
|
|
call CopyData ; write new mon's OT name (from an enemy mon)
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMonNicks
|
|
|
|
|
ld a, [wPartyCount]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec a
|
|
|
|
|
call SkipFixedLengthTextEntries
|
|
|
|
|
ld d, h
|
|
|
|
|
ld e, l
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wEnemyMonNicks
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [wWhichPokemon]
|
|
|
|
|
call SkipFixedLengthTextEntries
|
|
|
|
|
ld bc, $000b
|
|
|
|
|
call CopyData ; write new mon's nickname (from an enemy mon)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf91]
|
|
|
|
|
ld [wd11e], a
|
2014-06-16 20:57:26 +00:00
|
|
|
|
predef IndexToPokedex
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wd11e]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec a
|
|
|
|
|
ld c, a
|
|
|
|
|
ld b, $1
|
|
|
|
|
ld hl, wPokedexOwned
|
|
|
|
|
push bc
|
2014-05-25 17:09:39 +00:00
|
|
|
|
call FlagAction ; add to owned pokemon
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop bc
|
|
|
|
|
ld hl, wPokedexSeen
|
2014-05-25 17:09:39 +00:00
|
|
|
|
call FlagAction ; add to seen pokemon
|
2013-03-12 00:52:32 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret ; return success
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
Func_f51e: ; f51e (3:751e)
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and a
|
|
|
|
|
jr z, .checkPartyMonSlots
|
|
|
|
|
cp $2
|
|
|
|
|
jr z, .checkPartyMonSlots
|
|
|
|
|
cp $3
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wDayCareMon
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr z, .asm_f575
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, W_NUMINBOX ; wda80
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hl]
|
2014-08-23 06:17:47 +00:00
|
|
|
|
cp MONS_PER_BOX
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .partyOrBoxNotFull
|
|
|
|
|
jr .boxFull
|
|
|
|
|
.checkPartyMonSlots
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyCount ; wPartyCount
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hl]
|
2014-08-23 06:17:47 +00:00
|
|
|
|
cp PARTY_LENGTH
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .partyOrBoxNotFull
|
|
|
|
|
.boxFull
|
|
|
|
|
scf
|
|
|
|
|
ret
|
|
|
|
|
.partyOrBoxNotFull
|
|
|
|
|
inc a
|
|
|
|
|
ld [hl], a ; increment number of mons in party/box
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld c, a
|
|
|
|
|
ld b, $0
|
|
|
|
|
add hl, bc
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp $2
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld a, [wDayCareMon]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr z, .asm_f556
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf91]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_f556
|
|
|
|
|
ld [hli], a ; write new mon ID
|
|
|
|
|
ld [hl], $ff ; write new sentinel
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec a
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMons
|
|
|
|
|
ld bc, wPartyMon2 - wPartyMon1 ; $2c
|
|
|
|
|
ld a, [wPartyCount] ; wPartyCount
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .skipToNewMonEntry
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wBoxMons
|
|
|
|
|
ld bc, wBoxMon2 - wBoxMon1 ; $21
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [W_NUMINBOX] ; wda80
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.skipToNewMonEntry
|
|
|
|
|
dec a
|
|
|
|
|
call AddNTimes
|
|
|
|
|
.asm_f575
|
|
|
|
|
push hl
|
|
|
|
|
ld e, l
|
|
|
|
|
ld d, h
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and a
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wBoxMons
|
|
|
|
|
ld bc, wBoxMon2 - wBoxMon1 ; $21
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr z, .asm_f591
|
|
|
|
|
cp $2
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wDayCareMon
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr z, .asm_f597
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMons
|
|
|
|
|
ld bc, wPartyMon2 - wPartyMon1 ; $2c
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_f591
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wWhichPokemon] ; wWhichPokemon
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call AddNTimes
|
|
|
|
|
.asm_f597
|
|
|
|
|
push hl
|
|
|
|
|
push de
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld bc, wBoxMon2 - wBoxMon1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call CopyData
|
2013-03-12 00:52:32 +00:00
|
|
|
|
pop de
|
|
|
|
|
pop hl
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and a
|
|
|
|
|
jr z, .asm_f5b4
|
|
|
|
|
cp $2
|
|
|
|
|
jr z, .asm_f5b4
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld bc, wBoxMon2 - wBoxMon1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, bc
|
|
|
|
|
ld a, [hl]
|
|
|
|
|
inc de
|
|
|
|
|
inc de
|
|
|
|
|
inc de
|
|
|
|
|
ld [de], a
|
|
|
|
|
.asm_f5b4
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp $3
|
|
|
|
|
ld de, W_DAYCAREMONOT
|
|
|
|
|
jr z, .asm_f5d3
|
|
|
|
|
dec a
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMonOT ; wd273
|
|
|
|
|
ld a, [wPartyCount] ; wPartyCount
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .asm_f5cd
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wBoxMonOT
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [W_NUMINBOX] ; wda80
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_f5cd
|
|
|
|
|
dec a
|
|
|
|
|
call SkipFixedLengthTextEntries
|
|
|
|
|
ld d, h
|
|
|
|
|
ld e, l
|
|
|
|
|
.asm_f5d3
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wBoxMonOT
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and a
|
|
|
|
|
jr z, .asm_f5e6
|
|
|
|
|
ld hl, W_DAYCAREMONOT
|
|
|
|
|
cp $2
|
|
|
|
|
jr z, .asm_f5ec
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMonOT ; wd273
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_f5e6
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wWhichPokemon] ; wWhichPokemon
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call SkipFixedLengthTextEntries
|
|
|
|
|
.asm_f5ec
|
|
|
|
|
ld bc, $b
|
|
|
|
|
call CopyData
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp $3
|
|
|
|
|
ld de, W_DAYCAREMONNAME
|
|
|
|
|
jr z, .asm_f611
|
|
|
|
|
dec a
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMonNicks ; wPartyMonNicks
|
|
|
|
|
ld a, [wPartyCount] ; wPartyCount
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .asm_f60b
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wBoxMonNicks
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [W_NUMINBOX] ; wda80
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_f60b
|
|
|
|
|
dec a
|
|
|
|
|
call SkipFixedLengthTextEntries
|
|
|
|
|
ld d, h
|
|
|
|
|
ld e, l
|
|
|
|
|
.asm_f611
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wBoxMonNicks
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and a
|
|
|
|
|
jr z, .asm_f624
|
|
|
|
|
ld hl, W_DAYCAREMONNAME
|
|
|
|
|
cp $2
|
|
|
|
|
jr z, .asm_f62a
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMonNicks ; wPartyMonNicks
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_f624
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wWhichPokemon] ; wWhichPokemon
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call SkipFixedLengthTextEntries
|
|
|
|
|
.asm_f62a
|
|
|
|
|
ld bc, $b
|
|
|
|
|
call CopyData
|
|
|
|
|
pop hl
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcf95]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
cp $1
|
|
|
|
|
jr z, .asm_f664
|
|
|
|
|
cp $3
|
|
|
|
|
jr z, .asm_f664
|
|
|
|
|
push hl
|
|
|
|
|
srl a
|
|
|
|
|
add $2
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcc49], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call LoadMonData
|
2014-08-09 05:39:13 +00:00
|
|
|
|
callba CalcLevelFromExperience
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, d
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [W_CURENEMYLVL], a ; W_CURENEMYLVL
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop hl
|
2014-08-23 06:17:47 +00:00
|
|
|
|
ld bc, wBoxMon2 - wBoxMon1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, bc
|
|
|
|
|
ld [hli], a
|
|
|
|
|
ld d, h
|
|
|
|
|
ld e, l
|
|
|
|
|
ld bc, $ffee
|
|
|
|
|
add hl, bc
|
|
|
|
|
ld b, $1
|
|
|
|
|
call CalcStats
|
|
|
|
|
.asm_f664
|
|
|
|
|
and a
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
FlagActionPredef:
|
2014-05-23 22:11:09 +00:00
|
|
|
|
call GetPredefRegisters
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-25 17:09:39 +00:00
|
|
|
|
FlagAction:
|
|
|
|
|
; Perform action b on bit c
|
|
|
|
|
; in the bitfield at hl.
|
|
|
|
|
; 0: reset
|
|
|
|
|
; 1: set
|
|
|
|
|
; 2: read
|
|
|
|
|
; Return the result in c.
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
|
|
|
|
push de
|
|
|
|
|
push bc
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
; bit
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, c
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld d, a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
and 7
|
|
|
|
|
ld e, a
|
|
|
|
|
|
|
|
|
|
; byte
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, d
|
|
|
|
|
srl a
|
|
|
|
|
srl a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
srl a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add l
|
|
|
|
|
ld l, a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
jr nc, .ok
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc h
|
2014-05-25 17:09:39 +00:00
|
|
|
|
.ok
|
|
|
|
|
|
|
|
|
|
; d = 1 << e (bitmask)
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc e
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld d, 1
|
|
|
|
|
.shift
|
2013-03-12 00:52:32 +00:00
|
|
|
|
dec e
|
2014-05-25 17:09:39 +00:00
|
|
|
|
jr z, .shifted
|
2014-05-22 22:13:20 +00:00
|
|
|
|
sla d
|
2014-05-25 17:09:39 +00:00
|
|
|
|
jr .shift
|
|
|
|
|
.shifted
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, b
|
|
|
|
|
and a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
jr z, .reset
|
|
|
|
|
cp 2
|
|
|
|
|
jr z, .read
|
|
|
|
|
|
|
|
|
|
.set
|
|
|
|
|
ld b, [hl]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, d
|
|
|
|
|
or b
|
|
|
|
|
ld [hl], a
|
|
|
|
|
jr .done
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
.reset
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, [hl]
|
|
|
|
|
ld a, d
|
|
|
|
|
xor $ff
|
|
|
|
|
and b
|
|
|
|
|
ld [hl], a
|
|
|
|
|
jr .done
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
.read
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, [hl]
|
|
|
|
|
ld a, d
|
|
|
|
|
and b
|
|
|
|
|
.done
|
|
|
|
|
pop bc
|
|
|
|
|
pop de
|
|
|
|
|
pop hl
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld c, a
|
|
|
|
|
ret
|
|
|
|
|
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
HealParty:
|
|
|
|
|
; Restore HP and PP.
|
|
|
|
|
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartySpecies
|
|
|
|
|
ld de, wPartyMon1HP
|
2014-05-25 17:09:39 +00:00
|
|
|
|
.healmon
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
cp $ff
|
2014-05-25 17:09:39 +00:00
|
|
|
|
jr z, .done
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
|
|
|
|
push de
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMon1Status - wPartyMon1HP
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add hl, de
|
|
|
|
|
xor a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld [hl], a
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push de
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld b, NUM_MOVES ; A Pokémon has 4 moves
|
2014-05-25 17:09:39 +00:00
|
|
|
|
.pp
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMon1Moves - wPartyMon1HP
|
2013-03-12 00:52:32 +00:00
|
|
|
|
add hl, de
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld a, [hl]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
and a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
jr z, .nextmove
|
|
|
|
|
|
2013-03-12 00:52:32 +00:00
|
|
|
|
dec a
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMon1PP - wPartyMon1HP
|
2013-03-12 00:52:32 +00:00
|
|
|
|
add hl, de
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2013-03-12 00:52:32 +00:00
|
|
|
|
push hl
|
|
|
|
|
push de
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push bc
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, Moves
|
|
|
|
|
ld bc, $0006
|
|
|
|
|
call AddNTimes
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld de, wcd6d
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, BANK(Moves)
|
2014-05-25 17:09:39 +00:00
|
|
|
|
call FarCopyData
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld a, [wcd72] ; default pp
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop bc
|
2013-03-12 00:52:32 +00:00
|
|
|
|
pop de
|
|
|
|
|
pop hl
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc de
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push bc
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld b, a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hl]
|
|
|
|
|
and $c0
|
2013-03-12 00:52:32 +00:00
|
|
|
|
add b
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [hl], a
|
|
|
|
|
pop bc
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
.nextmove
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec b
|
2014-05-25 17:09:39 +00:00
|
|
|
|
jr nz, .pp
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop de
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyMon1MaxHP - wPartyMon1HP
|
2013-03-12 00:52:32 +00:00
|
|
|
|
add hl, de
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
|
|
|
|
ld a, [hl]
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld [de], a
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop de
|
2013-03-12 00:52:32 +00:00
|
|
|
|
pop hl
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2013-03-12 00:52:32 +00:00
|
|
|
|
push hl
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld bc, wPartyMon2 - wPartyMon1
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld h, d
|
|
|
|
|
ld l, e
|
|
|
|
|
add hl, bc
|
|
|
|
|
ld d, h
|
|
|
|
|
ld e, l
|
2013-03-12 00:52:32 +00:00
|
|
|
|
pop hl
|
2014-05-25 17:09:39 +00:00
|
|
|
|
jr .healmon
|
|
|
|
|
|
|
|
|
|
.done
|
2014-05-22 22:13:20 +00:00
|
|
|
|
xor a
|
|
|
|
|
ld [wWhichPokemon], a
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd11e], a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld a, [wPartyCount]
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ld b, a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
.ppup
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push bc
|
|
|
|
|
call RestoreBonusPP
|
|
|
|
|
pop bc
|
|
|
|
|
ld hl, wWhichPokemon
|
2013-03-12 00:52:32 +00:00
|
|
|
|
inc [hl]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec b
|
2014-05-25 17:09:39 +00:00
|
|
|
|
jr nz, .ppup
|
2013-03-12 00:52:32 +00:00
|
|
|
|
ret
|
2013-11-09 19:21:51 +00:00
|
|
|
|
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-05-26 00:27:02 +00:00
|
|
|
|
DivideBCDPredef::
|
2014-06-16 20:25:46 +00:00
|
|
|
|
DivideBCDPredef2::
|
|
|
|
|
DivideBCDPredef3::
|
|
|
|
|
DivideBCDPredef4::
|
2014-05-23 22:11:09 +00:00
|
|
|
|
call GetPredefRegisters
|
2014-05-26 00:27:02 +00:00
|
|
|
|
|
|
|
|
|
DivideBCD::
|
2014-05-22 22:13:20 +00:00
|
|
|
|
xor a
|
|
|
|
|
ld [$ffa5], a
|
|
|
|
|
ld [$ffa6], a
|
|
|
|
|
ld [$ffa7], a
|
|
|
|
|
ld d, $1
|
|
|
|
|
.asm_f72a
|
|
|
|
|
ld a, [$ffa2]
|
|
|
|
|
and $f0
|
|
|
|
|
jr nz, .asm_f75b
|
|
|
|
|
inc d
|
|
|
|
|
ld a, [$ffa2]
|
|
|
|
|
swap a
|
|
|
|
|
and $f0
|
|
|
|
|
ld b, a
|
|
|
|
|
ld a, [$ffa3]
|
|
|
|
|
swap a
|
|
|
|
|
ld [$ffa3], a
|
|
|
|
|
and $f
|
|
|
|
|
or b
|
|
|
|
|
ld [$ffa2], a
|
|
|
|
|
ld a, [$ffa3]
|
|
|
|
|
and $f0
|
|
|
|
|
ld b, a
|
|
|
|
|
ld a, [$ffa4]
|
|
|
|
|
swap a
|
|
|
|
|
ld [$ffa4], a
|
|
|
|
|
and $f
|
|
|
|
|
or b
|
|
|
|
|
ld [$ffa3], a
|
|
|
|
|
ld a, [$ffa4]
|
|
|
|
|
and $f0
|
|
|
|
|
ld [$ffa4], a
|
|
|
|
|
jr .asm_f72a
|
|
|
|
|
.asm_f75b
|
2012-02-03 01:14:18 +00:00
|
|
|
|
push de
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push de
|
|
|
|
|
call Func_f800
|
|
|
|
|
pop de
|
|
|
|
|
ld a, b
|
|
|
|
|
swap a
|
|
|
|
|
and $f0
|
|
|
|
|
ld [$ffa5], a
|
|
|
|
|
dec d
|
|
|
|
|
jr z, .asm_f7bc
|
|
|
|
|
push de
|
|
|
|
|
call Func_f7d7
|
|
|
|
|
call Func_f800
|
|
|
|
|
pop de
|
|
|
|
|
ld a, [$ffa5]
|
|
|
|
|
or b
|
|
|
|
|
ld [$ffa5], a
|
|
|
|
|
dec d
|
|
|
|
|
jr z, .asm_f7bc
|
|
|
|
|
push de
|
|
|
|
|
call Func_f7d7
|
|
|
|
|
call Func_f800
|
|
|
|
|
pop de
|
|
|
|
|
ld a, b
|
|
|
|
|
swap a
|
|
|
|
|
and $f0
|
|
|
|
|
ld [$ffa6], a
|
|
|
|
|
dec d
|
|
|
|
|
jr z, .asm_f7bc
|
|
|
|
|
push de
|
|
|
|
|
call Func_f7d7
|
|
|
|
|
call Func_f800
|
|
|
|
|
pop de
|
|
|
|
|
ld a, [$ffa6]
|
|
|
|
|
or b
|
|
|
|
|
ld [$ffa6], a
|
|
|
|
|
dec d
|
|
|
|
|
jr z, .asm_f7bc
|
|
|
|
|
push de
|
|
|
|
|
call Func_f7d7
|
|
|
|
|
call Func_f800
|
|
|
|
|
pop de
|
|
|
|
|
ld a, b
|
|
|
|
|
swap a
|
|
|
|
|
and $f0
|
|
|
|
|
ld [$ffa7], a
|
|
|
|
|
dec d
|
|
|
|
|
jr z, .asm_f7bc
|
|
|
|
|
push de
|
|
|
|
|
call Func_f7d7
|
|
|
|
|
call Func_f800
|
|
|
|
|
pop de
|
|
|
|
|
ld a, [$ffa7]
|
|
|
|
|
or b
|
|
|
|
|
ld [$ffa7], a
|
|
|
|
|
.asm_f7bc
|
|
|
|
|
ld a, [$ffa5]
|
|
|
|
|
ld [$ffa2], a
|
|
|
|
|
ld a, [$ffa6]
|
|
|
|
|
ld [$ffa3], a
|
|
|
|
|
ld a, [$ffa7]
|
|
|
|
|
ld [$ffa4], a
|
|
|
|
|
pop de
|
|
|
|
|
ld a, $6
|
2012-02-03 01:14:18 +00:00
|
|
|
|
sub d
|
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret z
|
|
|
|
|
.asm_f7ce
|
|
|
|
|
push af
|
|
|
|
|
call Func_f7d7
|
|
|
|
|
pop af
|
2012-02-03 01:14:18 +00:00
|
|
|
|
dec a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .asm_f7ce
|
2012-02-03 01:14:18 +00:00
|
|
|
|
ret
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
Func_f7d7: ; f7d7 (3:77d7)
|
|
|
|
|
ld a, [$ffa4]
|
|
|
|
|
swap a
|
|
|
|
|
and $f
|
|
|
|
|
ld b, a
|
|
|
|
|
ld a, [$ffa3]
|
|
|
|
|
swap a
|
|
|
|
|
ld [$ffa3], a
|
|
|
|
|
and $f0
|
|
|
|
|
or b
|
|
|
|
|
ld [$ffa4], a
|
|
|
|
|
ld a, [$ffa3]
|
|
|
|
|
and $f
|
|
|
|
|
ld b, a
|
|
|
|
|
ld a, [$ffa2]
|
|
|
|
|
swap a
|
|
|
|
|
ld [$ffa2], a
|
|
|
|
|
and $f0
|
|
|
|
|
or b
|
|
|
|
|
ld [$ffa3], a
|
|
|
|
|
ld a, [$ffa2]
|
|
|
|
|
and $f
|
|
|
|
|
ld [$ffa2], a
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
Func_f800: ; f800 (3:7800)
|
|
|
|
|
ld bc, $3
|
|
|
|
|
.asm_f803
|
|
|
|
|
ld de, $ff9f
|
|
|
|
|
ld hl, $ffa2
|
|
|
|
|
push bc
|
|
|
|
|
call StringCmp
|
|
|
|
|
pop bc
|
|
|
|
|
ret c
|
|
|
|
|
inc b
|
|
|
|
|
ld de, $ffa1
|
|
|
|
|
ld hl, $ffa4
|
|
|
|
|
push bc
|
2014-06-16 20:03:05 +00:00
|
|
|
|
call SubBCD
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop bc
|
|
|
|
|
jr .asm_f803
|
|
|
|
|
|
2014-05-26 00:27:02 +00:00
|
|
|
|
|
|
|
|
|
AddBCDPredef::
|
2014-05-23 22:11:09 +00:00
|
|
|
|
call GetPredefRegisters
|
2014-05-26 00:27:02 +00:00
|
|
|
|
|
|
|
|
|
AddBCD::
|
2012-02-03 01:14:18 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, c
|
2014-05-26 00:27:02 +00:00
|
|
|
|
.add
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [de]
|
|
|
|
|
adc [hl]
|
|
|
|
|
daa
|
|
|
|
|
ld [de], a
|
|
|
|
|
dec de
|
|
|
|
|
dec hl
|
|
|
|
|
dec c
|
2014-05-26 00:27:02 +00:00
|
|
|
|
jr nz, .add
|
|
|
|
|
jr nc, .done
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $99
|
2012-02-03 01:14:18 +00:00
|
|
|
|
inc de
|
2014-05-26 00:27:02 +00:00
|
|
|
|
.fill
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [de], a
|
2012-02-03 01:14:18 +00:00
|
|
|
|
inc de
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec b
|
2014-05-26 00:27:02 +00:00
|
|
|
|
jr nz, .fill
|
|
|
|
|
.done
|
2012-02-03 01:14:18 +00:00
|
|
|
|
ret
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-26 00:27:02 +00:00
|
|
|
|
|
2014-06-16 20:03:05 +00:00
|
|
|
|
SubBCDPredef::
|
2014-05-23 22:11:09 +00:00
|
|
|
|
call GetPredefRegisters
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-06-16 20:03:05 +00:00
|
|
|
|
SubBCD::
|
2012-01-14 20:36:00 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, c
|
2014-05-26 00:27:02 +00:00
|
|
|
|
.sub
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [de]
|
|
|
|
|
sbc [hl]
|
|
|
|
|
daa
|
|
|
|
|
ld [de], a
|
|
|
|
|
dec de
|
|
|
|
|
dec hl
|
|
|
|
|
dec c
|
2014-05-26 00:27:02 +00:00
|
|
|
|
jr nz, .sub
|
|
|
|
|
jr nc, .done
|
|
|
|
|
ld a, $00
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc de
|
2014-05-26 00:27:02 +00:00
|
|
|
|
.fill
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
|
|
|
|
dec b
|
2014-05-26 00:27:02 +00:00
|
|
|
|
jr nz, .fill
|
2014-05-22 22:13:20 +00:00
|
|
|
|
scf
|
2014-05-26 00:27:02 +00:00
|
|
|
|
.done
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-06-16 20:03:05 +00:00
|
|
|
|
InitPlayerData:
|
2014-06-16 20:25:46 +00:00
|
|
|
|
InitPlayerData2:
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-05-24 18:40:38 +00:00
|
|
|
|
call Random
|
|
|
|
|
ld a, [hRandomSub]
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld [wPlayerID], a
|
|
|
|
|
|
2014-05-24 18:40:38 +00:00
|
|
|
|
call Random
|
|
|
|
|
ld a, [hRandomAdd]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [wPlayerID + 1], a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, $ff
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wd71b], a ; XXX what's this?
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-06-14 11:12:40 +00:00
|
|
|
|
ld hl, wPartyCount
|
2014-05-25 17:09:39 +00:00
|
|
|
|
call InitializeEmptyList
|
|
|
|
|
ld hl, W_NUMINBOX
|
|
|
|
|
call InitializeEmptyList
|
|
|
|
|
ld hl, wNumBagItems
|
|
|
|
|
call InitializeEmptyList
|
|
|
|
|
ld hl, wNumBoxItems
|
|
|
|
|
call InitializeEmptyList
|
|
|
|
|
|
|
|
|
|
START_MONEY EQU $3000
|
|
|
|
|
ld hl, wPlayerMoney + 1
|
|
|
|
|
ld a, START_MONEY / $100
|
|
|
|
|
ld [hld], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
xor a
|
|
|
|
|
ld [hli], a
|
|
|
|
|
inc hl
|
|
|
|
|
ld [hl], a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld [wcc49], a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, W_OBTAINEDBADGES
|
2014-05-25 17:09:39 +00:00
|
|
|
|
ld [hli], a
|
|
|
|
|
|
|
|
|
|
ld [hl], a
|
|
|
|
|
|
|
|
|
|
ld hl, wPlayerCoins
|
|
|
|
|
ld [hli], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [hl], a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
|
|
|
|
ld hl, W_GAMEPROGRESSFLAGS
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld bc, $c8
|
2014-05-25 17:09:39 +00:00
|
|
|
|
call FillMemory ; clear all game progress flags
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jp InitializeMissableObjectsFlags
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 17:09:39 +00:00
|
|
|
|
InitializeEmptyList:
|
|
|
|
|
xor a ; count
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [hli], a
|
2014-05-25 17:09:39 +00:00
|
|
|
|
dec a ; terminator
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [hl], a
|
|
|
|
|
ret
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 17:09:39 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
IsItemInBag_: ; f8a5 (3:78a5)
|
2014-05-23 22:11:09 +00:00
|
|
|
|
call GetPredefRegisters
|
2014-05-26 21:04:56 +00:00
|
|
|
|
ld hl, wNumBagItems ; wNumBagItems
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_f8ab
|
|
|
|
|
inc hl
|
|
|
|
|
ld a, [hli]
|
|
|
|
|
cp $ff
|
|
|
|
|
jr z, .asm_f8b7
|
2014-05-16 23:50:38 +00:00
|
|
|
|
cp b
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .asm_f8ab
|
|
|
|
|
ld a, [hl]
|
|
|
|
|
ld b, a
|
|
|
|
|
ret
|
|
|
|
|
.asm_f8b7
|
|
|
|
|
ld b, $0
|
|
|
|
|
ret
|
|
|
|
|
|
2014-09-10 03:55:19 +00:00
|
|
|
|
FindPathToPlayer: ; f8ba (3:78ba)
|
2014-05-16 23:50:38 +00:00
|
|
|
|
xor a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, $ff97
|
|
|
|
|
ld [hli], a
|
|
|
|
|
ld [hli], a
|
|
|
|
|
ld [hli], a
|
|
|
|
|
ld [hl], a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld hl, wNPCMovementDirections2
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld de, $0
|
2014-09-10 03:55:19 +00:00
|
|
|
|
.loop
|
|
|
|
|
ld a, [$ff99]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld a, [$ff95] ; Y distance in steps
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call CalcDifference
|
|
|
|
|
ld d, a
|
2014-05-16 23:50:38 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .asm_f8da
|
|
|
|
|
ld a, [$ff98]
|
|
|
|
|
set 0, a
|
|
|
|
|
ld [$ff98], a
|
|
|
|
|
.asm_f8da
|
|
|
|
|
ld a, [$ff9a]
|
|
|
|
|
ld b, a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld a, [$ff96] ; X distance in steps
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call CalcDifference
|
|
|
|
|
ld e, a
|
2014-05-16 23:50:38 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr nz, .asm_f8ec
|
|
|
|
|
ld a, [$ff98]
|
|
|
|
|
set 1, a
|
|
|
|
|
ld [$ff98], a
|
|
|
|
|
.asm_f8ec
|
|
|
|
|
ld a, [$ff98]
|
|
|
|
|
cp $3
|
2014-09-10 03:55:19 +00:00
|
|
|
|
jr z, .done
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, e
|
|
|
|
|
cp d
|
|
|
|
|
jr c, .asm_f90a
|
|
|
|
|
ld a, [$ff9d]
|
|
|
|
|
bit 1, a
|
|
|
|
|
jr nz, .asm_f900
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld d, NPC_MOVEMENT_RIGHT
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr .asm_f902
|
|
|
|
|
.asm_f900
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld d, NPC_MOVEMENT_LEFT
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_f902
|
|
|
|
|
ld a, [$ff9a]
|
|
|
|
|
add $1
|
|
|
|
|
ld [$ff9a], a
|
|
|
|
|
jr .asm_f91c
|
|
|
|
|
.asm_f90a
|
|
|
|
|
ld a, [$ff9d]
|
|
|
|
|
bit 0, a
|
|
|
|
|
jr nz, .asm_f914
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld d, NPC_MOVEMENT_DOWN
|
2014-05-22 22:13:20 +00:00
|
|
|
|
jr .asm_f916
|
|
|
|
|
.asm_f914
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld d, NPC_MOVEMENT_UP
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_f916
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld a, [$ff99]
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add $1
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld [$ff99], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
.asm_f91c
|
|
|
|
|
ld a, d
|
|
|
|
|
ld [hli], a
|
|
|
|
|
ld a, [$ff97]
|
|
|
|
|
inc a
|
|
|
|
|
ld [$ff97], a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
jp .loop
|
|
|
|
|
.done
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [hl], $ff
|
|
|
|
|
ret
|
|
|
|
|
|
2014-09-10 03:55:19 +00:00
|
|
|
|
CalcPositionOfPlayerRelativeToNPC: ; f929 (3:7929)
|
2014-05-16 23:50:38 +00:00
|
|
|
|
xor a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [$ff9d], a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld a, [wSpriteStateData1 + 4] ; player's sprite screen Y position in pixels
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld d, a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld a, [wSpriteStateData1 + 6] ; player's sprite screen X position in pixels
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld e, a
|
|
|
|
|
ld hl, wSpriteStateData1
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld a, [$ff95] ; sprite offset
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add l
|
|
|
|
|
add $4
|
|
|
|
|
ld l, a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
jr nc, .noCarry
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc h
|
2014-09-10 03:55:19 +00:00
|
|
|
|
.noCarry
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, d
|
|
|
|
|
ld b, a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld a, [hli] ; NPC sprite screen Y position in pixels
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call CalcDifference
|
2014-09-10 03:55:19 +00:00
|
|
|
|
jr nc, .NPCSouthOfOrAlignedWithPlayer
|
|
|
|
|
.NPCNorthOfPlayer
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
|
|
|
|
ld hl, $ff9d
|
|
|
|
|
bit 0, [hl]
|
|
|
|
|
set 0, [hl]
|
|
|
|
|
pop hl
|
2014-09-10 03:55:19 +00:00
|
|
|
|
jr .divideYDistance
|
|
|
|
|
.NPCSouthOfOrAlignedWithPlayer
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
|
|
|
|
ld hl, $ff9d
|
|
|
|
|
bit 0, [hl]
|
|
|
|
|
res 0, [hl]
|
|
|
|
|
pop hl
|
2014-09-10 03:55:19 +00:00
|
|
|
|
.divideYDistance
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
|
|
|
|
ld hl, $ffe5
|
|
|
|
|
ld [hli], a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld a, 16
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [hli], a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
call DivideBytes ; divide Y absolute distance by 16
|
|
|
|
|
ld a, [hl] ; quotient
|
|
|
|
|
ld [$ff95], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop hl
|
2014-05-16 23:50:38 +00:00
|
|
|
|
inc hl
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld b, e
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld a, [hl] ; NPC sprite screen X position in pixels
|
2014-05-22 22:13:20 +00:00
|
|
|
|
call CalcDifference
|
2014-09-10 03:55:19 +00:00
|
|
|
|
jr nc, .NPCEastOfOrAlignedWithPlayer
|
|
|
|
|
.NPCWestOfPlayer
|
2014-05-16 23:50:38 +00:00
|
|
|
|
push hl
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld hl, $ff9d
|
|
|
|
|
bit 1, [hl]
|
|
|
|
|
set 1, [hl]
|
2014-05-16 23:50:38 +00:00
|
|
|
|
pop hl
|
2014-09-10 03:55:19 +00:00
|
|
|
|
jr .divideXDistance
|
|
|
|
|
.NPCEastOfOrAlignedWithPlayer
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
|
|
|
|
ld hl, $ff9d
|
|
|
|
|
bit 1, [hl]
|
|
|
|
|
res 1, [hl]
|
|
|
|
|
pop hl
|
2014-09-10 03:55:19 +00:00
|
|
|
|
.divideXDistance
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [$ffe5], a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld a, 16
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [$ffe6], a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
call DivideBytes ; divide X absolute distance by 16
|
|
|
|
|
ld a, [$ffe7] ; quotient
|
|
|
|
|
ld [$ff96], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [$ff9b]
|
2014-05-16 23:50:38 +00:00
|
|
|
|
and a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret z
|
|
|
|
|
ld a, [$ff9d]
|
|
|
|
|
cpl
|
|
|
|
|
and $3
|
|
|
|
|
ld [$ff9d], a
|
|
|
|
|
ret
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ConvertNPCMovementDirectionsToJoypadMasks: ; f9a0 (3:79a0)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [$ff95]
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld [wNPCMovementDirections2Index], a
|
2014-05-22 22:13:20 +00:00
|
|
|
|
dec a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld de, wSimulatedJoypadStatesEnd
|
|
|
|
|
ld hl, wNPCMovementDirections2
|
2014-05-22 22:13:20 +00:00
|
|
|
|
add l
|
|
|
|
|
ld l, a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
jr nc, .loop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc h
|
2014-09-10 03:55:19 +00:00
|
|
|
|
.loop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hld]
|
2014-09-10 03:55:19 +00:00
|
|
|
|
call ConvertNPCMovementDirectionToJoypadMask
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld [de], a
|
|
|
|
|
inc de
|
|
|
|
|
ld a, [$ff95]
|
|
|
|
|
dec a
|
|
|
|
|
ld [$ff95], a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
jr nz, .loop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ret
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ConvertNPCMovementDirectionToJoypadMask: ; f9bf (3:79bf)
|
2014-05-22 22:13:20 +00:00
|
|
|
|
push hl
|
|
|
|
|
ld b, a
|
2014-09-10 03:55:19 +00:00
|
|
|
|
ld hl, NPCMovementDirectionsToJoypadMasksTable
|
|
|
|
|
.loop
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hli]
|
|
|
|
|
cp $ff
|
2014-09-10 03:55:19 +00:00
|
|
|
|
jr z, .done
|
2014-05-16 23:50:38 +00:00
|
|
|
|
cp b
|
2014-09-10 03:55:19 +00:00
|
|
|
|
jr z, .loadJoypadMask
|
2014-05-22 22:13:20 +00:00
|
|
|
|
inc hl
|
2014-09-10 03:55:19 +00:00
|
|
|
|
jr .loop
|
|
|
|
|
.loadJoypadMask
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ld a, [hl]
|
2014-09-10 03:55:19 +00:00
|
|
|
|
.done
|
2014-05-22 22:13:20 +00:00
|
|
|
|
pop hl
|
2014-05-16 23:50:38 +00:00
|
|
|
|
ret
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-09-10 03:55:19 +00:00
|
|
|
|
NPCMovementDirectionsToJoypadMasksTable: ; f9d2 (3:79d2)
|
|
|
|
|
db NPC_MOVEMENT_UP, D_UP
|
|
|
|
|
db NPC_MOVEMENT_DOWN, D_DOWN
|
|
|
|
|
db NPC_MOVEMENT_LEFT, D_LEFT
|
|
|
|
|
db NPC_MOVEMENT_RIGHT, D_RIGHT
|
|
|
|
|
db $ff
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
Func_f9db: ; f9db (3:79db)
|
|
|
|
|
ret
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/hp_bar.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/hidden_object_functions3.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
SECTION "NPC Sprites 1", ROMX, BANK[NPC_SPRITES_1]
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
OakAideSprite: INCBIN "gfx/sprites/oak_aide.2bpp"
|
|
|
|
|
RockerSprite: INCBIN "gfx/sprites/rocker.2bpp"
|
|
|
|
|
SwimmerSprite: INCBIN "gfx/sprites/swimmer.2bpp"
|
|
|
|
|
WhitePlayerSprite: INCBIN "gfx/sprites/white_player.2bpp"
|
|
|
|
|
GymHelperSprite: INCBIN "gfx/sprites/gym_helper.2bpp"
|
|
|
|
|
OldPersonSprite: INCBIN "gfx/sprites/old_person.2bpp"
|
|
|
|
|
MartGuySprite: INCBIN "gfx/sprites/mart_guy.2bpp"
|
|
|
|
|
FisherSprite: INCBIN "gfx/sprites/fisher.2bpp"
|
|
|
|
|
OldMediumWomanSprite: INCBIN "gfx/sprites/old_medium_woman.2bpp"
|
|
|
|
|
NurseSprite: INCBIN "gfx/sprites/nurse.2bpp"
|
|
|
|
|
CableClubWomanSprite: INCBIN "gfx/sprites/cable_club_woman.2bpp"
|
|
|
|
|
MrMasterballSprite: INCBIN "gfx/sprites/mr_masterball.2bpp"
|
|
|
|
|
LaprasGiverSprite: INCBIN "gfx/sprites/lapras_giver.2bpp"
|
|
|
|
|
WardenSprite: INCBIN "gfx/sprites/warden.2bpp"
|
|
|
|
|
SsCaptainSprite: INCBIN "gfx/sprites/ss_captain.2bpp"
|
|
|
|
|
Fisher2Sprite: INCBIN "gfx/sprites/fisher2.2bpp"
|
|
|
|
|
BlackbeltSprite: INCBIN "gfx/sprites/blackbelt.2bpp"
|
|
|
|
|
GuardSprite: INCBIN "gfx/sprites/guard.2bpp"
|
|
|
|
|
BallSprite: INCBIN "gfx/sprites/ball.2bpp"
|
|
|
|
|
OmanyteSprite: INCBIN "gfx/sprites/omanyte.2bpp"
|
|
|
|
|
BoulderSprite: INCBIN "gfx/sprites/boulder.2bpp"
|
|
|
|
|
PaperSheetSprite: INCBIN "gfx/sprites/paper_sheet.2bpp"
|
|
|
|
|
BookMapDexSprite: INCBIN "gfx/sprites/book_map_dex.2bpp"
|
|
|
|
|
ClipboardSprite: INCBIN "gfx/sprites/clipboard.2bpp"
|
|
|
|
|
SnorlaxSprite: INCBIN "gfx/sprites/snorlax.2bpp"
|
|
|
|
|
OldAmberSprite: INCBIN "gfx/sprites/old_amber.2bpp"
|
|
|
|
|
LyingOldManSprite: INCBIN "gfx/sprites/lying_old_man.2bpp"
|
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
|
|
|
|
|
SECTION "Graphics", ROMX, BANK[GFX]
|
|
|
|
|
|
2014-05-30 08:30:10 +00:00
|
|
|
|
PokemonLogoGraphics: INCBIN "gfx/pokemon_logo.2bpp"
|
|
|
|
|
FontGraphics: INCBIN "gfx/font.1bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
ABTiles: INCBIN "gfx/AB.2bpp"
|
|
|
|
|
HpBarAndStatusGraphics: INCBIN "gfx/hp_bar_and_status.2bpp"
|
|
|
|
|
BattleHudTiles1: INCBIN "gfx/battle_hud1.1bpp"
|
|
|
|
|
BattleHudTiles2: INCBIN "gfx/battle_hud2.1bpp"
|
|
|
|
|
BattleHudTiles3: INCBIN "gfx/battle_hud3.1bpp"
|
2014-05-30 08:30:10 +00:00
|
|
|
|
NintendoCopyrightLogoGraphics: INCBIN "gfx/copyright.2bpp"
|
|
|
|
|
GamefreakLogoGraphics: INCBIN "gfx/gamefreak.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
TextBoxGraphics: INCBIN "gfx/text_box.2bpp"
|
|
|
|
|
PokedexTileGraphics: INCBIN "gfx/pokedex.2bpp"
|
|
|
|
|
WorldMapTileGraphics: INCBIN "gfx/town_map.2bpp"
|
|
|
|
|
PlayerCharacterTitleGraphics: INCBIN "gfx/player_title.2bpp"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
|
|
|
|
|
SECTION "Battle (bank 4)", ROMX, BANK[$4]
|
|
|
|
|
|
2015-04-01 09:23:27 +00:00
|
|
|
|
INCLUDE "engine/overworld/is_player_just_outside_map.asm"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/menu/status_screen.asm"
|
|
|
|
|
INCLUDE "engine/menu/party_menu.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 04:01:59 +00:00
|
|
|
|
RedPicFront:: INCBIN "pic/trainer/red.pic"
|
|
|
|
|
ShrinkPic1:: INCBIN "pic/trainer/shrink1.pic"
|
|
|
|
|
ShrinkPic2:: INCBIN "pic/trainer/shrink2.pic"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/turn_sprite.asm"
|
|
|
|
|
INCLUDE "engine/menu/start_sub_menus.asm"
|
|
|
|
|
INCLUDE "engine/items/tms.asm"
|
2015-04-01 09:23:27 +00:00
|
|
|
|
INCLUDE "engine/battle/end_of_battle.asm"
|
|
|
|
|
INCLUDE "engine/battle/wild_encounters.asm"
|
|
|
|
|
INCLUDE "engine/battle/moveEffects/recoil_effect.asm"
|
|
|
|
|
INCLUDE "engine/battle/moveEffects/conversion_effect.asm"
|
|
|
|
|
INCLUDE "engine/battle/moveEffects/haze_effect.asm"
|
|
|
|
|
INCLUDE "engine/battle/get_trainer_name.asm"
|
2014-05-24 18:44:12 +00:00
|
|
|
|
INCLUDE "engine/random.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
SECTION "NPC Sprites 2", ROMX, BANK[NPC_SPRITES_2]
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
RedCyclingSprite: INCBIN "gfx/sprites/cycling.2bpp"
|
|
|
|
|
RedSprite: INCBIN "gfx/sprites/red.2bpp"
|
|
|
|
|
BlueSprite: INCBIN "gfx/sprites/blue.2bpp"
|
|
|
|
|
OakSprite: INCBIN "gfx/sprites/oak.2bpp"
|
|
|
|
|
BugCatcherSprite: INCBIN "gfx/sprites/bug_catcher.2bpp"
|
|
|
|
|
SlowbroSprite: INCBIN "gfx/sprites/slowbro.2bpp"
|
|
|
|
|
LassSprite: INCBIN "gfx/sprites/lass.2bpp"
|
|
|
|
|
BlackHairBoy1Sprite: INCBIN "gfx/sprites/black_hair_boy_1.2bpp"
|
|
|
|
|
LittleGirlSprite: INCBIN "gfx/sprites/little_girl.2bpp"
|
|
|
|
|
BirdSprite: INCBIN "gfx/sprites/bird.2bpp"
|
|
|
|
|
FatBaldGuySprite: INCBIN "gfx/sprites/fat_bald_guy.2bpp"
|
|
|
|
|
GamblerSprite: INCBIN "gfx/sprites/gambler.2bpp"
|
|
|
|
|
BlackHairBoy2Sprite: INCBIN "gfx/sprites/black_hair_boy_2.2bpp"
|
|
|
|
|
GirlSprite: INCBIN "gfx/sprites/girl.2bpp"
|
|
|
|
|
HikerSprite: INCBIN "gfx/sprites/hiker.2bpp"
|
|
|
|
|
FoulardWomanSprite: INCBIN "gfx/sprites/foulard_woman.2bpp"
|
|
|
|
|
GentlemanSprite: INCBIN "gfx/sprites/gentleman.2bpp"
|
|
|
|
|
DaisySprite: INCBIN "gfx/sprites/daisy.2bpp"
|
|
|
|
|
BikerSprite: INCBIN "gfx/sprites/biker.2bpp"
|
|
|
|
|
SailorSprite: INCBIN "gfx/sprites/sailor.2bpp"
|
|
|
|
|
CookSprite: INCBIN "gfx/sprites/cook.2bpp"
|
|
|
|
|
BikeShopGuySprite: INCBIN "gfx/sprites/bike_shop_guy.2bpp"
|
|
|
|
|
MrFujiSprite: INCBIN "gfx/sprites/mr_fuji.2bpp"
|
|
|
|
|
GiovanniSprite: INCBIN "gfx/sprites/giovanni.2bpp"
|
|
|
|
|
RocketSprite: INCBIN "gfx/sprites/rocket.2bpp"
|
|
|
|
|
MediumSprite: INCBIN "gfx/sprites/medium.2bpp"
|
|
|
|
|
WaiterSprite: INCBIN "gfx/sprites/waiter.2bpp"
|
|
|
|
|
ErikaSprite: INCBIN "gfx/sprites/erika.2bpp"
|
|
|
|
|
MomGeishaSprite: INCBIN "gfx/sprites/mom_geisha.2bpp"
|
|
|
|
|
BrunetteGirlSprite: INCBIN "gfx/sprites/brunette_girl.2bpp"
|
|
|
|
|
LanceSprite: INCBIN "gfx/sprites/lance.2bpp"
|
|
|
|
|
MomSprite: INCBIN "gfx/sprites/mom.2bpp"
|
|
|
|
|
BaldingGuySprite: INCBIN "gfx/sprites/balding_guy.2bpp"
|
|
|
|
|
YoungBoySprite: INCBIN "gfx/sprites/young_boy.2bpp"
|
|
|
|
|
GameboyKidSprite: INCBIN "gfx/sprites/gameboy_kid.2bpp"
|
|
|
|
|
ClefairySprite: INCBIN "gfx/sprites/clefairy.2bpp"
|
|
|
|
|
AgathaSprite: INCBIN "gfx/sprites/agatha.2bpp"
|
|
|
|
|
BrunoSprite: INCBIN "gfx/sprites/bruno.2bpp"
|
|
|
|
|
LoreleiSprite: INCBIN "gfx/sprites/lorelei.2bpp"
|
|
|
|
|
SeelSprite: INCBIN "gfx/sprites/seel.2bpp"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
SECTION "Battle (bank 5)", ROMX, BANK[$5]
|
|
|
|
|
|
|
|
|
|
INCLUDE "engine/load_pokedex_tiles.asm"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/overworld/map_sprites.asm"
|
|
|
|
|
INCLUDE "engine/overworld/emotion_bubbles.asm"
|
|
|
|
|
INCLUDE "engine/evolve_trade.asm"
|
2015-04-01 09:41:20 +00:00
|
|
|
|
INCLUDE "engine/battle/moveEffects/substitute_effect.asm"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/menu/pc.asm"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank6",ROMX,BANK[$6]
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadoncity.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadoncity.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonCityBlocks: INCBIN "maps/celadoncity.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/pallettown.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/pallettown.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
PalletTownBlocks: INCBIN "maps/pallettown.blk"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/viridiancity.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/viridiancity.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
ViridianCityBlocks: INCBIN "maps/viridiancity.blk"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/pewtercity.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/pewtercity.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
PewterCityBlocks: INCBIN "maps/pewtercity.blk"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ceruleancity.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ceruleancity.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeruleanCityBlocks: INCBIN "maps/ceruleancity.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/vermilioncity.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/vermilioncity.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
VermilionCityBlocks: INCBIN "maps/vermilioncity.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/fuchsiacity.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/fuchsiacity.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
FuchsiaCityBlocks: INCBIN "maps/fuchsiacity.blk"
|
2013-03-17 21:54:12 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/play_time.asm"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "scripts/pallettown.asm"
|
|
|
|
|
INCLUDE "scripts/viridiancity.asm"
|
|
|
|
|
INCLUDE "scripts/pewtercity.asm"
|
|
|
|
|
INCLUDE "scripts/ceruleancity.asm"
|
|
|
|
|
INCLUDE "scripts/vermilioncity.asm"
|
|
|
|
|
INCLUDE "scripts/celadoncity.asm"
|
|
|
|
|
INCLUDE "scripts/fuchsiacity.asm"
|
2013-03-17 21:54:12 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/blueshouse.asm"
|
|
|
|
|
INCLUDE "scripts/blueshouse.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/blueshouse.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
BluesHouseBlocks: INCBIN "maps/blueshouse.blk"
|
2013-03-17 21:54:12 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/vermilionhouse3.asm"
|
|
|
|
|
INCLUDE "scripts/vermilionhouse3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/vermilionhouse3.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
VermilionHouse3Blocks: INCBIN "maps/vermilionhouse3.blk"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/indigoplateaulobby.asm"
|
|
|
|
|
INCLUDE "scripts/indigoplateaulobby.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/indigoplateaulobby.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
IndigoPlateauLobbyBlocks: INCBIN "maps/indigoplateaulobby.blk"
|
2014-05-16 23:50:38 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/silphco4.asm"
|
|
|
|
|
INCLUDE "scripts/silphco4.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/silphco4.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SilphCo4Blocks: INCBIN "maps/silphco4.blk"
|
2014-05-16 23:50:38 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/silphco5.asm"
|
|
|
|
|
INCLUDE "scripts/silphco5.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/silphco5.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SilphCo5Blocks: INCBIN "maps/silphco5.blk"
|
2013-12-09 15:55:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/silphco6.asm"
|
|
|
|
|
INCLUDE "scripts/silphco6.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/silphco6.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SilphCo6Blocks: INCBIN "maps/silphco6.blk"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/overworld/npc_movement.asm"
|
|
|
|
|
INCLUDE "engine/overworld/doors.asm"
|
|
|
|
|
INCLUDE "engine/overworld/ledges.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank7",ROMX,BANK[$7]
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/cinnabarisland.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/cinnabarisland.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CinnabarIslandBlocks: INCBIN "maps/cinnabarisland.blk"
|
2013-10-25 18:15:25 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route1.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route1Blocks: INCBIN "maps/route1.blk"
|
2013-10-25 18:15:25 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
UndergroundPathEntranceRoute8Blocks: INCBIN "maps/undergroundpathentranceroute8.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
OaksLabBlocks: INCBIN "maps/oakslab.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route16HouseBlocks:
|
|
|
|
|
Route2HouseBlocks:
|
|
|
|
|
SaffronHouse1Blocks:
|
|
|
|
|
SaffronHouse2Blocks:
|
|
|
|
|
VermilionHouse1Blocks:
|
|
|
|
|
NameRaterBlocks:
|
|
|
|
|
LavenderHouse1Blocks:
|
|
|
|
|
LavenderHouse2Blocks:
|
|
|
|
|
CeruleanHouse1Blocks:
|
|
|
|
|
PewterHouse1Blocks:
|
|
|
|
|
PewterHouse2Blocks:
|
|
|
|
|
ViridianHouseBlocks: INCBIN "maps/viridianhouse.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonMansion5Blocks:
|
|
|
|
|
SchoolBlocks: INCBIN "maps/school.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeruleanHouseTrashedBlocks: INCBIN "maps/ceruleanhousetrashed.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
DiglettsCaveEntranceRoute11Blocks:
|
|
|
|
|
DiglettsCaveRoute2Blocks: INCBIN "maps/diglettscaveroute2.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "text/monster_names.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/clear_save.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/predefs7.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "scripts/cinnabarisland.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "scripts/route1.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/oakslab.asm"
|
|
|
|
|
INCLUDE "scripts/oakslab.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/oakslab.asm"
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/viridianmart.asm"
|
|
|
|
|
INCLUDE "scripts/viridianmart.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/viridianmart.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
ViridianMartBlocks: INCBIN "maps/viridianmart.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/school.asm"
|
|
|
|
|
INCLUDE "scripts/school.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/school.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/viridianhouse.asm"
|
|
|
|
|
INCLUDE "scripts/viridianhouse.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/viridianhouse.asm"
|
2012-01-19 06:48:31 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/pewterhouse1.asm"
|
|
|
|
|
INCLUDE "scripts/pewterhouse1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/pewterhouse1.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/pewterhouse2.asm"
|
|
|
|
|
INCLUDE "scripts/pewterhouse2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/pewterhouse2.asm"
|
2014-05-16 23:50:38 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ceruleanhousetrashed.asm"
|
|
|
|
|
INCLUDE "scripts/ceruleanhousetrashed.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ceruleanhousetrashed.asm"
|
2014-05-16 23:50:38 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ceruleanhouse1.asm"
|
|
|
|
|
INCLUDE "scripts/ceruleanhouse1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ceruleanhouse1.asm"
|
2012-01-19 06:48:31 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/bikeshop.asm"
|
|
|
|
|
INCLUDE "scripts/bikeshop.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/bikeshop.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
BikeShopBlocks: INCBIN "maps/bikeshop.blk"
|
2012-01-19 06:48:31 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/lavenderhouse1.asm"
|
|
|
|
|
INCLUDE "scripts/lavenderhouse1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/lavenderhouse1.asm"
|
2012-01-19 06:48:31 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/lavenderhouse2.asm"
|
|
|
|
|
INCLUDE "scripts/lavenderhouse2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/lavenderhouse2.asm"
|
2012-01-19 03:15:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/namerater.asm"
|
|
|
|
|
INCLUDE "scripts/namerater.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/namerater.asm"
|
2014-05-16 23:50:38 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/vermilionhouse1.asm"
|
|
|
|
|
INCLUDE "scripts/vermilionhouse1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/vermilionhouse1.asm"
|
2014-05-16 23:50:38 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/vermiliondock.asm"
|
|
|
|
|
INCLUDE "scripts/vermiliondock.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/vermiliondock.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
VermilionDockBlocks: INCBIN "maps/vermiliondock.blk"
|
2012-01-19 03:15:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadonmansion5.asm"
|
|
|
|
|
INCLUDE "scripts/celadonmansion5.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonmansion5.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/fuchsiamart.asm"
|
|
|
|
|
INCLUDE "scripts/fuchsiamart.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/fuchsiamart.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
FuchsiaMartBlocks: INCBIN "maps/fuchsiamart.blk"
|
2012-01-22 18:52:46 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/saffronhouse1.asm"
|
|
|
|
|
INCLUDE "scripts/saffronhouse1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/saffronhouse1.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/saffronhouse2.asm"
|
|
|
|
|
INCLUDE "scripts/saffronhouse2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/saffronhouse2.asm"
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/diglettscaveroute2.asm"
|
|
|
|
|
INCLUDE "scripts/diglettscaveroute2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/diglettscaveroute2.asm"
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route2house.asm"
|
|
|
|
|
INCLUDE "scripts/route2house.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route2house.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route5gate.asm"
|
|
|
|
|
INCLUDE "scripts/route5gate.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route5gate.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route5GateBlocks: INCBIN "maps/route5gate.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route6gate.asm"
|
|
|
|
|
INCLUDE "scripts/route6gate.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route6gate.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route6GateBlocks: INCBIN "maps/route6gate.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route7gate.asm"
|
|
|
|
|
INCLUDE "scripts/route7gate.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route7gate.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route7GateBlocks: INCBIN "maps/route7gate.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route8gate.asm"
|
|
|
|
|
INCLUDE "scripts/route8gate.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route8gate.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route8GateBlocks: INCBIN "maps/route8gate.blk"
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/undergroundpathentranceroute8.asm"
|
|
|
|
|
INCLUDE "scripts/undergroundpathentranceroute8.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/undergroundpathentranceroute8.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/powerplant.asm"
|
|
|
|
|
INCLUDE "scripts/powerplant.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/powerplant.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
PowerPlantBlocks: INCBIN "maps/powerplant.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/diglettscaveroute11.asm"
|
|
|
|
|
INCLUDE "scripts/diglettscaveroute11.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/diglettscaveroute11.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route16house.asm"
|
|
|
|
|
INCLUDE "scripts/route16house.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route16house.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route22gate.asm"
|
|
|
|
|
INCLUDE "scripts/route22gate.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route22gate.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route22GateBlocks: INCBIN "maps/route22gate.blk"
|
2012-01-19 04:17:28 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/billshouse.asm"
|
|
|
|
|
INCLUDE "scripts/billshouse.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/billshouse.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
BillsHouseBlocks: INCBIN "maps/billshouse.blk"
|
2014-10-17 19:08:40 +00:00
|
|
|
|
IF DEF(_OPTION_BEACH_HOUSE)
|
|
|
|
|
INCLUDE "data/mapHeaders/beach_house.asm"
|
|
|
|
|
INCLUDE "scripts/beach_house.asm"
|
|
|
|
|
BeachHouseBlockdata: INCBIN "maps/beach_house.blk"
|
|
|
|
|
INCLUDE "data/mapObjects/beach_house.asm"
|
|
|
|
|
ENDC
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/menu/oaks_pc.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/hidden_object_functions7.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
SECTION "Pics 1", ROMX, BANK[PICS_1]
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 04:01:59 +00:00
|
|
|
|
RhydonPicFront:: INCBIN "pic/bmon/rhydon.pic"
|
|
|
|
|
RhydonPicBack:: INCBIN "pic/monback/rhydonb.pic"
|
|
|
|
|
KangaskhanPicFront:: INCBIN "pic/bmon/kangaskhan.pic"
|
|
|
|
|
KangaskhanPicBack:: INCBIN "pic/monback/kangaskhanb.pic"
|
|
|
|
|
NidoranMPicFront:: INCBIN "pic/bmon/nidoranm.pic"
|
|
|
|
|
NidoranMPicBack:: INCBIN "pic/monback/nidoranmb.pic"
|
|
|
|
|
ClefairyPicFront:: INCBIN "pic/bmon/clefairy.pic"
|
|
|
|
|
ClefairyPicBack:: INCBIN "pic/monback/clefairyb.pic"
|
|
|
|
|
SpearowPicFront:: INCBIN "pic/bmon/spearow.pic"
|
|
|
|
|
SpearowPicBack:: INCBIN "pic/monback/spearowb.pic"
|
|
|
|
|
VoltorbPicFront:: INCBIN "pic/bmon/voltorb.pic"
|
|
|
|
|
VoltorbPicBack:: INCBIN "pic/monback/voltorbb.pic"
|
|
|
|
|
NidokingPicFront:: INCBIN "pic/bmon/nidoking.pic"
|
|
|
|
|
NidokingPicBack:: INCBIN "pic/monback/nidokingb.pic"
|
|
|
|
|
SlowbroPicFront:: INCBIN "pic/bmon/slowbro.pic"
|
|
|
|
|
SlowbroPicBack:: INCBIN "pic/monback/slowbrob.pic"
|
|
|
|
|
IvysaurPicFront:: INCBIN "pic/bmon/ivysaur.pic"
|
|
|
|
|
IvysaurPicBack:: INCBIN "pic/monback/ivysaurb.pic"
|
|
|
|
|
ExeggutorPicFront:: INCBIN "pic/bmon/exeggutor.pic"
|
|
|
|
|
ExeggutorPicBack:: INCBIN "pic/monback/exeggutorb.pic"
|
|
|
|
|
LickitungPicFront:: INCBIN "pic/bmon/lickitung.pic"
|
|
|
|
|
LickitungPicBack:: INCBIN "pic/monback/lickitungb.pic"
|
|
|
|
|
ExeggcutePicFront:: INCBIN "pic/bmon/exeggcute.pic"
|
|
|
|
|
ExeggcutePicBack:: INCBIN "pic/monback/exeggcuteb.pic"
|
|
|
|
|
GrimerPicFront:: INCBIN "pic/bmon/grimer.pic"
|
|
|
|
|
GrimerPicBack:: INCBIN "pic/monback/grimerb.pic"
|
|
|
|
|
GengarPicFront:: INCBIN "pic/bmon/gengar.pic"
|
|
|
|
|
GengarPicBack:: INCBIN "pic/monback/gengarb.pic"
|
|
|
|
|
NidoranFPicFront:: INCBIN "pic/bmon/nidoranf.pic"
|
|
|
|
|
NidoranFPicBack:: INCBIN "pic/monback/nidoranfb.pic"
|
|
|
|
|
NidoqueenPicFront:: INCBIN "pic/bmon/nidoqueen.pic"
|
|
|
|
|
NidoqueenPicBack:: INCBIN "pic/monback/nidoqueenb.pic"
|
|
|
|
|
CubonePicFront:: INCBIN "pic/bmon/cubone.pic"
|
|
|
|
|
CubonePicBack:: INCBIN "pic/monback/cuboneb.pic"
|
|
|
|
|
RhyhornPicFront:: INCBIN "pic/bmon/rhyhorn.pic"
|
|
|
|
|
RhyhornPicBack:: INCBIN "pic/monback/rhyhornb.pic"
|
|
|
|
|
LaprasPicFront:: INCBIN "pic/bmon/lapras.pic"
|
|
|
|
|
LaprasPicBack:: INCBIN "pic/monback/laprasb.pic"
|
|
|
|
|
ArcaninePicFront:: INCBIN "pic/bmon/arcanine.pic"
|
|
|
|
|
ArcaninePicBack:: INCBIN "pic/monback/arcanineb.pic"
|
|
|
|
|
GyaradosPicFront:: INCBIN "pic/bmon/gyarados.pic"
|
|
|
|
|
GyaradosPicBack:: INCBIN "pic/monback/gyaradosb.pic"
|
|
|
|
|
ShellderPicFront:: INCBIN "pic/bmon/shellder.pic"
|
|
|
|
|
ShellderPicBack:: INCBIN "pic/monback/shellderb.pic"
|
|
|
|
|
TentacoolPicFront:: INCBIN "pic/bmon/tentacool.pic"
|
|
|
|
|
TentacoolPicBack:: INCBIN "pic/monback/tentacoolb.pic"
|
|
|
|
|
GastlyPicFront:: INCBIN "pic/bmon/gastly.pic"
|
|
|
|
|
GastlyPicBack:: INCBIN "pic/monback/gastlyb.pic"
|
|
|
|
|
ScytherPicFront:: INCBIN "pic/bmon/scyther.pic"
|
|
|
|
|
ScytherPicBack:: INCBIN "pic/monback/scytherb.pic"
|
|
|
|
|
StaryuPicFront:: INCBIN "pic/bmon/staryu.pic"
|
|
|
|
|
StaryuPicBack:: INCBIN "pic/monback/staryub.pic"
|
|
|
|
|
BlastoisePicFront:: INCBIN "pic/bmon/blastoise.pic"
|
|
|
|
|
BlastoisePicBack:: INCBIN "pic/monback/blastoiseb.pic"
|
|
|
|
|
PinsirPicFront:: INCBIN "pic/bmon/pinsir.pic"
|
|
|
|
|
PinsirPicBack:: INCBIN "pic/monback/pinsirb.pic"
|
|
|
|
|
TangelaPicFront:: INCBIN "pic/bmon/tangela.pic"
|
|
|
|
|
TangelaPicBack:: INCBIN "pic/monback/tangelab.pic"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
|
|
|
|
|
SECTION "Battle (bank 9)", ROMX, BANK[$9]
|
2015-04-01 09:41:20 +00:00
|
|
|
|
INCLUDE "engine/battle/print_type.asm"
|
|
|
|
|
INCLUDE "engine/battle/save_trainer_name.asm"
|
|
|
|
|
INCLUDE "engine/battle/moveEffects/focus_energy_effect.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
SECTION "Pics 2", ROMX, BANK[PICS_2]
|
2012-01-18 02:56:48 +00:00
|
|
|
|
|
2014-05-25 04:01:59 +00:00
|
|
|
|
GrowlithePicFront:: INCBIN "pic/bmon/growlithe.pic"
|
|
|
|
|
GrowlithePicBack:: INCBIN "pic/monback/growlitheb.pic"
|
|
|
|
|
OnixPicFront:: INCBIN "pic/bmon/onix.pic"
|
|
|
|
|
OnixPicBack:: INCBIN "pic/monback/onixb.pic"
|
|
|
|
|
FearowPicFront:: INCBIN "pic/bmon/fearow.pic"
|
|
|
|
|
FearowPicBack:: INCBIN "pic/monback/fearowb.pic"
|
|
|
|
|
PidgeyPicFront:: INCBIN "pic/bmon/pidgey.pic"
|
|
|
|
|
PidgeyPicBack:: INCBIN "pic/monback/pidgeyb.pic"
|
|
|
|
|
SlowpokePicFront:: INCBIN "pic/bmon/slowpoke.pic"
|
|
|
|
|
SlowpokePicBack:: INCBIN "pic/monback/slowpokeb.pic"
|
|
|
|
|
KadabraPicFront:: INCBIN "pic/bmon/kadabra.pic"
|
|
|
|
|
KadabraPicBack:: INCBIN "pic/monback/kadabrab.pic"
|
|
|
|
|
GravelerPicFront:: INCBIN "pic/bmon/graveler.pic"
|
|
|
|
|
GravelerPicBack:: INCBIN "pic/monback/gravelerb.pic"
|
|
|
|
|
ChanseyPicFront:: INCBIN "pic/bmon/chansey.pic"
|
|
|
|
|
ChanseyPicBack:: INCBIN "pic/monback/chanseyb.pic"
|
|
|
|
|
MachokePicFront:: INCBIN "pic/bmon/machoke.pic"
|
|
|
|
|
MachokePicBack:: INCBIN "pic/monback/machokeb.pic"
|
|
|
|
|
MrMimePicFront:: INCBIN "pic/bmon/mr.mime.pic"
|
|
|
|
|
MrMimePicBack:: INCBIN "pic/monback/mr.mimeb.pic"
|
|
|
|
|
HitmonleePicFront:: INCBIN "pic/bmon/hitmonlee.pic"
|
|
|
|
|
HitmonleePicBack:: INCBIN "pic/monback/hitmonleeb.pic"
|
|
|
|
|
HitmonchanPicFront:: INCBIN "pic/bmon/hitmonchan.pic"
|
|
|
|
|
HitmonchanPicBack:: INCBIN "pic/monback/hitmonchanb.pic"
|
|
|
|
|
ArbokPicFront:: INCBIN "pic/bmon/arbok.pic"
|
|
|
|
|
ArbokPicBack:: INCBIN "pic/monback/arbokb.pic"
|
|
|
|
|
ParasectPicFront:: INCBIN "pic/bmon/parasect.pic"
|
|
|
|
|
ParasectPicBack:: INCBIN "pic/monback/parasectb.pic"
|
|
|
|
|
PsyduckPicFront:: INCBIN "pic/bmon/psyduck.pic"
|
|
|
|
|
PsyduckPicBack:: INCBIN "pic/monback/psyduckb.pic"
|
|
|
|
|
DrowzeePicFront:: INCBIN "pic/bmon/drowzee.pic"
|
|
|
|
|
DrowzeePicBack:: INCBIN "pic/monback/drowzeeb.pic"
|
|
|
|
|
GolemPicFront:: INCBIN "pic/bmon/golem.pic"
|
|
|
|
|
GolemPicBack:: INCBIN "pic/monback/golemb.pic"
|
|
|
|
|
MagmarPicFront:: INCBIN "pic/bmon/magmar.pic"
|
|
|
|
|
MagmarPicBack:: INCBIN "pic/monback/magmarb.pic"
|
|
|
|
|
ElectabuzzPicFront:: INCBIN "pic/bmon/electabuzz.pic"
|
|
|
|
|
ElectabuzzPicBack:: INCBIN "pic/monback/electabuzzb.pic"
|
|
|
|
|
MagnetonPicFront:: INCBIN "pic/bmon/magneton.pic"
|
|
|
|
|
MagnetonPicBack:: INCBIN "pic/monback/magnetonb.pic"
|
|
|
|
|
KoffingPicFront:: INCBIN "pic/bmon/koffing.pic"
|
|
|
|
|
KoffingPicBack:: INCBIN "pic/monback/koffingb.pic"
|
|
|
|
|
MankeyPicFront:: INCBIN "pic/bmon/mankey.pic"
|
|
|
|
|
MankeyPicBack:: INCBIN "pic/monback/mankeyb.pic"
|
|
|
|
|
SeelPicFront:: INCBIN "pic/bmon/seel.pic"
|
|
|
|
|
SeelPicBack:: INCBIN "pic/monback/seelb.pic"
|
|
|
|
|
DiglettPicFront:: INCBIN "pic/bmon/diglett.pic"
|
|
|
|
|
DiglettPicBack:: INCBIN "pic/monback/diglettb.pic"
|
|
|
|
|
TaurosPicFront:: INCBIN "pic/bmon/tauros.pic"
|
|
|
|
|
TaurosPicBack:: INCBIN "pic/monback/taurosb.pic"
|
|
|
|
|
FarfetchdPicFront:: INCBIN "pic/bmon/farfetchd.pic"
|
|
|
|
|
FarfetchdPicBack:: INCBIN "pic/monback/farfetchdb.pic"
|
|
|
|
|
VenonatPicFront:: INCBIN "pic/bmon/venonat.pic"
|
|
|
|
|
VenonatPicBack:: INCBIN "pic/monback/venonatb.pic"
|
|
|
|
|
DragonitePicFront:: INCBIN "pic/bmon/dragonite.pic"
|
|
|
|
|
DragonitePicBack:: INCBIN "pic/monback/dragoniteb.pic"
|
|
|
|
|
DoduoPicFront:: INCBIN "pic/bmon/doduo.pic"
|
|
|
|
|
DoduoPicBack:: INCBIN "pic/monback/doduob.pic"
|
|
|
|
|
PoliwagPicFront:: INCBIN "pic/bmon/poliwag.pic"
|
|
|
|
|
PoliwagPicBack:: INCBIN "pic/monback/poliwagb.pic"
|
|
|
|
|
JynxPicFront:: INCBIN "pic/bmon/jynx.pic"
|
|
|
|
|
JynxPicBack:: INCBIN "pic/monback/jynxb.pic"
|
|
|
|
|
MoltresPicFront:: INCBIN "pic/bmon/moltres.pic"
|
|
|
|
|
MoltresPicBack:: INCBIN "pic/monback/moltresb.pic"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
|
|
|
|
|
SECTION "Battle (bank A)", ROMX, BANK[$A]
|
2015-04-01 09:41:20 +00:00
|
|
|
|
INCLUDE "engine/battle/moveEffects/leech_seed_effect.asm"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
SECTION "Pics 3", ROMX, BANK[PICS_3]
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-25 04:01:59 +00:00
|
|
|
|
ArticunoPicFront:: INCBIN "pic/bmon/articuno.pic"
|
|
|
|
|
ArticunoPicBack:: INCBIN "pic/monback/articunob.pic"
|
|
|
|
|
ZapdosPicFront:: INCBIN "pic/bmon/zapdos.pic"
|
|
|
|
|
ZapdosPicBack:: INCBIN "pic/monback/zapdosb.pic"
|
|
|
|
|
DittoPicFront:: INCBIN "pic/bmon/ditto.pic"
|
|
|
|
|
DittoPicBack:: INCBIN "pic/monback/dittob.pic"
|
|
|
|
|
MeowthPicFront:: INCBIN "pic/bmon/meowth.pic"
|
|
|
|
|
MeowthPicBack:: INCBIN "pic/monback/meowthb.pic"
|
|
|
|
|
KrabbyPicFront:: INCBIN "pic/bmon/krabby.pic"
|
|
|
|
|
KrabbyPicBack:: INCBIN "pic/monback/krabbyb.pic"
|
|
|
|
|
VulpixPicFront:: INCBIN "pic/bmon/vulpix.pic"
|
|
|
|
|
VulpixPicBack:: INCBIN "pic/monback/vulpixb.pic"
|
|
|
|
|
NinetalesPicFront:: INCBIN "pic/bmon/ninetales.pic"
|
|
|
|
|
NinetalesPicBack:: INCBIN "pic/monback/ninetalesb.pic"
|
|
|
|
|
PikachuPicFront:: INCBIN "pic/bmon/pikachu.pic"
|
|
|
|
|
PikachuPicBack:: INCBIN "pic/monback/pikachub.pic"
|
|
|
|
|
RaichuPicFront:: INCBIN "pic/bmon/raichu.pic"
|
|
|
|
|
RaichuPicBack:: INCBIN "pic/monback/raichub.pic"
|
|
|
|
|
DratiniPicFront:: INCBIN "pic/bmon/dratini.pic"
|
|
|
|
|
DratiniPicBack:: INCBIN "pic/monback/dratinib.pic"
|
|
|
|
|
DragonairPicFront:: INCBIN "pic/bmon/dragonair.pic"
|
|
|
|
|
DragonairPicBack:: INCBIN "pic/monback/dragonairb.pic"
|
|
|
|
|
KabutoPicFront:: INCBIN "pic/bmon/kabuto.pic"
|
|
|
|
|
KabutoPicBack:: INCBIN "pic/monback/kabutob.pic"
|
|
|
|
|
KabutopsPicFront:: INCBIN "pic/bmon/kabutops.pic"
|
|
|
|
|
KabutopsPicBack:: INCBIN "pic/monback/kabutopsb.pic"
|
|
|
|
|
HorseaPicFront:: INCBIN "pic/bmon/horsea.pic"
|
|
|
|
|
HorseaPicBack:: INCBIN "pic/monback/horseab.pic"
|
|
|
|
|
SeadraPicFront:: INCBIN "pic/bmon/seadra.pic"
|
|
|
|
|
SeadraPicBack:: INCBIN "pic/monback/seadrab.pic"
|
|
|
|
|
SandshrewPicFront:: INCBIN "pic/bmon/sandshrew.pic"
|
|
|
|
|
SandshrewPicBack:: INCBIN "pic/monback/sandshrewb.pic"
|
|
|
|
|
SandslashPicFront:: INCBIN "pic/bmon/sandslash.pic"
|
|
|
|
|
SandslashPicBack:: INCBIN "pic/monback/sandslashb.pic"
|
|
|
|
|
OmanytePicFront:: INCBIN "pic/bmon/omanyte.pic"
|
|
|
|
|
OmanytePicBack:: INCBIN "pic/monback/omanyteb.pic"
|
|
|
|
|
OmastarPicFront:: INCBIN "pic/bmon/omastar.pic"
|
|
|
|
|
OmastarPicBack:: INCBIN "pic/monback/omastarb.pic"
|
|
|
|
|
JigglypuffPicFront:: INCBIN "pic/bmon/jigglypuff.pic"
|
|
|
|
|
JigglypuffPicBack:: INCBIN "pic/monback/jigglypuffb.pic"
|
|
|
|
|
WigglytuffPicFront:: INCBIN "pic/bmon/wigglytuff.pic"
|
|
|
|
|
WigglytuffPicBack:: INCBIN "pic/monback/wigglytuffb.pic"
|
|
|
|
|
EeveePicFront:: INCBIN "pic/bmon/eevee.pic"
|
|
|
|
|
EeveePicBack:: INCBIN "pic/monback/eeveeb.pic"
|
|
|
|
|
FlareonPicFront:: INCBIN "pic/bmon/flareon.pic"
|
|
|
|
|
FlareonPicBack:: INCBIN "pic/monback/flareonb.pic"
|
|
|
|
|
JolteonPicFront:: INCBIN "pic/bmon/jolteon.pic"
|
|
|
|
|
JolteonPicBack:: INCBIN "pic/monback/jolteonb.pic"
|
|
|
|
|
VaporeonPicFront:: INCBIN "pic/bmon/vaporeon.pic"
|
|
|
|
|
VaporeonPicBack:: INCBIN "pic/monback/vaporeonb.pic"
|
|
|
|
|
MachopPicFront:: INCBIN "pic/bmon/machop.pic"
|
|
|
|
|
MachopPicBack:: INCBIN "pic/monback/machopb.pic"
|
|
|
|
|
ZubatPicFront:: INCBIN "pic/bmon/zubat.pic"
|
|
|
|
|
ZubatPicBack:: INCBIN "pic/monback/zubatb.pic"
|
|
|
|
|
EkansPicFront:: INCBIN "pic/bmon/ekans.pic"
|
|
|
|
|
EkansPicBack:: INCBIN "pic/monback/ekansb.pic"
|
|
|
|
|
ParasPicFront:: INCBIN "pic/bmon/paras.pic"
|
|
|
|
|
ParasPicBack:: INCBIN "pic/monback/parasb.pic"
|
|
|
|
|
PoliwhirlPicFront:: INCBIN "pic/bmon/poliwhirl.pic"
|
|
|
|
|
PoliwhirlPicBack:: INCBIN "pic/monback/poliwhirlb.pic"
|
|
|
|
|
PoliwrathPicFront:: INCBIN "pic/bmon/poliwrath.pic"
|
|
|
|
|
PoliwrathPicBack:: INCBIN "pic/monback/poliwrathb.pic"
|
|
|
|
|
WeedlePicFront:: INCBIN "pic/bmon/weedle.pic"
|
|
|
|
|
WeedlePicBack:: INCBIN "pic/monback/weedleb.pic"
|
|
|
|
|
KakunaPicFront:: INCBIN "pic/bmon/kakuna.pic"
|
|
|
|
|
KakunaPicBack:: INCBIN "pic/monback/kakunab.pic"
|
|
|
|
|
BeedrillPicFront:: INCBIN "pic/bmon/beedrill.pic"
|
|
|
|
|
BeedrillPicBack:: INCBIN "pic/monback/beedrillb.pic"
|
|
|
|
|
|
|
|
|
|
FossilKabutopsPic:: INCBIN "pic/bmon/fossilkabutops.pic"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
|
|
|
|
|
SECTION "Battle (bank B)", ROMX, BANK[$B]
|
|
|
|
|
|
2015-04-01 14:16:43 +00:00
|
|
|
|
INCLUDE "engine/battle/display_effectiveness.asm"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
TrainerInfoTextBoxTileGraphics: INCBIN "gfx/trainer_info.2bpp"
|
|
|
|
|
BlankLeaderNames: INCBIN "gfx/blank_leader_names.2bpp"
|
|
|
|
|
CircleTile: INCBIN "gfx/circle_tile.2bpp"
|
|
|
|
|
BadgeNumbersTileGraphics: INCBIN "gfx/badge_numbers.2bpp"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/items/tmhm.asm"
|
2015-04-01 14:16:43 +00:00
|
|
|
|
INCLUDE "engine/battle/scale_sprites.asm"
|
|
|
|
|
INCLUDE "engine/battle/moveEffects/pay_day_effect.asm"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/game_corner_slots2.asm"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
SECTION "Pics 4", ROMX, BANK[PICS_4]
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-25 04:01:59 +00:00
|
|
|
|
DodrioPicFront:: INCBIN "pic/bmon/dodrio.pic"
|
|
|
|
|
DodrioPicBack:: INCBIN "pic/monback/dodriob.pic"
|
|
|
|
|
PrimeapePicFront:: INCBIN "pic/bmon/primeape.pic"
|
|
|
|
|
PrimeapePicBack:: INCBIN "pic/monback/primeapeb.pic"
|
|
|
|
|
DugtrioPicFront:: INCBIN "pic/bmon/dugtrio.pic"
|
|
|
|
|
DugtrioPicBack:: INCBIN "pic/monback/dugtriob.pic"
|
|
|
|
|
VenomothPicFront:: INCBIN "pic/bmon/venomoth.pic"
|
|
|
|
|
VenomothPicBack:: INCBIN "pic/monback/venomothb.pic"
|
|
|
|
|
DewgongPicFront:: INCBIN "pic/bmon/dewgong.pic"
|
|
|
|
|
DewgongPicBack:: INCBIN "pic/monback/dewgongb.pic"
|
|
|
|
|
CaterpiePicFront:: INCBIN "pic/bmon/caterpie.pic"
|
|
|
|
|
CaterpiePicBack:: INCBIN "pic/monback/caterpieb.pic"
|
|
|
|
|
MetapodPicFront:: INCBIN "pic/bmon/metapod.pic"
|
|
|
|
|
MetapodPicBack:: INCBIN "pic/monback/metapodb.pic"
|
|
|
|
|
ButterfreePicFront:: INCBIN "pic/bmon/butterfree.pic"
|
|
|
|
|
ButterfreePicBack:: INCBIN "pic/monback/butterfreeb.pic"
|
|
|
|
|
MachampPicFront:: INCBIN "pic/bmon/machamp.pic"
|
|
|
|
|
MachampPicBack:: INCBIN "pic/monback/machampb.pic"
|
|
|
|
|
GolduckPicFront:: INCBIN "pic/bmon/golduck.pic"
|
|
|
|
|
GolduckPicBack:: INCBIN "pic/monback/golduckb.pic"
|
|
|
|
|
HypnoPicFront:: INCBIN "pic/bmon/hypno.pic"
|
|
|
|
|
HypnoPicBack:: INCBIN "pic/monback/hypnob.pic"
|
|
|
|
|
GolbatPicFront:: INCBIN "pic/bmon/golbat.pic"
|
|
|
|
|
GolbatPicBack:: INCBIN "pic/monback/golbatb.pic"
|
|
|
|
|
MewtwoPicFront:: INCBIN "pic/bmon/mewtwo.pic"
|
|
|
|
|
MewtwoPicBack:: INCBIN "pic/monback/mewtwob.pic"
|
|
|
|
|
SnorlaxPicFront:: INCBIN "pic/bmon/snorlax.pic"
|
|
|
|
|
SnorlaxPicBack:: INCBIN "pic/monback/snorlaxb.pic"
|
|
|
|
|
MagikarpPicFront:: INCBIN "pic/bmon/magikarp.pic"
|
|
|
|
|
MagikarpPicBack:: INCBIN "pic/monback/magikarpb.pic"
|
|
|
|
|
MukPicFront:: INCBIN "pic/bmon/muk.pic"
|
|
|
|
|
MukPicBack:: INCBIN "pic/monback/mukb.pic"
|
|
|
|
|
KinglerPicFront:: INCBIN "pic/bmon/kingler.pic"
|
|
|
|
|
KinglerPicBack:: INCBIN "pic/monback/kinglerb.pic"
|
|
|
|
|
CloysterPicFront:: INCBIN "pic/bmon/cloyster.pic"
|
|
|
|
|
CloysterPicBack:: INCBIN "pic/monback/cloysterb.pic"
|
|
|
|
|
ElectrodePicFront:: INCBIN "pic/bmon/electrode.pic"
|
|
|
|
|
ElectrodePicBack:: INCBIN "pic/monback/electrodeb.pic"
|
|
|
|
|
ClefablePicFront:: INCBIN "pic/bmon/clefable.pic"
|
|
|
|
|
ClefablePicBack:: INCBIN "pic/monback/clefableb.pic"
|
|
|
|
|
WeezingPicFront:: INCBIN "pic/bmon/weezing.pic"
|
|
|
|
|
WeezingPicBack:: INCBIN "pic/monback/weezingb.pic"
|
|
|
|
|
PersianPicFront:: INCBIN "pic/bmon/persian.pic"
|
|
|
|
|
PersianPicBack:: INCBIN "pic/monback/persianb.pic"
|
|
|
|
|
MarowakPicFront:: INCBIN "pic/bmon/marowak.pic"
|
|
|
|
|
MarowakPicBack:: INCBIN "pic/monback/marowakb.pic"
|
|
|
|
|
HaunterPicFront:: INCBIN "pic/bmon/haunter.pic"
|
|
|
|
|
HaunterPicBack:: INCBIN "pic/monback/haunterb.pic"
|
|
|
|
|
AbraPicFront:: INCBIN "pic/bmon/abra.pic"
|
|
|
|
|
AbraPicBack:: INCBIN "pic/monback/abrab.pic"
|
|
|
|
|
AlakazamPicFront:: INCBIN "pic/bmon/alakazam.pic"
|
|
|
|
|
AlakazamPicBack:: INCBIN "pic/monback/alakazamb.pic"
|
|
|
|
|
PidgeottoPicFront:: INCBIN "pic/bmon/pidgeotto.pic"
|
|
|
|
|
PidgeottoPicBack:: INCBIN "pic/monback/pidgeottob.pic"
|
|
|
|
|
PidgeotPicFront:: INCBIN "pic/bmon/pidgeot.pic"
|
|
|
|
|
PidgeotPicBack:: INCBIN "pic/monback/pidgeotb.pic"
|
|
|
|
|
StarmiePicFront:: INCBIN "pic/bmon/starmie.pic"
|
|
|
|
|
StarmiePicBack:: INCBIN "pic/monback/starmieb.pic"
|
|
|
|
|
|
|
|
|
|
RedPicBack:: INCBIN "pic/trainer/redb.pic"
|
|
|
|
|
OldManPic:: INCBIN "pic/trainer/oldman.pic"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
|
|
|
|
|
SECTION "Battle (bank C)", ROMX, BANK[$C]
|
2015-04-01 14:16:43 +00:00
|
|
|
|
INCLUDE "engine/battle/moveEffects/mist_effect.asm"
|
|
|
|
|
INCLUDE "engine/battle/moveEffects/one_hit_ko_effect.asm"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
SECTION "Pics 5", ROMX, BANK[PICS_5]
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 04:01:59 +00:00
|
|
|
|
BulbasaurPicFront:: INCBIN "pic/bmon/bulbasaur.pic"
|
|
|
|
|
BulbasaurPicBack:: INCBIN "pic/monback/bulbasaurb.pic"
|
|
|
|
|
VenusaurPicFront:: INCBIN "pic/bmon/venusaur.pic"
|
|
|
|
|
VenusaurPicBack:: INCBIN "pic/monback/venusaurb.pic"
|
|
|
|
|
TentacruelPicFront:: INCBIN "pic/bmon/tentacruel.pic"
|
|
|
|
|
TentacruelPicBack:: INCBIN "pic/monback/tentacruelb.pic"
|
|
|
|
|
GoldeenPicFront:: INCBIN "pic/bmon/goldeen.pic"
|
|
|
|
|
GoldeenPicBack:: INCBIN "pic/monback/goldeenb.pic"
|
|
|
|
|
SeakingPicFront:: INCBIN "pic/bmon/seaking.pic"
|
|
|
|
|
SeakingPicBack:: INCBIN "pic/monback/seakingb.pic"
|
|
|
|
|
PonytaPicFront:: INCBIN "pic/bmon/ponyta.pic"
|
|
|
|
|
RapidashPicFront:: INCBIN "pic/bmon/rapidash.pic"
|
|
|
|
|
PonytaPicBack:: INCBIN "pic/monback/ponytab.pic"
|
|
|
|
|
RapidashPicBack:: INCBIN "pic/monback/rapidashb.pic"
|
|
|
|
|
RattataPicFront:: INCBIN "pic/bmon/rattata.pic"
|
|
|
|
|
RattataPicBack:: INCBIN "pic/monback/rattatab.pic"
|
|
|
|
|
RaticatePicFront:: INCBIN "pic/bmon/raticate.pic"
|
|
|
|
|
RaticatePicBack:: INCBIN "pic/monback/raticateb.pic"
|
|
|
|
|
NidorinoPicFront:: INCBIN "pic/bmon/nidorino.pic"
|
|
|
|
|
NidorinoPicBack:: INCBIN "pic/monback/nidorinob.pic"
|
|
|
|
|
NidorinaPicFront:: INCBIN "pic/bmon/nidorina.pic"
|
|
|
|
|
NidorinaPicBack:: INCBIN "pic/monback/nidorinab.pic"
|
|
|
|
|
GeodudePicFront:: INCBIN "pic/bmon/geodude.pic"
|
|
|
|
|
GeodudePicBack:: INCBIN "pic/monback/geodudeb.pic"
|
|
|
|
|
PorygonPicFront:: INCBIN "pic/bmon/porygon.pic"
|
|
|
|
|
PorygonPicBack:: INCBIN "pic/monback/porygonb.pic"
|
|
|
|
|
AerodactylPicFront:: INCBIN "pic/bmon/aerodactyl.pic"
|
|
|
|
|
AerodactylPicBack:: INCBIN "pic/monback/aerodactylb.pic"
|
|
|
|
|
MagnemitePicFront:: INCBIN "pic/bmon/magnemite.pic"
|
|
|
|
|
MagnemitePicBack:: INCBIN "pic/monback/magnemiteb.pic"
|
|
|
|
|
CharmanderPicFront:: INCBIN "pic/bmon/charmander.pic"
|
|
|
|
|
CharmanderPicBack:: INCBIN "pic/monback/charmanderb.pic"
|
|
|
|
|
SquirtlePicFront:: INCBIN "pic/bmon/squirtle.pic"
|
|
|
|
|
SquirtlePicBack:: INCBIN "pic/monback/squirtleb.pic"
|
|
|
|
|
CharmeleonPicFront:: INCBIN "pic/bmon/charmeleon.pic"
|
|
|
|
|
CharmeleonPicBack:: INCBIN "pic/monback/charmeleonb.pic"
|
|
|
|
|
WartortlePicFront:: INCBIN "pic/bmon/wartortle.pic"
|
|
|
|
|
WartortlePicBack:: INCBIN "pic/monback/wartortleb.pic"
|
|
|
|
|
CharizardPicFront:: INCBIN "pic/bmon/charizard.pic"
|
|
|
|
|
CharizardPicBack:: INCBIN "pic/monback/charizardb.pic"
|
|
|
|
|
FossilAerodactylPic:: INCBIN "pic/bmon/fossilaerodactyl.pic"
|
|
|
|
|
GhostPic:: INCBIN "pic/other/ghost.pic"
|
|
|
|
|
OddishPicFront:: INCBIN "pic/bmon/oddish.pic"
|
|
|
|
|
OddishPicBack:: INCBIN "pic/monback/oddishb.pic"
|
|
|
|
|
GloomPicFront:: INCBIN "pic/bmon/gloom.pic"
|
|
|
|
|
GloomPicBack:: INCBIN "pic/monback/gloomb.pic"
|
|
|
|
|
VileplumePicFront:: INCBIN "pic/bmon/vileplume.pic"
|
|
|
|
|
VileplumePicBack:: INCBIN "pic/monback/vileplumeb.pic"
|
|
|
|
|
BellsproutPicFront:: INCBIN "pic/bmon/bellsprout.pic"
|
|
|
|
|
BellsproutPicBack:: INCBIN "pic/monback/bellsproutb.pic"
|
|
|
|
|
WeepinbellPicFront:: INCBIN "pic/bmon/weepinbell.pic"
|
|
|
|
|
WeepinbellPicBack:: INCBIN "pic/monback/weepinbellb.pic"
|
|
|
|
|
VictreebelPicFront:: INCBIN "pic/bmon/victreebel.pic"
|
|
|
|
|
VictreebelPicBack:: INCBIN "pic/monback/victreebelb.pic"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-31 19:42:19 +00:00
|
|
|
|
|
|
|
|
|
SECTION "Battle (bank D)", ROMX, BANK[$D]
|
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
INCLUDE "engine/titlescreen2.asm"
|
2015-04-01 14:16:43 +00:00
|
|
|
|
INCLUDE "engine/battle/link_battle_versus_text.asm"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/slot_machine.asm"
|
|
|
|
|
INCLUDE "engine/overworld/pewter_guys.asm"
|
|
|
|
|
INCLUDE "engine/multiply_divide.asm"
|
|
|
|
|
INCLUDE "engine/game_corner_slots.asm"
|
2012-01-18 02:56:48 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bankE",ROMX,BANK[$E]
|
2013-12-15 22:18:14 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/moves.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
BaseStats: INCLUDE "data/base_stats.asm"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/cries.asm"
|
|
|
|
|
INCLUDE "engine/battle/e.asm"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
TradingAnimationGraphics:
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCBIN "gfx/game_boy.norepeat.2bpp"
|
|
|
|
|
INCBIN "gfx/link_cable.2bpp"
|
2012-01-18 02:56:48 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
TradingAnimationGraphics2:
|
2014-05-25 17:09:39 +00:00
|
|
|
|
; Pokeball traveling through the link cable.
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCBIN "gfx/trade2.2bpp"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/evos_moves.asm"
|
|
|
|
|
INCLUDE "engine/battle/e_2.asm"
|
2013-12-14 10:01:22 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bankF",ROMX,BANK[$F]
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/battle/core.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank10",ROMX,BANK[$10]
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/menu/pokedex.asm"
|
|
|
|
|
INCLUDE "engine/trade.asm"
|
|
|
|
|
INCLUDE "engine/intro.asm"
|
|
|
|
|
INCLUDE "engine/trade2.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank11",ROMX,BANK[$11]
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/lavendertown.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/lavendertown.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
LavenderTownBlocks: INCBIN "maps/lavendertown.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
ViridianPokecenterBlocks: INCBIN "maps/viridianpokecenter.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SafariZoneRestHouse1Blocks:
|
|
|
|
|
SafariZoneRestHouse2Blocks:
|
|
|
|
|
SafariZoneRestHouse3Blocks:
|
|
|
|
|
SafariZoneRestHouse4Blocks: INCBIN "maps/safarizoneresthouse1.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "scripts/lavendertown.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/pokedex_rating.asm"
|
2012-01-15 00:13:22 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/viridianpokecenter.asm"
|
|
|
|
|
INCLUDE "scripts/viridianpokecenter.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/viridianpokecenter.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/mansion1.asm"
|
|
|
|
|
INCLUDE "scripts/mansion1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/mansion1.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Mansion1Blocks: INCBIN "maps/mansion1.blk"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/rocktunnel1.asm"
|
|
|
|
|
INCLUDE "scripts/rocktunnel1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/rocktunnel1.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
RockTunnel1Blocks: INCBIN "maps/rocktunnel1.blk"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/seafoamislands1.asm"
|
|
|
|
|
INCLUDE "scripts/seafoamislands1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/seafoamislands1.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SeafoamIslands1Blocks: INCBIN "maps/seafoamislands1.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ssanne3.asm"
|
|
|
|
|
INCLUDE "scripts/ssanne3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ssanne3.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SSAnne3Blocks: INCBIN "maps/ssanne3.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/victoryroad3.asm"
|
|
|
|
|
INCLUDE "scripts/victoryroad3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/victoryroad3.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
VictoryRoad3Blocks: INCBIN "maps/victoryroad3.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/rockethideout1.asm"
|
|
|
|
|
INCLUDE "scripts/rockethideout1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/rockethideout1.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
RocketHideout1Blocks: INCBIN "maps/rockethideout1.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/rockethideout2.asm"
|
|
|
|
|
INCLUDE "scripts/rockethideout2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/rockethideout2.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
RocketHideout2Blocks: INCBIN "maps/rockethideout2.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/rockethideout3.asm"
|
|
|
|
|
INCLUDE "scripts/rockethideout3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/rockethideout3.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
RocketHideout3Blocks: INCBIN "maps/rockethideout3.blk"
|
2012-01-19 10:14:38 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/rockethideout4.asm"
|
|
|
|
|
INCLUDE "scripts/rockethideout4.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/rockethideout4.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
RocketHideout4Blocks: INCBIN "maps/rockethideout4.blk"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/rockethideoutelevator.asm"
|
|
|
|
|
INCLUDE "scripts/rockethideoutelevator.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/rockethideoutelevator.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
RocketHideoutElevatorBlocks: INCBIN "maps/rockethideoutelevator.blk"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/silphcoelevator.asm"
|
|
|
|
|
INCLUDE "scripts/silphcoelevator.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/silphcoelevator.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SilphCoElevatorBlocks: INCBIN "maps/silphcoelevator.blk"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/safarizoneeast.asm"
|
|
|
|
|
INCLUDE "scripts/safarizoneeast.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/safarizoneeast.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SafariZoneEastBlocks: INCBIN "maps/safarizoneeast.blk"
|
2013-10-25 18:15:25 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/safarizonenorth.asm"
|
|
|
|
|
INCLUDE "scripts/safarizonenorth.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/safarizonenorth.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SafariZoneNorthBlocks: INCBIN "maps/safarizonenorth.blk"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/safarizonecenter.asm"
|
|
|
|
|
INCLUDE "scripts/safarizonecenter.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/safarizonecenter.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SafariZoneCenterBlocks: INCBIN "maps/safarizonecenter.blk"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/safarizoneresthouse1.asm"
|
|
|
|
|
INCLUDE "scripts/safarizoneresthouse1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/safarizoneresthouse1.asm"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/safarizoneresthouse2.asm"
|
|
|
|
|
INCLUDE "scripts/safarizoneresthouse2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/safarizoneresthouse2.asm"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/safarizoneresthouse3.asm"
|
|
|
|
|
INCLUDE "scripts/safarizoneresthouse3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/safarizoneresthouse3.asm"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/safarizoneresthouse4.asm"
|
|
|
|
|
INCLUDE "scripts/safarizoneresthouse4.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/safarizoneresthouse4.asm"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/unknowndungeon2.asm"
|
|
|
|
|
INCLUDE "scripts/unknowndungeon2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/unknowndungeon2.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
UnknownDungeon2Blocks: INCBIN "maps/unknowndungeon2.blk"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/unknowndungeon3.asm"
|
|
|
|
|
INCLUDE "scripts/unknowndungeon3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/unknowndungeon3.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
UnknownDungeon3Blocks: INCBIN "maps/unknowndungeon3.blk"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/rocktunnel2.asm"
|
|
|
|
|
INCLUDE "scripts/rocktunnel2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/rocktunnel2.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
RockTunnel2Blocks: INCBIN "maps/rocktunnel2.blk"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/seafoamislands2.asm"
|
|
|
|
|
INCLUDE "scripts/seafoamislands2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/seafoamislands2.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SeafoamIslands2Blocks: INCBIN "maps/seafoamislands2.blk"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/seafoamislands3.asm"
|
|
|
|
|
INCLUDE "scripts/seafoamislands3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/seafoamislands3.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SeafoamIslands3Blocks: INCBIN "maps/seafoamislands3.blk"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/seafoamislands4.asm"
|
|
|
|
|
INCLUDE "scripts/seafoamislands4.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/seafoamislands4.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SeafoamIslands4Blocks: INCBIN "maps/seafoamislands4.blk"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/seafoamislands5.asm"
|
|
|
|
|
INCLUDE "scripts/seafoamislands5.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/seafoamislands5.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SeafoamIslands5Blocks: INCBIN "maps/seafoamislands5.blk"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/overworld/hidden_objects.asm"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank12",ROMX,BANK[$12]
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route7.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route7.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route7Blocks: INCBIN "maps/route7.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonPokecenterBlocks:
|
|
|
|
|
RockTunnelPokecenterBlocks:
|
|
|
|
|
MtMoonPokecenterBlocks: INCBIN "maps/mtmoonpokecenter.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route18GateBlocks:
|
|
|
|
|
Route15GateBlocks:
|
|
|
|
|
Route11GateBlocks: INCBIN "maps/route11gate.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route18GateUpstairsBlocks:
|
|
|
|
|
Route16GateUpstairsBlocks:
|
|
|
|
|
Route12GateUpstairsBlocks:
|
|
|
|
|
Route15GateUpstairsBlocks:
|
|
|
|
|
Route11GateUpstairsBlocks: INCBIN "maps/route11gateupstairs.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/predefs12.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "scripts/route7.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/redshouse1f.asm"
|
|
|
|
|
INCLUDE "scripts/redshouse1f.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/redshouse1f.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
RedsHouse1FBlocks: INCBIN "maps/redshouse1f.blk"
|
2013-03-12 02:46:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadonmart3.asm"
|
|
|
|
|
INCLUDE "scripts/celadonmart3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonmart3.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonMart3Blocks: INCBIN "maps/celadonmart3.blk"
|
2012-01-25 17:01:21 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadonmart4.asm"
|
|
|
|
|
INCLUDE "scripts/celadonmart4.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonmart4.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonMart4Blocks: INCBIN "maps/celadonmart4.blk"
|
2012-01-25 17:01:21 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadonmartroof.asm"
|
|
|
|
|
INCLUDE "scripts/celadonmartroof.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonmartroof.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonMartRoofBlocks: INCBIN "maps/celadonmartroof.blk"
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadonmartelevator.asm"
|
|
|
|
|
INCLUDE "scripts/celadonmartelevator.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonmartelevator.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonMartElevatorBlocks: INCBIN "maps/celadonmartelevator.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadonmansion1.asm"
|
|
|
|
|
INCLUDE "scripts/celadonmansion1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonmansion1.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonMansion1Blocks: INCBIN "maps/celadonmansion1.blk"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/celadonmansion2.asm"
|
|
|
|
|
INCLUDE "scripts/celadonmansion2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonmansion2.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonMansion2Blocks: INCBIN "maps/celadonmansion2.blk"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/celadonmansion3.asm"
|
|
|
|
|
INCLUDE "scripts/celadonmansion3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonmansion3.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonMansion3Blocks: INCBIN "maps/celadonmansion3.blk"
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadonmansion4.asm"
|
|
|
|
|
INCLUDE "scripts/celadonmansion4.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonmansion4.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonMansion4Blocks: INCBIN "maps/celadonmansion4.blk"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadonpokecenter.asm"
|
|
|
|
|
INCLUDE "scripts/celadonpokecenter.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonpokecenter.asm"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadongym.asm"
|
|
|
|
|
INCLUDE "scripts/celadongym.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadongym.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonGymBlocks: INCBIN "maps/celadongym.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadongamecorner.asm"
|
|
|
|
|
INCLUDE "scripts/celadongamecorner.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadongamecorner.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonGameCornerBlocks: INCBIN "maps/celadongamecorner.blk"
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadonmart5.asm"
|
|
|
|
|
INCLUDE "scripts/celadonmart5.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonmart5.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonMart5Blocks: INCBIN "maps/celadonmart5.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadonprizeroom.asm"
|
|
|
|
|
INCLUDE "scripts/celadonprizeroom.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonprizeroom.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonPrizeRoomBlocks: INCBIN "maps/celadonprizeroom.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadondiner.asm"
|
|
|
|
|
INCLUDE "scripts/celadondiner.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadondiner.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonDinerBlocks: INCBIN "maps/celadondiner.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadonhouse.asm"
|
|
|
|
|
INCLUDE "scripts/celadonhouse.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonhouse.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonHouseBlocks: INCBIN "maps/celadonhouse.blk"
|
2013-10-25 18:15:25 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadonhotel.asm"
|
|
|
|
|
INCLUDE "scripts/celadonhotel.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonhotel.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonHotelBlocks: INCBIN "maps/celadonhotel.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/mtmoonpokecenter.asm"
|
|
|
|
|
INCLUDE "scripts/mtmoonpokecenter.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/mtmoonpokecenter.asm"
|
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/rocktunnelpokecenter.asm"
|
|
|
|
|
INCLUDE "scripts/rocktunnelpokecenter.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/rocktunnelpokecenter.asm"
|
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/route11gate.asm"
|
|
|
|
|
INCLUDE "scripts/route11gate.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route11gate.asm"
|
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/route11gateupstairs.asm"
|
|
|
|
|
INCLUDE "scripts/route11gateupstairs.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route11gateupstairs.asm"
|
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/route12gate.asm"
|
|
|
|
|
INCLUDE "scripts/route12gate.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route12gate.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route12GateBlocks: INCBIN "maps/route12gate.blk"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/route12gateupstairs.asm"
|
|
|
|
|
INCLUDE "scripts/route12gateupstairs.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route12gateupstairs.asm"
|
2012-01-18 12:07:12 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route15gate.asm"
|
|
|
|
|
INCLUDE "scripts/route15gate.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route15gate.asm"
|
2012-01-19 09:54:55 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route15gateupstairs.asm"
|
|
|
|
|
INCLUDE "scripts/route15gateupstairs.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route15gateupstairs.asm"
|
2013-10-25 18:15:25 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route16gate.asm"
|
|
|
|
|
INCLUDE "scripts/route16gate.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route16gate.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route16GateBlocks: INCBIN "maps/route16gate.blk"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route16gateupstairs.asm"
|
|
|
|
|
INCLUDE "scripts/route16gateupstairs.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route16gateupstairs.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route18gate.asm"
|
|
|
|
|
INCLUDE "scripts/route18gate.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route18gate.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route18gateupstairs.asm"
|
|
|
|
|
INCLUDE "scripts/route18gateupstairs.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route18gateupstairs.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/mtmoon1.asm"
|
|
|
|
|
INCLUDE "scripts/mtmoon1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/mtmoon1.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
MtMoon1Blocks: INCBIN "maps/mtmoon1.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/mtmoon3.asm"
|
|
|
|
|
INCLUDE "scripts/mtmoon3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/mtmoon3.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
MtMoon3Blocks: INCBIN "maps/mtmoon3.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/safarizonewest.asm"
|
|
|
|
|
INCLUDE "scripts/safarizonewest.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/safarizonewest.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SafariZoneWestBlocks: INCBIN "maps/safarizonewest.blk"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/safarizonesecrethouse.asm"
|
|
|
|
|
INCLUDE "scripts/safarizonesecrethouse.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/safarizonesecrethouse.asm"
|
2014-05-25 17:09:39 +00:00
|
|
|
|
SafariZoneSecretHouseBlocks: INCBIN "maps/safarizonesecrethouse.blk"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank13",ROMX,BANK[$13]
|
|
|
|
|
|
2014-05-25 04:01:59 +00:00
|
|
|
|
TrainerPics::
|
|
|
|
|
YoungsterPic:: INCBIN "pic/trainer/youngster.pic"
|
|
|
|
|
BugCatcherPic:: INCBIN "pic/trainer/bugcatcher.pic"
|
|
|
|
|
LassPic:: INCBIN "pic/trainer/lass.pic"
|
|
|
|
|
SailorPic:: INCBIN "pic/trainer/sailor.pic"
|
|
|
|
|
JrTrainerMPic:: INCBIN "pic/trainer/jr.trainerm.pic"
|
|
|
|
|
JrTrainerFPic:: INCBIN "pic/trainer/jr.trainerf.pic"
|
|
|
|
|
PokemaniacPic:: INCBIN "pic/trainer/pokemaniac.pic"
|
|
|
|
|
SuperNerdPic:: INCBIN "pic/trainer/supernerd.pic"
|
|
|
|
|
HikerPic:: INCBIN "pic/trainer/hiker.pic"
|
|
|
|
|
BikerPic:: INCBIN "pic/trainer/biker.pic"
|
|
|
|
|
BurglarPic:: INCBIN "pic/trainer/burglar.pic"
|
|
|
|
|
EngineerPic:: INCBIN "pic/trainer/engineer.pic"
|
|
|
|
|
FisherPic:: INCBIN "pic/trainer/fisher.pic"
|
|
|
|
|
SwimmerPic:: INCBIN "pic/trainer/swimmer.pic"
|
|
|
|
|
CueBallPic:: INCBIN "pic/trainer/cueball.pic"
|
|
|
|
|
GamblerPic:: INCBIN "pic/trainer/gambler.pic"
|
|
|
|
|
BeautyPic:: INCBIN "pic/trainer/beauty.pic"
|
|
|
|
|
PsychicPic:: INCBIN "pic/trainer/psychic.pic"
|
|
|
|
|
RockerPic:: INCBIN "pic/trainer/rocker.pic"
|
|
|
|
|
JugglerPic:: INCBIN "pic/trainer/juggler.pic"
|
|
|
|
|
TamerPic:: INCBIN "pic/trainer/tamer.pic"
|
|
|
|
|
BirdKeeperPic:: INCBIN "pic/trainer/birdkeeper.pic"
|
|
|
|
|
BlackbeltPic:: INCBIN "pic/trainer/blackbelt.pic"
|
|
|
|
|
Rival1Pic:: INCBIN "pic/trainer/rival1.pic"
|
|
|
|
|
ProfOakPic:: INCBIN "pic/trainer/prof.oak.pic"
|
|
|
|
|
ChiefPic::
|
|
|
|
|
ScientistPic:: INCBIN "pic/trainer/scientist.pic"
|
|
|
|
|
GiovanniPic:: INCBIN "pic/trainer/giovanni.pic"
|
|
|
|
|
RocketPic:: INCBIN "pic/trainer/rocket.pic"
|
|
|
|
|
CooltrainerMPic:: INCBIN "pic/trainer/cooltrainerm.pic"
|
|
|
|
|
CooltrainerFPic:: INCBIN "pic/trainer/cooltrainerf.pic"
|
|
|
|
|
BrunoPic:: INCBIN "pic/trainer/bruno.pic"
|
|
|
|
|
BrockPic:: INCBIN "pic/trainer/brock.pic"
|
|
|
|
|
MistyPic:: INCBIN "pic/trainer/misty.pic"
|
|
|
|
|
LtSurgePic:: INCBIN "pic/trainer/lt.surge.pic"
|
|
|
|
|
ErikaPic:: INCBIN "pic/trainer/erika.pic"
|
|
|
|
|
KogaPic:: INCBIN "pic/trainer/koga.pic"
|
|
|
|
|
BlainePic:: INCBIN "pic/trainer/blaine.pic"
|
|
|
|
|
SabrinaPic:: INCBIN "pic/trainer/sabrina.pic"
|
|
|
|
|
GentlemanPic:: INCBIN "pic/trainer/gentleman.pic"
|
|
|
|
|
Rival2Pic:: INCBIN "pic/trainer/rival2.pic"
|
|
|
|
|
Rival3Pic:: INCBIN "pic/trainer/rival3.pic"
|
|
|
|
|
LoreleiPic:: INCBIN "pic/trainer/lorelei.pic"
|
|
|
|
|
ChannelerPic:: INCBIN "pic/trainer/channeler.pic"
|
|
|
|
|
AgathaPic:: INCBIN "pic/trainer/agatha.pic"
|
|
|
|
|
LancePic:: INCBIN "pic/trainer/lance.pic"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/battlecenterm.asm"
|
|
|
|
|
INCLUDE "scripts/battlecenterm.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/battlecenterm.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
BattleCenterMBlocks: INCBIN "maps/battlecenterm.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/tradecenterm.asm"
|
|
|
|
|
INCLUDE "scripts/tradecenterm.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/tradecenterm.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
TradeCenterMBlocks: INCBIN "maps/tradecenterm.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/give_pokemon.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/predefs.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank14",ROMX,BANK[$14]
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route22.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route22.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route22Blocks: INCBIN "maps/route22.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route20.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route20.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route20Blocks: INCBIN "maps/route20.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route23.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route23.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route23Blocks: INCBIN "maps/route23.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route24.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route24.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route24Blocks: INCBIN "maps/route24.blk"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/route25.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route25.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route25Blocks: INCBIN "maps/route25.blk"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/indigoplateau.asm"
|
|
|
|
|
INCLUDE "scripts/indigoplateau.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/indigoplateau.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
IndigoPlateauBlocks: INCBIN "maps/indigoplateau.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/saffroncity.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/saffroncity.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SaffronCityBlocks: INCBIN "maps/saffroncity.blk"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "scripts/saffroncity.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "scripts/route20.asm"
|
|
|
|
|
INCLUDE "scripts/route22.asm"
|
|
|
|
|
INCLUDE "scripts/route23.asm"
|
|
|
|
|
INCLUDE "scripts/route24.asm"
|
|
|
|
|
INCLUDE "scripts/route25.asm"
|
2012-01-21 03:49:15 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/victoryroad2.asm"
|
|
|
|
|
INCLUDE "scripts/victoryroad2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/victoryroad2.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
VictoryRoad2Blocks: INCBIN "maps/victoryroad2.blk"
|
2012-08-26 17:41:58 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/mtmoon2.asm"
|
|
|
|
|
INCLUDE "scripts/mtmoon2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/mtmoon2.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
MtMoon2Blocks: INCBIN "maps/mtmoon2.blk"
|
2013-03-12 02:46:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/silphco7.asm"
|
|
|
|
|
INCLUDE "scripts/silphco7.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/silphco7.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SilphCo7Blocks: INCBIN "maps/silphco7.blk"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/mansion2.asm"
|
|
|
|
|
INCLUDE "scripts/mansion2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/mansion2.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Mansion2Blocks: INCBIN "maps/mansion2.blk"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/mansion3.asm"
|
|
|
|
|
INCLUDE "scripts/mansion3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/mansion3.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Mansion3Blocks: INCBIN "maps/mansion3.blk"
|
2013-03-12 02:46:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/mansion4.asm"
|
|
|
|
|
INCLUDE "scripts/mansion4.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/mansion4.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Mansion4Blocks: INCBIN "maps/mansion4.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/battle/14.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/overworld/card_key.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/menu/prize_menu.asm"
|
2012-01-25 17:01:21 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/hidden_object_functions14.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank15",ROMX,BANK[$15]
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route2.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route2Blocks: INCBIN "maps/route2.blk"
|
2013-03-12 02:46:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route3.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route3Blocks: INCBIN "maps/route3.blk"
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route4.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route4.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route4Blocks: INCBIN "maps/route4.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route5.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route5.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route5Blocks: INCBIN "maps/route5.blk"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route9.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route9.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route9Blocks: INCBIN "maps/route9.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route13.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route13.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route13Blocks: INCBIN "maps/route13.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route14.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route14.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route14Blocks: INCBIN "maps/route14.blk"
|
2012-01-18 05:39:13 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route17.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route17.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route17Blocks: INCBIN "maps/route17.blk"
|
2012-03-19 05:44:40 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route19.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route19.asm"
|
2014-10-17 18:16:52 +00:00
|
|
|
|
IF DEF(_OPTION_BEACH_HOUSE)
|
2014-10-17 15:01:48 +00:00
|
|
|
|
Route19Blocks: INCBIN "maps/route19-yellow.blk"
|
|
|
|
|
ELSE
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route19Blocks: INCBIN "maps/route19.blk"
|
2014-10-17 15:01:48 +00:00
|
|
|
|
ENDC
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/route21.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route21.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route21Blocks: INCBIN "maps/route21.blk"
|
2012-01-18 02:37:55 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
VermilionHouse2Blocks:
|
|
|
|
|
Route12HouseBlocks:
|
|
|
|
|
DayCareMBlocks: INCBIN "maps/daycarem.blk"
|
2012-03-19 05:44:40 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
FuchsiaHouse3Blocks: INCBIN "maps/fuchsiahouse3.blk"
|
2012-01-18 02:56:48 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/battle/15.asm"
|
2012-03-19 08:10:24 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "scripts/route2.asm"
|
|
|
|
|
INCLUDE "scripts/route3.asm"
|
|
|
|
|
INCLUDE "scripts/route4.asm"
|
|
|
|
|
INCLUDE "scripts/route5.asm"
|
|
|
|
|
INCLUDE "scripts/route9.asm"
|
|
|
|
|
INCLUDE "scripts/route13.asm"
|
|
|
|
|
INCLUDE "scripts/route14.asm"
|
|
|
|
|
INCLUDE "scripts/route17.asm"
|
|
|
|
|
INCLUDE "scripts/route19.asm"
|
|
|
|
|
INCLUDE "scripts/route21.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/vermilionhouse2.asm"
|
|
|
|
|
INCLUDE "scripts/vermilionhouse2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/vermilionhouse2.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadonmart2.asm"
|
|
|
|
|
INCLUDE "scripts/celadonmart2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonmart2.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonMart2Blocks: INCBIN "maps/celadonmart2.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/fuchsiahouse3.asm"
|
|
|
|
|
INCLUDE "scripts/fuchsiahouse3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/fuchsiahouse3.asm"
|
2012-02-01 07:43:28 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/daycarem.asm"
|
|
|
|
|
INCLUDE "scripts/daycarem.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/daycarem.asm"
|
2012-02-02 05:47:44 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route12house.asm"
|
|
|
|
|
INCLUDE "scripts/route12house.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route12house.asm"
|
2012-02-02 05:47:44 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/silphco8.asm"
|
|
|
|
|
INCLUDE "scripts/silphco8.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/silphco8.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SilphCo8Blocks: INCBIN "maps/silphco8.blk"
|
2012-02-02 05:47:44 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/menu/diploma.asm"
|
2012-02-02 05:47:44 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/overworld/trainers.asm"
|
2012-02-02 05:47:44 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank16",ROMX,BANK[$16]
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route6.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route6.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route6Blocks: INCBIN "maps/route6.blk"
|
2012-02-01 07:43:28 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route8.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route8.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route8Blocks: INCBIN "maps/route8.blk"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route10.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route10.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route10Blocks: INCBIN "maps/route10.blk"
|
2013-12-14 10:01:22 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route11.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route11.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route11Blocks: INCBIN "maps/route11.blk"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route12.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route12.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route12Blocks: INCBIN "maps/route12.blk"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route15.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route15.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route15Blocks: INCBIN "maps/route15.blk"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route16.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route16.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route16Blocks: INCBIN "maps/route16.blk"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route18.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route18.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route18Blocks: INCBIN "maps/route18.blk"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCBIN "maps/unusedblocks58d7d.blk"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/battle/16.asm"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/experience.asm"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/overworld/oaks_aide.asm"
|
2013-12-23 02:59:29 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "scripts/route6.asm"
|
|
|
|
|
INCLUDE "scripts/route8.asm"
|
|
|
|
|
INCLUDE "scripts/route10.asm"
|
|
|
|
|
INCLUDE "scripts/route11.asm"
|
|
|
|
|
INCLUDE "scripts/route12.asm"
|
|
|
|
|
INCLUDE "scripts/route15.asm"
|
|
|
|
|
INCLUDE "scripts/route16.asm"
|
|
|
|
|
INCLUDE "scripts/route18.asm"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/fanclub.asm"
|
|
|
|
|
INCLUDE "scripts/fanclub.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/fanclub.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
FanClubBlocks:
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCBIN "maps/fanclub.blk"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/silphco2.asm"
|
|
|
|
|
INCLUDE "scripts/silphco2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/silphco2.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SilphCo2Blocks:
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCBIN "maps/silphco2.blk"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/silphco3.asm"
|
|
|
|
|
INCLUDE "scripts/silphco3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/silphco3.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SilphCo3Blocks:
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCBIN "maps/silphco3.blk"
|
2014-05-19 12:05:48 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/silphco10.asm"
|
|
|
|
|
INCLUDE "scripts/silphco10.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/silphco10.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SilphCo10Blocks:
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCBIN "maps/silphco10.blk"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/lance.asm"
|
|
|
|
|
INCLUDE "scripts/lance.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/lance.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
LanceBlocks:
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCBIN "maps/lance.blk"
|
2013-12-23 02:59:29 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/halloffameroom.asm"
|
|
|
|
|
INCLUDE "scripts/halloffameroom.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/halloffameroom.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
HallofFameRoomBlocks:
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCBIN "maps/halloffameroom.blk"
|
2013-12-23 02:59:29 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/overworld/saffron_guards.asm"
|
2013-12-23 02:59:29 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank17",ROMX,BANK[$17]
|
2013-12-23 02:59:29 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SaffronMartBlocks:
|
|
|
|
|
LavenderMartBlocks:
|
|
|
|
|
CeruleanMartBlocks:
|
|
|
|
|
VermilionMartBlocks: INCBIN "maps/vermilionmart.blk"
|
2013-12-23 02:59:29 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CopycatsHouse2FBlocks:
|
|
|
|
|
RedsHouse2FBlocks: INCBIN "maps/redshouse2f.blk"
|
2013-12-23 02:59:29 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Museum1FBlocks: INCBIN "maps/museum1f.blk"
|
2013-12-23 02:59:29 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Museum2FBlocks: INCBIN "maps/museum2f.blk"
|
2013-12-23 02:59:29 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SaffronPokecenterBlocks:
|
|
|
|
|
VermilionPokecenterBlocks:
|
|
|
|
|
LavenderPokecenterBlocks:
|
|
|
|
|
PewterPokecenterBlocks: INCBIN "maps/pewterpokecenter.blk"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
UndergroundPathEntranceRoute7Blocks:
|
|
|
|
|
UndergroundPathEntranceRoute7CopyBlocks:
|
|
|
|
|
UndergroundPathEntranceRoute6Blocks:
|
|
|
|
|
UndergroundPathEntranceRoute5Blocks: INCBIN "maps/undergroundpathentranceroute5.blk"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Route2GateBlocks:
|
|
|
|
|
ViridianForestEntranceBlocks:
|
|
|
|
|
ViridianForestExitBlocks: INCBIN "maps/viridianforestexit.blk"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/redshouse2f.asm"
|
|
|
|
|
INCLUDE "scripts/redshouse2f.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/redshouse2f.asm"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/predefs17.asm"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/museum1f.asm"
|
|
|
|
|
INCLUDE "scripts/museum1f.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/museum1f.asm"
|
2013-12-23 02:59:29 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/museum2f.asm"
|
|
|
|
|
INCLUDE "scripts/museum2f.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/museum2f.asm"
|
2013-12-23 02:59:29 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/pewtergym.asm"
|
|
|
|
|
INCLUDE "scripts/pewtergym.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/pewtergym.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
PewterGymBlocks: INCBIN "maps/pewtergym.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/pewterpokecenter.asm"
|
|
|
|
|
INCLUDE "scripts/pewterpokecenter.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/pewterpokecenter.asm"
|
2012-03-08 03:43:13 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ceruleanpokecenter.asm"
|
|
|
|
|
INCLUDE "scripts/ceruleanpokecenter.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ceruleanpokecenter.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeruleanPokecenterBlocks: INCBIN "maps/ceruleanpokecenter.blk"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ceruleangym.asm"
|
|
|
|
|
INCLUDE "scripts/ceruleangym.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ceruleangym.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeruleanGymBlocks: INCBIN "maps/ceruleangym.blk"
|
2013-03-12 00:52:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ceruleanmart.asm"
|
|
|
|
|
INCLUDE "scripts/ceruleanmart.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ceruleanmart.asm"
|
2013-12-24 17:34:21 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/lavenderpokecenter.asm"
|
|
|
|
|
INCLUDE "scripts/lavenderpokecenter.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/lavenderpokecenter.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/lavendermart.asm"
|
|
|
|
|
INCLUDE "scripts/lavendermart.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/lavendermart.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/vermilionpokecenter.asm"
|
|
|
|
|
INCLUDE "scripts/vermilionpokecenter.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/vermilionpokecenter.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/vermilionmart.asm"
|
|
|
|
|
INCLUDE "scripts/vermilionmart.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/vermilionmart.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/vermiliongym.asm"
|
|
|
|
|
INCLUDE "scripts/vermiliongym.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/vermiliongym.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
VermilionGymBlocks: INCBIN "maps/vermiliongym.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/copycatshouse2f.asm"
|
|
|
|
|
INCLUDE "scripts/copycatshouse2f.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/copycatshouse2f.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/fightingdojo.asm"
|
|
|
|
|
INCLUDE "scripts/fightingdojo.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/fightingdojo.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
FightingDojoBlocks: INCBIN "maps/fightingdojo.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/saffrongym.asm"
|
|
|
|
|
INCLUDE "scripts/saffrongym.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/saffrongym.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SaffronGymBlocks: INCBIN "maps/saffrongym.blk"
|
2013-03-12 02:46:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/saffronmart.asm"
|
|
|
|
|
INCLUDE "scripts/saffronmart.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/saffronmart.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/silphco1.asm"
|
|
|
|
|
INCLUDE "scripts/silphco1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/silphco1.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SilphCo1Blocks: INCBIN "maps/silphco1.blk"
|
2012-01-25 17:01:21 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/saffronpokecenter.asm"
|
|
|
|
|
INCLUDE "scripts/saffronpokecenter.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/saffronpokecenter.asm"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/viridianforestexit.asm"
|
|
|
|
|
INCLUDE "scripts/viridianforestexit.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/viridianforestexit.asm"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/route2gate.asm"
|
|
|
|
|
INCLUDE "scripts/route2gate.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/route2gate.asm"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/viridianforestentrance.asm"
|
|
|
|
|
INCLUDE "scripts/viridianforestentrance.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/viridianforestentrance.asm"
|
2014-05-18 18:19:10 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/undergroundpathentranceroute5.asm"
|
|
|
|
|
INCLUDE "scripts/undergroundpathentranceroute5.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/undergroundpathentranceroute5.asm"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/undergroundpathentranceroute6.asm"
|
|
|
|
|
INCLUDE "scripts/undergroundpathentranceroute6.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/undergroundpathentranceroute6.asm"
|
2012-01-18 05:39:13 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/undergroundpathentranceroute7.asm"
|
|
|
|
|
INCLUDE "scripts/undergroundpathentranceroute7.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/undergroundpathentranceroute7.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/undergroundpathentranceroute7copy.asm"
|
|
|
|
|
INCLUDE "scripts/undergroundpathentranceroute7copy.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/undergroundpathentranceroute7copy.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/silphco9.asm"
|
|
|
|
|
INCLUDE "scripts/silphco9.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/silphco9.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SilphCo9Blocks: INCBIN "maps/silphco9.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/victoryroad1.asm"
|
|
|
|
|
INCLUDE "scripts/victoryroad1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/victoryroad1.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
VictoryRoad1Blocks: INCBIN "maps/victoryroad1.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/predefs17_2.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/hidden_object_functions17.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SECTION "bank18",ROMX,BANK[$18]
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
ViridianForestBlocks: INCBIN "maps/viridianforest.blk"
|
|
|
|
|
UndergroundPathNSBlocks: INCBIN "maps/undergroundpathns.blk"
|
|
|
|
|
UndergroundPathWEBlocks: INCBIN "maps/undergroundpathwe.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCBIN "maps/unusedblocks60258.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SSAnne10Blocks:
|
|
|
|
|
SSAnne9Blocks: INCBIN "maps/ssanne9.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/pokemontower1.asm"
|
|
|
|
|
INCLUDE "scripts/pokemontower1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/pokemontower1.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
PokemonTower1Blocks: INCBIN "maps/pokemontower1.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/pokemontower2.asm"
|
|
|
|
|
INCLUDE "scripts/pokemontower2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/pokemontower2.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
PokemonTower2Blocks: INCBIN "maps/pokemontower2.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/pokemontower3.asm"
|
|
|
|
|
INCLUDE "scripts/pokemontower3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/pokemontower3.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
PokemonTower3Blocks: INCBIN "maps/pokemontower3.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/pokemontower4.asm"
|
|
|
|
|
INCLUDE "scripts/pokemontower4.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/pokemontower4.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
PokemonTower4Blocks: INCBIN "maps/pokemontower4.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/pokemontower5.asm"
|
|
|
|
|
INCLUDE "scripts/pokemontower5.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/pokemontower5.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
PokemonTower5Blocks: INCBIN "maps/pokemontower5.blk"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/pokemontower6.asm"
|
|
|
|
|
INCLUDE "scripts/pokemontower6.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/pokemontower6.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
PokemonTower6Blocks: INCBIN "maps/pokemontower6.blk"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
INCBIN "maps/unusedblocks60cef.blk"
|
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/pokemontower7.asm"
|
|
|
|
|
INCLUDE "scripts/pokemontower7.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/pokemontower7.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
PokemonTower7Blocks: INCBIN "maps/pokemontower7.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/celadonmart1.asm"
|
|
|
|
|
INCLUDE "scripts/celadonmart1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/celadonmart1.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeladonMart1Blocks: INCBIN "maps/celadonmart1.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/overworld/cinnabar_lab.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/viridianforest.asm"
|
|
|
|
|
INCLUDE "scripts/viridianforest.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/viridianforest.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ssanne1.asm"
|
|
|
|
|
INCLUDE "scripts/ssanne1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ssanne1.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SSAnne1Blocks: INCBIN "maps/ssanne1.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ssanne2.asm"
|
|
|
|
|
INCLUDE "scripts/ssanne2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ssanne2.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SSAnne2Blocks: INCBIN "maps/ssanne2.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ssanne4.asm"
|
|
|
|
|
INCLUDE "scripts/ssanne4.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ssanne4.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SSAnne4Blocks: INCBIN "maps/ssanne4.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ssanne5.asm"
|
|
|
|
|
INCLUDE "scripts/ssanne5.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ssanne5.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SSAnne5Blocks: INCBIN "maps/ssanne5.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ssanne6.asm"
|
|
|
|
|
INCLUDE "scripts/ssanne6.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ssanne6.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SSAnne6Blocks: INCBIN "maps/ssanne6.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ssanne7.asm"
|
|
|
|
|
INCLUDE "scripts/ssanne7.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ssanne7.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SSAnne7Blocks: INCBIN "maps/ssanne7.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ssanne8.asm"
|
|
|
|
|
INCLUDE "scripts/ssanne8.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ssanne8.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SSAnne8Blocks: INCBIN "maps/ssanne8.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ssanne9.asm"
|
|
|
|
|
INCLUDE "scripts/ssanne9.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ssanne9.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ssanne10.asm"
|
|
|
|
|
INCLUDE "scripts/ssanne10.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ssanne10.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/undergroundpathns.asm"
|
|
|
|
|
INCLUDE "scripts/undergroundpathns.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/undergroundpathns.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/undergroundpathwe.asm"
|
|
|
|
|
INCLUDE "scripts/undergroundpathwe.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/undergroundpathwe.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/diglettscave.asm"
|
|
|
|
|
INCLUDE "scripts/diglettscave.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/diglettscave.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
DiglettsCaveBlocks: INCBIN "maps/diglettscave.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/silphco11.asm"
|
|
|
|
|
INCLUDE "scripts/silphco11.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/silphco11.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SilphCo11Blocks: INCBIN "maps/silphco11.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/hidden_object_functions18.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank19",ROMX,BANK[$19]
|
|
|
|
|
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Overworld_GFX: INCBIN "gfx/tilesets/overworld.t2.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Overworld_Block: INCBIN "gfx/blocksets/overworld.bst"
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
RedsHouse1_GFX:
|
2014-05-30 08:30:10 +00:00
|
|
|
|
RedsHouse2_GFX: INCBIN "gfx/tilesets/reds_house.t7.2bpp"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
RedsHouse1_Block:
|
2014-05-25 02:57:50 +00:00
|
|
|
|
RedsHouse2_Block: INCBIN "gfx/blocksets/reds_house.bst"
|
|
|
|
|
|
2014-05-30 08:30:10 +00:00
|
|
|
|
House_GFX: INCBIN "gfx/tilesets/house.t2.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
House_Block: INCBIN "gfx/blocksets/house.bst"
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Mansion_GFX: INCBIN "gfx/tilesets/mansion.t2.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Mansion_Block: INCBIN "gfx/blocksets/mansion.bst"
|
2014-05-30 08:30:10 +00:00
|
|
|
|
ShipPort_GFX: INCBIN "gfx/tilesets/ship_port.t2.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
ShipPort_Block: INCBIN "gfx/blocksets/ship_port.bst"
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Interior_GFX: INCBIN "gfx/tilesets/interior.t1.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Interior_Block: INCBIN "gfx/blocksets/interior.bst"
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Plateau_GFX: INCBIN "gfx/tilesets/plateau.t10.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Plateau_Block: INCBIN "gfx/blocksets/plateau.bst"
|
|
|
|
|
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank1A",ROMX,BANK[$1A]
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/battle/1a.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Version_GFX:
|
2014-10-17 08:42:32 +00:00
|
|
|
|
IF DEF(_RED)
|
2014-05-30 08:30:10 +00:00
|
|
|
|
INCBIN "gfx/red/redgreenversion.1bpp" ; 10 tiles
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ENDC
|
2014-10-17 08:42:32 +00:00
|
|
|
|
IF DEF(_BLUE)
|
2014-05-30 08:30:10 +00:00
|
|
|
|
INCBIN "gfx/blue/blueversion.1bpp" ; 8 tiles
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ENDC
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
Dojo_GFX:
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Gym_GFX: INCBIN "gfx/tilesets/gym.2bpp"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
Dojo_Block:
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Gym_Block: INCBIN "gfx/blocksets/gym.bst"
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
Mart_GFX:
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Pokecenter_GFX: INCBIN "gfx/tilesets/pokecenter.2bpp"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
Mart_Block:
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Pokecenter_Block: INCBIN "gfx/blocksets/pokecenter.bst"
|
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ForestGate_GFX:
|
|
|
|
|
Museum_GFX:
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Gate_GFX: INCBIN "gfx/tilesets/gate.t1.2bpp"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
ForestGate_Block:
|
|
|
|
|
Museum_Block:
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Gate_Block: INCBIN "gfx/blocksets/gate.bst"
|
|
|
|
|
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Forest_GFX: INCBIN "gfx/tilesets/forest.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Forest_Block: INCBIN "gfx/blocksets/forest.bst"
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Facility_GFX: INCBIN "gfx/tilesets/facility.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Facility_Block: INCBIN "gfx/blocksets/facility.bst"
|
|
|
|
|
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank1B",ROMX,BANK[$1B]
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Cemetery_GFX: INCBIN "gfx/tilesets/cemetery.t4.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Cemetery_Block: INCBIN "gfx/blocksets/cemetery.bst"
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Cavern_GFX: INCBIN "gfx/tilesets/cavern.t14.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Cavern_Block: INCBIN "gfx/blocksets/cavern.bst"
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Lobby_GFX: INCBIN "gfx/tilesets/lobby.t2.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Lobby_Block: INCBIN "gfx/blocksets/lobby.bst"
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Ship_GFX: INCBIN "gfx/tilesets/ship.t6.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Ship_Block: INCBIN "gfx/blocksets/ship.bst"
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Lab_GFX: INCBIN "gfx/tilesets/lab.t4.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Lab_Block: INCBIN "gfx/blocksets/lab.bst"
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Club_GFX: INCBIN "gfx/tilesets/club.t5.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Club_Block: INCBIN "gfx/blocksets/club.bst"
|
2014-05-30 08:30:10 +00:00
|
|
|
|
Underground_GFX: INCBIN "gfx/tilesets/underground.t7.2bpp"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Underground_Block: INCBIN "gfx/blocksets/underground.bst"
|
|
|
|
|
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank1C",ROMX,BANK[$1C]
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/gamefreak.asm"
|
|
|
|
|
INCLUDE "engine/hall_of_fame.asm"
|
|
|
|
|
INCLUDE "engine/overworld/healing_machine.asm"
|
|
|
|
|
INCLUDE "engine/overworld/player_animations.asm"
|
|
|
|
|
INCLUDE "engine/battle/1c.asm"
|
|
|
|
|
INCLUDE "engine/town_map.asm"
|
|
|
|
|
INCLUDE "engine/mon_party_sprites.asm"
|
|
|
|
|
INCLUDE "engine/in_game_trades.asm"
|
|
|
|
|
INCLUDE "engine/palettes.asm"
|
|
|
|
|
INCLUDE "engine/save.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank1D",ROMX,BANK[$1D]
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CopycatsHouse1FBlocks: INCBIN "maps/copycatshouse1f.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CinnabarMartBlocks:
|
|
|
|
|
PewterMartBlocks: INCBIN "maps/pewtermart.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
FuchsiaHouse1Blocks: INCBIN "maps/fuchsiahouse1.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CinnabarPokecenterBlocks:
|
|
|
|
|
FuchsiaPokecenterBlocks: INCBIN "maps/fuchsiapokecenter.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CeruleanHouse2Blocks: INCBIN "maps/ceruleanhouse2.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/HoF_room_pc.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/status_ailments.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/items/itemfinder.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "scripts/ceruleancity2.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/viridiangym.asm"
|
|
|
|
|
INCLUDE "scripts/viridiangym.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/viridiangym.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
ViridianGymBlocks: INCBIN "maps/viridiangym.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/pewtermart.asm"
|
|
|
|
|
INCLUDE "scripts/pewtermart.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/pewtermart.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/unknowndungeon1.asm"
|
|
|
|
|
INCLUDE "scripts/unknowndungeon1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/unknowndungeon1.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
UnknownDungeon1Blocks: INCBIN "maps/unknowndungeon1.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/ceruleanhouse2.asm"
|
|
|
|
|
INCLUDE "scripts/ceruleanhouse2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/ceruleanhouse2.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/menu/vending_machine.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/fuchsiahouse1.asm"
|
|
|
|
|
INCLUDE "scripts/fuchsiahouse1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/fuchsiahouse1.asm"
|
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/fuchsiapokecenter.asm"
|
|
|
|
|
INCLUDE "scripts/fuchsiapokecenter.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/fuchsiapokecenter.asm"
|
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/fuchsiahouse2.asm"
|
|
|
|
|
INCLUDE "scripts/fuchsiahouse2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/fuchsiahouse2.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
FuchsiaHouse2Blocks: INCBIN "maps/fuchsiahouse2.blk"
|
2014-05-22 22:13:20 +00:00
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/safarizoneentrance.asm"
|
|
|
|
|
INCLUDE "scripts/safarizoneentrance.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/safarizoneentrance.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
SafariZoneEntranceBlocks: INCBIN "maps/safarizoneentrance.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/fuchsiagym.asm"
|
|
|
|
|
INCLUDE "scripts/fuchsiagym.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/fuchsiagym.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
FuchsiaGymBlocks: INCBIN "maps/fuchsiagym.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/fuchsiameetingroom.asm"
|
|
|
|
|
INCLUDE "scripts/fuchsiameetingroom.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/fuchsiameetingroom.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
FuchsiaMeetingRoomBlocks: INCBIN "maps/fuchsiameetingroom.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/cinnabargym.asm"
|
|
|
|
|
INCLUDE "scripts/cinnabargym.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/cinnabargym.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
CinnabarGymBlocks: INCBIN "maps/cinnabargym.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/lab1.asm"
|
|
|
|
|
INCLUDE "scripts/lab1.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/lab1.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Lab1Blocks: INCBIN "maps/lab1.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/lab2.asm"
|
|
|
|
|
INCLUDE "scripts/lab2.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/lab2.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Lab2Blocks: INCBIN "maps/lab2.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/lab3.asm"
|
|
|
|
|
INCLUDE "scripts/lab3.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/lab3.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Lab3Blocks: INCBIN "maps/lab3.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/lab4.asm"
|
|
|
|
|
INCLUDE "scripts/lab4.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/lab4.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
Lab4Blocks: INCBIN "maps/lab4.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/cinnabarpokecenter.asm"
|
|
|
|
|
INCLUDE "scripts/cinnabarpokecenter.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/cinnabarpokecenter.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/cinnabarmart.asm"
|
|
|
|
|
INCLUDE "scripts/cinnabarmart.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/cinnabarmart.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/copycatshouse1f.asm"
|
|
|
|
|
INCLUDE "scripts/copycatshouse1f.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/copycatshouse1f.asm"
|
|
|
|
|
|
|
|
|
|
INCLUDE "data/mapHeaders/gary.asm"
|
|
|
|
|
INCLUDE "scripts/gary.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/gary.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
GaryBlocks: INCBIN "maps/gary.blk"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/lorelei.asm"
|
|
|
|
|
INCLUDE "scripts/lorelei.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/lorelei.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
LoreleiBlocks: INCBIN "maps/lorelei.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/bruno.asm"
|
|
|
|
|
INCLUDE "scripts/bruno.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/bruno.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
BrunoBlocks: INCBIN "maps/bruno.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "data/mapHeaders/agatha.asm"
|
|
|
|
|
INCLUDE "scripts/agatha.asm"
|
|
|
|
|
INCLUDE "data/mapObjects/agatha.asm"
|
2014-05-25 02:57:50 +00:00
|
|
|
|
AgathaBlocks: INCBIN "maps/agatha.blk"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/menu/league_pc.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/overworld/hidden_items.asm"
|
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
SECTION "bank1E",ROMX,BANK[$1E]
|
|
|
|
|
|
|
|
|
|
INCLUDE "engine/battle/animations.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/overworld/cut2.asm"
|
|
|
|
|
|
|
|
|
|
INCLUDE "engine/overworld/ssanne.asm"
|
2013-12-19 13:53:17 +00:00
|
|
|
|
|
2014-05-25 02:57:50 +00:00
|
|
|
|
RedFishingTilesFront: INCBIN "gfx/red_fishing_tile_front.2bpp"
|
|
|
|
|
RedFishingTilesBack: INCBIN "gfx/red_fishing_tile_back.2bpp"
|
|
|
|
|
RedFishingTilesSide: INCBIN "gfx/red_fishing_tile_side.2bpp"
|
|
|
|
|
RedFishingRodTiles: INCBIN "gfx/red_fishingrod_tiles.2bpp"
|
2012-01-14 20:36:00 +00:00
|
|
|
|
|
2014-05-19 12:05:48 +00:00
|
|
|
|
INCLUDE "data/animations.asm"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/evolution.asm"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/overworld/elevator.asm"
|
2012-01-17 23:24:32 +00:00
|
|
|
|
|
2014-05-22 22:13:20 +00:00
|
|
|
|
INCLUDE "engine/items/tm_prices.asm"
|
2014-10-17 17:13:22 +00:00
|
|
|
|
|
2014-10-17 18:16:52 +00:00
|
|
|
|
IF DEF(_OPTION_BEACH_HOUSE)
|
|
|
|
|
SECTION "bank3C",ROMX[$4314],BANK[$3C]
|
2014-10-17 17:13:22 +00:00
|
|
|
|
|
|
|
|
|
BeachHouse_GFX:
|
|
|
|
|
INCBIN "gfx/tilesets/beachhouse.2bpp"
|
|
|
|
|
|
|
|
|
|
BeachHouse_Block:
|
|
|
|
|
INCBIN "gfx/blocksets/beachhouse.bst"
|
|
|
|
|
ENDC
|