script set: r210ar0101

code

ev_r210ar0101_flag_change:
    arrive_flag_set(sys_flag: 508)
    ldval(work: 241, 1.0)
    end()

ev_r210ar0101_farmer:
    easy_obj_msg("dp_scenario2%76-msg_r210ar0101_farmer_01")
    end()

ev_r210ar0101_waitress:
    talk_obj_start()
    player_pos_get(work: 0, work: 1)
    ifval_call(work: 1, "EQ", 6.0, "ev_r210ar0101_shopf1")
    ifval_call(work: 1, "NE", 6.0, "ev_r210ar0101_shopf2")
    jump("ev_r210ar0101_waitressdirend")
    end()

ev_r210ar0101_waitressdirend:
    gold_win_write(20.0, 2.0)
    talkmsg("dp_scenario2%76-msg_r210ar0101_waitress_01")
    money_open()
    add_custum_win_label("dp_options%DP_options_845", 3.0)
    add_custum_win_label("dp_options%DP_options_846", 2.0)
    add_custum_win_label("dp_options%DP_options_844", 1.0)
    open_custum_win(work: 238)
    switch(work: 238)
    case_jump(3.0, "ev_r210ar0101_waitressbuyone")
    case_jump(2.0, "ev_r210ar0101_waitressbuyten")
    case_jump(1.0, "ev_r210ar0101_waitress_05")
    end()

ev_r210ar0101_waitressbuyone:
    comp_gold(work: 246, 500.0)
    ifval_jump(work: 246, "EQ", 0.0, "ev_r210ar0101_waitress_04")
    ldval(work: 238, 33.0)
    ldval(work: 239, 1.0)
    add_item_chk(work: 238, work: 239, work: 246)
    ifval_jump(work: 246, "EQ", 0.0, "ev_r210ar0101_waitress_03")
    sub_gold(500.0)
    talk_keywait("dp_scenario2%76-msg_r210ar0101_waitress_02")
    chg_common_scr("ev_item_event")
    talk_close()
    money_close()
    talk_obj_end()
    end()

ev_r210ar0101_waitressbuyten:
    comp_gold(work: 246, 5000.0)
    ifval_jump(work: 246, "EQ", 0.0, "ev_r210ar0101_waitress_04")
    ldval(work: 238, 33.0)
    ldval(work: 239, 10.0)
    add_item_chk(work: 238, work: 239, work: 246)
    ifval_jump(work: 246, "EQ", 0.0, "ev_r210ar0101_waitress_03")
    sub_gold(5000.0)
    money_open()
    talk_keywait("dp_scenario2%76-msg_r210ar0101_waitress_02")
    chg_common_scr("ev_item_event")
    talk_close()
    money_close()
    talk_obj_end()
    end()

ev_r210ar0101_waitress_03:
    money_close()
    talkmsg("dp_scenario2%76-msg_r210ar0101_waitress_03")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

ev_r210ar0101_waitress_04:
    money_close()
    talkmsg("dp_scenario2%76-msg_r210ar0101_waitress_04")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

ev_r210ar0101_waitress_05:
    money_close()
    talkmsg("dp_scenario2%76-msg_r210ar0101_waitress_05")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

ev_r210ar0101_shopf1:
    ifval_jump(work: 241, "EQ", 0.0, "ev_r210ar0101_waitressdirend")
    ldval(work: 241, 0.0)
    obj_anime("R210AR0101_WAITRESS", "anm_r210ar0101_dir01")
    obj_anime_wait()
    ret()

ev_r210ar0101_shopf2:
    ifval_jump(work: 241, "EQ", 1.0, "ev_r210ar0101_waitressdirend")
    ldval(work: 241, 1.0)
    obj_anime("R210AR0101_WAITRESS", "anm_r210ar0101_dir02")
    obj_anime_wait()
    ret()

anm_r210ar0101_dir01:
    ac_dir_d(8.0)
    acmd_end()

anm_r210ar0101_dir02:
    ac_dir_l(8.0)
    acmd_end()

ev_r210ar0101_oldman2:
    talk_obj_start_turn_not()
    if_flagon_jump(flag: 221, "ev_r210ar0101_oldman2_02")
    talkmsg("dp_scenario2%76-msg_r210ar0101_oldman2_01")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()

ev_r210ar0101_oldman2_02:
    talkmsg("dp_scenario2%76-msg_r210ar0101_oldman2_02")
    last_keywait()
    talk_close()
    talk_obj_end()
    end()