script set: c05r0803

code

ev_c05r0803_elevator:
    event_start()
    obj_anime("HERO", "anm_c05r0803_player_elevator_on")
    obj_anime_wait()
    ifval_jump(work: 115, "EQ", 0.0, "case2_c05r0803_elevator_01")
    ifval_jump(work: 115, "EQ", 1.0, "case3_c05r0803_elevator_01")
    end()

case2_c05r0803_elevator_01:
    ldval(work: 238, 1.0)
    call("common_01_c05_r0103")
    map_change("C05R0802", 0.0)
    end()

case3_c05r0803_elevator_01:
    ldval(work: 238, 0.0)
    call("common_01_c05_r0103")
    map_change("C05R0801", 1.0)
    end()

common_01_c05_r0103:
    se_play("S_FI017")
    elevator_anm(work: 238)
    camera_shake(0.0, 10.0, 0.0, 3.0, 40.0)
    se_stop("S_FI017")
    se_play("S_FI018")
    time_wait(15.0, work: 246)
    obj_anime("HERO", "anm_c05r0803_player_elevator_off")
    obj_anime_wait()
    se_play("S_FI001")
    ret()

anm_c05r0803_player_elevator_on:
    ac_dir_u(4.0)
    ac_up(2.0, 8.0)
    ac_dir_d(8.0)
    acmd_end()

anm_c05r0803_player_elevator_off:
    ac_down(2.0, 8.0)
    ac_dir_d(8.0)
    acmd_end()