Leap-Frog v5 for Phasor v2

--[[ ###         Leap-Frog v5         ###]]--
--[[ ###   by H® Shaft, AelitePrime   ###]]--
--[[ ###        for Phasor v2         ###]]--

-- PC and CE version 5 3/1/2014

-- Enables drivers to leap hogs into the air by pressing the space bar/jump key and -  also,
-- enables walking players to jump a bit higher to be able to jump over hogs coming at them.

-- do not touch --
enable_vehicle_leap = {}
enable_player_leap = {}
player_velocity = {}
pause_time_players = {}
pause_time_vehicles = {}
vehicle_velocity = {}
emergency_brake = {}
brakes = {}
jumps = {}
pos_multiplier = 0.9
neg_multiplier = -0.09
brk_multiplier = 0.05

 -- edit below as you see fit --

-- If the boolean is true for the map then leap-frog for vehicles will be enabled for the map
--                      Map:                        Boolean:
enable_vehicle_leap.    beavercreek         =       false       -- battle creek
enable_vehicle_leap.    bloodgulch          =       true
enable_vehicle_leap.    boardingaction      =       true
enable_vehicle_leap.    carousel            =       false       -- derelict
enable_vehicle_leap.    chillout            =       false
enable_vehicle_leap.    damnation           =       false
enable_vehicle_leap.    dangercanyon        =       true
enable_vehicle_leap.    deathisland         =       true
enable_vehicle_leap.    gephyrophobia       =       true
enable_vehicle_leap.    hangemhigh          =       false
enable_vehicle_leap.    icefields           =       true
enable_vehicle_leap.    infinity            =       true
enable_vehicle_leap.    longest             =       false
enable_vehicle_leap.    prisoner            =       false
enable_vehicle_leap.    putput              =       false       -- chiron tl34
enable_vehicle_leap.    ratrace             =       false
enable_vehicle_leap.    sidewinder          =       true
enable_vehicle_leap.    timberland          =       true
enable_vehicle_leap.    wizard              =       false

-- If the boolean is true for the map then leap-frog for players will be enabled for the map
--                      Map:                        Boolean:
enable_player_leap.     beavercreek         =       false       -- battle creek
enable_player_leap.     bloodgulch          =       false
enable_player_leap.     boardingaction      =       false
enable_player_leap.     carousel            =       false       -- derelict
enable_player_leap.     chillout            =       false
enable_player_leap.     damnation           =       false
enable_player_leap.     dangercanyon        =       false
enable_player_leap.     deathisland         =       false
enable_player_leap.     gephyrophobia       =       false
enable_player_leap.     hangemhigh          =       false
enable_player_leap.     icefields           =       false
enable_player_leap.     infinity            =       false
enable_player_leap.     longest             =       false
enable_player_leap.     prisoner            =       false
enable_player_leap.     putput              =       false       -- chiron tl34
enable_player_leap.     ratrace             =       false
enable_player_leap.     sidewinder          =       false
enable_player_leap.     timberland          =       false
enable_player_leap.     wizard              =       false

-- Specify the velocity that you want leap-frog to go at for vehicles
--                      Map:                        Velocity:
vehicle_velocity.       beavercreek         =       0           -- battle creek
vehicle_velocity.       bloodgulch          =       1.85
vehicle_velocity.       boardingaction      =       0
vehicle_velocity.       carousel            =       0           -- derelict
vehicle_velocity.       chillout            =       0
vehicle_velocity.       damnation           =       0
vehicle_velocity.       dangercanyon        =       1.65
vehicle_velocity.       deathisland         =       1.8
vehicle_velocity.       gephyrophobia       =       1.9
vehicle_velocity.       hangemhigh          =       0
vehicle_velocity.       icefields           =       1.8
vehicle_velocity.       infinity            =       1.85
vehicle_velocity.       longest             =       0
vehicle_velocity.       prisoner            =       0
vehicle_velocity.       putput              =       0           -- chiron tl34
vehicle_velocity.       ratrace             =       0
vehicle_velocity.       sidewinder          =       2.2
vehicle_velocity.       timberland          =       1.8
vehicle_velocity.       wizard              =       0

-- Specify the velocity that you want leap-frog to go at for players
--                      Map:                        Velocity:
player_velocity.        beavercreek         =       1.5         -- battle creek
player_velocity.        bloodgulch          =       1.5
player_velocity.        boardingaction      =       1.5
player_velocity.        carousel            =       1.5             -- derelict
player_velocity.        chillout            =       1.5
player_velocity.        damnation           =       1.5
player_velocity.        dangercanyon        =       1.5
player_velocity.        deathisland         =       1.5
player_velocity.        gephyrophobia       =       1.5
player_velocity.        hangemhigh          =       1.5
player_velocity.        icefields           =       1.5
player_velocity.        infinity            =       1.5
player_velocity.        longest             =       1.5
player_velocity.        prisoner            =       1.5
player_velocity.        putput              =       1.5             -- chiron tl34
player_velocity.        ratrace             =       1.5
player_velocity.        sidewinder          =       1.5
player_velocity.        timberland          =       1.5
player_velocity.        wizard              =       1.5


-- Specify the amount of time between leap-frogs for players
--                      Map:                        Time(In Seconds):
pause_time_players.     beavercreek         =       4           -- battle creek
pause_time_players.     bloodgulch          =       4
pause_time_players.     boardingaction      =       2.5
pause_time_players.     carousel            =       2.5             -- derelict
pause_time_players.     chillout            =       2.5
pause_time_players.     damnation           =       2.5
pause_time_players.     dangercanyon        =       4
pause_time_players.     deathisland         =       4
pause_time_players.     gephyrophobia       =       4
pause_time_players.     hangemhigh          =       2.5
pause_time_players.     icefields           =       4
pause_time_players.     infinity            =       4
pause_time_players.     longest             =       2.5
pause_time_players.     prisoner            =       2.5
pause_time_players.     putput              =       2.5             -- chiron tl34
pause_time_players.     ratrace             =       2.5
pause_time_players.     sidewinder          =       4
pause_time_players.     timberland          =       4
pause_time_players.     wizard              =       2.5

-- Specify the amount of time between leap-frogs for vehicles
--                      Map:                        Time(In Seconds):
pause_time_vehicles.    beavercreek         =       4       -- battle creek
pause_time_vehicles.    bloodgulch          =       4
pause_time_vehicles.    boardingaction      =       4
pause_time_vehicles.    carousel            =       4       -- derelict
pause_time_vehicles.    chillout            =       4
pause_time_vehicles.    damnation           =       4
pause_time_vehicles.    dangercanyon        =       4
pause_time_vehicles.    deathisland         =       4
pause_time_vehicles.    gephyrophobia       =       4
pause_time_vehicles.    hangemhigh          =       4
pause_time_vehicles.    icefields           =       4
pause_time_vehicles.    infinity            =       4
pause_time_vehicles.    longest             =       4
pause_time_vehicles.    prisoner            =       4
pause_time_vehicles.    putput              =       4       -- chiron tl34
pause_time_vehicles.    ratrace             =       4
pause_time_vehicles.    sidewinder          =       4
pause_time_vehicles.    timberland          =       4
pause_time_vehicles.    wizard              =       4

-- If this is set to true then If the driver clicks their crouch key the vehicle will come to a complete stop.
--                      Map:                        Boolean:
emergency_brake.        beavercreek         =       false -- battle creek
emergency_brake.        bloodgulch          =       true
emergency_brake.        boardingaction      =       false
emergency_brake.        carousel            =       false -- derelict
emergency_brake.        chillout            =       false
emergency_brake.        damnation           =       false
emergency_brake.        dangercanyon        =       true
emergency_brake.        deathisland         =       true
emergency_brake.        gephyrophobia       =       true
emergency_brake.        hangemhigh          =       false
emergency_brake.        icefields           =       true
emergency_brake.        infinity            =       true
emergency_brake.        longest             =       false
emergency_brake.        prisoner            =       false
emergency_brake.        putput              =       false -- chiron tl34
emergency_brake.        ratrace             =       false
emergency_brake.        sidewinder          =       true
emergency_brake.        timberland          =       true
emergency_brake.        wizard              =       false

function GetRequiredVersion()
    return 200
end

function OnScriptLoad(process, game, persistent)
    if game == "PC" then
        GAME = "PC"
        Map = readstring(0x698F21)
    else
        GAME = "CE"
        Map = readstring(0x61D151)
    end
    for i=0,15 do
        if getplayer(i) then
            brakes[i] = 0
            jumps[i] = 0
        end
    end
end

function OnNewGame(map)
    if GAME == "PC" then
        Map = readstring(0x698F21)
    else
        Map = readstring(0x61D151)
    end
    for i=0,15 do
        if getplayer(i) then
            brakes[i] = 0
            jumps[i] = 0
        end
    end
end

function OnPlayerJoin(player)
    if getplayer(player) then
        brakes[player] = 0
        jumps[player] = 0
        announce = registertimer(6000, "timedannounce", player)
    end
end


function OnGameEnd(stage)
    if stage == 1 then
        if announce then
            removetimer(announce)
            announce = nil
        end
    end
end

function OnClientUpdate(player)
    if brakes[player] > 0 then brakes[player] = brakes[player] - 1 end
    if jumps[player] > 0 then jumps[player] = jumps[player] - 1 end
    local m_playerObjId = getplayerobjectid(player)
    if m_playerObjId then
        local m_object = getobject(m_playerObjId)
        if isinvehicle(player) then
            if enable_vehicle_leap[Map] then
                local m_vehicle = getobject(getplayervehicleid(player))
                if brakes[player] == 0 and getdriverplayer(m_vehicle) == player and readbit(m_object + 0x208, 1) then
                    sendconsoletext(player, "Leap Frog!")
                    brakes[player] = math.floor(pause_time_vehicles[Map]*30)
                    writebit(m_vehicle + 0x10, 5, 0)
                    writefloat(m_vehicle + 0x70, vehicle_velocity[Map]/10)
                    if readfloat(m_vehicle, 0x8C) > 0 then
                    writefloat(m_vehicle + 0x8C, readfloat(m_vehicle, 0x8C)*neg_multiplier)
                    else
                    writefloat(m_vehicle + 0x8C, readfloat(m_vehicle, 0x8C)*pos_multiplier)
                    end
                    writefloat(m_vehicle + 0x90, readfloat(m_vehicle, 0x90)*pos_multiplier)
                    writefloat(m_vehicle + 0x94, readfloat(m_vehicle, 0x94)*pos_multiplier)
                end
            end
            if emergency_brake[Map] then
                local m_vehicle = getobject(getplayervehicleid(player))
                if getdriverplayer(m_vehicle) == player and readbit(m_object + 0x208, 0) then
                    writefloat(m_vehicle + 0x68, readfloat(m_vehicle + 0x68)*brk_multiplier)
                    writefloat(m_vehicle + 0x6C, readfloat(m_vehicle + 0x6C)*brk_multiplier)
                end
            end
        else
            if enable_player_leap[Map] then
                if jumps[player] == 0 and readbyte(m_object + 0x4CC) == 1 and readbit(m_object + 0x208, 1) then
                    sendconsoletext(player, "Leap Frog!")
                    jumps[player] = math.floor(pause_time_players[Map]*30)
                    writebit(m_object + 0x10, 5, 0)
                    writefloat(m_object + 0x70, player_velocity[Map]/10)
                end
            end
        end
    end
end

function getdriverplayer(m_vehicle)
     local obj_id = readdword(m_vehicle + 0x324)
    if obj_id ~= 0xFFFFFFFF then return objectidtoplayer(obj_id) end
end

function timedannounce(id, count, player)
    if getplayer(player) then
        if enable_vehicle_leap[Map] then sendconsoletext(player, "Vehicle Leap-Frog is Enabled.") end
        if enable_player_leap[Map] then sendconsoletext(player, "Player Leap-Frog is Enabled.") end
    end
    return false
end

function getplayervehicleid(player)
    return readdword(getobject(getplayerobjectid(player)) + 0x11C)
end

-- This script, was made by myself H® Shaft and Aelite, but did not duplicate any portion of OUR original script from 5/2012 written by Wizard and H® Shaft.

-- Created by H® Shaft thank you to Oxide, AelitePrime, Nugget & Wizard.
-- Visit http://halorace.org/forum/index.php?topic=514.0 or
-- Visit http://pastebin.com/u/HR_Shaft for more phasor scripts