Route15_WestEntrance_2F_MapScripts:: @ 8170092
    .byte 0

Route15_WestEntrance_2F_EventScript_170093:: @ 8170093
    lockall
    loadword 0, gUnknown_819F79C
    callstd 4
    drawmonpic SPECIES_ARTICUNO, 10, 3
    delay 20
    waitbuttonpress
    erasemonpic
    setvar VAR_0x8004, 144
    special sub_80CBDCC
    releaseall
    end

Route15_WestEntrance_2F_EventScript_1700B0:: @ 81700B0
    loadword 0, gUnknown_819F7F8
    callstd 3
    end

Route15_WestEntrance_2F_EventScript_1700B9:: @ 81700B9
    lock
    faceplayer
    call EventScript_170145
    checkflag FLAG_0x256
    goto_if 1, EventScript_17013B
    loadword 0, gUnknown_819F5AB
    callstd 5
    compare_var_to_value VAR_RESULT, 0
    goto_if 1, EventScript_1A7AD1
    setvar VAR_0x8004, 0
    specialvar VAR_RESULT, sub_80CA3D8
    getnumberstring 2, VAR_0x8006
    call EventScript_170145
    compare_var_to_value VAR_0x8006, 50
    goto_if 0, EventScript_1A7ABD
    loadword 0, gUnknown_819F6AA
    callstd 4
    checkitemspace ITEM_EXP_SHARE, 1
    compare_var_to_value VAR_RESULT, 0
    goto_if 1, EventScript_1A7AC7
    additem ITEM_EXP_SHARE, 1
    loadword 0, gUnknown_819F6FD
    setorcopyvar VAR_0x8000, 182
    setorcopyvar VAR_0x8001, 1
    setorcopyvar VAR_0x8002, 257
    callstd 9
    setflag FLAG_0x256
    loadword 0, gUnknown_819F71F
    callstd 4
    release
    end

EventScript_17013B:: @ 817013B
    loadword 0, gUnknown_819F71F
    callstd 4
    release
    end

EventScript_170145:: @ 8170145
    getnumberstring 0, 50
    getitemname 1, ITEM_EXP_SHARE
    return