pokeplatinum/res/field/scripts/scripts_route_213.s

#include "macros/scrcmd.inc"
#include "res/text/bank/route_213.h"

    .data

    ScriptEntry _0022
    ScriptEntry _0078
    ScriptEntry _0422
    ScriptEntry _03FC
    ScriptEntry _040F
    ScriptEntry _0435
    ScriptEntry _044C
    ScriptEntry _0463
    .short 0xFD13

_0022:
    GoToIfUnset 0x104, _002F
    End

_002F:
    CheckBadgeAcquired BADGE_ID_FEN, 0x4000
    GoToIfEq 0x4000, 1, _0044
    End

_0044:
    GoToIfSet 0x103, _0051
    End

_0051:
    CallIfUnset 0x118, _0062
    ClearFlag 0x21A
    End

_0062:
    ScrCmd_186 30, 0x28E, 0x32C
    ScrCmd_189 30, 3
    ScrCmd_188 30, 17
    Return

_0078:
    PlayFanfare SEQ_SE_CONFIRM
    LockAll
    GoToIfSet 0x118, _0133
    Message 0
    CloseMessage
    FacePlayer
    ApplyMovement 30, _0388
    WaitMovement
    Message 1
    CloseMessage
    ScrCmd_1BD 0x8004
    GoToIfEq 0x8004, 2, _00F1
    GoToIfEq 0x8004, 3, _00DF
    GoTo _00C5
    End

_00C5:
    ApplyMovement 30, _0390
    ApplyMovement 0xFF, _03F0
    WaitMovement
    GoTo _010B
    End

_00DF:
    ApplyMovement 30, _0390
    WaitMovement
    GoTo _010B
    End

_00F1:
    ApplyMovement 30, _0398
    ApplyMovement 0xFF, _03F0
    WaitMovement
    GoTo _010B
    End

_010B:
    SetFlag 0x118
    RemoveObject 30
    ScrCmd_186 30, 0x2AB, 0x341
    ScrCmd_189 30, 3
    ScrCmd_188 30, 17
    ClearFlag 0x21A
    ScrCmd_064 30
    ReleaseAll
    End

_0133:
    ScrCmd_1BD 0x8004
    Message 2
    CloseMessage
    FacePlayer
    ApplyMovement 30, _0388
    WaitMovement
    Message 3
    CloseMessage
    ScrCmd_1BD 0x8004
    GoToIfEq 0x8004, 2, _0180
    GoTo _0166
    End

_0166:
    ApplyMovement 0xFF, _03C0
    ApplyMovement 30, _03A4
    WaitMovement
    GoTo _019A
    End

_0180:
    ApplyMovement 0xFF, _03C0
    ApplyMovement 30, _03B4
    WaitMovement
    GoTo _019A
    End

_019A:
    RemoveObject 30
    SetFlag 0x104
    ClearFlag 0x1E8
    ScrCmd_064 33
    CallCommonScript 0x807
    ScrCmd_315 0x800C
    CallIfEq 0x800C, 2, _0261
    CallIfEq 0x8004, 2, _0267
    CallIfEq 0x8004, 3, _027B
    CallIfEq 0x8004, 0, _028F
    CallIfEq 0x8004, 1, _02A3
    Message 4
    ApplyMovement 33, _0348
    WaitMovement
    Message 5
    Message 6
    CloseMessage
    CallIfEq 0x8004, 2, _02B7
    CallIfEq 0x8004, 3, _02CB
    CallIfEq 0x8004, 0, _02DF
    CallIfEq 0x8004, 1, _02F3
    RemoveObject 33
    CallCommonScript 0x808
    ScrCmd_315 0x800C
    CallIfEq 0x800C, 2, _0261
    ClearFlag 0x211
    ClearFlag 0x21B
    ReleaseAll
    End

_0261:
    PlayFanfare SEQ_SE_DP_T_AME
    Return

_0267:
    ApplyMovement 33, _0318
    ApplyMovement 0xFF, _03CC
    WaitMovement
    Return

_027B:
    ApplyMovement 33, _0308
    ApplyMovement 0xFF, _03CC
    WaitMovement
    Return

_028F:
    ApplyMovement 33, _0338
    ApplyMovement 0xFF, _03CC
    WaitMovement
    Return

_02A3:
    ApplyMovement 33, _0328
    ApplyMovement 0xFF, _03D8
    WaitMovement
    Return

_02B7:
    ApplyMovement 33, _035C
    ApplyMovement 0xFF, _03E4
    WaitMovement
    Return

_02CB:
    ApplyMovement 33, _0350
    ApplyMovement 0xFF, _03E4
    WaitMovement
    Return

_02DF:
    ApplyMovement 33, _037C
    ApplyMovement 0xFF, _03E4
    WaitMovement
    Return

_02F3:
    ApplyMovement 33, _0368
    ApplyMovement 0xFF, _03E4
    WaitMovement
    Return

    .balign 4, 0
_0308:
    MoveAction_019 10
    MoveAction_016 2
    MoveAction_039
    EndMovement

    .balign 4, 0
_0318:
    MoveAction_019 10
    MoveAction_016 2
    MoveAction_019 2
    EndMovement

    .balign 4, 0
_0328:
    MoveAction_019 10
    MoveAction_016 3
    MoveAction_019
    EndMovement

    .balign 4, 0
_0338:
    MoveAction_019 10
    MoveAction_016
    MoveAction_019
    EndMovement

    .balign 4, 0
_0348:
    MoveAction_037
    EndMovement

    .balign 4, 0
_0350:
    MoveAction_016
    MoveAction_019 10
    EndMovement

    .balign 4, 0
_035C:
    MoveAction_016
    MoveAction_019 10
    EndMovement

    .balign 4, 0
_0368:
    MoveAction_017
    MoveAction_019 4
    MoveAction_016
    MoveAction_019 6
    EndMovement

    .balign 4, 0
_037C:
    MoveAction_016 2
    MoveAction_019 10
    EndMovement

    .balign 4, 0
_0388:
    MoveAction_075
    EndMovement

    .balign 4, 0
_0390:
    MoveAction_019 10
    EndMovement

    .balign 4, 0
_0398:
    MoveAction_017 2
    MoveAction_019 9
    EndMovement

    .balign 4, 0
_03A4:
    MoveAction_019 4
    MoveAction_016
    MoveAction_019 6
    EndMovement

    .balign 4, 0
_03B4:
    MoveAction_016
    MoveAction_019 10
    EndMovement

    .balign 4, 0
_03C0:
    MoveAction_063
    MoveAction_003
    EndMovement

    .balign 4, 0
_03CC:
    MoveAction_062 10
    MoveAction_034
    EndMovement

    .balign 4, 0
_03D8:
    MoveAction_062 11
    MoveAction_034
    EndMovement

    .balign 4, 0
_03E4:
    MoveAction_062 3
    MoveAction_035
    EndMovement

    .balign 4, 0
_03F0:
    MoveAction_063
    MoveAction_035
    EndMovement

_03FC:
    PlayFanfare SEQ_SE_CONFIRM
    LockAll
    FacePlayer
    Message 8
    WaitABXPadPress
    CloseMessage
    ReleaseAll
    End

_040F:
    PlayFanfare SEQ_SE_CONFIRM
    LockAll
    FacePlayer
    Message 9
    WaitABXPadPress
    CloseMessage
    ReleaseAll
    End

_0422:
    PlayFanfare SEQ_SE_CONFIRM
    LockAll
    FacePlayer
    Message 7
    WaitABXPadPress
    CloseMessage
    ReleaseAll
    End

_0435:
    ScrCmd_036 10, 1, 0, 0x800C
    ScrCmd_038 3
    ScrCmd_039
    ScrCmd_03B 0x800C
    CallCommonScript 0x7D0
    End

_044C:
    ScrCmd_036 11, 2, 0, 0x800C
    ScrCmd_038 3
    ScrCmd_039
    ScrCmd_03B 0x800C
    CallCommonScript 0x7D0
    End

_0463:
    ScrCmd_036 12, 2, 0, 0x800C
    ScrCmd_038 3
    ScrCmd_039
    ScrCmd_03B 0x800C
    CallCommonScript 0x7D0
    End

    .byte 0
    .byte 0