..

local playerCheckpoints = {}
function savePlayerCheckpoint( player )
local veh = getPedOccupiedVehicle( player )
    if veh then
        if not playerCheckpoints[player] then
        playerCheckpoints[player] = {}
        end
        -- POS
        local posX, posY, posZ = getElementPosition( veh )
        playerCheckpoints[player].m_PosX = posX
        playerCheckpoints[player].m_PosY = posY
        playerCheckpoints[player].m_PosZ = posZ
        -- ROT
        local rotX, rotY, rotZ = getElementRotation( veh )
        playerCheckpoints[player].m_RotX = rotX
        playerCheckpoints[player].m_RotY = rotY
        playerCheckpoints[player].m_RotZ = rotZ
        -- VEL
        local velX, velY, velZ = getElementVelocity( veh )
        playerCheckpoints[player].m_VelX = velX
        playerCheckpoints[player].m_VelY = velY
        playerCheckpoints[player].m_VelZ = velZ
        -- MODEL
        local model = getElementModel( veh )
        playerCheckpoints[player].m_Model = model
        outputChatBox('saved')
    end
end

function loadPlayerCheckpoint( player )
    if playerCheckpoints[player] then
    -- LOAD
    local posX, posY, posZ = playerCheckpoints[player].m_PosX, playerCheckpoints[player].m_PosY, playerCheckpoints[player].m_PosZ
    local rotX, rotY, rotZ = playerCheckpoints[player].m_RotX, playerCheckpoints[player].m_RotY, playerCheckpoints[player].m_RotZ
    local velX, velY, velZ = playerCheckpoints[player].m_VelX, playerCheckpoints[player].m_VelY, playerCheckpoints[player].m_VelZ
    local model = playerCheckpoints[player].m_Model
    -- CREATE CAR
    local veh = createVehicle( model, posX, posY, posZ, rotX, rotY, rotZ )
    warpPedIntoVehicle( player, veh )
    setElementVelocity( veh, velX, velY, velZ )
    outputChatBox('load')
    end
end