#org 0x81C1CC
'-----------------------------------
#raw 0x02
#dword 0x881D4AB
#raw 0x02
#dword 0x881C1D7
#raw 0x00

#org 0x881D4AB
'-----------------------------------
#word 0x5002
#word 0x0
#dword 0x881BBDB
#word 0x0

#org 0x881C1D7
'-----------------------------------
#word 0x5004
#word 0x1
#dword 0x881D8DD
#word 0x0

#org 0x881BBDB
'-----------------------------------
applymovement 0x1 0x881BE8A ' look_up jump_up jump...
pauseevent 0x1
msgbox 0x881BE0F ' Good morning \v\h01....
callstd MSG_NOCLOSE ' Non-closing message
warp 0x4 0x1 0x0
return

#org 0x881D8DD
'-----------------------------------
applymovement 0x1 0x87457E4 ' look_up end
applymovement PLAYER 0x87457BD ' walk_down_slow walk_...
pauseevent 0xFF
msgbox 0x881D510 ' \v\h01[.] I know thi...
callstd MSG_LOCK ' Built-in lock command
applymovement 0x1 0x881BDF0 ' look_right look_left...
pauseevent 0x1
disappear 0x1
applymovement 0x2 0x881BF1B ' walk_up_slow walk_ri...
pauseevent 0x2
msgbox 0x881D7F9 ' Professor:  \v\h01, ...
callstd MSG_LOCK ' Built-in lock command
copyvarifnotzero 0x8000 POKEBALL
copyvarifnotzero 0x8001 0x5
callstd MSG_OBTAIN ' Obtained the XXXXXX!
addpokemon 0x5000 5 ORANBERRY 0x0 0x0 0x0
special NAME_POKEMON
waitspecial
msgbox 0x881D714 ' I know this is diffi...
callstd MSG_LOCK ' Built-in lock command
setvar 0x5003 0x0
checkgender
compare LASTRESULT BOY
if == call 0x8740094 ' Equal To
call 0x8740094
applymovement 0x2 0x881BF65 ' walk_down walk_down ...
pauseevent 0x2
call 0x881D77E
return

#org 0x8740094
'-----------------------------------
addvar 0x5003 0x1
return

#org 0x881D77E
'-----------------------------------
addvar 0x5004 0x1
return


#org 0x881BE0F
= Good morning \v\h01.\nI didn't expect you to be up yet!\pWhy don't you go back upstairs\nand play some video games?

#org 0x881D510
= \v\h01[.] I know this is hard,\nbut you have to listen[.] Ever\lsince your dad left, it's been\lharder and harder to keep food on\lthe table. Quite honestly, I\ldon't even have food for\ltonight[.] So[.] so[.]

#org 0x881D7F9
= Professor:  \v\h01, you have to\nunderstand that these are tough\ltimes. This was a very hard\ldecision for your mother, but I\lbelieve she's right. I've brought\lyou a Pokemon, some money,\land some pokeballs to help you\lstart out.

#org 0x881D714
= I know this is difficult, but I\nknow \v\h06, is a rookie trainer\las well.\lYou two can keep each other safe.

#org 0x881BE8A
M look_up jump_up jump_up say_!! end

#org 0x87457E4
M look_up end

#org 0x87457BD
M walk_down_slow walk_left_slow walk_left_slow look_down say_? end

#org 0x881BDF0
M look_right look_left look_up say_x run_down run_down run_left run_left run_left run_left run_down look_up say_! jump_up walk_down_slow end

#org 0x881BF1B
M walk_up_slow walk_right walk_right walk_up walk_right walk_right walk_right walk_up walk_up say_! end

#org 0x881BF65
M walk_down walk_down walk_left walk_left walk_down walk_left walk_left walk_down end