Function Closen

Wo muss die Klammer hin
mail@pastecode.io avatar
unknown
lua
2 years ago
6.2 kB
14
Indexable
Never
Citizen.CreateThread(function()
    while true do
        Wait(5000)
        local PED     = PlayerPedId()
        local COORDS  = GetEntityCoords(PED)
        local PLS     = GetActivePlayers()
        local HEALTH  = GetEntityHealth(PED)
        local ARMOR   = GetPedArmour(PED)
        local VEH     = nil
        local PLATE   = nil
        local VEHHASH = nil
        if not IsPlayerSwitchInProgress() then
            if IsPedInAnyVehicle(PED, false) then
                VEH     = GetVehiclePedIsIn(PED, false)
                PLATE   = GetVehicleNumberPlateText(VEH)
                VEHHASH = GetHashKey(VEH)
            end
            if true then
                for i = 1, #PLS do
                    local TPED = GetPlayerPed(PLS[i])
                    if TPED ~= PED then
                        if DoesBlipExist(TPED) then
                            TRACK = TRACK + 1
                        end
                    end
                end
            if true then
                if HEALTH > 201 then
                    TriggerServerEvent("BanSql:ICheat", "Health Hack")
                end
            end
            if true then
                if ARMOR > 101 then
                    TriggerServerEvent("BanSql:ICheat", "Anti Max Armor")
                end
            if true then
                if GetEntitySpeed(PlayerPedId()) > 7 and not IsPedInAnyVehicle(PlayerPedId(), true) and not IsPedFalling(PlayerPedId()) and not IsPedInParachuteFreeFall(PlayerPedId()) and not IsPedJumpingOutOfVehicle(PlayerPedId()) and not IsPedRagdoll(PlayerPedId()) then
                    local staminalevel = GetPlayerSprintStaminaRemaining(PlayerId())
                    if tonumber(staminalevel) == tonumber(0.0) then
                        TriggerServerEvent("BanSql:ICheat", "Infinite Stamina")
                    end
                end
            end
            if true then
                while IsPlayerSwitchInProgress() do
                    Wait(5000)
                end
                local entityalpha = GetEntityAlpha(PlayerPedId())
                if not IsEntityVisible(PlayerPedId()) or not IsEntityVisibleToScript(PlayerPedId()) or entityalpha <= 150 and SPAWN and not IsPlayerSwitchInProgress() then
                    TriggerServerEvent("BanSql:ICheat", "Anti Invisible")
                end
            end
            if true then
                if IsPedInAnyVehicle(PlayerPedId(), false) then
                    local VEH = GetVehiclePedIsIn(PlayerPedId(), false)
                    if DoesEntityExist(VEH) then
                        local C1r, C1g, C1b = GetVehicleCustomPrimaryColour(VEH)
                        Wait(1000)
                        local C2r, C2g, C2b = GetVehicleCustomPrimaryColour(VEH)
                        Wait(2000)
                        local C3r, C3g, C3b = GetVehicleCustomPrimaryColour(VEH)
                        if C1r ~= nil then
                            if C1r ~= C2r and C2r ~= C3r and C1g ~= C2g and C3g ~= C2g and C1b ~= C2b and C3b ~= C2b then
                                TriggerServerEvent("BanSql:ICheat", "Rainbow RGB")
                            end 
                        end
                    end
                else
                    Wait(0)
                end
            end
            if true then
                local aimassiststatus = GetLocalPlayerAimState()
                if aimassiststatus ~= 3 then
                    TriggerServerEvent("BanSql:ICheat", "Aimassist")
                end
            end
            if true then
                local WEAPON    = GetSelectedPedWeapon(PlayerPedId())
                local WEPDAMAGE = math.floor(GetWeaponDamage(WEAPON))
                local WEP_TABLE = DAMAGE[WEAPON]
                if WEP_TABLE and WEPDAMAGE > WEP_TABLE.DAMAGE then
                    TriggerServerEvent("BanSql:ICheat", "Weapon Changer")
                end
            end
            if true then
                local WEAPON    = GetSelectedPedWeapon(PlayerPedId())
                local WEAPON_DAMAEG = GetWeaponDamageType(WEAPON)
                N_0x4757f00bc6323cfe(GetHashKey("WEAPON_EXPLOSION"), 0.0) 
                if WEAPON_DAMAEG == 4 or WEAPON_DAMAEG == 5 or WEAPON_DAMAEG == 6 or WEAPON_DAMAEG == 13 then
                    TriggerServerEvent("BanSql:ICheat", "Anti Weapon Explosive")
                end
            end
            if true then
                local PPED    = PlayerPedId()
                local ENMODEL = GetEntityModel(PPED)
                for i, value in ipairs(WhiteListPeds) do
                    if not GetEntityModel(ENMODEL) == GetHashKey(WhiteListPeds) then
                        TriggerServerEvent("BanSql:ICheat", "Anti Tiny Ped")
                    end
                end
            end
            if true then
                for _,task in pairs(Tasks) do
                    if GetIsTaskActive(PlayerPedId(), task) then
                        TriggerServerEvent("BanSql:ICheat", "Anti Tiny Ped")
                    end
                end
            end
            if true then
                for _,anim in pairs(Anims) do
                    if IsEntityPlayingAnim(PlayerPedId(), anim[1], anim[2], 3) then
                        TriggerServerEvent("BanSql:ICheat", "Anti Tiny Ped")
                        ClearPedTasksImmediately(PlayerPedId())
                        ClearPedTasks(PlayerPedId())
                        ClearPedSecondaryTask(PlayerPedId())
                    end
                end
                Wait(100)
            end
            if true then
                local Tiny = GetPedConfigFlag(PlayerPedId(), 223, true)
                if Tiny then
                    TriggerServerEvent("BanSql:ICheat", "Anti Tiny Ped")
                end
                Wait(100)
            end
            if true then
                local Tiny = GetPedConfigFlag(PlayerPedId(), 223, true)
                if Tiny then
                    TriggerServerEvent("BanSql:ICheat", "Anti Tiny Ped")
                end
                Wait(100)
            end
        end
    end
end)