'---------------
#org 0x2088AA
lock
faceplayer
setvar 0x8004 0x1
special 0xF7
compare LASTRESULT 0x0
if 0x5 goto 0x82087E9
special 0x28
msgbox 0x82C5810 MSG_KEEPOPEN '"Welcome to the BATTLE TENT\nSLATEP..."
preparemsg 0x82C586A '"Would you like to take the Battle\..."
waitmsg
multichoice 0x11 0x6 0x17 0x0
copyvar 0x8000 LASTRESULT
compare 0x8000 0x0
if 0x1 goto 0x8208906
compare 0x8000 0x1
if 0x1 goto 0x8208A07
compare 0x8000 0x2
if 0x1 goto 0x8208A2E
compare 0x8000 0x7F
if 0x1 goto 0x8208A2E
setvar 0x40CF 0x4
setvar 0x40CE 0x0
setvar 0x8004 0x2
setvar 0x8005 0x1
setvar 0x8006 0x2
special 0xEA
msgbox 0x82C5B06 MSG_YESNO '"Before you begin your challenge,\n..."
copyvar 0x8000 LASTRESULT
compare 0x8000 0x0
if 0x1 goto 0x8208A2B
compare 0x8000 0x1
if 0x1 goto 0x8208950
compare 0x8000 0x7F
if 0x1 goto 0x8208A2B
setvar 0x4000 0x0
setvar 0x8004 0x2
setvar 0x8005 0x4
special 0xEA
setvar 0x8004 0x0
special 0xF7
setvar 0x8004 0x2
setvar 0x8005 0x0
setvar 0x8006 0x1
special 0xEA
setvar 0x8004 0x2
setvar 0x8005 0x3
setvar 0x8006 0x0
special 0xEA
closeonkeypress
pause 0x2
call 0x827134F
setvar 0x4000 0xFF
compare LASTRESULT 0x0
if 0x1 goto 0x8208A14
setvar 0x8006 0x0
msgbox 0x82C5B8C MSG_KEEPOPEN '"Please step this way."
closeonkeypress
call 0x82089C9
warp 0x9 0x3 0xFF 0x2 0x7
setvar 0x4000 0x0
waitstate
end

'---------------
#org 0x2087E9
msgbox 0x82C5D14 MSG_KEEPOPEN '"In recognition of your 3-win strea..."
setvar 0x8004 0x5
special 0xF7
copyvar 0x8000 LASTRESULT
compare 0x8000 0x0
if 0x1 goto 0x820882A
setvar 0x8004 0x2
setvar 0x8005 0x0
setvar 0x8006 0x0
special 0xEA
preparemsg 0x823F68C '"[player] received the prize\n[buff..."
waitmsg
fanfare 0x172
waitfanfare
goto 0x8208861

'---------------
#org 0x208906
setvar 0x40CF 0x4
setvar 0x40CE 0x0
setvar 0x8004 0x2
setvar 0x8005 0x1
setvar 0x8006 0x2
special 0xEA
msgbox 0x82C5B06 MSG_YESNO '"Before you begin your challenge,\n..."
copyvar 0x8000 LASTRESULT
compare 0x8000 0x0
if 0x1 goto 0x8208A2B
compare 0x8000 0x1
if 0x1 goto 0x8208950
compare 0x8000 0x7F
if 0x1 goto 0x8208A2B
setvar 0x4000 0x0
setvar 0x8004 0x2
setvar 0x8005 0x4
special 0xEA
setvar 0x8004 0x0
special 0xF7
setvar 0x8004 0x2
setvar 0x8005 0x0
setvar 0x8006 0x1
special 0xEA
setvar 0x8004 0x2
setvar 0x8005 0x3
setvar 0x8006 0x0
special 0xEA
closeonkeypress
pause 0x2
call 0x827134F
setvar 0x4000 0xFF
compare LASTRESULT 0x0
if 0x1 goto 0x8208A14
setvar 0x8006 0x0
msgbox 0x82C5B8C MSG_KEEPOPEN '"Please step this way."
closeonkeypress
call 0x82089C9
warp 0x9 0x3 0xFF 0x2 0x7
setvar 0x4000 0x0
waitstate
end

'---------------
#org 0x208A07
msgbox 0x82C589C MSG_KEEPOPEN '"Here at the SLATEPORT BATTLE TENT,..."
goto 0x82088CA

'---------------
#org 0x208A2E
msgbox 0x82C5AA5 MSG_KEEPOPEN '"We look forward to your next visit..."
release
end

'---------------
#org 0x208A2B
special 0x29
msgbox 0x82C5AA5 MSG_KEEPOPEN '"We look forward to your next visit..."
release
end

'---------------
#org 0x208950
setvar 0x4000 0x0
setvar 0x8004 0x2
setvar 0x8005 0x4
special 0xEA
setvar 0x8004 0x0
special 0xF7
setvar 0x8004 0x2
setvar 0x8005 0x0
setvar 0x8006 0x1
special 0xEA
setvar 0x8004 0x2
setvar 0x8005 0x3
setvar 0x8006 0x0
special 0xEA
closeonkeypress
pause 0x2
call 0x827134F
setvar 0x4000 0xFF
compare LASTRESULT 0x0
if 0x1 goto 0x8208A14
setvar 0x8006 0x0
msgbox 0x82C5B8C MSG_KEEPOPEN '"Please step this way."
closeonkeypress
call 0x82089C9
warp 0x9 0x3 0xFF 0x2 0x7
setvar 0x4000 0x0
waitstate
end

'---------------
#org 0x27134F
special 0x60
waitstate
return

'---------------
#org 0x208A14
setvar 0x8004 0x2
setvar 0x8005 0x0
setvar 0x8006 0x0
special 0xEA
goto 0x8208A2E

'---------------
#org 0x2089C9
applymovement 0x1 0x82089F8
applymovement MOVE_PLAYER 0x82089FF
waitmovement 0x0
setdooropened 0x6 0x1
doorchange
applymovement 0x1 0x82089FC
applymovement MOVE_PLAYER 0x8208A03
waitmovement 0x0
setdoorclosed 0x6 0x1
doorchange
return

'---------------
#org 0x20882A
msgbox 0x82C5D52 MSG_KEEPOPEN '"Oh?\nYou seem to have no room for ..."
goto 0x8208861

'---------------
#org 0x208861
msgbox 0x82C5AA5 MSG_KEEPOPEN '"We look forward to your next visit..."
closeonkeypress
setvar 0x4000 0xFF
releaseall
end

'---------------
#org 0x2088CA
preparemsg 0x82C586A '"Would you like to take the Battle\..."
waitmsg
multichoice 0x11 0x6 0x17 0x0
copyvar 0x8000 LASTRESULT
compare 0x8000 0x0
if 0x1 goto 0x8208906
compare 0x8000 0x1
if 0x1 goto 0x8208A07
compare 0x8000 0x2
if 0x1 goto 0x8208A2E
compare 0x8000 0x7F
if 0x1 goto 0x8208A2E
setvar 0x40CF 0x4
setvar 0x40CE 0x0
setvar 0x8004 0x2
setvar 0x8005 0x1
setvar 0x8006 0x2
special 0xEA
msgbox 0x82C5B06 MSG_YESNO '"Before you begin your challenge,\n..."
copyvar 0x8000 LASTRESULT
compare 0x8000 0x0
if 0x1 goto 0x8208A2B
compare 0x8000 0x1
if 0x1 goto 0x8208950
compare 0x8000 0x7F
if 0x1 goto 0x8208A2B
setvar 0x4000 0x0
setvar 0x8004 0x2
setvar 0x8005 0x4
special 0xEA
setvar 0x8004 0x0
special 0xF7
setvar 0x8004 0x2
setvar 0x8005 0x0
setvar 0x8006 0x1
special 0xEA
setvar 0x8004 0x2
setvar 0x8005 0x3
setvar 0x8006 0x0
special 0xEA
closeonkeypress
pause 0x2
call 0x827134F
setvar 0x4000 0xFF
compare LASTRESULT 0x0
if 0x1 goto 0x8208A14
setvar 0x8006 0x0
msgbox 0x82C5B8C MSG_KEEPOPEN '"Please step this way."
closeonkeypress
call 0x82089C9
warp 0x9 0x3 0xFF 0x2 0x7
setvar 0x4000 0x0
waitstate
end


'---------
' Strings
'---------
#org 0x2C5810
= Welcome to the BATTLE TENT\nSLATEPORT SITE!\pI am your guide to the Battle Swap\nTournament.

#org 0x2C586A
= Would you like to take the Battle\nSwap challenge?

#org 0x2C5B06
= Before you begin your challenge,\nI need to save data. Is that okay?

#org 0x2C5B8C
= Please step this way.

#org 0x2C5D14
= In recognition of your 3-win streak,\nwe award you this prize.

#org 0x23F68C
= [player] received the prize\n[buffer1].

#org 0x2C589C
= Here at the SLATEPORT BATTLE TENT,\nwe hold Battle Swap events\lusing rental POKéMON.\pFirst, you will be loaned three\nPOKéMON specifically for this event.\pUsing the supplied rental POKéMON,\nyou must conduct a SINGLE BATTLE.\pIf you win, you are permitted to trade\none of your rental POKéMON.\pRepeat this cycle of battling and\ntrading--if you win three times in\la row, you will earn a fine prize.\pIf you want to interrupt your\nchallenge, please save the game.\pIf you don't save before interrupting,\nyou will be disqualified.

#org 0x2C5AA5
= We look forward to your next visit.

#org 0x2C5D52
= Oh?\nYou seem to have no room for this.\pPlease make room in your BAG and\nlet me know.


'-----------
' Movements
'-----------
#org 0x2089F8
#raw 0x9 'Step Up (Normal)
#raw 0x9 'Step Up (Normal)
#raw 0x9 'Step Up (Normal)
#raw 0xFE 'End of Movements

#org 0x2089FF
#raw 0x9 'Step Up (Normal)
#raw 0x9 'Step Up (Normal)
#raw 0x9 'Step Up (Normal)
#raw 0xFE 'End of Movements

#org 0x2089FC
#raw 0x9 'Step Up (Normal)
#raw 0x54 'Hide
#raw 0xFE 'End of Movements

#org 0x208A03
#raw 0x9 'Step Up (Normal)
#raw 0x9 'Step Up (Normal)
#raw 0x54 'Hide
#raw 0xFE 'End of Movements