mirror of
https://github.com/pret/pokered.git
synced 2024-10-24 07:25:21 +00:00
95 lines
1.5 KiB
NASM
95 lines
1.5 KiB
NASM
_RemovePokemon:
|
|
ld hl, wPartyCount
|
|
ld a, [wRemoveMonFromBox]
|
|
and a
|
|
jr z, .asm_7b74
|
|
ld hl, wNumInBox
|
|
.asm_7b74
|
|
ld a, [hl]
|
|
dec a
|
|
ld [hli], a
|
|
ld a, [wWhichPokemon]
|
|
ld c, a
|
|
ld b, $0
|
|
add hl, bc
|
|
ld e, l
|
|
ld d, h
|
|
inc de
|
|
.asm_7b81
|
|
ld a, [de]
|
|
inc de
|
|
ld [hli], a
|
|
inc a
|
|
jr nz, .asm_7b81
|
|
ld hl, wPartyMonOT
|
|
ld d, $5
|
|
ld a, [wRemoveMonFromBox]
|
|
and a
|
|
jr z, .asm_7b97
|
|
ld hl, wBoxMonOT
|
|
ld d, $13
|
|
.asm_7b97
|
|
ld a, [wWhichPokemon]
|
|
call SkipFixedLengthTextEntries
|
|
ld a, [wWhichPokemon]
|
|
cp d
|
|
jr nz, .asm_7ba6
|
|
ld [hl], $ff
|
|
ret
|
|
.asm_7ba6
|
|
ld d, h
|
|
ld e, l
|
|
ld bc, NAME_LENGTH
|
|
add hl, bc
|
|
ld bc, wPartyMonNicks
|
|
ld a, [wRemoveMonFromBox]
|
|
and a
|
|
jr z, .asm_7bb8
|
|
ld bc, wBoxMonNicks
|
|
.asm_7bb8
|
|
call CopyDataUntil
|
|
ld hl, wPartyMons
|
|
ld bc, wPartyMon2 - wPartyMon1
|
|
ld a, [wRemoveMonFromBox]
|
|
and a
|
|
jr z, .asm_7bcd
|
|
ld hl, wBoxMons
|
|
ld bc, wBoxMon2 - wBoxMon1
|
|
.asm_7bcd
|
|
ld a, [wWhichPokemon]
|
|
call AddNTimes
|
|
ld d, h
|
|
ld e, l
|
|
ld a, [wRemoveMonFromBox]
|
|
and a
|
|
jr z, .asm_7be4
|
|
ld bc, wBoxMon2 - wBoxMon1
|
|
add hl, bc
|
|
ld bc, wBoxMonOT
|
|
jr .asm_7beb
|
|
.asm_7be4
|
|
ld bc, wPartyMon2 - wPartyMon1
|
|
add hl, bc
|
|
ld bc, wPartyMonOT
|
|
.asm_7beb
|
|
call CopyDataUntil
|
|
ld hl, wPartyMonNicks
|
|
ld a, [wRemoveMonFromBox]
|
|
and a
|
|
jr z, .asm_7bfa
|
|
ld hl, wBoxMonNicks
|
|
.asm_7bfa
|
|
ld bc, NAME_LENGTH
|
|
ld a, [wWhichPokemon]
|
|
call AddNTimes
|
|
ld d, h
|
|
ld e, l
|
|
ld bc, NAME_LENGTH
|
|
add hl, bc
|
|
ld bc, wPokedexOwned
|
|
ld a, [wRemoveMonFromBox]
|
|
and a
|
|
jr z, .asm_7c15
|
|
ld bc, wBoxMonNicksEnd
|
|
.asm_7c15
|
|
jp CopyDataUntil
|