JordanB500
Former Pokemon League Champion
- 104
- Posts
- 17
- Years
- Age 38
- Independence MO
- Seen Jun 5, 2023
Hello i have been recently playing a lot of sword and shield and im loving it one of my favorite features is the pokemon box link and the guy who lets your pokemon forget a move, remember an old move or change its name so i decided to make a new script which uses prexisting scripts and combine them together like in SwSh
the following is a rough draft in XSE format
'---------------
#dynamic 0x74000
#org @start
lock
checkflag 0x864
compare LASTRESULT 0x1
if 0x1 call @champ
compare LASTRESULT 0x1
if 0x0 call @nochamp
msgbox @namerater MSG_YESNO
compare LASTRESULT 0x1
if 0x1 goto 0x8209AC6
msgbox @novedeleter MSG_YESNO
compare LASTRESULT 0x1
if 0x1 goto 0x21EA3B
msgbox @movereminder MSG_YESNO
compare LASTRESULT 0x1
if 0x1 goto 0x2013D6
goto 0x209AE9
'---------------
#org @champ
msgbox @statementtwo 0x6
waitmsg
return
'---------------
#org @nochamp
msgbox @statement 0x6
waitmsg
return
'---------------
#org 0x209AC6
msgbox 0x8209BFF MSG_KEEPOPEN '"Which Pokémon's nickname should\nI..."
special 0xA2
waitstate
compare 0x8004 0xFF
if 0x5 goto 0x8209AF3
compare 0x8004 0xFF
if 0x1 goto 0x8209AE9
release
end
'---------------
#org 0x209AF3
special2 LASTRESULT 0x149
compare LASTRESULT 0x19C
if 0x1 goto 0x8209B46
special 0x7F
special 0x80
compare LASTRESULT 0x1
if 0x1 goto 0x8209B50
special2 LASTRESULT 0x152
special 0x7F
compare LASTRESULT 0x1
if 0x1 goto 0x8209B50
msgbox 0x8209C2B MSG_YESNO '"Hmmm[.] [buffer1], is it? That is\..."
compare LASTRESULT 0x1
if 0x1 goto 0x8209B5A
compare LASTRESULT 0x0
if 0x1 goto 0x8209AE9
release
end
'---------------
#org 0x209B46
msgbox 0x8209E74 MSG_KEEPOPEN '"Now, now.\nThat is merely an Egg!"
release
end
'---------------
#org 0x209B50
msgbox 0x8209DF0 MSG_KEEPOPEN '"Hmmm[.] [buffer1] it is!\pThis is ..."
release
end
'---------------
#org 0x209B5A
msgbox 0x8209CA4 MSG_KEEPOPEN '"Ah, good. Then, what shall the new..."
call 0x82723DD
special2 LASTRESULT 0x7E
special 0x7F
compare LASTRESULT 0x1
if 0x1 goto 0x8209B84
msgbox 0x8209D5E MSG_KEEPOPEN '"Done! From now on, this Pokémon\ns..."
release
end
'---------------
#org 0x2723DD
fadescreen 0x1
special 0xA1
waitstate
return
'---------------
#org 0x209B84
msgbox 0x8209CD4 MSG_KEEPOPEN '"Done! From now on, this Pokémon\ns..."
release
end
'---------------
#org 0x21EA3B
setvar 0x8005 0x2
buffernumber 0 0x8005
msgbox 0x821EB65 MSG_KEEPOPEN '"Which Pokémon should forget a move..."
special 0xA2
waitstate
compare 0x8004 0xFF
if 0x1 goto 0x821EAE6
special 0x14A
compare LASTRESULT 0x1
if 0x1 goto 0x821EADC
special 0xE2
compare LASTRESULT 0x1
if 0x1 goto 0x821EACF
msgbox 0x821EB89 MSG_KEEPOPEN '"Which move should be forgotten?"
fadescreen 0x1
special 0xDF
fadescreen 0x0
compare 0x8005 0x4
if 0x1 goto 0x821EA3B
special 0xE1
msgbox 0x821EBDA MSG_YESNO '"Hm! [buffer1]'s [buffer2]?\nThat m..."
copyvar 0x8000 LASTRESULT
compare 0x8000 0x1
if 0x1 goto 0x821EAB0
compare 0x8000 0x0
if 0x1 goto 0x209AE9
releaseall
end
'---------------
#org 0x21EADC
msgbox 0x821EC78 MSG_KEEPOPEN '"What?\nNo Egg should know any move..."
releaseall
end
'---------------
#org 0x21EACF
special 0xE1
msgbox 0x821EBA9 MSG_KEEPOPEN '"[buffer1] knows only one move\nso ..."
releaseall
end
'---------------
#org 0x21EAB0
special 0x209
compare LASTRESULT 0x1
if 0x1 goto 0x821EAF0
special 0xE0
fanfare 0x17A
waitfanfare
msgbox 0x821EC06 MSG_KEEPOPEN '"It worked to perfection!\p[buffer1..."
releaseall
end
'---------------
#org 0x21EAF0
special 0xE1
msgbox 0x821EC9C MSG_KEEPOPEN '"Hm!\pYour [buffer1] doesn't seem w..."
releaseall
end
'---------------
#org 0x209AE9
msgbox 0x8209D42 MSG_KEEPOPEN '"I see.\nDo come visit again."
release
end
'---------------
#org 0x2013D6
setvar 0x8005 0x3
buffernumber 0 0x8005
msgbox 0x82015A5 MSG_KEEPOPEN '"Which Pokémon needs tutoring?"
special 0xDE
waitstate
compare 0x8004 0xFF
if 0x1 goto 0x8201452
special 0x14A
compare LASTRESULT 0x1
if 0x1 goto 0x8201444
compare 0x8005 0x0
if 0x1 goto 0x8201436
goto 0x820140C
'---------------
#org 0x201444
msgbox 0x8201697 MSG_KEEPOPEN '"Hunh? There isn't a single move th..."
goto 0x82013D6
'---------------
#org 0x201436
msgbox 0x82015DE MSG_KEEPOPEN '"Sorry[.]\pIt doesn't appear as if ..."
goto 0x82013D6
'---------------
#org 0x20140C
msgbox 0x82015C3 MSG_KEEPOPEN '"Which move should I teach?"
special 0xE3
waitstate
compare 0x8004 0x0
if 0x1 goto 0x82013D6
goto 0x8201452
'---------
' Strings
'---------
#org @statement
= Hello Trainer, If you want I\ncan offer you my services.\lAre you interested?\l
#org @statementtwo
= Hello Champion, If you want I\ncan offer you my services.\lAre you interested?\l
#org @namerater
= Would you like me to rate the\nname of your Pokémon?
#otg @movedeleter
= Would you like your Pokémon to\nforget a move?
#org @movereminder
= Would you like your Pokémon\nto remember a move?
#org 0x201653
= If your Pokémon need to learn a move,\ncome back again.
#org 0x2015A5
= Which Pokémon needs tutoring?
#org 0x201697
= Hunh? There isn't a single move that\nI can teach an Egg.
#org 0x2015DE
= Sorry[.]\pIt doesn't appear as if I have any move\nI can teach that Pokémon.
#org 0x2015C3
= Which move should I teach?
#org 0x209BFF
= Which Pokémon's nickname should\nI critique?
#org 0x209D42
= I see.\nDo come visit again.
#org 0x209C2B
= Hmmm[.] [buffer1], is it? That is\nquite a fine name you bestowed.\pBut! What say you, if I were to\nsuggest a slightly better name?
#org 0x209E74
= Now, now.\nThat is merely an Egg!
#org 0x209DF0
= Hmmm[.] [buffer1] it is!\pThis is a magnificent nickname!\nIt is impeccably beyond reproach!\pYou'll do well to cherish your\n[buffer1] now and beyond.
#org 0x209CA4
= Ah, good. Then, what shall the new\nnickname be?
#org 0x209D5E
= Done! From now on, this Pokémon\nshall be known as [buffer1]!\pIt looks no different from before,\nand yet, this is vastly superior!\pHow fortunate for you!
#org 0x209CD4
= Done! From now on, this Pokémon\nshall be known as [buffer1]!\pIt is a better name than before!\nHow fortunate for you!
#org 0x21EB65
= Which Pokémon should forget a move?
#org 0x21EB89
= Which move should be forgotten?
#org 0x21EBDA
= Hm! [buffer1]'s [buffer2]?\nThat move should be forgotten?
#org 0x21EC78
= What?\nNo Egg should know any moves.
#org 0x21EBA9
= [buffer1] knows only one move\nso it can't be forgotten[.]
#org 0x21EC06
= It worked to perfection!\p[buffer1] has forgotten\n[buffer2] completely.
#org 0x21EC9C
= Hm!\pYour [buffer1] doesn't seem willing\nto forget Surf.
if this is the wrong place to post this then i apologize but i thought id share my attempt at making a mock up of the original and also with this script it should no longer cost heart scales to relearn older moves also in my hack rom i deleted the houses of the name rater, move relearner and move deleter as well as each npc and the wapr to get in and out of said houses and now each town has a spot where a house used to be and made a new npc in every pokemon center to take over the spot(i may use left over houses for something in the future)
the following is a rough draft in XSE format
Spoiler:
'---------------
#dynamic 0x74000
#org @start
lock
checkflag 0x864
compare LASTRESULT 0x1
if 0x1 call @champ
compare LASTRESULT 0x1
if 0x0 call @nochamp
msgbox @namerater MSG_YESNO
compare LASTRESULT 0x1
if 0x1 goto 0x8209AC6
msgbox @novedeleter MSG_YESNO
compare LASTRESULT 0x1
if 0x1 goto 0x21EA3B
msgbox @movereminder MSG_YESNO
compare LASTRESULT 0x1
if 0x1 goto 0x2013D6
goto 0x209AE9
'---------------
#org @champ
msgbox @statementtwo 0x6
waitmsg
return
'---------------
#org @nochamp
msgbox @statement 0x6
waitmsg
return
'---------------
#org 0x209AC6
msgbox 0x8209BFF MSG_KEEPOPEN '"Which Pokémon's nickname should\nI..."
special 0xA2
waitstate
compare 0x8004 0xFF
if 0x5 goto 0x8209AF3
compare 0x8004 0xFF
if 0x1 goto 0x8209AE9
release
end
'---------------
#org 0x209AF3
special2 LASTRESULT 0x149
compare LASTRESULT 0x19C
if 0x1 goto 0x8209B46
special 0x7F
special 0x80
compare LASTRESULT 0x1
if 0x1 goto 0x8209B50
special2 LASTRESULT 0x152
special 0x7F
compare LASTRESULT 0x1
if 0x1 goto 0x8209B50
msgbox 0x8209C2B MSG_YESNO '"Hmmm[.] [buffer1], is it? That is\..."
compare LASTRESULT 0x1
if 0x1 goto 0x8209B5A
compare LASTRESULT 0x0
if 0x1 goto 0x8209AE9
release
end
'---------------
#org 0x209B46
msgbox 0x8209E74 MSG_KEEPOPEN '"Now, now.\nThat is merely an Egg!"
release
end
'---------------
#org 0x209B50
msgbox 0x8209DF0 MSG_KEEPOPEN '"Hmmm[.] [buffer1] it is!\pThis is ..."
release
end
'---------------
#org 0x209B5A
msgbox 0x8209CA4 MSG_KEEPOPEN '"Ah, good. Then, what shall the new..."
call 0x82723DD
special2 LASTRESULT 0x7E
special 0x7F
compare LASTRESULT 0x1
if 0x1 goto 0x8209B84
msgbox 0x8209D5E MSG_KEEPOPEN '"Done! From now on, this Pokémon\ns..."
release
end
'---------------
#org 0x2723DD
fadescreen 0x1
special 0xA1
waitstate
return
'---------------
#org 0x209B84
msgbox 0x8209CD4 MSG_KEEPOPEN '"Done! From now on, this Pokémon\ns..."
release
end
'---------------
#org 0x21EA3B
setvar 0x8005 0x2
buffernumber 0 0x8005
msgbox 0x821EB65 MSG_KEEPOPEN '"Which Pokémon should forget a move..."
special 0xA2
waitstate
compare 0x8004 0xFF
if 0x1 goto 0x821EAE6
special 0x14A
compare LASTRESULT 0x1
if 0x1 goto 0x821EADC
special 0xE2
compare LASTRESULT 0x1
if 0x1 goto 0x821EACF
msgbox 0x821EB89 MSG_KEEPOPEN '"Which move should be forgotten?"
fadescreen 0x1
special 0xDF
fadescreen 0x0
compare 0x8005 0x4
if 0x1 goto 0x821EA3B
special 0xE1
msgbox 0x821EBDA MSG_YESNO '"Hm! [buffer1]'s [buffer2]?\nThat m..."
copyvar 0x8000 LASTRESULT
compare 0x8000 0x1
if 0x1 goto 0x821EAB0
compare 0x8000 0x0
if 0x1 goto 0x209AE9
releaseall
end
'---------------
#org 0x21EADC
msgbox 0x821EC78 MSG_KEEPOPEN '"What?\nNo Egg should know any move..."
releaseall
end
'---------------
#org 0x21EACF
special 0xE1
msgbox 0x821EBA9 MSG_KEEPOPEN '"[buffer1] knows only one move\nso ..."
releaseall
end
'---------------
#org 0x21EAB0
special 0x209
compare LASTRESULT 0x1
if 0x1 goto 0x821EAF0
special 0xE0
fanfare 0x17A
waitfanfare
msgbox 0x821EC06 MSG_KEEPOPEN '"It worked to perfection!\p[buffer1..."
releaseall
end
'---------------
#org 0x21EAF0
special 0xE1
msgbox 0x821EC9C MSG_KEEPOPEN '"Hm!\pYour [buffer1] doesn't seem w..."
releaseall
end
'---------------
#org 0x209AE9
msgbox 0x8209D42 MSG_KEEPOPEN '"I see.\nDo come visit again."
release
end
'---------------
#org 0x2013D6
setvar 0x8005 0x3
buffernumber 0 0x8005
msgbox 0x82015A5 MSG_KEEPOPEN '"Which Pokémon needs tutoring?"
special 0xDE
waitstate
compare 0x8004 0xFF
if 0x1 goto 0x8201452
special 0x14A
compare LASTRESULT 0x1
if 0x1 goto 0x8201444
compare 0x8005 0x0
if 0x1 goto 0x8201436
goto 0x820140C
'---------------
#org 0x201444
msgbox 0x8201697 MSG_KEEPOPEN '"Hunh? There isn't a single move th..."
goto 0x82013D6
'---------------
#org 0x201436
msgbox 0x82015DE MSG_KEEPOPEN '"Sorry[.]\pIt doesn't appear as if ..."
goto 0x82013D6
'---------------
#org 0x20140C
msgbox 0x82015C3 MSG_KEEPOPEN '"Which move should I teach?"
special 0xE3
waitstate
compare 0x8004 0x0
if 0x1 goto 0x82013D6
goto 0x8201452
'---------
' Strings
'---------
#org @statement
= Hello Trainer, If you want I\ncan offer you my services.\lAre you interested?\l
#org @statementtwo
= Hello Champion, If you want I\ncan offer you my services.\lAre you interested?\l
#org @namerater
= Would you like me to rate the\nname of your Pokémon?
#otg @movedeleter
= Would you like your Pokémon to\nforget a move?
#org @movereminder
= Would you like your Pokémon\nto remember a move?
#org 0x201653
= If your Pokémon need to learn a move,\ncome back again.
#org 0x2015A5
= Which Pokémon needs tutoring?
#org 0x201697
= Hunh? There isn't a single move that\nI can teach an Egg.
#org 0x2015DE
= Sorry[.]\pIt doesn't appear as if I have any move\nI can teach that Pokémon.
#org 0x2015C3
= Which move should I teach?
#org 0x209BFF
= Which Pokémon's nickname should\nI critique?
#org 0x209D42
= I see.\nDo come visit again.
#org 0x209C2B
= Hmmm[.] [buffer1], is it? That is\nquite a fine name you bestowed.\pBut! What say you, if I were to\nsuggest a slightly better name?
#org 0x209E74
= Now, now.\nThat is merely an Egg!
#org 0x209DF0
= Hmmm[.] [buffer1] it is!\pThis is a magnificent nickname!\nIt is impeccably beyond reproach!\pYou'll do well to cherish your\n[buffer1] now and beyond.
#org 0x209CA4
= Ah, good. Then, what shall the new\nnickname be?
#org 0x209D5E
= Done! From now on, this Pokémon\nshall be known as [buffer1]!\pIt looks no different from before,\nand yet, this is vastly superior!\pHow fortunate for you!
#org 0x209CD4
= Done! From now on, this Pokémon\nshall be known as [buffer1]!\pIt is a better name than before!\nHow fortunate for you!
#org 0x21EB65
= Which Pokémon should forget a move?
#org 0x21EB89
= Which move should be forgotten?
#org 0x21EBDA
= Hm! [buffer1]'s [buffer2]?\nThat move should be forgotten?
#org 0x21EC78
= What?\nNo Egg should know any moves.
#org 0x21EBA9
= [buffer1] knows only one move\nso it can't be forgotten[.]
#org 0x21EC06
= It worked to perfection!\p[buffer1] has forgotten\n[buffer2] completely.
#org 0x21EC9C
= Hm!\pYour [buffer1] doesn't seem willing\nto forget Surf.
if this is the wrong place to post this then i apologize but i thought id share my attempt at making a mock up of the original and also with this script it should no longer cost heart scales to relearn older moves also in my hack rom i deleted the houses of the name rater, move relearner and move deleter as well as each npc and the wapr to get in and out of said houses and now each town has a spot where a house used to be and made a new npc in every pokemon center to take over the spot(i may use left over houses for something in the future)
Last edited by a moderator: