 local hud = false
local compass = false
local voiceVolume = 25
local voiceOn = false
local youhavemail = false
local YouNeedMinimap = false



RegisterNetEvent("hud", function(source, args, rawCommand)
    if hud == true then
        hud = false
    else
        hud = true
    end
end)


RegisterNetEvent('RSGCore:Client:OnPlayerUnload', function()
    isLoggedIn = false
end)

RegisterNetEvent('RSGCore:Client:OnPlayerLoaded', function()
    isLoggedIn = true
end)

RegisterNetEvent("prog_test", function(source, args, rawCommand)
    exports.gum_status2:DisplayProgressBar(15000)
end)


exports('DisplayProgressBar', function(time)
    local timer = (time / 100)
    local DisplayElemet = 0
    while DisplayElemet < 100 do
        SendNUIMessage({progress=true, time=DisplayElemet})
        DisplayElemet = DisplayElemet + 1
        Wait(timer)
        if DisplayElemet > 99 then
            SendNUIMessage({progress=false})
        end
    end
end)


RegisterNetEvent('gum_status:enable_compass')
AddEventHandler('gum_status:enable_compass', function()
    if compass == false then
        compass = true
    else
        compass = false
    end
end)

RegisterNetEvent("gum:SelectedCharacter")
AddEventHandler("gum:SelectedCharacter", function(charid)
    Citizen.CreateThread(function()
        hud = true
     end)
end)

RegisterNetEvent('gum_status:voiceOn')
AddEventHandler('gum_status:voiceOn', function(player)
    if player == PlayerPedId() then
        if voiceOn == false then
            voiceOn = true
        else
            voiceOn = false
        end
    end
end)

RegisterNetEvent('gum_status:range')
AddEventHandler('gum_status:range', function(player, range)
    if player == PlayerPedId() then
        if tonumber(range) == 30 then
            voiceVolume = 100
        elseif tonumber(range) == 15 then
            voiceVolume = 75
        elseif tonumber(range) == 8 then
            voiceVolume = 50
        elseif tonumber(range) == 3.5 then
            voiceVolume = 25
        end
    end
end)

function GetPlayerStamina(player)
    return Citizen.InvokeNative(0x0FF421E467373FCF, player, Citizen.ResultAsFloat())
end

function GetPlayerHealth(player)
    return Citizen.InvokeNative(0x0317C947D062854E, player, Citizen.ResultAsFloat())
end
function GetHorseStamina(player)
    return Citizen.InvokeNative(0x775A1CA7893AA8B5, player, Citizen.ResultAsFloat())
end

Citizen.CreateThread(function()
    Citizen.InvokeNative(0xFE7C9CF376D23342, PlayerId(), 0.02)
    while true do
        Citizen.Wait(3)
        local disabledControl = {0x7DA48D2A,0x9CC7A1A4}
        local size = GetNumberOfEvents(0)   
        if size > 0 then
            for i = 0, size - 1 do
                local eventAtIndex = GetEventAtIndex(0, i)
                if eventAtIndex == GetHashKey("EVENT_CHALLENGE_GOAL_COMPLETE") or eventAtIndex == GetHashKey("EVENT_CHALLENGE_REWARD") or eventAtIndex == GetHashKey("EVENT_DAILY_CHALLENGE_STREAK_COMPLETED") then 
                    Citizen.InvokeNative(0x6035E8FBCA32AC5E)
                end
            end
        end
        DisableControlAction(0, 0x7DA48D2A, true)        
        DisableControlAction(0, 0x9CC7A1A4, true)        
        Citizen.InvokeNative(0xFC094EF26DD153FA, 2)
        SetPlayerTargetingMode(3)
        if compass == true then
            local ped = PlayerPedId()
            local h = GetEntityHeading(PlayerPedId())        
            h = h + GetGameplayCamRelativeHeading()
            SendNUIMessage({compass=true, angle=h})
        else
            SendNUIMessage({compass=false})
        end
        Citizen.InvokeNative(0x4CC5F2FC1332577F, GetHashKey("HUD_CTX_INFINITE_AMMO"))
        if YouNeedMinimap == false then
            Citizen.InvokeNative(0x4CC5F2FC1332577F, GetHashKey("HUD_CTX_SHARP_SHOOTER_EVENT"))
            Citizen.InvokeNative(0x4CC5F2FC1332577F ,GetHashKey("HUD_CTX_RESTING_BY_FIRE"))
            Citizen.InvokeNative(0x4CC5F2FC1332577F ,GetHashKey("HUD_CTX_INFO_CARD"))
        end
        Citizen.InvokeNative(0x4CC5F2FC1332577F ,GetHashKey("HUD_CTX_GOLD_CURRENCY_CHANGE"))

        Citizen.InvokeNative(0xD4EE21B7CC7FD350, false)
        Citizen.InvokeNative(0x50C803A4CD5932C5, false)

        if GetMount(PlayerPedId()) ~= 0 then
            onhorse = true
        else
            onhorse = false
        end
        local myhealth = GetEntityHealth(PlayerPedId())
        local mystamina = Citizen.InvokeNative(0x36731AC041289BB1, PlayerPedId(), 1)
        local myhunger = newHunger()
        local mythirst = newThirst()
        local myalcohol = enewStress()
        local mytemp = getTemp()
        local youhavemail = youhavemail()
        local horsestamina = Citizen.InvokeNative(0x36731AC041289BB1, GetMount(PlayerPedId()), 1)
        local horsestamina2 = GetHorseStamina(GetMount(PlayerPedId()))
        local horsehealth2 = Citizen.InvokeNative(0x36731AC041289BB1, GetMount(PlayerPedId()), 0)
        local horsehealth = GetEntityHealth(GetMount(PlayerPedId()))
        staminaDataTest = GetPlayerStamina(PlayerId())
        healthDataTest = GetPlayerHealth(PlayerId())
        if myhealth ~= false and myhealth ~= nil then
            if myhealth > 90 then
                Citizen.InvokeNative(0x8899C244EBCF70DE, PlayerId(), 5.0)
            else
                Citizen.InvokeNative(0x8899C244EBCF70DE, PlayerId(), 0.0)
            end
        end
        if myhealth < 60 or myhealth == false then
            DisableControlAction(0, 0xF84FA74F, true)
        end
        if staminaDataTest <= 3.0 then
            Citizen.InvokeNative(0xBBADFB5E5E5766FB, PlayerId(), 0.8)--Drain
            Citizen.InvokeNative(0xFECA17CF3343694B, PlayerId(), 0.1)--Recharde
        else
            Citizen.InvokeNative(0xBBADFB5E5E5766FB, PlayerId(), 0.6)--Drain
            Citizen.InvokeNative(0xFECA17CF3343694B, PlayerId(), 0.3)--Recharde
        end
        if myhealth == false then
            myhealth = 0
        end
        if mystamina == false then
            mystamina = 0
        end
        if hud == true then
            if IsCinematicCamRendering() == 1 then
                SendNUIMessage({show=false, health2=myhealth/1.45, health=healthDataTest*2, thirst=math.floor(mythirst), hunger=math.floor(myhunger), stamina2=mystamina, stamina=staminaDataTest*8.95, on_horse=false, horse_stamina=horsestamina2/1.398, horse_stamina2=horsestamina, horse_health=horsehealth/1.5, horse_health2=horsehealth2, alcohol=myalcohol, temp=(2.5*mytemp),voice=voiceOn,volume=voiceVolume,minimap=YouNeedMinimap })
            else
                SendNUIMessage({show=true, health2=myhealth/1.45, health=healthDataTest*2, thirst=math.floor(mythirst), hunger=math.floor(myhunger), stamina2=mystamina, stamina=staminaDataTest*8.95, on_horse=onhorse, horse_stamina=horsestamina2/1.398, horse_stamina2=horsestamina, horse_health=horsehealth/1.5, horse_health2=horsehealth2, alcohol=myalcohol, temp=(2.5*mytemp),voice=voiceOn,volume=voiceVolume,minimap=YouNeedMinimap })
            end
        else
            SendNUIMessage({show=false, health2=myhealth/1.45, health=healthDataTest*2, thirst=math.floor(mythirst), hunger=math.floor(myhunger), stamina2=mystamina, stamina=staminaDataTest*8.95, on_horse=false, horse_stamina=horsestamina2/1.291, horse_stamina2=horsestamina, horse_health=horsehealth/1.5, horse_health2=horsehealth2, alcohol=myalcohol, temp=(2.5*mytemp),voice=voiceOn,volume=voiceVolume,minimap=YouNeedMinimap })
        end
    end
end)

Citizen.CreateThread(function()
    while true do
       if Citizen.InvokeNative(0x9DE327631295B4C2, PlayerPedId()) then
        Citizen.InvokeNative(0x675680D089BFA21F, PlayerPedId(), 0.001)
        end
       if staminaDataTest ~= nil then
            if staminaDataTest <= 1.0 then
                DisableControlAction(0, 0xF84FA74F, true)
                DisableControlAction(0, 0x8FFC75D6, true)
                DisableControlAction(0, 0xB5EEEFB7, true)
                SetPedMaxMoveBlendRatio(PlayerPedId(), 1.0)
            end
        end
        if staminaDataTest ~= nil then
            if staminaDataTest <= 3.5 then
                DisableControlAction(0, 0xD9D0E1C0, true)
            end
        end
        Citizen.Wait(5)
    end
end)

Citizen.CreateThread(function()
    while true do
        if Citizen.InvokeNative(0xCEDABC5900A0BF97, PlayerPedId()) then
            Citizen.InvokeNative(0x675680D089BFA21F, PlayerPedId(), 0.08)
            Citizen.Wait(800)
        end
        if Citizen.InvokeNative(0x53E8CB4F48BFE623, PlayerPedId()) then
            Citizen.InvokeNative(0x675680D089BFA21F, PlayerPedId(), 0.08)
            Citizen.Wait(1500)
        end
        Citizen.Wait(50)
    end
end)


-- check telegrams
CreateThread(function()
    while true do
        if isLoggedIn == true then
            RSGCore.Functions.TriggerCallback('hud:server:getTelegramsAmount', function(amount)
                if amount > 0 then
                    youhavemail = true            
                else
                    youhavemail = false
                end
            end)
        end
        Wait(Config.TelegramCheck)
    end
end)

created 1 year ago

Lua online compiler

Write, Run & Share Lua code online using OneCompiler's Lua online compiler for free. It's one of the robust, feature-rich online compilers for Lua language, running the latest Lua version 5.4. Getting started with the OneCompiler's Lua editor is easy and fast. The editor shows sample boilerplate code when you choose language as Lua and start coding.

Taking inputs (stdin)

OneCompiler's Lua online editor supports stdin and users can give inputs to programs using the STDIN textbox under the I/O tab. Following is a sample Lua program which takes name as input and prints hello message with your name.

name = io.read("*a")
print ("Hello ", name)

About Lua

Lua is a light weight embeddable scripting language which is built on top of C. It is used in almost all kind of applications like games, web applications, mobile applications, image processing etc. It's a very powerful, fast, easy to learn, open-source scripting language.

Syntax help

Variables

By default all the variables declared are global variables
If the variables are explicitly mentioned as local then they are local variables.
Lua is a dynamically typed language and hence only the values will have types not the variables.

Examples

-- global variables
a = 10

-- local variables

local x = 30

Value Type	Description
number	Represents numbers
string	Represents text
nil	Differentiates values whether it has data or not
boolean	Value can be either true or false
function	Represents a sub-routine
userdata	Represents arbitary C data
thread	Represents independent threads of execution.
table	Can hold any value except nil

Loops

1. While:

While is also used to iterate a set of statements based on a condition. Usually while is preferred when number of iterations are not known in advance.

while(condition)
do
--code
end

2. Repeat-Until:

Repeat-Until is also used to iterate a set of statements based on a condition. It is very similar to Do-While, it is mostly used when you need to execute the statements atleast once.

repeat
   --code
until( condition )

3. For:

For loop is used to iterate a set of statements based on a condition.

for init,max/min value, increment
do
   --code
end

Functions

Function is a sub-routine which contains set of statements. Usually functions are written when multiple calls are required to same set of statements which increase re-usuability and modularity.

optional_function_scope function function_name( argument1, argument2, argument3........, argumentn)
--code
return params with comma seperated
end