shithub: pokecrystal

ref: 16a39f655a4b46f6d2a56f28e646939e6f957712
dir: /data/unused_text/gen_1_trainers.asm/

View raw version
GetGen1TrainerClassName: ; 50a28
; XXX
	ld hl, .Strings
	ld a, [TrainerClass]
	dec a
	ld c, a
	ld b, 0
	add hl, bc
	add hl, bc
	ld a, [hli]
	ld h, [hl]
	ld l, a
	ld de, StringBuffer1
.copy
	ld a, [hli]
	ld [de], a
	inc de
	cp "@"
	jr nz, .copy
	ret

.Strings: ; 50a42
; Untranslated trainer class names from Red.
	dw .Youngster
	dw .BugCatcher
	dw .Lass
	dw OTClassName
	dw .JrTrainerM
	dw .JrTrainerF
	dw .Pokemaniac
	dw .SuperNerd
	dw OTClassName
	dw OTClassName
	dw .Burglar
	dw .Engineer
	dw .Jack
	dw OTClassName
	dw .Swimmer
	dw OTClassName
	dw OTClassName
	dw .Beauty
	dw OTClassName
	dw .Rocker
	dw .Juggler
	dw OTClassName
	dw OTClassName
	dw .Blackbelt
	dw OTClassName
	dw .ProfOak
	dw .Chief
	dw .Scientist
	dw OTClassName
	dw .Rocket
	dw .CooltrainerM
	dw .CooltrainerF
	dw OTClassName
	dw OTClassName
	dw OTClassName
	dw OTClassName
	dw OTClassName
	dw OTClassName
	dw OTClassName
	dw OTClassName
	dw OTClassName
	dw OTClassName
	dw OTClassName
	dw OTClassName
	dw OTClassName
	dw OTClassName
	dw OTClassName

.Youngster:    db "たんパン@"
.BugCatcher:   db "むしとり@"
.Lass:         db "ミニスカ@"
.JrTrainerM:   db "ボーイ@"
.JrTrainerF:   db "ガール@"
.Pokemaniac:   db "マニア@"
.SuperNerd:    db "りかけい@"
.Burglar:      db "どろぼう@"
.Engineer:     db "ォヤジ@"
.Jack:         db "ジャック@"
.Swimmer:      db "かいパン@"
.Beauty:       db "おねえさん@"
.Rocker:       db "グループ@"
.Juggler:      db "ジャグラー@"
.Blackbelt:    db "からて@"
.ProfOak:      db "ォーキド@"
.Chief:        db "チーフ@"
.Scientist:    db "けんきゅういん@"
.Rocket:       db "だんいん@"
.CooltrainerM: db "エりート♂@"
.CooltrainerF: db "エりート♀@"