mirror of https://github.com/pret/pokecrystal.git
move name rater asm into event/name_rater.asm
This commit is contained in:
yenatch
parent
0fc0c0bebc
commit
608d0d86e4
|
|
@ -0,0 +1,236 @@
|
|||
NameRater: ; fb6ed
|
||||
ld hl, UnknownText_0xfb80f
|
||||
call PrintText
|
||||
call Function1dcf
|
||||
jp c, .asm_fb77e
|
||||
ld hl, UnknownText_0xfb814
|
||||
call PrintText
|
||||
callba Function50000
|
||||
jr c, .asm_fb77e
|
||||
ld a, [CurPartySpecies]
|
||||
cp EGG
|
||||
jr z, .asm_fb783
|
||||
call GetCurNick
|
||||
call Functionfb78a
|
||||
jr c, .asm_fb779
|
||||
ld hl, UnknownText_0xfb819
|
||||
call PrintText
|
||||
call Function1dcf
|
||||
jr c, .asm_fb77e
|
||||
ld hl, UnknownText_0xfb81e
|
||||
call PrintText
|
||||
xor a
|
||||
ld [MonType], a
|
||||
ld a, [CurPartySpecies]
|
||||
ld [$d265], a
|
||||
ld [CurSpecies], a
|
||||
call GetBaseData
|
||||
ld b, 0
|
||||
ld de, StringBuffer2
|
||||
callba Function116b7
|
||||
call Functionfb7be
|
||||
ld hl, UnknownText_0xfb837
|
||||
jr c, .asm_fb76c
|
||||
call Functionfb7d3
|
||||
ld hl, UnknownText_0xfb837
|
||||
jr c, .asm_fb76c
|
||||
ld hl, PartyMon1Nickname
|
||||
ld bc, $000b
|
||||
ld a, [CurPartyMon]
|
||||
call AddNTimes
|
||||
ld e, l
|
||||
ld d, h
|
||||
ld hl, StringBuffer2
|
||||
ld bc, $000b
|
||||
call CopyBytes
|
||||
ld hl, UnknownText_0xfb823
|
||||
|
||||
.asm_fb76c
|
||||
push hl
|
||||
call GetCurNick
|
||||
ld hl, UnknownText_0xfb83c
|
||||
call PrintText
|
||||
pop hl
|
||||
jr .asm_fb786
|
||||
|
||||
.asm_fb779
|
||||
ld hl, UnknownText_0xfb82d
|
||||
jr .asm_fb786
|
||||
|
||||
.asm_fb77e
|
||||
ld hl, UnknownText_0xfb828
|
||||
jr .asm_fb786
|
||||
|
||||
.asm_fb783
|
||||
ld hl, UnknownText_0xfb832
|
||||
|
||||
.asm_fb786
|
||||
call PrintText
|
||||
ret
|
||||
; fb78a
|
||||
|
||||
Functionfb78a: ; fb78a
|
||||
ld hl, PartyMon1OT
|
||||
ld bc, $000b
|
||||
ld a, [CurPartyMon]
|
||||
call AddNTimes
|
||||
ld de, PlayerName
|
||||
ld c, $b
|
||||
call .asm_fb7b1
|
||||
jr c, .asm_fb7bc
|
||||
ld hl, PartyMon1ID
|
||||
ld bc, PartyMon2 - PartyMon1
|
||||
ld a, [CurPartyMon]
|
||||
call AddNTimes
|
||||
ld de, PlayerID
|
||||
ld c, $2
|
||||
.asm_fb7b1
|
||||
ld a, [de]
|
||||
cp [hl]
|
||||
jr nz, .asm_fb7bc
|
||||
inc hl
|
||||
inc de
|
||||
dec c
|
||||
jr nz, .asm_fb7b1
|
||||
and a
|
||||
ret
|
||||
|
||||
.asm_fb7bc
|
||||
scf
|
||||
ret
|
||||
; fb7be
|
||||
|
||||
Functionfb7be: ; fb7be
|
||||
ld hl, StringBuffer2
|
||||
ld c, 10
|
||||
.asm_fb7c3
|
||||
ld a, [hli]
|
||||
cp "@"
|
||||
jr z, .asm_fb7cf
|
||||
cp " "
|
||||
jr nz, .asm_fb7d1
|
||||
dec c
|
||||
jr nz, .asm_fb7c3
|
||||
|
||||
.asm_fb7cf
|
||||
scf
|
||||
ret
|
||||
|
||||
.asm_fb7d1
|
||||
and a
|
||||
ret
|
||||
; fb7d3
|
||||
|
||||
Functionfb7d3: ; fb7d3
|
||||
ld hl, PartyMon1Nickname
|
||||
ld bc, $000b
|
||||
ld a, [CurPartyMon]
|
||||
call AddNTimes
|
||||
push hl
|
||||
call Functionfb802
|
||||
ld b, c
|
||||
ld hl, StringBuffer2
|
||||
call Functionfb802
|
||||
pop hl
|
||||
ld a, c
|
||||
cp b
|
||||
jr nz, .asm_fb7fe
|
||||
ld de, StringBuffer2
|
||||
.asm_fb7f2
|
||||
ld a, [de]
|
||||
cp "@"
|
||||
jr z, .asm_fb800
|
||||
cp [hl]
|
||||
jr nz, .asm_fb7fe
|
||||
inc hl
|
||||
inc de
|
||||
jr .asm_fb7f2
|
||||
|
||||
.asm_fb7fe
|
||||
and a
|
||||
ret
|
||||
|
||||
.asm_fb800
|
||||
scf
|
||||
ret
|
||||
; fb802
|
||||
|
||||
Functionfb802: ; fb802
|
||||
ld c, 0
|
||||
.asm_fb804
|
||||
ld a, [hli]
|
||||
cp "@"
|
||||
ret z
|
||||
inc c
|
||||
ld a, c
|
||||
cp 10
|
||||
jr nz, .asm_fb804
|
||||
ret
|
||||
; fb80f
|
||||
|
||||
UnknownText_0xfb80f: ; 0xfb80f
|
||||
; Hello, hello! I'm the NAME RATER.
|
||||
; I rate the names of #MON.
|
||||
; Would you like me to rate names?
|
||||
text_jump UnknownText_0x1c0043, BANK(UnknownText_0x1c0043)
|
||||
db "@"
|
||||
; 0xfb814
|
||||
|
||||
UnknownText_0xfb814: ; 0xfb814
|
||||
; Which #MON's nickname should I rate for you?
|
||||
text_jump UnknownText_0x1c00a0, BANK(UnknownText_0x1c00a0)
|
||||
db "@"
|
||||
; 0xfb819
|
||||
|
||||
UnknownText_0xfb819: ; 0xfb819
|
||||
; Hm… @ … That's a fairly decent name.
|
||||
; But, how about a slightly better nickname?
|
||||
; Want me to give it a better name?
|
||||
text_jump UnknownText_0x1c00cd, BANK(UnknownText_0x1c00cd)
|
||||
db "@"
|
||||
; 0xfb81e
|
||||
|
||||
UnknownText_0xfb81e: ; 0xfb81e
|
||||
; All right. What name should we give it, then?
|
||||
text_jump UnknownText_0x1c0142, BANK(UnknownText_0x1c0142)
|
||||
db "@"
|
||||
; 0xfb823
|
||||
|
||||
UnknownText_0xfb823: ; 0xfb823
|
||||
; That's a better name than before! Well done!
|
||||
text_jump UnknownText_0x1c0171, BANK(UnknownText_0x1c0171)
|
||||
db "@"
|
||||
; 0xfb828
|
||||
|
||||
UnknownText_0xfb828: ; 0xfb828
|
||||
; OK, then. Come again sometime.
|
||||
text_jump UnknownText_0x1c019e, BANK(UnknownText_0x1c019e)
|
||||
db "@"
|
||||
; 0xfb82d
|
||||
|
||||
UnknownText_0xfb82d: ; 0xfb82d
|
||||
; Hm… @ ? What a great name! It's perfect.
|
||||
; Treat @ with loving care.
|
||||
text_jump UnknownText_0x1c01be, BANK(UnknownText_0x1c01be)
|
||||
db "@"
|
||||
; 0xfb832
|
||||
|
||||
UnknownText_0xfb832: ; 0xfb832
|
||||
; Whoa… That's just an EGG.
|
||||
text_jump UnknownText_0x1c0208, BANK(UnknownText_0x1c0208)
|
||||
db "@"
|
||||
; 0xfb837
|
||||
|
||||
UnknownText_0xfb837: ; 0xfb837
|
||||
; It might look the same as before,
|
||||
; but this new name is much better! Well done!
|
||||
text_jump UnknownText_0x1c0222, BANK(UnknownText_0x1c0222)
|
||||
db "@"
|
||||
; 0xfb83c
|
||||
|
||||
UnknownText_0xfb83c: ; 0xfb83c
|
||||
; All right. This #MON is now named @ .
|
||||
text_jump UnknownText_0x1c0272, BANK(UnknownText_0x1c0272)
|
||||
db "@"
|
||||
; 0xfb841
|
||||
|
||||
235
main.asm
235
main.asm
|
|
@ -73868,241 +73868,8 @@ Functionfb634: ; fb634
|
|||
|
||||
INCBIN "baserom.gbc", $fb656, $fb6ed - $fb656
|
||||
|
||||
NameRater: ; fb6ed
|
||||
ld hl, UnknownText_0xfb80f
|
||||
call PrintText
|
||||
call Function1dcf
|
||||
jp c, .asm_fb77e
|
||||
ld hl, UnknownText_0xfb814
|
||||
call PrintText
|
||||
callba Function50000
|
||||
jr c, .asm_fb77e
|
||||
ld a, [CurPartySpecies]
|
||||
cp EGG
|
||||
jr z, .asm_fb783
|
||||
call GetCurNick
|
||||
call Functionfb78a
|
||||
jr c, .asm_fb779
|
||||
ld hl, UnknownText_0xfb819
|
||||
call PrintText
|
||||
call Function1dcf
|
||||
jr c, .asm_fb77e
|
||||
ld hl, UnknownText_0xfb81e
|
||||
call PrintText
|
||||
xor a
|
||||
ld [MonType], a
|
||||
ld a, [CurPartySpecies]
|
||||
ld [$d265], a
|
||||
ld [CurSpecies], a
|
||||
call GetBaseData
|
||||
ld b, 0
|
||||
ld de, StringBuffer2
|
||||
callba Function116b7
|
||||
call Functionfb7be
|
||||
ld hl, UnknownText_0xfb837
|
||||
jr c, .asm_fb76c
|
||||
call Functionfb7d3
|
||||
ld hl, UnknownText_0xfb837
|
||||
jr c, .asm_fb76c
|
||||
ld hl, PartyMon1Nickname
|
||||
ld bc, $000b
|
||||
ld a, [CurPartyMon]
|
||||
call AddNTimes
|
||||
ld e, l
|
||||
ld d, h
|
||||
ld hl, StringBuffer2
|
||||
ld bc, $000b
|
||||
call CopyBytes
|
||||
ld hl, UnknownText_0xfb823
|
||||
|
||||
.asm_fb76c
|
||||
push hl
|
||||
call GetCurNick
|
||||
ld hl, UnknownText_0xfb83c
|
||||
call PrintText
|
||||
pop hl
|
||||
jr .asm_fb786
|
||||
|
||||
.asm_fb779
|
||||
ld hl, UnknownText_0xfb82d
|
||||
jr .asm_fb786
|
||||
|
||||
.asm_fb77e
|
||||
ld hl, UnknownText_0xfb828
|
||||
jr .asm_fb786
|
||||
|
||||
.asm_fb783
|
||||
ld hl, UnknownText_0xfb832
|
||||
|
||||
.asm_fb786
|
||||
call PrintText
|
||||
ret
|
||||
; fb78a
|
||||
|
||||
Functionfb78a: ; fb78a
|
||||
ld hl, PartyMon1OT
|
||||
ld bc, $000b
|
||||
ld a, [CurPartyMon]
|
||||
call AddNTimes
|
||||
ld de, PlayerName
|
||||
ld c, $b
|
||||
call .asm_fb7b1
|
||||
jr c, .asm_fb7bc
|
||||
ld hl, PartyMon1ID
|
||||
ld bc, PartyMon2 - PartyMon1
|
||||
ld a, [CurPartyMon]
|
||||
call AddNTimes
|
||||
ld de, PlayerID
|
||||
ld c, $2
|
||||
.asm_fb7b1
|
||||
ld a, [de]
|
||||
cp [hl]
|
||||
jr nz, .asm_fb7bc
|
||||
inc hl
|
||||
inc de
|
||||
dec c
|
||||
jr nz, .asm_fb7b1
|
||||
and a
|
||||
ret
|
||||
|
||||
.asm_fb7bc
|
||||
scf
|
||||
ret
|
||||
; fb7be
|
||||
|
||||
Functionfb7be: ; fb7be
|
||||
ld hl, StringBuffer2
|
||||
ld c, 10
|
||||
.asm_fb7c3
|
||||
ld a, [hli]
|
||||
cp "@"
|
||||
jr z, .asm_fb7cf
|
||||
cp " "
|
||||
jr nz, .asm_fb7d1
|
||||
dec c
|
||||
jr nz, .asm_fb7c3
|
||||
|
||||
.asm_fb7cf
|
||||
scf
|
||||
ret
|
||||
|
||||
.asm_fb7d1
|
||||
and a
|
||||
ret
|
||||
; fb7d3
|
||||
|
||||
Functionfb7d3: ; fb7d3
|
||||
ld hl, PartyMon1Nickname
|
||||
ld bc, $000b
|
||||
ld a, [CurPartyMon]
|
||||
call AddNTimes
|
||||
push hl
|
||||
call Functionfb802
|
||||
ld b, c
|
||||
ld hl, StringBuffer2
|
||||
call Functionfb802
|
||||
pop hl
|
||||
ld a, c
|
||||
cp b
|
||||
jr nz, .asm_fb7fe
|
||||
ld de, StringBuffer2
|
||||
.asm_fb7f2
|
||||
ld a, [de]
|
||||
cp "@"
|
||||
jr z, .asm_fb800
|
||||
cp [hl]
|
||||
jr nz, .asm_fb7fe
|
||||
inc hl
|
||||
inc de
|
||||
jr .asm_fb7f2
|
||||
|
||||
.asm_fb7fe
|
||||
and a
|
||||
ret
|
||||
|
||||
.asm_fb800
|
||||
scf
|
||||
ret
|
||||
; fb802
|
||||
|
||||
Functionfb802: ; fb802
|
||||
ld c, 0
|
||||
.asm_fb804
|
||||
ld a, [hli]
|
||||
cp "@"
|
||||
ret z
|
||||
inc c
|
||||
ld a, c
|
||||
cp 10
|
||||
jr nz, .asm_fb804
|
||||
ret
|
||||
; fb80f
|
||||
|
||||
UnknownText_0xfb80f: ; 0xfb80f
|
||||
; Hello, hello! I'm the NAME RATER.
|
||||
; I rate the names of #MON.
|
||||
; Would you like me to rate names?
|
||||
text_jump UnknownText_0x1c0043, BANK(UnknownText_0x1c0043)
|
||||
db "@"
|
||||
; 0xfb814
|
||||
|
||||
UnknownText_0xfb814: ; 0xfb814
|
||||
; Which #MON's nickname should I rate for you?
|
||||
text_jump UnknownText_0x1c00a0, BANK(UnknownText_0x1c00a0)
|
||||
db "@"
|
||||
; 0xfb819
|
||||
|
||||
UnknownText_0xfb819: ; 0xfb819
|
||||
; Hm… @ … That's a fairly decent name.
|
||||
; But, how about a slightly better nickname?
|
||||
; Want me to give it a better name?
|
||||
text_jump UnknownText_0x1c00cd, BANK(UnknownText_0x1c00cd)
|
||||
db "@"
|
||||
; 0xfb81e
|
||||
|
||||
UnknownText_0xfb81e: ; 0xfb81e
|
||||
; All right. What name should we give it, then?
|
||||
text_jump UnknownText_0x1c0142, BANK(UnknownText_0x1c0142)
|
||||
db "@"
|
||||
; 0xfb823
|
||||
|
||||
UnknownText_0xfb823: ; 0xfb823
|
||||
; That's a better name than before! Well done!
|
||||
text_jump UnknownText_0x1c0171, BANK(UnknownText_0x1c0171)
|
||||
db "@"
|
||||
; 0xfb828
|
||||
|
||||
UnknownText_0xfb828: ; 0xfb828
|
||||
; OK, then. Come again sometime.
|
||||
text_jump UnknownText_0x1c019e, BANK(UnknownText_0x1c019e)
|
||||
db "@"
|
||||
; 0xfb82d
|
||||
|
||||
UnknownText_0xfb82d: ; 0xfb82d
|
||||
; Hm… @ ? What a great name! It's perfect.
|
||||
; Treat @ with loving care.
|
||||
text_jump UnknownText_0x1c01be, BANK(UnknownText_0x1c01be)
|
||||
db "@"
|
||||
; 0xfb832
|
||||
|
||||
UnknownText_0xfb832: ; 0xfb832
|
||||
; Whoa… That's just an EGG.
|
||||
text_jump UnknownText_0x1c0208, BANK(UnknownText_0x1c0208)
|
||||
db "@"
|
||||
; 0xfb837
|
||||
|
||||
UnknownText_0xfb837: ; 0xfb837
|
||||
; It might look the same as before,
|
||||
; but this new name is much better! Well done!
|
||||
text_jump UnknownText_0x1c0222, BANK(UnknownText_0x1c0222)
|
||||
db "@"
|
||||
; 0xfb83c
|
||||
|
||||
UnknownText_0xfb83c: ; 0xfb83c
|
||||
; All right. This #MON is now named @ .
|
||||
text_jump UnknownText_0x1c0272, BANK(UnknownText_0x1c0272)
|
||||
db "@"
|
||||
; 0xfb841
|
||||
INCLUDE "event/name_rater.asm"
|
||||
|
||||
|
||||
Functionfb841: ; fb841
|
||||
|
|
|
|||
Loading…
Reference in New Issue