mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-09-09 09:51:34 -07:00
86061d37d2
Labelled WRAM addresses, added constants for mobile commands, fixed some mobile lib function names, documented most of the functions for specific commands.
47 lines
670 B
NASM
47 lines
670 B
NASM
GetMobileOTTrainerClass: ; mobile function
|
|
ld h, b
|
|
ld l, c
|
|
call .GetMobileOTTrainerClass
|
|
ld c, a
|
|
ret
|
|
|
|
.GetMobileOTTrainerClass:
|
|
ld a, [hli]
|
|
xor [hl]
|
|
ld c, a
|
|
jr z, .skip_male_trainers
|
|
srl c
|
|
srl c
|
|
.male_trainer_loop
|
|
srl c
|
|
ld a, c
|
|
cp MaleTrainers.End - MaleTrainers - 1
|
|
jr nc, .male_trainer_loop
|
|
inc c
|
|
|
|
.skip_male_trainers
|
|
ld a, [de]
|
|
cp FEMALE
|
|
ld hl, MaleTrainers
|
|
jr nz, .finished
|
|
|
|
ld hl, FemaleTrainers
|
|
ld a, c
|
|
and a
|
|
jr z, .finished
|
|
|
|
.female_trainer_loop
|
|
srl c
|
|
ld a, c
|
|
cp FemaleTrainers.End - FemaleTrainers - 1
|
|
jr nc, .female_trainer_loop
|
|
inc c
|
|
|
|
.finished
|
|
ld b, $0
|
|
add hl, bc
|
|
ld a, [hl]
|
|
ret
|
|
|
|
INCLUDE "data/trainers/gendered_trainers.asm"
|