simple controls system script

-- Coded by Sirius

-- Check with other files
dofile(LockOn_Options.script_path.."command_defs.lua")
dofile(LockOn_Options.script_path.."devices.lua")
dofile(LockOn_Options.script_path.."mainpanel_init.lua")

-- Declare self variables
local controls_system = GetSelf()
local dev = GetSelf()

-- 0.01 rep. 1000th of second, by 10 ms.
local update_time_step = 0.01

make_default_activity(update_time_step)

local sensor_data = get_base_data()

-- Begins a loop function
update = function()
    -- Sets up variables for external animations
    -- Wheel weights
    local weight_f = sensor_data:getWOW_FrontMainLandingGear()
    local weight_l = sensor_data:getWOW_LeftMainLandingGear()
    local weight_r = sensor_data:getWOW_RightMainLandingGear()

    -- Control surfaces
    local rudder = sensor_data:getRudderPosition()
    local pitch = sensor_data:getRollPosition()
    local roll = sensor_data:getPitchPosition()

    -- Animates the gear suspension
    set_aircraft_draw_argument_value(1, weight_f)
    set_aircraft_draw_argument_value(4, weight_l)
    set_aircraft_draw_argument_value(6, weight_r)
    set_aircraft_draw_argument_value(2, -rudder)

    -- Animates the ailerons
    set_aircraft_draw_argument_value(11, roll)
    set_aircraft_draw_argument_value(11, -roll)

    -- Animates the stabilizers
    set_aircraft_draw_argument_value(15, pitch)
    set_aircraft_draw_argument_value(16, -pitch)
    set_aircraft_draw_argument_value(15, roll)
    set_aircraft_draw_argument_value(16, -roll)

    -- Animates the rudder(s)/gear steering
    set_aircraft_draw_argument_value(2, -rudder)
    set_aircraft_draw_argument_value(17, rudder)
    set_aircraft_draw_argument_value(18, rudder) -- Comment this line if only using 1 rudder.
end

need_to_be_closed = false