pokecrystal/engine/battle/read_trainer_attributes.asm

67 lines
969 B
NASM
Raw Normal View History

2018-06-24 14:09:41 +00:00
GetTrainerClassName:
2018-01-23 22:39:09 +00:00
ld hl, wRivalName
ld a, c
cp RIVAL1
jr z, .rival
2018-01-23 22:39:09 +00:00
ld [wCurSpecies], a
ld a, TRAINER_NAME
ld [wNamedObjectType], a
call GetName
2018-01-23 22:39:09 +00:00
ld de, wStringBuffer1
ret
.rival
2018-01-23 22:39:09 +00:00
ld de, wStringBuffer1
push de
ld bc, NAME_LENGTH
call CopyBytes
pop de
ret
2018-06-24 14:09:41 +00:00
GetOTName:
2018-01-23 22:39:09 +00:00
ld hl, wOTPlayerName
ld a, [wLinkMode]
and a
jr nz, .ok
2018-01-23 22:39:09 +00:00
ld hl, wRivalName
ld a, c
cp RIVAL1
jr z, .ok
2018-01-23 22:39:09 +00:00
ld [wCurSpecies], a
ld a, TRAINER_NAME
ld [wNamedObjectType], a
call GetName
2018-01-23 22:39:09 +00:00
ld hl, wStringBuffer1
.ok
ld bc, TRAINER_CLASS_NAME_LENGTH
2018-01-23 22:39:09 +00:00
ld de, wOTClassName
push de
call CopyBytes
pop de
ret
2018-06-24 14:09:41 +00:00
GetTrainerAttributes:
2018-01-23 22:39:09 +00:00
ld a, [wTrainerClass]
ld c, a
call GetOTName
2018-01-23 22:39:09 +00:00
ld a, [wTrainerClass]
dec a
ld hl, TrainerClassAttributes + TRNATTR_ITEM1
ld bc, NUM_TRAINER_ATTRIBUTES
call AddNTimes
ld de, wEnemyTrainerItem1
ld a, [hli]
ld [de], a
inc de
ld a, [hli]
ld [de], a
ld a, [hl]
ld [wEnemyTrainerBaseReward], a
ret
INCLUDE "data/trainers/attributes.asm"