I only tried to change the dialogue, since everything else's, well, a tad more complicated. Replacing the standard dialogue with the one from the wiki. However the game would crash at certain points, namely when picking up the mons. Also, the dialogue when you picked up the Boatborn got replaced with "N?" but I figured out why that was (somehow couldn't save the change though).
Here's the code without the changes that wouldn't be saved:
#org 0x8169D78
'-----------------------------------
lock
faceplayer
setvar 0x4001 0x1
setvar 0x4002 0x7
setvar 0x4003 0x1
setvar 0x4004 0x5
compare 0x4055 0x3
if >= jump 0x8169DE4 ' Larger Than or Equal To
compare 0x4055 0x2
if == jump 0x8169BE1 ' Equal To
msgbox 0x818EA19 ' Those are RAWs.\nThe...
callstd MSG_NOCLOSE ' Non-closing message
release
' Release commands close any open messages
end
#org 0x8169DE4
'-----------------------------------
msgbox 0x818EA45 ' That's PROF. TARN's ...
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 ' N?
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 ' Boatborn is a very u...
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 ' A cute little unicor...
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 ' UNCARP.\nA vile DORF...
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 RAWs.\nThey contain DORFOMON!
#org 0x818EA45
= That's PROF. TARN's last DORFOMON.
#org 0x818E272
= N?
#org 0x818E2E5
= Boatborn is a very unique Dorfomon.\pIt i\v\h01 received the \v\h02\nfrom PROF. OAK!
#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
= A cute little unicorn creature\nwith boundless energy.\pThis one is easy to raise.\pWould you like my PERLIHORN?
#org 0x818E194
= UNCARP.\nA vile DORFOMON.\pMany people are dragged to their\ndoom by these vicious fish.\pDo you want this one?
#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
You'll notice that 0x818E272 and 0x818E2E5 are a bit borked.
Here's the not-so-fixed version:
#org 0x8169D78
'-----------------------------------
lock
faceplayer
setvar 0x4001 0x1
setvar 0x4002 0x7
setvar 0x4003 0x1
setvar 0x4004 0x5
compare 0x4055 0x3
if >= jump 0x8169DE4 ' Larger Than or Equal To
compare 0x4055 0x2
if == jump 0x8169BE1 ' Equal To
msgbox 0x818EA19 ' Those are RAWs.\nThe...
callstd MSG_NOCLOSE ' Non-closing message
release
' Release commands close any open messages
end
#org 0x8169DE4
'-----------------------------------
msgbox 0x818EA45 ' That's PROF. TARN's ...
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 ' N?
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 ' Boatborn is a very u...
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 ' A cute little unicor...
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 ' UNCARP.\nA vile DORF...
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 RAWs.\nThey contain DORFOMON!
#org 0x818EA45
= That's PROF. TARN's last DORFOMON.
#org 0x818E272
= Ah, BOATBORN.\pThe spirit of a MAGMAPHANT\nwho refused to die.\pDo you want this one?
#org 0x818E2E5
= Boatborn is a very unique Dorfomon.\pIt is unruly, difficult,\nbut very fun to use.\pYou will enjoy it.
#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
= A cute little unicorn creature\nwith boundless energy.\pThis one is easy to raise.\pWould you like my PERLIHORN?
#org 0x818E194
= UNCARP.\nA vile DORFOMON.\pMany people are dragged to their\ndoom by these vicious fish.\pDo you want this one?
#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