Cruise Control

-- Speedomat by MuLTi! --
-- setElementSpeed bei MTA Wiki, Usefull functions --


local gSpeedo = 0
local gSpeed = 50

local gMe = getLocalPlayer()

function disableSpeedomat()
    if(gSpeedo == 1) then
        gSpeedo = 0
        gSpeed = 50
        removeEventHandler("onClientRender", getRootElement(), check_for_speed)
        unbindKey("brake_reverse", "down", disableSpeedomat)
        unbindKey("handbrake", "down", disableSpeedomat)
        unbindKey("accelerate", "down", disableSpeedomat)
        setElementData(gMe, "usingspeedo", false)
    end
end

function check_for_speed()
    if(gSpeedo == 0) then removeEventHandler("onClientRender", getRootElement(), check_for_speed) return end
    if(isPedInVehicle(gMe) == false) or (isPlayerDead(gMe) == true) then removeEventHandler("onClientRender", getRootElement(), check_for_speed) return end
    local veh = getPedOccupiedVehicle(gMe)
    if not(veh) then removeEventHandler("onClientRender", getRootElement(), check_for_speed) return end
    setElementSpeed(veh, "kmh", gSpeed)
end

function set_speedo_func(cmd)
    if(isPedInVehicle(gMe) == false) then return end
    if(getElementSpeed(getPedOccupiedVehicle(gMe), "kmh") < 25) then return end
    if(gSpeedo == 0) then
        local state = getVehicleEngineState ( getPedOccupiedVehicle(gMe) )
        if(state == false) then return end
        gSpeedo = 1
        gSpeed = getElementSpeed(getPedOccupiedVehicle(gMe), "kmh")
        addEventHandler("onClientRender", getRootElement(), check_for_speed)
        outputChatBox("Cruise Control enabled at "..math.ceil(gSpeed).." km/h!", 0, 200, 200, false)
        bindKey("brake_reverse", "down", disableSpeedomat)
        bindKey("handbrake", "down", disableSpeedomat)
        bindKey("accelerate", "down", disableSpeedomat)
        setElementData(gMe, "usingspeedo", true)
    elseif(gSpeedo == 1) then
        gSpeedo = 0
        gSpeed = 50
        removeEventHandler("onClientRender", getRootElement(), check_for_speed)
        outputChatBox("Cruise Control disabled.", 0, 200, 200, false)
        unbindKey("brake_reverse", "down", disableSpeedomat)
        unbindKey("handbrake", "down", disableSpeedomat)
        unbindKey("accelerate", "down", disableSpeedomat)
        setElementData(gMe, "usingspeedo", false)
    end
end

addCommandHandler("tempomat", set_speedo_func)
bindKey("u", "down", set_speedo_func)

addEventHandler("onClientPlayerWasted", gMe,
function()
    if(source ~= gMe) then return end
    if(gSpeedo == 1) then
        gSpeedo = 0
        gSpeed = 50
        removeEventHandler("onClientRender", getRootElement(), check_for_speed)
        unbindKey("brake_reverse", "down", disableSpeedomat)
        unbindKey("handbrake", "down", disableSpeedomat)
        unbindKey("accelerate", "down", disableSpeedomat)
        setElementData(gMe, "usingspeedo", false)
    end
end)

addEventHandler("onClientVehicleCollision", root,
    function(collider,force, bodyPart, x, y, z, vx, vy, vz)
         if ( source == getPedOccupiedVehicle(gMe) ) then
            if(gSpeedo == 1) then
            gSpeedo = 0
            gSpeed = 50
            removeEventHandler("onClientRender", getRootElement(), check_for_speed)
            unbindKey("brake_reverse", "down", disableSpeedomat)
            unbindKey("handbrake", "down", disableSpeedomat)
            unbindKey("accelerate", "down", disableSpeedomat)
            setElementData(gMe, "usingspeedo", false)
            end
         end
    end
)