- 36
- Posts
- 9
- Years
- Seen Apr 4, 2017
Figured this wouldn't be appropriate for quick Q&A, since there's so much to ask, so here goes:
1.How would one replace the sprites for the intro for the player, rival and Oak? I have been using NSE, but I can't seem to find the right sprites. Found them navigating, but I was unable to import a new sprite, instead, everything I tried made the picture glitch to death, or did nothing.
2.I opened up the script for the starter Pokémon, but I'm not sure which numbers to change, in order to change which Pokémon you are given:
#org 0x8169BAB
'-----------------------------------
lock
faceplayer
setvar 0x4001 0x0
setvar 0x4002 0x1
setvar 0x4003 0x4
setvar 0x4004 0x7
compare 0x4055 0x3
if >= jump 0x8169DE4 ' Larger Than or Equal To
compare 0x4055 0x2
if == jump 0x8169BE1 ' Equal To
msgbox 0x818EA19 ' Those are Pok\e Ball...
callstd MSG_NOCLOSE ' Non-closing message
release
' Release commands close any open messages
end
#org 0x8169DE4
'-----------------------------------
msgbox 0x818EA45 ' That's Prof. Oak's l...
callstd MSG_NOCLOSE ' Non-closing message
release
' Release commands close any open messages
end
#org 0x8169BE1
'-----------------------------------
applymovement 0x4 0x81A75EF ' look_right end
pauseevent 0x0
showpokepic 0x4002 0xA 0x3
textcolor BLUE
compare 0x4001 0x0
if == jump 0x8169C14 ' Equal To
compare 0x4001 0x1
if == jump 0x8169C33 ' Equal To
compare 0x4001 0x2
if == jump 0x8169C52 ' Equal To
end
#org 0x8169C14
'-----------------------------------
msgbox 0x818E272 ' I see! Bulbasaur is ...
callstd MSG_YESNO ' Yes/No message
compare LASTRESULT YES
if == jump 0x8169C74 ' Equal To
compare LASTRESULT 0x0
if == jump 0x8169C71 ' Equal To
end
#org 0x8169C74
'-----------------------------------
hidepokepic
disappear LASTTALKED
msgbox 0x818E2E5 ' This Pok\emon is rea...
callstd MSG_NOCLOSE ' Non-closing message
call 0x81A6675
setflag FR_POKEMON
setflag 0x291
addpokemon 0x4002 5 NONE 0x0 0x0 0x0
copyvar 0x4031 0x4001
storepokemon 0x0 0x4002
message 0x818E30D ' \v\h01 received the ...
showmsg
fanfare 0x13E
waitfanfare
msgbox 0x81A56A7 ' Do you want to give ...
callstd MSG_YESNO ' Yes/No message
compare LASTRESULT YES
if == jump 0x8169CCC ' Equal To
compare LASTRESULT 0x0
if == jump 0x8169CDC ' Equal To
end
#org 0x81A6675
'-----------------------------------
copyvar 0x8012 0x8013
return
#org 0x8169C33
'-----------------------------------
msgbox 0x818E207 ' Hm! Squirtle is your...
callstd MSG_YESNO ' Yes/No message
compare LASTRESULT YES
if == jump 0x8169C74 ' Equal To
compare LASTRESULT 0x0
if == jump 0x8169C71 ' Equal To
end
#org 0x8169C71
'-----------------------------------
hidepokepic
release
end
#org 0x8169C52
'-----------------------------------
msgbox 0x818E194 ' Ah! Charmander is yo...
callstd MSG_YESNO ' Yes/No message
compare LASTRESULT YES
if == jump 0x8169C74 ' Equal To
compare LASTRESULT 0x0
if == jump 0x8169C71 ' Equal To
end
#org 0x8169CCC
'-----------------------------------
setvar 0x8004 0x0
call 0x81A74EB
jump 0x8169CDC
#org 0x81A74EB
'-----------------------------------
fadescreen FADEOUT_BLACK
special NAME_POKEMON
waitspecial
return
#org 0x8169CDC
'-----------------------------------
closemsg
compare 0x4001 0x0
if == jump 0x8169CFF ' Equal To
compare 0x4001 0x1
if == jump 0x8169D1F ' Equal To
compare 0x4001 0x2
if == jump 0x8169D0F ' Equal To
end
#org 0x8169CFF
'-----------------------------------
applymovement 0x8 0x8169D62 ' walk_down walk_down ...
pauseevent 0x0
jump 0x8169D2F
#org 0x8169D2F
'-----------------------------------
textcolor BLUE
msgbox 0x818DD34 ' \v\h06: I'll take th...
callstd MSG_NOCLOSE ' Non-closing message
disappear 0x4004
textcolor GRAY
storepokemon 0x0 0x4003
message 0x818DD52 ' \v\h06 received the ...
showmsg
fanfare 0x13E
waitfanfare
setvar 0x4055 0x3
checkflag 0x83E
if true call 0x8169D5C ' Flag is set
release
end
#org 0x8169D5C
'-----------------------------------
setvar 0x4070 0x1
return
#org 0x8169D1F
'-----------------------------------
applymovement 0x8 0x8169D72 ' walk_down walk_right...
pauseevent 0x0
jump 0x8169D2F
#org 0x8169D0F
'-----------------------------------
applymovement 0x8 0x8169D6B ' walk_down walk_right...
pauseevent 0x0
jump 0x8169D2F
#org 0x818EA19
= Those are Pok\e Balls.\nThey contain Pok\emon!
#org 0x818EA45
= That's Prof. Oak's last Pok\emon.
#org 0x818E272
= I see! Bulbasaur is your choice.\nIt's very easy to raise.\pSo, \v\h01, you want to go with\nthe Grass Pok\emon Bulbasaur?
#org 0x818E2E5
= This Pok\emon is really quite\nenergetic!
#org 0x818E30D
= \v\h01 received the \v\h02\nfrom Prof. Oak!
#org 0x81A56A7
= Do you want to give a nickname to\nthis \v\h02?
#org 0x818E207
= Hm! Squirtle is your choice.\nIt's one worth raising.\pSo, \v\h01, you've decided on the\nWater Pok\emon Squirtle?
#org 0x818E194
= Ah! Charmander is your choice.\nYou should raise it patiently.\pSo, \v\h01, you're claiming the\nFire Pok\emon Charmander?
#org 0x818DD34
= \v\h06: I'll take this one, then!
#org 0x818DD52
= \v\h06 received the \v\h02\nfrom Prof. Oak!
#org 0x81A75EF
M look_right end
#org 0x8169D62
M walk_down walk_down walk_right walk_right walk_right walk_right walk_right walk_up end
#org 0x8169D72
M walk_down walk_right walk_right walk_right look_up_delayed end
#org 0x8169D6B
M walk_down walk_right walk_right walk_right walk_right look_up_delayed end
I assume the method would be the same for any gift pokémon script.
Solved
3. How difficult is it to add a second rival character? Is it just something as simple as adding scripts to have the character show up? solved
4.How would you add a separate regional pokedex to FR? I know you can edit Pokemon to have two different dex numbers stored in memory, but as far as I know, FR just limits the number in your national dex to 151, pre-national
5. What is the max number of evolutions/evolution methods a single pokémon (like Eevee) can have, natively, and can that be expanded, without breaking the game? I'd like to add in secondary evolution methods for Eevee, as well as 3 new evos, by my count I'll need a total of 22 evolution conditions (including the 5 included in FR's base data). Never mind, figured it out.
I'll probably have more questions as things occur to me.
1.How would one replace the sprites for the intro for the player, rival and Oak? I have been using NSE, but I can't seem to find the right sprites. Found them navigating, but I was unable to import a new sprite, instead, everything I tried made the picture glitch to death, or did nothing.
Spoiler:
#org 0x8169BAB
'-----------------------------------
lock
faceplayer
setvar 0x4001 0x0
setvar 0x4002 0x1
setvar 0x4003 0x4
setvar 0x4004 0x7
compare 0x4055 0x3
if >= jump 0x8169DE4 ' Larger Than or Equal To
compare 0x4055 0x2
if == jump 0x8169BE1 ' Equal To
msgbox 0x818EA19 ' Those are Pok\e Ball...
callstd MSG_NOCLOSE ' Non-closing message
release
' Release commands close any open messages
end
#org 0x8169DE4
'-----------------------------------
msgbox 0x818EA45 ' That's Prof. Oak's l...
callstd MSG_NOCLOSE ' Non-closing message
release
' Release commands close any open messages
end
#org 0x8169BE1
'-----------------------------------
applymovement 0x4 0x81A75EF ' look_right end
pauseevent 0x0
showpokepic 0x4002 0xA 0x3
textcolor BLUE
compare 0x4001 0x0
if == jump 0x8169C14 ' Equal To
compare 0x4001 0x1
if == jump 0x8169C33 ' Equal To
compare 0x4001 0x2
if == jump 0x8169C52 ' Equal To
end
#org 0x8169C14
'-----------------------------------
msgbox 0x818E272 ' I see! Bulbasaur is ...
callstd MSG_YESNO ' Yes/No message
compare LASTRESULT YES
if == jump 0x8169C74 ' Equal To
compare LASTRESULT 0x0
if == jump 0x8169C71 ' Equal To
end
#org 0x8169C74
'-----------------------------------
hidepokepic
disappear LASTTALKED
msgbox 0x818E2E5 ' This Pok\emon is rea...
callstd MSG_NOCLOSE ' Non-closing message
call 0x81A6675
setflag FR_POKEMON
setflag 0x291
addpokemon 0x4002 5 NONE 0x0 0x0 0x0
copyvar 0x4031 0x4001
storepokemon 0x0 0x4002
message 0x818E30D ' \v\h01 received the ...
showmsg
fanfare 0x13E
waitfanfare
msgbox 0x81A56A7 ' Do you want to give ...
callstd MSG_YESNO ' Yes/No message
compare LASTRESULT YES
if == jump 0x8169CCC ' Equal To
compare LASTRESULT 0x0
if == jump 0x8169CDC ' Equal To
end
#org 0x81A6675
'-----------------------------------
copyvar 0x8012 0x8013
return
#org 0x8169C33
'-----------------------------------
msgbox 0x818E207 ' Hm! Squirtle is your...
callstd MSG_YESNO ' Yes/No message
compare LASTRESULT YES
if == jump 0x8169C74 ' Equal To
compare LASTRESULT 0x0
if == jump 0x8169C71 ' Equal To
end
#org 0x8169C71
'-----------------------------------
hidepokepic
release
end
#org 0x8169C52
'-----------------------------------
msgbox 0x818E194 ' Ah! Charmander is yo...
callstd MSG_YESNO ' Yes/No message
compare LASTRESULT YES
if == jump 0x8169C74 ' Equal To
compare LASTRESULT 0x0
if == jump 0x8169C71 ' Equal To
end
#org 0x8169CCC
'-----------------------------------
setvar 0x8004 0x0
call 0x81A74EB
jump 0x8169CDC
#org 0x81A74EB
'-----------------------------------
fadescreen FADEOUT_BLACK
special NAME_POKEMON
waitspecial
return
#org 0x8169CDC
'-----------------------------------
closemsg
compare 0x4001 0x0
if == jump 0x8169CFF ' Equal To
compare 0x4001 0x1
if == jump 0x8169D1F ' Equal To
compare 0x4001 0x2
if == jump 0x8169D0F ' Equal To
end
#org 0x8169CFF
'-----------------------------------
applymovement 0x8 0x8169D62 ' walk_down walk_down ...
pauseevent 0x0
jump 0x8169D2F
#org 0x8169D2F
'-----------------------------------
textcolor BLUE
msgbox 0x818DD34 ' \v\h06: I'll take th...
callstd MSG_NOCLOSE ' Non-closing message
disappear 0x4004
textcolor GRAY
storepokemon 0x0 0x4003
message 0x818DD52 ' \v\h06 received the ...
showmsg
fanfare 0x13E
waitfanfare
setvar 0x4055 0x3
checkflag 0x83E
if true call 0x8169D5C ' Flag is set
release
end
#org 0x8169D5C
'-----------------------------------
setvar 0x4070 0x1
return
#org 0x8169D1F
'-----------------------------------
applymovement 0x8 0x8169D72 ' walk_down walk_right...
pauseevent 0x0
jump 0x8169D2F
#org 0x8169D0F
'-----------------------------------
applymovement 0x8 0x8169D6B ' walk_down walk_right...
pauseevent 0x0
jump 0x8169D2F
#org 0x818EA19
= Those are Pok\e Balls.\nThey contain Pok\emon!
#org 0x818EA45
= That's Prof. Oak's last Pok\emon.
#org 0x818E272
= I see! Bulbasaur is your choice.\nIt's very easy to raise.\pSo, \v\h01, you want to go with\nthe Grass Pok\emon Bulbasaur?
#org 0x818E2E5
= This Pok\emon is really quite\nenergetic!
#org 0x818E30D
= \v\h01 received the \v\h02\nfrom Prof. Oak!
#org 0x81A56A7
= Do you want to give a nickname to\nthis \v\h02?
#org 0x818E207
= Hm! Squirtle is your choice.\nIt's one worth raising.\pSo, \v\h01, you've decided on the\nWater Pok\emon Squirtle?
#org 0x818E194
= Ah! Charmander is your choice.\nYou should raise it patiently.\pSo, \v\h01, you're claiming the\nFire Pok\emon Charmander?
#org 0x818DD34
= \v\h06: I'll take this one, then!
#org 0x818DD52
= \v\h06 received the \v\h02\nfrom Prof. Oak!
#org 0x81A75EF
M look_right end
#org 0x8169D62
M walk_down walk_down walk_right walk_right walk_right walk_right walk_right walk_up end
#org 0x8169D72
M walk_down walk_right walk_right walk_right look_up_delayed end
#org 0x8169D6B
M walk_down walk_right walk_right walk_right walk_right look_up_delayed end
I assume the method would be the same for any gift pokémon script.
Solved
4.How would you add a separate regional pokedex to FR? I know you can edit Pokemon to have two different dex numbers stored in memory, but as far as I know, FR just limits the number in your national dex to 151, pre-national
5. What is the max number of evolutions/evolution methods a single pokémon (like Eevee) can have, natively, and can that be expanded, without breaking the game? I'd like to add in secondary evolution methods for Eevee, as well as 3 new evos, by my count I'll need a total of 22 evolution conditions (including the 5 included in FR's base data).
I'll probably have more questions as things occur to me.
Last edited: