script set: r221r0101

code

ev_r221r0101_flag_change:
    flag_reset(sys_flag: 53)
    arrive_flag_set(sys_flag: 539)
    ifval_jump(work: 151, "NE", 0.0, "ev_r221r0101_flag_change_01")
    end()

ev_r221r0101_flag_change_01:
    sxy_pos_change("R221R0101_ADMIN", 8.0, 9.0)
    sxy_dir_change("R221R0101_ADMIN", 2.0)
    end()

sub_r221r0101_set_record:
    ifval_jump(work: 132, "EQ", 2000.0, "sub_r221r0101_set_rival_record")
    player_name(1.0)
    number_name(2.0, work: 132)
    ret()

sub_r221r0101_set_rival_record:
    rival_name(1.0)
    number_name(2.0, work: 132)
    ret()

ev_r221r0101_admin:
    talk_obj_start()
    easy_obj_msg("dp_scenario2%178-msg_r221r0101_admin_01")
    talk_close()
    talk_obj_end()
    end()
    get_my_sex(work: 246)
    ifval_jump(work: 246, "EQ", 0.0, "ev_r221r0101_admin_01")
    jump("ev_r221r0101_admin_02")

ev_r221r0101_admin_01:
    if_flagon_jump(flag: 172, "ev_r221r0101_admin_10")
    flag_set(flag: 172)
    player_name(0.0)
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_01")
    yes_no_win(work: 246)
    ifval_jump(work: 246, "EQ", 0.0, "ev_r221r0101_admin_first_explain")
    ifval_jump(work: 246, "EQ", 1.0, "ev_r221r0101_admin_cancel")
    end()

ev_r221r0101_admin_02:
    if_flagon_jump(flag: 172, "ev_r221r0101_admin_11")
    flag_set(flag: 172)
    player_name(0.0)
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_02")
    yes_no_win(work: 246)
    ifval_jump(work: 246, "EQ", 0.0, "ev_r221r0101_admin_first_explain")
    ifval_jump(work: 246, "EQ", 1.0, "ev_r221r0101_admin_cancel")
    end()

ev_r221r0101_admin_first_explain:
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_03")
    jump("ev_r221r0101_admin_explain_menu")
    jump("ev_r221r0101_admin_cancel")

ev_r221r0101_admin_04:
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_04")
    jump("ev_r221r0101_admin_explain_menu")
    jump("ev_r221r0101_admin_cancel")

ev_r221r0101_admin_05:
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_05")
    jump("ev_r221r0101_admin_explain_menu")
    jump("ev_r221r0101_admin_cancel")

ev_r221r0101_admin_06:
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_06")
    jump("ev_r221r0101_admin_explain_menu")
    jump("ev_r221r0101_admin_cancel")

ev_r221r0101_admin_explain_menu:
    add_custum_win_label("dp_options%DP_options_198", 0.0)
    add_custum_win_label("dp_options%DP_options_199", 1.0)
    add_custum_win_label("dp_options%DP_options_200", 2.0)
    add_custum_win_label("dp_options%DP_options_201", 4.0)
    open_custum_win(work: 246)
    switch(work: 246)
    case_jump(0.0, "ev_r221r0101_admin_04")
    case_jump(1.0, "ev_r221r0101_admin_05")
    case_jump(2.0, "ev_r221r0101_admin_06")
    case_jump(4.0, "ev_r221r0101_admin_ask_entry")
    jump("ev_r221r0101_admin_cancel")

ev_r221r0101_admin_ask_entry:
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_08")
    yes_no_win(work: 246)
    ifval_jump(work: 246, "EQ", 1.0, "ev_r221r0101_admin_cancel")
    jump("ev_r221r0101_admin_cancel")

ev_r221r0101_admin_check_entry:
    ldval(work: 246, 0.0)
    count_monsbox_space(work: 246)
    ifval_jump(work: 246, "LT", 6.0, "ev_r221r0101_admin_box_full")
    ldval(work: 246, 0.0)
    pokepark_deposit_count(work: 246)
    ifval_jump(work: 246, "EQ", 0.0, "ev_r221r0101_admin_not_enougth")
    get_my_sex(work: 246)
    ifval_jump(work: 246, "EQ", 0.0, "ev_r221r0101_admin_12")
    jump("ev_r221r0101_admin_13")
    jump("ev_r221r0101_admin_cancel")

ev_r221r0101_admin_cancel:
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_09")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_admin_10:
    player_name(0.0)
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_10")
    jump("ev_r221r0101_admin_command_menu")
    jump("ev_r221r0101_go_poke_park")

ev_r221r0101_admin_11:
    player_name(0.0)
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_11")
    jump("ev_r221r0101_admin_command_menu")
    jump("ev_r221r0101_go_poke_park")

ev_r221r0101_admin_command_menu:
    add_custum_win_label("dp_options%DP_options_203", 0.0)
    add_custum_win_label("dp_options%DP_options_204", 1.0)
    add_custum_win_label("dp_options%DP_options_205", 2.0)
    open_custum_win()
    switch(work: 246)
    case_jump(0.0, "ev_r221r0101_admin_check_entry")
    case_jump(1.0, "ev_r221r0101_admin_explain")
    case_jump(2.0, "ev_r221r0101_admin_cancel")
    jump("ev_r221r0101_admin_cancel")
    jump("ev_r221r0101_go_poke_park")

ev_r221r0101_admin_12:
    call("sub_r221r0101_set_record")
    player_name(0.0)
    talk_keywait("dp_scenario2%178-msg_r221r0101_admin_12")
    talk_close()
    jump("ev_r221r0101_go_poke_park")
    jump("ev_r221r0101_go_poke_park")

ev_r221r0101_admin_13:
    call("sub_r221r0101_set_record")
    player_name(0.0)
    talk_keywait("dp_scenario2%178-msg_r221r0101_admin_13")
    talk_close()
    jump("ev_r221r0101_go_poke_park")
    jump("ev_r221r0101_go_poke_park")

ev_r221r0101_go_poke_park:
    obj_anime("R221R0101_ADMIN", "anm_r221r0101_admin_01")
    obj_anime_wait()
    obj_anime("FLDOBJ_ID_PLAYER", "anm_r221r0101_player_01")
    obj_anime_wait()
    se_play("S_FI001")
    map_change(250.0, 0.0, 24.0, 47.0, 0.0)
    none_use_number("POKEPARK_EASY_CLEAR")
    ldval(work: 151, 1.0)
    pokepark_control("POKEPARK_MODE_END")
    map_change(405.0, 0.0, 7.0, 7.0, 1.0)
    none_use_number()
    talk_obj_end()
    end()

ev_r221r0101_admin_not_enougth:
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_14")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_admin_explain:
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_15")
    jump("ev_r221r0101_admin_explain_menu")
    jump("ev_r221r0101_admin_box_full")

ev_r221r0101_admin_box_full:
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_17")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

anm_r221r0101_admin_01:
    none_use_number(1.0)
    none_use_number(2.0)
    none_use_number(1.0)
    none_use_number(1.0)
    acmd_end()

anm_r221r0101_player_01:
    none_use_number(5.0)
    ac_vanish_on(1.0)
    acmd_end()

ev_r221r0101_retire:
    event_start()
    ldval(work: 151, 0.0)
    obj_anime("FLDOBJ_ID_PLAYER", "anm_r221r0101_player_02")
    obj_anime_wait()
    obj_anime("R221R0101_ADMIN", "anm_r221r0101_admin_02")
    obj_anime_wait()
    event_end()
    end()

ev_r221r0101_comeback:
    event_start()
    ldval(work: 151, 0.0)
    obj_anime("FLDOBJ_ID_PLAYER", "anm_r221r0101_player_03")
    obj_anime_wait()
    pokepark_get_score("POKEPARK_SCORE_CAPTURE", work: 246)
    number_name(0.0, work: 246)
    pokepark_get_score("POKEPARK_SCORE_TIME", work: 246)
    number_name(1.0, work: 246)
    pokepark_get_score("POKEPARK_SCORE_TYPE", work: 246)
    number_name(2.0, work: 246)
    pokepark_get_score("POKEPARK_SCORE_TOTAL", work: 246)
    number_name(3.0, work: 246)
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_18")
    pokepark_get_score("POKEPARK_SCORE_TOTAL", work: 246)
    ifwk_jump(work: 246, "GT", work: 132, "ev_r221r0101_check_rival_record")
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_20")
    call("ev_r221r0101_get_item")
    jump("ev_r221r0101_ask_takemons")
    jump("ev_r221r0101_success_exit")

ev_r221r0101_check_rival_record:
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_19")
    call("ev_r221r0101_get_item")
    pokepark_get_score("POKEPARK_SCORE_TOTAL", work: 132)
    jump("ev_r221r0101_ask_takemons")
    jump("ev_r221r0101_success_exit")

ev_r221r0101_ask_takemons:
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_21")
    yes_no_win(work: 246)
    ifval_jump(work: 246, "EQ", 0.0, "ev_r221r0101_takemons")
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_26")
    yes_no_win(work: 246)
    ifval_jump(work: 246, "EQ", 0.0, "ev_r221r0101_not_takemons")
    jump("ev_r221r0101_ask_takemons")
    jump("ev_r221r0101_success_exit")

ev_r221r0101_not_takemons:
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_23")
    ab_keywait()
    talk_close()
    jump("ev_r221r0101_success_exit")
    jump("ev_r221r0101_success_exit")

ev_r221r0101_takemons:
    pokepark_trans_mons()
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_22")
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_24")
    ab_keywait()
    talk_close()
    jump("ev_r221r0101_success_exit")
    jump("ev_r221r0101_success_exit")

ev_r221r0101_success_exit:
    obj_anime("FLDOBJ_ID_PLAYER", "anm_r221r0101_player_04")
    obj_anime_wait()
    obj_anime("R221R0101_ADMIN", "anm_r221r0101_admin_02")
    obj_anime_wait()
    event_end()
    end()

anm_r221r0101_admin_02:
    none_use_number(1.0)
    none_use_number(2.0)
    acmd_end()

anm_r221r0101_player_02:
    none_use_number(5.0)
    acmd_end()

anm_r221r0101_player_03:
    none_use_number(2.0)
    none_use_number(1.0)
    acmd_end()

anm_r221r0101_player_04:
    none_use_number(4.0)
    acmd_end()

ev_r221r0101_recieve:
    easy_obj_msg("dp_scenario2%178-msg_r221r0101_man1_01")
    end()

ev_r221r0101_girl1:
    talk_obj_start()
    player_name(0.0)
    easy_obj_msg("dp_scenario2%178-msg_r221r0101_girl1_01")
    talk_close()
    talk_obj_end()
    end()
    ifval_jump(work: 246, "EQ", 2.0, "ev_r221r0101_girl1_03")
    ifval_jump(work: 246, "EQ", 1.0, "ev_r221r0101_girl1_02")
    jump("ev_r221r0101_girl1_01")

ev_r221r0101_girl1_01:
    talkmsg("dp_scenario2%178-msg_r221r0101_girl1_01")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_girl1_02:
    talkmsg("dp_scenario2%178-msg_r221r0101_girl1_02")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_girl1_03:
    talkmsg("dp_scenario2%178-msg_r221r0101_girl1_03")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_middleman1:
    easy_obj_msg("dp_scenario2%178-msg_r221r0101_middleman1_01")
    talk_close()
    talk_obj_end()
    end()
    player_name(0.0)
    easy_obj_msg("dp_scenario2%178-msg_r221r0101_middleman1_01")
    end()

ev_r221r0101_boy2:
    easy_obj_msg("dp_scenario2%178-msg_r221r0101_boy2_01")
    talk_close()
    talk_obj_end()
    end()
    easy_obj_msg("dp_scenario2%178-msg_r221r0101_boy2_01")
    end()

ev_r221r0101_woman2:
    easy_obj_msg("dp_scenario2%178-msg_r221r0101_woman2_01")
    talk_close()
    talk_obj_end()
    end()
    easy_obj_msg("dp_scenario2%178-msg_r221r0101_woman2_01")
    end()

ev_r221r0101_man1:
    easy_obj_msg("dp_scenario2%178-msg_r221r0101_man1_01")
    talk_close()
    talk_obj_end()
    end()
    call("sub_r221r0101_set_record")
    easy_obj_msg("dp_scenario2%178-msg_r221r0101_man1_01")
    end()

ev_r221r0101_ookido:
    event_start()
    flag_reset(flag: 519)
    ldval(work: 132, 2000.0)
    obj_anime("R221R0101_OOKIDO", "anm_r221r0101_ookido_01")
    obj_anime_wait()
    get_my_sex(work: 0)
    player_name(0.0)
    ifval_jump(work: 0, "EQ", 0.0, "ev_r221r0101_ookido_01_male")
    jump("ev_r221r0101_ookido_01_famale")
    jump("ev_r221r0101_ookido_01_03")

ev_r221r0101_ookido_01_male:
    talk_keywait("dp_scenario2%178-msg_r221r0101_ookido_01")
    jump("ev_r221r0101_ookido_01_03")
    jump("ev_r221r0101_ookido_01_03")

ev_r221r0101_ookido_01_famale:
    talk_keywait("dp_scenario2%178-msg_r221r0101_ookido_02")
    jump("ev_r221r0101_ookido_01_03")
    jump("ev_r221r0101_ookido_01_03")

ev_r221r0101_ookido_01_03:
    talk_keywait("dp_scenario2%178-msg_r221r0101_ookido_03")
    talk_close()
    obj_anime("R221R0101_OOKIDO", "anm_r221r0101_ookido_gyoe")
    obj_anime_wait()
    talk_keywait("dp_scenario2%178-msg_r221r0101_ookido_04")
    ldval(work: 238, 16.0)
    call("ev_poketch_soft_get_sub")
    talk_keywait("dp_scenario2%178-msg_r221r0101_ookido_05")
    talk_close()
    time_wait(15.0, work: 246)
    obj_anime("FLDOBJ_ID_PLAYER", "anm_r221r0101_player_back")
    obj_anime_wait()
    obj_anime("R221R0101_OOKIDO", "anm_r221r0101_ookido_out")
    obj_anime_wait()
    se_play("S_FI001")
    obj_del("R221R0101_OOKIDO")
    se_wait("S_FI001")
    ldval(work: 110, 1.0)
    event_end()
    end()

anm_r221r0101_ookido_01:
    ac_mark_gyoe(1.0)
    none_use_number(1.0)
    none_use_number(3.0)
    acmd_end()

anm_r221r0101_ookido_gyoe:
    ac_mark_gyoe(1.0)
    none_use_number(1.0)
    acmd_end()

anm_r221r0101_ookido_out:
    none_use_number(1.0)
    none_use_number(1.0)
    acmd_end()

anm_r221r0101_player_back:
    none_use_number(1.0)
    none_use_number(1.0)
    acmd_end()

ev_r221r0101_poketch:
    talk_obj_start()
    ifval_jump(work: 10, "EQ", 1.0, "ev_r221r0101_poketch_08")
    ifval_jump(work: 10, "EQ", 2.0, "ev_r221r0101_poketch_11")
    poketch_check(18.0, work: 246)
    ifval_jump(work: 246, "EQ", 1.0, "ev_r221r0101_poketch_16")
    talk_keywait("dp_scenario2%178-msg_r221r0101_poketch_01")
    talk_keywait("dp_scenario2%178-msg_r221r0101_poketch_02")
    poketch_check(17.0, work: 246)
    ifval_jump(work: 246, "EQ", 1.0, "ev_r221r0101_poketch_09")
    talk_keywait("dp_scenario2%178-msg_r221r0101_poketch_06")
    temoti_poke_chk(work: 246, 143.0)
    ifval_jump(work: 246, "EQ", 0.0, "ev_r221r0101_poketch_15")
    talk_keywait("dp_scenario2%178-msg_r221r0101_poketch_07")
    ldval(work: 238, 17.0)
    call("ev_poketch_soft_get_sub")
    last_keywait()
    ldval(work: 10, 1.0)
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_poketch_09:
    talk_keywait("dp_scenario2%178-msg_r221r0101_poketch_09")
    temoti_poke_chk(work: 246, 352.0)
    ifval_jump(work: 246, "EQ", 0.0, "ev_r221r0101_poketch_15")
    talk_keywait("dp_scenario2%178-msg_r221r0101_poketch_10")
    ldval(work: 238, 18.0)
    call("ev_poketch_soft_get_sub")
    last_keywait()
    ldval(work: 10, 2.0)
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_poketch_08:
    poketch_name(0.0, 17.0)
    talkmsg("dp_scenario2%178-msg_r221r0101_poketch_08")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_poketch_11:
    poketch_name(0.0, 18.0)
    talkmsg("dp_scenario2%178-msg_r221r0101_poketch_11")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_poketch_15:
    talkmsg("dp_scenario2%178-msg_r221r0101_poketch_15")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_poketch_16:
    talkmsg("dp_scenario2%178-msg_r221r0101_poketch_16")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_gorggeousw:
    talk_obj_start()
    easy_obj_msg("dp_scenario2%178-msg_r221r0101_gorggeousw_01")
    talk_close()
    talk_obj_end()
    end()
    ifval_jump(work: 9, "EQ", 1.0, "ev_r221r0101_gorggeousw_end_text")
    agb_cartridge_ver_get(work: 246)
    ifval_jump(work: 246, "EQ", 4.0, "ev_r221r0101_gorggeousw_abg_red")
    ifval_jump(work: 246, "EQ", 5.0, "ev_r221r0101_gorggeousw_abg_green")
    ifval_jump(work: 246, "EQ", 1.0, "ev_r221r0101_gorggeousw_abg_sapphire")
    ifval_jump(work: 246, "EQ", 2.0, "ev_r221r0101_gorggeousw_abg_ruby")
    ifval_jump(work: 246, "EQ", 3.0, "ev_r221r0101_gorggeousw_abg_emerald")
    jump("ev_r221r0101_gorggeousw_no_item_get")
    end()

ev_r221r0101_gorggeousw_no_item_get:
    talkmsg("dp_scenario2%178-msg_r221r0101_gorggeousw_01")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_gorggeousw_end_text:
    talkmsg("dp_scenario2%178-msg_r221r0101_gorggeousw_07")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_gorggeousw_abg_red:
    ldval(work: 238, "IMC_ACCE_CROWN00")
    ldval(work: 239, 1.0)
    imc_acce_add_item_chk(work: 238, work: 239, work: 246)
    ifval_jump(work: 246, "EQ", 0.0, "ev_r221r0101_gorggeousw_no_item_get")
    talkmsg("dp_scenario2%178-msg_r221r0101_gorggeousw_02")
    jump("ev_r221r0101_gorggeousw_item_get")
    end()

ev_r221r0101_gorggeousw_abg_green:
    ldval(work: 238, "IMC_ACCE_TIARA00")
    ldval(work: 239, 1.0)
    imc_acce_add_item_chk(work: 238, work: 239, work: 246)
    ifval_jump(work: 246, "EQ", 0.0, "ev_r221r0101_gorggeousw_no_item_get")
    talkmsg("dp_scenario2%178-msg_r221r0101_gorggeousw_03")
    jump("ev_r221r0101_gorggeousw_item_get")
    end()

ev_r221r0101_gorggeousw_abg_sapphire:
    ldval(work: 238, "IMC_BG_RIGHT_14")
    imc_bg_item_chk(work: 238, work: 246)
    ifval_jump(work: 246, "EQ", 1.0, "ev_r221r0101_gorggeousw_no_item_get")
    talkmsg("dp_scenario2%178-msg_r221r0101_gorggeousw_04")
    jump("ev_r221r0101_gorggeousw_bg_get")
    end()

ev_r221r0101_gorggeousw_abg_ruby:
    ldval(work: 238, "IMC_BG_RIGHT_15")
    imc_bg_item_chk(work: 238, work: 246)
    ifval_jump(work: 246, "EQ", 1.0, "ev_r221r0101_gorggeousw_no_item_get")
    talkmsg("dp_scenario2%178-msg_r221r0101_gorggeousw_05")
    jump("ev_r221r0101_gorggeousw_bg_get")
    end()

ev_r221r0101_gorggeousw_abg_emerald:
    ldval(work: 238, "IMC_BG_RIGHT_16")
    imc_bg_item_chk(work: 238, work: 246)
    ifval_jump(work: 246, "EQ", 1.0, "ev_r221r0101_gorggeousw_no_item_get")
    talkmsg("dp_scenario2%178-msg_r221r0101_gorggeousw_06")
    jump("ev_r221r0101_gorggeousw_bg_get")
    end()

ev_r221r0101_gorggeousw_item_get:
    chg_common_scr("ev_acce_event")
    ldval(work: 9, 1.0)
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_gorggeousw_bg_get:
    chg_common_scr("ev_imc_bg_getevent")
    ldval(work: 9, 1.0)
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_get_item:
    pokepark_get_score("POKEPARK_SCORE_TOTAL", work: 246)
    ifval_call(work: 246, "LT", 3000.0, "ev_r221r0101_item_type1")
    ifval_call(work: 246, "LT", 3300.0, "ev_r221r0101_item_type2")
    ifval_call(work: 246, "LT", 3500.0, "ev_r221r0101_item_type3")
    ifval_call(work: 246, "LT", 10000.0, "ev_r221r0101_item_type4")
    ret()

ev_r221r0101_item_type1:
    get_rnd(work: 240, 8.0)
    ifval_call(work: 240, "EQ", 0.0, "item_kurabo")
    ifval_call(work: 240, "EQ", 1.0, "item_kago")
    ifval_call(work: 240, "EQ", 2.0, "item_momon")
    ifval_call(work: 240, "EQ", 3.0, "item_tiigo")
    ifval_call(work: 240, "EQ", 4.0, "item_nanasi")
    ifval_call(work: 240, "EQ", 5.0, "item_himeri")
    ifval_call(work: 240, "EQ", 6.0, "item_oren")
    ifval_call(work: 240, "EQ", 7.0, "item_kii")
    call("ev_r221r0101_item_check")
    ret()

ev_r221r0101_item_type2:
    get_rnd(work: 240, 5.0)
    ifval_call(work: 240, "EQ", 0.0, "item_fira")
    ifval_call(work: 240, "EQ", 1.0, "item_ui")
    ifval_call(work: 240, "EQ", 2.0, "item_mago")
    ifval_call(work: 240, "EQ", 3.0, "item_banzi")
    ifval_call(work: 240, "EQ", 4.0, "item_ia")
    call("ev_r221r0101_item_check")
    ret()

ev_r221r0101_item_type3:
    get_rnd(work: 240, 7.0)
    ifval_call(work: 240, "EQ", 0.0, "item_zuri")
    ifval_call(work: 240, "EQ", 1.0, "item_burii")
    ifval_call(work: 240, "EQ", 2.0, "item_nana")
    ifval_call(work: 240, "EQ", 3.0, "item_sesina")
    ifval_call(work: 240, "EQ", 4.0, "item_pairu")
    ifval_call(work: 240, "EQ", 5.0, "item_ramu")
    ifval_call(work: 240, "EQ", 6.0, "item_obon")
    call("ev_r221r0101_item_check")
    ret()

ev_r221r0101_item_type4:
    get_rnd(work: 240, 6.0)
    ifval_call(work: 240, "EQ", 0.0, "item_zaroku")
    ifval_call(work: 240, "EQ", 1.0, "item_nekobu")
    ifval_call(work: 240, "EQ", 2.0, "item_taporu")
    ifval_call(work: 240, "EQ", 3.0, "item_rome")
    ifval_call(work: 240, "EQ", 4.0, "item_ubu")
    ifval_call(work: 240, "EQ", 5.0, "item_matoma")
    call("ev_r221r0101_item_check")
    ret()

ev_r221r0101_item_check:
    add_item_chk(work: 240, 1.0, work: 241)
    ifval_call(work: 241, "NE", 0.0, "ev_r221r0101_item_add")
    ldval(work: 246, 10000.0)
    ret()

ev_r221r0101_item_add:
    talkmsg("dp_scenario2%178-msg_r221r0101_admin_25")
    ldwk(work: 238, work: 240)
    ldval(work: 239, 1.0)
    chg_common_scr("ev_item_event_keywait")
    ret()

item_kurabo:
    ldval(work: 240, 149.0)
    ret()

item_kago:
    ldval(work: 240, 150.0)
    ret()

item_momon:
    ldval(work: 240, 151.0)
    ret()

item_tiigo:
    ldval(work: 240, 152.0)
    ret()

item_nanasi:
    ldval(work: 240, 153.0)
    ret()

item_himeri:
    ldval(work: 240, 154.0)
    ret()

item_oren:
    ldval(work: 240, 155.0)
    ret()

item_kii:
    ldval(work: 240, 156.0)
    ret()

item_fira:
    ldval(work: 240, 159.0)
    ret()

item_ui:
    ldval(work: 240, 160.0)
    ret()

item_mago:
    ldval(work: 240, 161.0)
    ret()

item_banzi:
    ldval(work: 240, 162.0)
    ret()

item_ia:
    ldval(work: 240, 163.0)
    ret()

item_zuri:
    ldval(work: 240, 164.0)
    ret()

item_burii:
    ldval(work: 240, 165.0)
    ret()

item_nana:
    ldval(work: 240, 166.0)
    ret()

item_sesina:
    ldval(work: 240, 167.0)
    ret()

item_pairu:
    ldval(work: 240, 168.0)
    ret()

item_ramu:
    ldval(work: 240, 157.0)
    ret()

item_obon:
    ldval(work: 240, 158.0)
    ret()

item_zaroku:
    ldval(work: 240, 169.0)
    ret()

item_nekobu:
    ldval(work: 240, 170.0)
    ret()

item_taporu:
    ldval(work: 240, 171.0)
    ret()

item_rome:
    ldval(work: 240, 172.0)
    ret()

item_ubu:
    ldval(work: 240, 173.0)
    ret()

item_matoma:
    ldval(work: 240, 174.0)
    ret()

ev_r221r0101_shop_01:
    talk_obj_start()
    player_pos_get(work: 0, work: 1)
    ifval_call(work: 0, "EQ", 5.0, "ev_r221r0101_shopf1")
    ifval_call(work: 0, "NE", 5.0, "ev_r221r0101_shopf2")
    talk_obj_start()
    chg_common_scr("ev_shop_start_talk")
    ldval(work: 3, 0.0)
    jump("ev_r221r0101_shop_01_re")
    end()

ev_r221r0101_shop_01_re:
    ifval_call(work: 3, "EQ", 1.0, "ev_r221r0101_shop_01_shop_sonohoka")
    add_custum_win_label("ss_fld_shop%SS_fld_shop_197", 0.0)
    add_custum_win_label("ss_fld_shop%SS_fld_shop_198", 1.0)
    add_custum_win_label("ss_fld_shop%SS_fld_shop_199", 2.0)
    open_custum_win(work: 238)
    switch(work: 238)
    case_jump(0.0, "ev_r221r0101_shop_01_shop_buy")
    case_jump(1.0, "ev_r221r0101_shop_01_shop_sell")
    case_jump(2.0, "ev_r221r0101_shop_01_shop_end")
    jump("ev_r221r0101_shop_01_shop_end")
    end()

ev_r221r0101_shop_01_shop_sonohoka:
    talkmsg("dp_scenario1%28-mes_shop_01_03")
    ret()

ev_r221r0101_shop_01_shop_buy:
    ldval(work: 3, 1.0)
    talk_close_no_clear()
    event_camera_index(300.0)
    dpr_shop_open("R221R0101")
    dpr_shop_open_wait()
    event_camera_index(301.0)
    event_camera_end_wait()
    jump("ev_r221r0101_shop_01_re")
    end()

ev_r221r0101_shop_01_shop_sell:
    ldval(work: 3, 1.0)
    talk_close_no_clear()
    shop_open_sell()
    dpr_shop_open_wait()
    jump("ev_r221r0101_shop_01_re")
    end()

ev_r221r0101_shop_01_shop_end:
    talkmsg("ss_fld_shop%SS_fld_shop_202")
    talk_close()
    talk_obj_end()
    end()

ev_r221r0101_shopf1:
    obj_anime("R221R0101_SHOP_01", "anm_r221r0101_shopf1")
    obj_anime_wait()
    ret()

ev_r221r0101_shopf2:
    obj_anime("R221R0101_SHOP_01", "anm_r221r0101_shopf2")
    obj_anime_wait()
    ret()

ev_r221r0101_shop_02:
    talk_obj_start()
    chg_common_scr("ev_shop_start_talk")
    ldval(work: 3, 0.0)
    jump("ev_r221r0101_shop_02_re")
    end()

ev_r221r0101_shop_02_re:
    ifval_call(work: 3, "EQ", 1.0, "ev_r221r0101_shop_02_shop_sonohoka")
    add_custum_win_label("ss_fld_shop%SS_fld_shop_197", 0.0)
    add_custum_win_label("ss_fld_shop%SS_fld_shop_199", 2.0)
    open_custum_win(work: 238)
    switch(work: 238)
    case_jump(0.0, "ev_r221r0101_shop_02_shop_buy")
    case_jump(2.0, "ev_r221r0101_shop_02_shop_end")
    jump("ev_r221r0101_shop_01_shop_end")
    end()

ev_r221r0101_shop_02_shop_sonohoka:
    talkmsg("dp_scenario1%28-mes_shop_01_03")
    ret()

ev_r221r0101_shop_02_shop_buy:
    ldval(work: 3, 1.0)
    talk_close_no_clear()
    event_camera_index(300.0)
    shop_open_palpark()
    dpr_shop_open_wait()
    event_camera_index(301.0)
    event_camera_end_wait()
    jump("ev_r221r0101_shop_02_re")
    end()

ev_r221r0101_shop_02_shop_end:
    talkmsg("ss_fld_shop%SS_fld_shop_202")
    talk_close()
    talk_obj_end()
    end()

anm_r221r0101_shopf1:
    ac_dir_r(8.0)
    acmd_end()

anm_r221r0101_shopf2:
    ac_dir_u(8.0)
    acmd_end()