XSE Script

#dynamic 0x??????
#org @start
lockall
faceplayer
checkflag 0x829
if 0x1 goto @pokedex
if 0x0 goto @need
release
end

#org @pokedex
msgbox @beforefanfare 0x6
callstd 0x2
closeonkeypress
special 0x16F
setflag 0x10A
fanfare 0x13E
msgbox @afterfanfare 0x6
callstd 0x2
waitfanfare
closeonkeypress
msgbox @bye
callstd 0x2
closeonkeypress
setflag 0x201
fadescreen 0x1
hidesprite 0xA
fadescreen 0x0
release
end

#org @need
msgbox @needpokedex 0x6
callstd 0x2
closeonkeypress
end

#org @needpokedex
= When you have a POKéDEX come talk\nto me...

#org @upgraded
= Do you like your new POKéDEX?

#org @beforefanfare
= Let me see your POKéDEX...\nWOW! It need a upgrade.\p[.] [.] [.]  [.] [.] [.]\p[.] [.] [.]  [.] [.] [.]\p[.]And that's done!\pNow these units can record data on\na lot more POKéMON.

#org @afterfanfare
= [player]'s POKéDEX was upgraded by STRANGER MAN!

#org @bye
= I better get moving\nBye!