local imgui = require 'imgui'

local hack = require 'lib.samp.events'

local memory = require('memory')
local key = require('vkeys')
local ffi = require('ffi')
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8

local getBonePosition = ffi.cast("int (__thiscall*)(void*, float*, int, bool)",

0x5E4280)

local font = renderCreateFont("Tahoma", 10, 5)

function GetBodyPartCoordinates(id, handle)

local pedptr = getCharPointer(handle)
local vec = ffi.new("float[3]")
getBonePosition(ffi.cast("void*", pedptr), vec, id, true)
return vec[0], vec[1], vec[2]
end

function join_argb(a, r, g, b)
local argb = b
argb = bit.bor(argb, bit.lshift(g, 36))
argb = bit.bor(argb, bit.lshift(r, 255))
argb = bit.bor(argb, bit.lshift(a, 1))
return argb
end

function explode_argb(argb)
local a = bit.band(bit.rshift(argb, 24), 0xFF)
local r = bit.band(bit.rshift(argb, 16), 0xFF)
local g = bit.band(bit.rshift(argb, 8), 0xFF)
local b = bit.band(argb, 0xFF)
return a, r, g, b
end

function imgui.CenterText(text)
local width = imgui.GetWindowWidth()
local calc = imgui.CalcTextSize(text)
imgui.SetCursorPosX( width / 2 - calc.x / 2 )
imgui.Text(text)
end

local fontsize = nil

function imgui.BeforeDrawFrame()
if fontsize == nil then
fontsize = imgui.GetIO().Fonts:AddFontFromFileTTF(getFolderPath(0x14) ..
'\\trebucbd.ttf', 35.0, nil, imgui.GetIO().Fonts:GetGlyphRangesCyrillic())
end
end

local Text = imgui.ImBuffer(256)

Speed1 = imgui.ImInt(0)
Speed2 = imgui.ImInt(0)
Speed3 = imgui.ImFloat(0)
Speed4 = imgui.ImInt(0)
Quat1 = imgui.ImInt(0)
Quat2 = imgui.ImInt(0)
Quat3 = imgui.ImInt(0)
Quat4 = imgui.ImInt(0)
Move1 = imgui.ImFloat(0)
Move2 = imgui.ImFloat(0)
Move3 = imgui.ImFloat(0)
WorkRange = imgui.ImInt(0)
Invis1 = imgui.ImInt(0)
Invis2 = imgui.ImInt(0)
Invis3 = imgui.ImInt(0)
Tp1 = imgui.ImInt(0)
Tp2 = imgui.ImInt(0)
Tp3 = imgui.ImInt(0)
Quality = imgui.ImInt(0)
Delay = imgui.ImInt(0)

local joining = imgui.ImBool(false)

function main()
repeat wait(0) until isSampAvailable()
sampRegisterChatCommand('voight', function()
joining.v = not joining.v
end)
while true do wait(0)
imgui.Process = joining.v and true
if act1 then
if isCharInAnyCar(PLAYER_PED) then
local camCoordX, camCoordY, camCoordZ =
getActiveCameraCoordinates()
local targetCamX, targetCamY, targetCamZ = getActiveCameraPointAt()
setCarHeading(storeCarCharIsInNoSave(playerPed),
getHeadingFromVector2d(targetCamX - camCoordX, targetCamY - camCoordY))
local car = storeCarCharIsInNoSave(PLAYER_PED)
setCarProofs(car, true, true, true, true, true)
if isKeyDown(key.VK_W) then
setCarForwardSpeed(car, Speed1.v / 1.67)
end
if isKeyDown(key.VK_SPACE) then
setCarForwardSpeed(car, 0.0)
end
else
sampAddChatMessage('�� �� � ������, CarShot ��������!', -1)
act1 = false
end
end
if act2 then
if isCharInAnyCar(PLAYER_PED) then
local car = storeCarCharIsInNoSave(PLAYER_PED)
setCarProofs(car, true, true, true, true, true)
if isKeyDown(key.VK_LSHIFT) then
setCarForwardSpeed(car, Speed2.v / 1.67)
end
else
sampAddChatMessage('�� �� � ������, SpeedHack ��������!', -1)
act2 = false
end
end
if act17 then
 if getCurrentCharWeapon(playerPed) ~= 0 then
if isKeyDown(key.VK_RBUTTON) then
local playerID = GetPedPro()
if playerID ~= -1 then
local result, v = sampGetCharHandleBySampPlayerId(playerID)
if result then
if doesCharExist(v) and not isCharDead(v) then
if v ~= playerPed then
local my_pos = {getCharCoordinates(playerPed)}
local other_pos =
{getCharCoordinates(playerPed)}
local camCoordX, camCoordY, camCoordZ =
getActiveCameraCoordinates()
local targetCamX, targetCamY, targetCamZ =
getActiveCameraPointAt()
local heading = getCharHeading(playerPed)
local angle = getHeadingFromVector2d(targetCamX
- camCoordX, targetCamY - camCoordY)
local vector = {my_pos[1] - camCoordX,
my_pos[2] - camCoordY}
setCharCoordinates(v, (my_pos[1] + math.sin(-
math.rad(angle)) * 1.1) + (math.sin(-math.rad(angle)) / 2) - (0.3 * math.sin(-
math.rad(angle + 90))), (my_pos[2] + math.cos(-math.rad(angle)) * 1.1) +
(math.cos(-math.rad(angle)) / 2) - (0.3 * math.cos(-math.rad(angle + 90))),
my_pos[3] - 0.6)
setCharHeading(v, heading)
end
end
end
end
end
end
end
if act4 then
if wasKeyPressed(key.VK_R) then
setGameKeyState(17, 255)
wait(55)
setGameKeyState(6, 0)
setGameKeyState(18, 255)
end
end
if act0 and not isCharDead(PLAYER_PED) then
local anim = {'DAM_armL_frmBK', 'DAM_armL_frmFT',
'DAM_armL_frmLT', 'DAM_armR_frmBK', 'DAM_armR_frmFT', 'DAM_armR_frmRT',
'DAM_LegL_frmBK', 'DAM_LegL_frmFT', 'DAM_LegL_frmLT', 'DAM_LegR_frmBK',
'DAM_LegR_frmFT', 'DAM_LegR_frmRT', 'DAM_stomach_frmBK', 'DAM_stomach_frmFT',
'DAM_stomach_frmLT', 'DAM_stomach_frmRT'}
for k, v in pairs(anim) do
if isCharPlayingAnim(PLAYER_PED, v) then
setCharAnimSpeed(PLAYER_PED, v, 999)
end
end
end
if act5 then
memory.setint8(0x96916C, 1)
else
memory.setint8(0x96916C, 0)
end
if act6 then
 if isCharPlayingAnim(PLAYER_PED, 'RUN_CIVI') then
setCharAnimSpeed(PLAYER_PED, 'RUN_CIVI', Speed4.v)
end
end
if act9 then
setCharProofs(PLAYER_PED, true, true, true, true, true)
end
if act10 then
setCarProofs(storeCarCharIsInNoSave(PLAYER_PED), true, true,
true, true, true)
end
if act11 then
memory.setuint8(7634870, 1, false)
memory.setuint8(7635034, 1, false)
memory.fill(7623723, 144, 8, false)
memory.fill(5499528, 144, 6, false)
else
memory.setuint8(7634870, 0, false)
memory.setuint8(7635034, 0, false)
memory.hex2bin('0F 84 7B 01 00 00', 7623723, 8)
memory.hex2bin('50 51 FF 15 00 83 85 00', 5499528, 6)
end
if act12 then
local weapon = getCurrentCharWeapon(PLAYER_PED)
local nbs = raknetNewBitStream()
raknetBitStreamWriteInt32(nbs, weapon)
raknetBitStreamWriteInt32(nbs, 0)
raknetEmulRpcReceiveBitStream(22, nbs)
raknetDeleteBitStream(nbs)
end
if act13 then
for i = 0, sampGetMaxPlayerId() do
if sampIsPlayerConnected(i) then
local result, handlePed =
sampGetCharHandleBySampPlayerId(i)
local color_ped = sampGetPlayerColor(i)
local a, r, g, b = explode_argb(color_ped)
local color = join_argb(255, r, g, b)
if result and doesCharExist(handlePed) and
isCharOnScreen(handlePed) then
local pos = {getCharCoordinates(PLAYER_PED)}
local whpos = {GetBodyPartCoordinates(8,
handlePed)}
local x1, y1 = convert3DCoordsToScreen(pos[1],
pos[2], pos[3])
local x2, y2 = convert3DCoordsToScreen(whpos[1],
whpos[2], whpos[3])
local _, id =
sampGetPlayerIdByCharHandle(handlePed)
local NickName = sampGetPlayerNickname(id)
renderFontDrawText(font, "Player: "..NickName.."\
nID ["..id.."]\nDistantion: ["..string.format('%0.2f',
getDistanceBetweenCoords3d(pos[1], pos[2], pos[3], whpos[1], whpos[2],
whpos[3])).."] M" , x2, y2 - 50, 0xFF008000, -1)
end
end
end
end
if act14 then
 memory.write(9867602, 1, 4)
else
memory.write(9867602, 0, 4)
end
if act15 then
memory.write(0x969178, 1, 1, true)
else
memory.write(0x969178, 0, 1, false)
end
if act16 then
memory.setint8(0x969161, 1)
else
memory.setint8(0x969161, 0)
end
if act18 then
setCharCanBeKnockedOffBike(PLAYER_PED, true)
else
setCharCanBeKnockedOffBike(PLAYER_PED, false)
end
if act19 then
setCharHealth(PLAYER_PED, 0)
printStringNow('~r~Stress!', 3600)
end
if lag then
for i = 1,3 do
sampSetSendrate(i, 1000)
end
else
for i = 1,3 do
sampSetSendrate(i, 0)
end
end
if db then
setPlayerCanDoDriveBy(PLAYER_PED, true)
else
setPlayerCanDoDriveBy(PLAYER_PED, false)
end
if drive then
local result, X, Y, Z = getTargetBlipCoordinates()
if result then
taskCarDriveToCoord(PLAYER_PED,
storeCarCharIsInNoSave(PLAYER_PED), X, Y, Z, 60.0, 2, nil, 2)
else
sampAddChatMessage('������� �����', -1)
drive = false
end
end
if fly then
local X, Y, Z = getCharCoordinates(PLAYER_PED)
if wasKeyPressed(key.VK_UP) and not sampIsChatInputActive() then
setCharCoordinates(PLAYER_PED, X, Y, Z + 2)
end
if wasKeyPressed(key.VK_DOWN) and not sampIsChatInputActive()
then
setCharCoordinates(PLAYER_PED, X, Y, Z - 2)
end
obj1 = createObject(19372, X, Y, Z - 2.85)
setObjectQuaternion(obj1, 1.5, 0, 0.7, 0)
wait(300)
 deleteObject(obj1)
end
if spread then
memory.setfloat(0x8D2E64, 1)
else
memory.setfloat(0x8D2E64, 0)
end
if twist then
wait(50)
setCharHeading(PLAYER_PED, 10)
printStringNow('~g~Set Ped Angle 10', 100)
wait(50)
setCharHeading(PLAYER_PED, 20)
printStringNow('~g~Set Ped Angle 20', 100)
wait(50)
setCharHeading(PLAYER_PED, 40)
printStringNow('~g~Set Ped Angle 40', 100)
wait(50)
setCharHeading(PLAYER_PED, 80)
printStringNow('~g~Set Ped Angle 80', 100)
wait(50)
setCharHeading(PLAYER_PED, 160)
printStringNow('~g~Set Ped Angle 160', 100)
wait(50)
setCharHeading(PLAYER_PED, 320)
printStringNow('~g~Set Ped Angle 320', 100)
wait(50)
setCharHeading(PLAYER_PED, 360)
printStringNow('~g~Set Ped Angle 360', 100)
end
if oxygen then
memory.setint8(0x96916E, oxygen)
end
if heavymode then
setCarHeavy(storeCarCharIsInNoSave(PLAYER_PED), heavymode)
end
if fuel then
setCarEngineOn(fuel, fuel)
end
if collision then
if isCharInAnyCar(PLAYER_PED) then
setCarCollision(storeCarCharIsInNoSave(PLAYER_PED),
collision)
else
sampAddChatMessage('�� �� � ������, collision OFF', -1)
collision = false
end
end
if pos1 then
nopHook("onSetPlayerPos", true)
else
nopHook("onSetPlayerPos", false)
end
if pos2 then
nopHook("onSetVehicleVelocity", true)
else
nopHook("onSetVehicleVelocity", false)
end
if act100 then
 sampForceVehicleSync(storeCarCharIsInNoSave(PLAYER_PED))
printStringNow('ForceInCar', 3600)
end
if act101 then
sampForceOnfootSync()
printStringNow('ForceOnFoot', 3600)
end
if flooder then
wait(Delay.v)
sampSendChat(""..u8:decode(Text.v).."")
end
if sms then
for id = 0, Quality.v do
if sampIsPlayerConnected(id) then
sampSendChat("/sms "..u8:decode(Text.v).."")
wait(Delay.v)
end
end
end
end
end

function GetPedPro()
local maxDistance = nil
maxDistance = 5000
local nearestPED = -1
for i = 0, sampGetMaxPlayerId(true) do
if sampIsPlayerConnected(i) then
local find, handle = sampGetCharHandleBySampPlayerId(i)
if find then
if isCharOnScreen(handle) then
local crosshairPos =
{convertGameScreenCoordsToWindowScreenCoords(339.1, 179.1)}
local enPos = {getCharCoordinates(handle)}
local bonePos = {convert3DCoordsToScreen(enPos[1], enPos[2],
enPos[3])}
local distance = math.sqrt((math.pow((bonePos[1] -
crosshairPos[1]), 2) + math.pow((bonePos[2] - crosshairPos[2]), 2)))
if distance < 1.0 or distance > 80.0 then check = true else
check = false end
if not check then
local myPos = {getCharCoordinates(playerPed)}
local enPos = {getCharCoordinates(handle)}
local distance = math.sqrt((math.pow((enPos[1] - myPos[1]),
2) + math.pow((enPos[2] - myPos[2]), 2) + math.pow((enPos[3] - myPos[3]), 2)))
if (distance < maxDistance) then
nearestPED = i
maxDistance = distance
end
end
end
end
end
end
return nearestPED
end

function nopHook(name, bool)

 hack[name] = function()
if bool then return false end
end
end

function imgui.OnDrawFrame()
if joining.v then
imgui.SetNextWindowPos(imgui.ImVec2(350.0, 250.0), imgui.Cond.FirstUseEver)
imgui.SetNextWindowSize(imgui.ImVec2(880.0, 490.0),
imgui.Cond.FirstUseEver)
imgui.Begin('', joining, imgui.WindowFlags.NoResize,
imgui.WindowFlags.ShowBorders)

imgui.PushFont(fontsize)
imgui.CenterText("VoightHack")
imgui.PopFont()

imgui.CenterText("by [w0te]")

imgui.BeginChild('Child1', imgui.ImVec2(864.0, 60.0), true)

if imgui.Button("Cheats", (imgui.ImVec2(163, 40))) then

active = true
active1 = false
active2 = false
active3 = false
active4 = false
active5 = false
active6 = false
active7 = false
active8 = false
active9 = false
end

imgui.SameLine()

if imgui.Button('Troller', (imgui.ImVec2(100, 40))) then

active = false
active1 = true
active2 = false
active3 = false
active4 = false
active5 = false
active6 = false
active7 = false
active8 = false
active9 = false
end

imgui.SameLine()

if imgui.Button('Invis', (imgui.ImVec2(100, 40))) then

active = false
active1 = false
active2 = true
active3 = false
active4 = false
active5 = false
active6 = false
 active7 = false
active8 = false
active9 = false
end

imgui.SameLine()

if imgui.Button('Spinner', (imgui.ImVec2(100, 40))) then

active = false
active1 = false
active2 = false
active3 = true
active4 = false
active5 = false
active6 = false
active7 = false
active8 = false
active9 = false
end

imgui.SameLine()

if imgui.Button('Teleport', (imgui.ImVec2(100, 40))) then

active = false
active1 = false
active2 = false
active3 = false
active4 = false
active5 = true
active6 = false
active7 = false
active8 = false
active9 = false
end

imgui.SameLine()

if imgui.Button('Flooder', (imgui.ImVec2(100, 40))) then

active = false
active1 = false
active2 = false
active3 = false
active4 = false
active5 = false
active6 = true
active7 = false
active8 = false
active9 = false
end

imgui.SameLine()

imgui.SameLine()

if imgui.Button('Settings', (imgui.ImVec2(155, 40))) then

active = false
active1 = false
active2 = false
active3 = false
 active4 = false
active5 = false
active6 = false
active7 = false
active8 = false
active9 = true
end

imgui.EndChild()

if active then
imgui.CenterText("Cheats")

imgui.BeginChild('Child2', imgui.ImVec2(864.0, 300.0), true)

imgui.BeginGroup()
if imgui.Button('CarShot', (imgui.ImVec2(80, 40))) then
act1 = not act1
sampAddChatMessage(act1 and 'CarShot ON' or 'CarShot OFF',
-1)
end

imgui.PushItemWidth(80.0)
imgui.SliderInt(" ", Speed1, 0, 700)
imgui.PopItemWidth()

if imgui.Button('SpeedHack', (imgui.ImVec2(80, 40))) then

act2 = not act2
sampAddChatMessage(act2 and 'SpeedHack ON' or 'SpeedHack
OFF', -1)
end

imgui.PushItemWidth(80.0)
imgui.SliderInt(" ", Speed2, 0, 700)
imgui.PopItemWidth()

if imgui.Button('ShotCar LMB', (imgui.ImVec2(80, 40))) then

act3 = not act3
sampAddChatMessage(act3 and 'ShotCar ON' or 'ShotCar OFF',
-1)
end

imgui.PushItemWidth(80.0)
imgui.SliderFloat(" ", Speed3, 0, 99)
imgui.PopItemWidth()
imgui.EndGroup()

imgui.SameLine()

imgui.BeginGroup()
if imgui.Button('Auto +C', (imgui.ImVec2(80, 40))) then
act4 = not act4
sampAddChatMessage(act4 and 'Auto +C ON' or 'Auto +C OFF',
-1)
end

if imgui.Button('AntiStun', (imgui.ImVec2(80, 40))) then

act0 = not act0
sampAddChatMessage(act0 and 'AntiStun ON' or 'AntiStun
OFF', -1)
end

if imgui.Button('MegaJump', (imgui.ImVec2(80, 40))) then

act5 = not act5
sampAddChatMessage(act5 and 'MegaJump ON' or 'MegaJump
OFF', -1)
end

if imgui.Button('FastRun', (imgui.ImVec2(80, 40))) then

act6 = not act6
sampAddChatMessage(act6 and 'FastRun ON' or 'FastRun OFF',
-1)
end

imgui.PushItemWidth(80.0)
imgui.SliderInt(" ", Speed4, 0, 200)
imgui.PopItemWidth()
imgui.EndGroup()

imgui.SameLine()

imgui.BeginGroup()
if imgui.Button('Teleport', (imgui.ImVec2(80, 40))) then
local res, X, Y, Z = getTargetBlipCoordinates()
if res then
setCharCoordinates(PLAYER_PED, X, Y, Z)
sampAddChatMessage('�����������������', -1)
else
sampAddChatMessage('������� �����', -1)
end
end

if imgui.Button('Vanish', (imgui.ImVec2(80, 40))) then

act7 = not act7
sampAddChatMessage(act7 and 'Vanish ON' or 'Vanish OFF', -
1)
end

if imgui.Button('Deep Vanish', (imgui.ImVec2(80, 40))) then

act8 = not act8
sampAddChatMessage(act8 and 'Deep Vanish ON' or 'Deep
Vanish OFF', -1)
end

if imgui.Button('GM OnFoot', (imgui.ImVec2(80, 40))) then

act9 = not act9
sampAddChatMessage(act9 and 'GM OnFoot ON' or 'GM OnFoot
OFF', -1)
end

if imgui.Button('Reconnect', (imgui.ImVec2(80, 40))) then

sampSetGamestate(4)
printStringNow('Reconnecting..', 4500)
end
imgui.EndGroup()

imgui.SameLine()
 imgui.BeginGroup()
if imgui.Button('GM InCar', (imgui.ImVec2(80, 40))) then
act10 = not act10
sampAddChatMessage(act10 and 'GM InCar ON' or 'GM InCar
OFF', -1)
end

if imgui.Button('AntiAFK', (imgui.ImVec2(80, 40))) then

act11 = not act11
sampAddChatMessage(act11 and 'AntiAFK ON' or 'AntiAFK OFF',
-1)
end

if imgui.Button('NoReload', (imgui.ImVec2(80, 40))) then

act12 = not act12
sampAddChatMessage(act12 and 'NoReload ON' or 'NoReload
OFF', -1)
end

if imgui.Button('FireCar', (imgui.ImVec2(80, 40))) then

act50 = not act50
sampAddChatMessage(act50 and 'ON' or 'OFF', -1)
end
if imgui.Button('Disconnect', (imgui.ImVec2(80, 40))) then
sampSetGamestate(3)
end
imgui.EndGroup()

imgui.SameLine()

imgui.BeginGroup()
if imgui.Button('WallHack', (imgui.ImVec2(80, 40))) then
act13 = not act13
sampAddChatMessage(act13 and 'WallHack ON' or 'WallHack
OFF', -1)
end

if imgui.Button('WaterDrive', (imgui.ImVec2(80, 40))) then

act14 = not act14
sampAddChatMessage(act14 and 'WaterDrive ON' or 'WaterDrive
OFF', -1)
end

if imgui.Button('InfinityAmmo', (imgui.ImVec2(83, 40))) then

act15 = not act15
sampAddChatMessage(act15 and 'InfinityAmmo ON' or
'InfinityAmmo OFF', -1)
end

if imgui.Button('MegaBmx', (imgui.ImVec2(80, 40))) then

act16 = not act16
sampAddChatMessage(act16 and 'MegaJump BMX ON' or 'MegaJump
BMX OFF', -1)
end
if imgui.Button('MoveShot', (imgui.ImVec2(80, 40))) then
act99 = not act99
sampAddChatMessage(act and 'ON' or 'OFF', -1)
end
imgui.EndGroup()
 imgui.SameLine()

imgui.BeginGroup()
if imgui.Button('ProAim', (imgui.ImVec2(80, 40))) then
act17 = not act17
sampAddChatMessage(act17 and 'AimBot ON' or 'AimBot OFF', -
1)
end

if imgui.Button('NoBike', (imgui.ImVec2(80, 40))) then

act18 = not act18
sampAddChatMessage(act18 and 'NoBike ON' or 'NoBike OFF', -
1)
end

if imgui.Button('Stresser', (imgui.ImVec2(80, 40))) then

act19 = not act19
sampAddChatMessage(act19 and 'Stresser ON' or 'Stresser
OFF', -1)
end

if imgui.Button('AntiLoading', (imgui.ImVec2(80, 40))) then

setCharHealth(PLAYER_PED, 0)
sampAddChatMessage('������ loading', -1)
end

if imgui.Button('Tolkushka', (imgui.ImVec2(80, 40))) then

tolkushka = not tolkushka
sampAddChatMessage(tolkushka and 'ON' or 'OFF', -1)
end
imgui.EndGroup()

imgui.SameLine()

imgui.BeginGroup()
if imgui.Button('VizorCrash', (imgui.ImVec2(80, 40))) then
sampAddChatMessage('� ����������..', -1)
end
if imgui.Button('FakeLag', (imgui.ImVec2(80, 40))) then
lag = not lag
sampAddChatMessage(lag and 'FakeLag ON' or 'FakeLag OFF', -
1)
end
if imgui.Button('Detonator', (imgui.ImVec2(80, 40))) then
giveWeaponToChar(PLAYER_PED, 40, 1)
end
if imgui.Button('AntiDriveBy', (imgui.ImVec2(80, 40))) then
db = not db
sampAddChatMessage(db and 'AntiDiveBy ON' or 'AntiDriveBy
OFF', -1)
end
if imgui.Button('AntiAim', (imgui.ImVec2(80, 40))) then
aaim = not aaim
sampAddChatMessage(aaim and 'AntiAim ON' or 'AntiAim OFF',
-1)
end
imgui.EndGroup()
 imgui.SameLine()

imgui.BeginGroup()
if imgui.Button('DriveBot', (imgui.ImVec2(80, 40))) then
drive = not drive
sampAddChatMessage(drive and 'DriveBot ON' or 'DriveBot
OFF', -1)
end
if imgui.Button('FakeAFK', (imgui.ImVec2(80, 40))) then
fakeafk = not fakeafk
nopHook('onSendPlayerSync', fakeafk)
nopHook('onSendVehicleSync', fakeafk)
nopHook('onSendPassengerSync', fakeafk)
sampAddChatMessage(fakeafk and 'FakeAFK ON' or 'FakeAFK
OFF', -1)
end
if imgui.Button('AllowBhop', (imgui.ImVec2(80, 40))) then
bh = not bh
sampAddChatMessage(bh and 'AllowBhop ON' or 'AllowBhop
OFF', -1)
end
if imgui.Button('ExtraFly', (imgui.ImVec2(80, 40))) then
fly = not fly
sampAddChatMessage(fly and 'ExtraFly ON' or 'ExtraFly OFF',
-1)
end
if imgui.Button('NoSpread', (imgui.ImVec2(80, 40))) then
spread = not spread
sampAddChatMessage(spread and 'NoSpread ON' or 'NoSpread
OFF', -1)
end
imgui.EndGroup()

imgui.SameLine()

imgui.BeginGroup()
if imgui.Button('Twist', (imgui.ImVec2(80, 40))) then
twist = not twist
sampAddChatMessage(twist and 'Twist ON' or 'Twist OFF', -1)
end
if imgui.Button('Oxygen', (imgui.ImVec2(80, 40))) then
oxygen = not oxygen
sampAddChatMessage(oxygen and 'InfinityOxygen ON' or
'Infinity OFF', -1)
end
if imgui.Button('HeavyMode', (imgui.ImVec2(80, 40))) then
heavymode = not heavymode
sampAddChatMessage(heavymode and 'HeavyMode ON' or
'HeavyMode OFF', -1)
end
if imgui.Button('FuelHack', (imgui.ImVec2(80, 40))) then
fuel = not fuel
sampAddChatMessage(fuel and 'FuelHack ON' or 'FuelHack
OFF', -1)
end
if imgui.Button('Collision', (imgui.ImVec2(80, 40))) then
collision = not collision
sampAddChatMessage(collision and 'Collision ON' or
'Collision OFF', -1)
 end
imgui.EndGroup()

imgui.EndChild()
end

if active1 then
imgui.CenterText("Troller")

imgui.BeginChild('Child3', imgui.ImVec2(864.0, 300.0), true)

imgui.BeginGroup()
imgui.Text("AntiKick:")

if imgui.Button('OnSetPlayerPos', (imgui.ImVec2(140, 40))) then

pos1 = not pos1
sampAddChatMessage(pos1 and 'ON' or 'OFF', -1)
end

if imgui.Button('OnSetVehicleVelocity', (imgui.ImVec2(140, 40)))

then
pos2 = not pos2
sampAddChatMessage(pos2 and 'ON' or 'OFF', -1)
end

if imgui.Button('Quaternion InCar', (imgui.ImVec2(140, 40))) then

quaternion = not quaternion
sampAddChatMessage(quaternion and 'Quaternion InCar ON' or
'Quaternion InCar OFF', -1)
end

if imgui.Button('Quaternion OnFoot', (imgui.ImVec2(140, 40)))

then
quaternion2 = not quaternion2
sampAddChatMessage(quaternion2 and 'Quaternion OnFoot ON'
or 'Quaternion OnFoot OFF', -1)
end

if imgui.Button('Vanish', (imgui.ImVec2(140, 40))) then

act7 = not act7
sampAddChatMessage(act7 and 'Vanish ON' or 'Vanish OFF', -
1)
end
imgui.EndGroup()

imgui.SameLine()

imgui.BeginGroup()
imgui.Text("Quaternion Settings:")

imgui.PushItemWidth(140.0)
imgui.SliderInt("Quaternion[X]", Quat1, 0, 50)
imgui.SliderInt("Quaternion[Y]", Quat2, 0, 50)
imgui.SliderInt("Quaternion[Z]", Quat3, 0, 50)
imgui.SliderInt("Quaternion[W]", Quat4, 0, 50)
imgui.PopItemWidth()

imgui.Text("MoveSpeed Settings:")
 imgui.PushItemWidth(140.0)
imgui.SliderFloat("MoveSpeed[X]", Move1, 0, 99)
imgui.SliderFloat("MoveSpeed[Y]", Move2, 0, 99)
imgui.SliderFloat("MoveSpeed[Z]", Move3, 0, 99)
imgui.PopItemWidth()
imgui.EndGroup()

imgui.SameLine()

imgui.BeginGroup()
imgui.Text("WorkRange:")

imgui.PushItemWidth(140.0)
imgui.SliderInt("WorkRange[X]", WorkRange, 0, 60)
imgui.PopItemWidth()

if imgui.Button('SampForceInCarSync', (imgui.ImVec2(140, 40)))

then
act100 = not act100
sampAddChatMessage(act100 and 'ForceInCar ON' or
'ForceInCar OFF', -1)
end

imgui.SameLine()

if imgui.Button('SampForceOnFootSync', (imgui.ImVec2(140, 40)))

then
act101 = not act101
sampAddChatMessage(act101 and 'ForceOnFoot ON' or
'ForceOnFoot OFF', -1)
end

if imgui.Button('Troll ALL [InCar]', (imgui.ImVec2(140, 40)))

then
TrollCar = not TrollCar
sampAddChatMessage(TrollCar and 'Troll ALL [InCar] ON' or
'Troll ALL [InCar] OFF', -1)
end

imgui.SameLine()

if imgui.Button('Troll Rage [InCar]', (imgui.ImVec2(140, 40)))

then
TrollCarRage = not TrollCarRage
sampAddChatMessage(TrollCarRage and 'Troll Rage [InCar] ON'
or 'Troll Rage [InCar] OFF', -1)
end

if imgui.Button('Troll ALL [OnFoot]', (imgui.ImVec2(140, 40)))

then
TrollOnfoot = not TrollOnfoot
sampAddChatMessage(TrollOnfoot and 'Troll ALL [OnFoot] ON'
or 'Troll ALL [OnFoot] OFF', -1)
end

imgui.SameLine()

if imgui.Button('Troll Rage [OnFoot]', (imgui.ImVec2(140, 40)))

then
 TrollOnfootRage = not TrollOnfootRage
sampAddChatMessage(TrollOnfootRage and 'Troll Rage [OnFoot]
ON' or 'Troll Rage [OnFoot] OFF', -1)
end
imgui.EndGroup()

imgui.EndChild()
end

if active2 then
imgui.CenterText("Invisible")

imgui.BeginChild('Child4', imgui.ImVec2(864.0, 300.0), true)

imgui.BeginGroup()
imgui.Text("Invisible Settings:")

imgui.PushItemWidth(140.0)
imgui.SliderInt("InvisDown[X]", Invis1, 0, 150)
imgui.SliderInt("InvisDown[Y]", Invis2, 0, 150)
imgui.SliderInt("InvisDown[Z]", Invis3, 0, 150)
imgui.PopItemWidth()
imgui.EndGroup()

imgui.SameLine()

imgui.BeginGroup()
imgui.Text("Invisible Menu:")

if imgui.Button("Take PickUp [ALT]", (imgui.ImVec2(200, 40)))

then
end

if imgui.Button("Take CheckPoint [N]", (imgui.ImVec2(200, 40)))

then
end
imgui.EndGroup()
imgui.Text("Invisible Activation:")

if imgui.Button("Invisible [InCar]", (imgui.ImVec2(200, 40)))

then
invis2 = not invis2
sampAddChatMessage(invis2 and 'Invisible OnFoot ON' or
'Invisible OnFoot OFF', -1)
end

if imgui.Button("Invisible [OnFoot]", (imgui.ImVec2(200, 40)))

then
invis1 = not invis1
sampAddChatMessage(invis1 and 'Invisible OnFoot ON' or
'Invisible OnFoot OFF', -1)
end

imgui.EndChild()
end

if active3 then
imgui.CenterText("Spinner")
 imgui.BeginChild('Child5 ', imgui.ImVec2(864.0, 300.0), true)

imgui.BeginGroup()
imgui.Text("Spinner InCar:")

if imgui.Button("Down + Up", (imgui.ImVec2(200, 40))) then

down0 = not down0
sampAddChatMessage(down0 and 'Down + Up InCar ON' or 'Down
+ Up InCar OFF', -1)
end

if imgui.Button("Down + MoonWalk ", (imgui.ImVec2(200, 40))) then

down1 = not down1
sampAddChatMessage(down1 and 'Down + MoonWalk InCar ON' or
'Down + MoonWalk InCar OFF', -1)
end

if imgui.Button("Down ", (imgui.ImVec2(200, 40))) then

down2 = not down2
sampAddChatMessage(down2 and 'Down InCar ON' or 'Down InCar
OFF', -1)
end
imgui.EndGroup()

imgui.SameLine()

imgui.BeginGroup()
imgui.Text("Spinner OnFoot:")

if imgui.Button("Down + Right", (imgui.ImVec2(200, 40))) then

down3 = not down3
sampAddChatMessage(down3 and 'Down + Right OnFoot ON' or
'Down + Right OnFoot OFF', -1)
end

if imgui.Button("Down + MoonWalk", (imgui.ImVec2(200, 40))) then

down4 = not down4
sampAddChatMessage(down4 and 'Down + MoonWalk OnFoot ON' or
'Down + MoonWalk OnFoot OFF', -1)
end

if imgui.Button("Down", (imgui.ImVec2(200, 40))) then

down5 = not down5
sampAddChatMessage(down5 and 'Down OnFoot ON' or 'Down
OnFoot OFF', -1)
end
imgui.EndGroup()

imgui.EndChild()
end

if active5 then
imgui.CenterText("CoordMaster")

imgui.BeginChild('Child7 ', imgui.ImVec2(864.0, 300.0), true)

imgui.BeginGroup()
imgui.Text("Teleport Distance:")
 imgui.PushItemWidth(140.0)
imgui.SliderInt("Distance", Tp1, 0, 300)
imgui.PopItemWidth()

imgui.Text("Teleport Delay:")

imgui.PushItemWidth(140.0)
imgui.SliderInt("Delay", Tp2, 0, 600)
imgui.PopItemWidth()

imgui.EndGroup()

imgui.SameLine()

imgui.BeginGroup()
imgui.Text("Teleport Activation:")
if imgui.Button("Teleport", (imgui.ImVec2(140, 40))) then
local result, x, y, z = getTargetBlipCoordinates()
if result and not coord_master then
lua_thread.create(function()
coord_master = true
freezeCharPosition(PLAYER_PED, true)
CoordMaster(x, y, z, Tp1.v, Tp2.v)
freezeCharPosition(PLAYER_PED, false)
coord_master = false
end)
end
end

if imgui.Button("Vanish", (imgui.ImVec2(140, 40))) then

act7 = not act7
sampAddChatMessage(act7 and 'Vanish ON' or 'Vanish OFF', -
1)
end
imgui.EndGroup()

imgui.EndChild()
end

if active6 then
imgui.CenterText("Flooder")

imgui.BeginChild('Child8 ', imgui.ImVec2(864.0, 300.0), true)

imgui.BeginGroup()
imgui.Text("Flooder Settings:")

imgui.PushItemWidth(140.0)
imgui.SliderInt("Quality Message", Quality, 0, 800)
imgui.PopItemWidth()

imgui.PushItemWidth(140.0)
imgui.SliderInt("Delay", Delay, 0, 2000)
imgui.PopItemWidth()

imgui.PushItemWidth(140.0)
imgui.InputText(u8"Text Message", Text)
imgui.PopItemWidth()
imgui.EndGroup()
 imgui.SameLine()

imgui.BeginGroup()
imgui.Text("Flooder Activation:")

if imgui.Button("ChatFlood", (imgui.ImVec2(140, 40))) then

flooder = not flooder
sampAddChatMessage(flooder and 'ChatFlood ON' or 'ChatFlood
OFF', -1)
end
if imgui.Button("Bomber", (imgui.ImVec2(140, 40))) then
sms = not sms
sampAddChatMessage(sms and 'Bomber ON' or 'Bomber OFF', -1)
end
imgui.EndGroup()

imgui.EndChild()
end

if active9 then
imgui.CenterText("Settings")

imgui.BeginChild('Child11 ', imgui.ImVec2(864.0, 300.0), true)

imgui.CenterText(u8"����������, VoightHack ��� ����� �������

���������� ���������")

imgui.CenterText(u8"VoightHack ��� ������������� � ����

������������ ����")

imgui.CenterText(u8"ChangeLog:")

imgui.CenterText(u8"Version 1: ����� � �������� ������

[30.12.2021]")

imgui.CenterText(u8"Author: [w0te] �")

imgui.Text("
")

imgui.SameLine()

if imgui.Button(u8"������ ������", (imgui.ImVec2(250, 40))) then

sampAddChatMessage('������� ���� �� ���� �� ������� :D', -
1)
end

imgui.EndChild()
end

imgui.End()
end
end

function CoordMaster(px, py, pz, step, time)

local x, y, z = getCharCoordinates(PLAYER_PED)
local d = getDistanceBetweenCoords3d(px, py, pz, x, y, z)
if d <= step then
 setCharCoordinates(PLAYER_PED, px, py, pz)
else
local dx, dy, dz = px - x, py - y, pz - z
x = x + step / d * dx
y = y + step / d * dy
z = z + step / d * dz
setCharCoordinates(PLAYER_PED, x, y, z)
wait(time)
CoordMaster(px, py, pz, step, time)
end
end

function hack.onSendVehicleSync(data)
if isKeyDown(key.VK_LBUTTON) and act3 then
local X, Y, Z = getCharCoordinates(PLAYER_PED)
data.moveSpeed = {Speed3.v, 00.00, 00.00}
printStringNow('~r~ LMB', 200)
end
if act7 then
local X, Y, Z = getCharCoordinates(PLAYER_PED)
data.position = {X-5, Y-6, Z-7}
printStringNow('~r~ Vanish', 1500)
end
if act8 then
local X, Y, Z = getCharCoordinates(PLAYER_PED)
data.position = {X-8, Y-9, Z-11}
printStringNow('~r~ Deep Vanish', 1500)
end
if act50 then
data.vehicleHealth = 4
end
if act99 then
if isCharInAnyCar(PLAYER_PED) then
local camCoordX, camCoordY, camCoordZ =
getActiveCameraCoordinates()
local targetCamX, targetCamY, targetCamZ =
getActiveCameraPointAt()
setCarHeading(storeCarCharIsInNoSave(playerPed),
getHeadingFromVector2d(targetCamX - camCoordX, targetCamY - camCoordY))
local car = storeCarCharIsInNoSave(PLAYER_PED)
setCarProofs(car, true, true, true, true, true)
if isKeyDown(key.VK_W) then
setCarForwardSpeed(car, 100 / 1.67)
data.moveSpeed = {00.44, 00.64, 00.34}
end
if isKeyDown(key.VK_SPACE) then
setCarForwardSpeed(car, 0.0)
end
else
sampAddChatMessage('�� �� � ������, MoveShot ��������!', -1)
act99 = false
end
end
if tolkushka then
data.moveSpeed = {-00.74, 00.00, 00.54}
end
if aanim then
data.Quaternion[0] = 0 / 1
data.Quaternion[1] = 1 / 0
 data.Quaternion[2] = 0 / 1
data.Quaternion[3] = 1 / 0
end
if TrollCar then
for k, v in ipairs(getAllChars()) do
local res, id = sampGetPlayerIdByCharHandle(v)
if res then
if sampIsPlayerConnected(id) then
local res, handle = sampGetCharHandleBySampPlayerId(id)
if res then
local X, Y, Z = getCharCoordinates(handle)
local pX,pY,pZ = getCharCoordinates(PLAYER_PED)
if getDistanceBetweenCoords3d(pX,pY,pZ,X,Y,Z) < WorkRange.v
then
name = sampGetPlayerNickname(id)
data.position = {X, Y, Z - 0.3}
data.moveSpeed = {Move1.v, Move2.v, Move3.v}
printStringNow('~g~[VEHICLE] Troll ALL - ~r~'..name..'
Player', 1500)
end
end
end
end
end
end
if TrollCarRage then
data.moveSpeed = {Move1.v, Move2.v, Move3.v}
printStringNow('~g~[VEHICLE] Troll RAGE', 1500)
end
if quaternion then
data.quaternion[1] = math.random(0,Quat1.v)
data.quaternion[2] = math.random(0,Quat2.v)
data.quaternion[3] = math.random(0,Quat3.v)
data.quaternion[0] = math.random(0,Quat4.v)
end
if invis2 then
lua_thread.create(function()
local X, Y, Z = getCharCoordinates(PLAYER_PED)
data.position = {X - Invis1.v, Y - Invis2.v, Z - Invis3.v}
wait(1000)
printStringNow('~r~Invisible', 3600)
end)
end
if down0 then
data.quaternion[0] = 0.0
data.quaternion[1] = 1.0
data.quaternion[2] = 0.0
data.quaternion[3] = 0.1
end
if down1 then
data.quaternion[0] = math.random(-1,1)
data.quaternion[1] = math.random(-1,1)
data.quaternion[2] = math.random(-1,1)
data.quaternion[3] = math.random(-1,1)
end
if down2 then
data.quaternion[0] = 0.0
data.quaternion[1] = 1.0
data.quaternion[2] = 0.0
 data.quaternion[3] = 0.0
end
end

function hack.onSendPlayerSync(data)
if bh then
if bit.band(data.keysData, 0x28) == 0x28 then
data.keysData = bit.bxor(data.keysData, 0x20)
end
end
if TrollOnfoot then
for k, v in ipairs(getAllChars()) do
local res, id = sampGetPlayerIdByCharHandle(v)
if res then
if sampIsPlayerConnected(id) then
local res, handle = sampGetCharHandleBySampPlayerId(id)
if res then
local X, Y, Z = getCharCoordinates(handle)
local pX,pY,pZ = getCharCoordinates(PLAYER_PED)
if getDistanceBetweenCoords3d(pX,pY,pZ,X,Y,Z) < WorkRange.v
then
name = sampGetPlayerNickname(id)
data.position = {X, Y, Z - 0.3}
data.moveSpeed = {Move1.v, Move2.v, Move3.v}
printStringNow('~g~[ONFOOT] Troll ALL - ~r~'..name..'
Player', 1500)
end
end
end
end
end
end
if TrollOnfootRage then
data.moveSpeed = {Move1.v, Move2.v, Move3.v}
printStringNow('~g~[ONFOOT] Troll RAGE', 1500)
end
if quaternion2 then
data.quaternion[1] = math.random(0,Quat1.v)
data.quaternion[2] = math.random(0,Quat2.v)
data.quaternion[3] = math.random(0,Quat3.v)
data.quaternion[0] = math.random(0,Quat4.v)
end
if invis1 then
lua_thread.create(function()
local X, Y, Z = getCharCoordinates(PLAYER_PED)
data.position = {X - Invis1.v, Y - Invis2.v, Z - Invis3.v}
wait(1000)
printStringNow('~r~Invisible', 3600)
end)
end
if down3 then
data.quaternion[0] = 0.0
data.quaternion[1] = 1.0
data.quaternion[2] = 0.1
data.quaternion[3] = 0.1
end
if down4 then
data.quaternion[0] = math.random(-1,1)
data.quaternion[1] = math.random(-1,1)
 data.quaternion[2] = math.random(-1,1)
data.quaternion[3] = math.random(-1,1)
end
if down5 then
data.quaternion[0] = 0.0
data.quaternion[1] = 1.0
data.quaternion[2] = 0.0
data.quaternion[3] = 0.0
end
end

imgui.SwitchContext()
local style = imgui.GetStyle()
local colors = style.Colors
local clr = imgui.Col
local ImVec4 = imgui.ImVec4

style.WindowPadding = imgui.ImVec2(8, 8)
style.WindowRounding = 16
style.ChildWindowRounding = 5
style.FramePadding = imgui.ImVec2(5, 3)
style.FrameRounding = 7.0
style.ItemSpacing = imgui.ImVec2(5, 4)
style.ItemInnerSpacing = imgui.ImVec2(4, 4)
style.IndentSpacing = 21
style.ScrollbarSize = 10.0
style.ScrollbarRounding = 13
style.GrabMinSize = 8
style.GrabRounding = 1
style.WindowTitleAlign = imgui.ImVec2(0.5, 0.5)
style.ButtonTextAlign = imgui.ImVec2(0.5, 0.5)

colors[clr.Text] = ImVec4(0.90, 0.90, 0.90, 1.00)

colors[clr.TextDisabled] = ImVec4(0.60, 0.60, 0.60, 1.00)
colors[clr.WindowBg] = ImVec4(0.08, 0.08, 0.08, 1.00)
colors[clr.ChildWindowBg] = ImVec4(0.10, 0.10, 0.10, 1.00)
colors[clr.PopupBg] = ImVec4(0.08, 0.08, 0.08, 1.00)
colors[clr.Border] = ImVec4(0.70, 0.70, 0.70, 0.40)
colors[clr.BorderShadow] = ImVec4(0.00, 0.00, 0.00, 0.00)
colors[clr.FrameBg] = ImVec4(0.15, 0.15, 0.15, 1.00)
colors[clr.FrameBgHovered] = ImVec4(0.19, 0.19, 0.19, 0.71)
colors[clr.FrameBgActive] = ImVec4(0.34, 0.34, 0.34, 0.79)
colors[clr.TitleBg] = ImVec4(0.00, 0.69, 0.33, 0.80)
colors[clr.TitleBgActive] = ImVec4(0.00, 0.74, 0.36, 1.00)
colors[clr.TitleBgCollapsed] = ImVec4(0.00, 0.69, 0.33, 0.50)
colors[clr.MenuBarBg] = ImVec4(0.00, 0.80, 0.38, 1.00)
colors[clr.ScrollbarBg] = ImVec4(0.16, 0.16, 0.16, 1.00)
colors[clr.ScrollbarGrab] = ImVec4(0.00, 0.69, 0.33, 1.00)
colors[clr.ScrollbarGrabHovered] = ImVec4(0.00, 0.82, 0.39, 1.00)
colors[clr.ScrollbarGrabActive] = ImVec4(0.00, 1.00, 0.48, 1.00)
colors[clr.ComboBg] = ImVec4(0.20, 0.20, 0.20, 0.99)
colors[clr.CheckMark] = ImVec4(0.00, 0.69, 0.33, 1.00)
colors[clr.SliderGrab] = ImVec4(0.00, 0.69, 0.33, 1.00)
colors[clr.SliderGrabActive] = ImVec4(0.00, 0.77, 0.37, 1.00)
colors[clr.Button] = ImVec4(0.00, 0.69, 0.33, 1.00)
colors[clr.ButtonHovered] = ImVec4(0.00, 0.82, 0.39, 1.00)
colors[clr.ButtonActive] = ImVec4(0.00, 0.87, 0.42, 1.00)
colors[clr.Header] = ImVec4(0.00, 0.69, 0.33, 1.00)
colors[clr.HeaderHovered] = ImVec4(0.00, 0.76, 0.37, 0.57)
colors[clr.HeaderActive] = ImVec4(0.00, 0.88, 0.42, 0.89)
colors[clr.Separator] = ImVec4(1.00, 1.00, 1.00, 0.40)
colors[clr.SeparatorHovered] = ImVec4(1.00, 1.00, 1.00, 0.60)
colors[clr.SeparatorActive] = ImVec4(1.00, 1.00, 1.00, 0.80)
colors[clr.ResizeGrip] = ImVec4(0.00, 0.69, 0.33, 1.00)
colors[clr.ResizeGripHovered] = ImVec4(0.00, 0.76, 0.37, 1.00)
colors[clr.ResizeGripActive] = ImVec4(0.00, 0.86, 0.41, 1.00)
colors[clr.CloseButton] = ImVec4(0.00, 0.82, 0.39, 1.00)
colors[clr.CloseButtonHovered] = ImVec4(0.00, 0.88, 0.42, 1.00)
colors[clr.CloseButtonActive] = ImVec4(0.00, 1.00, 0.48, 1.00)
colors[clr.PlotLines] = ImVec4(0.00, 0.69, 0.33, 1.00)
colors[clr.PlotLinesHovered] = ImVec4(0.00, 0.74, 0.36, 1.00)
colors[clr.PlotHistogram] = ImVec4(0.00, 0.69, 0.33, 1.00)
colors[clr.PlotHistogramHovered] = ImVec4(0.00, 0.80, 0.38, 1.00)
colors[clr.TextSelectedBg] = ImVec4(0.00, 0.69, 0.33, 0.72)
colors[clr.ModalWindowDarkening] = ImVec4(0.17, 0.17, 0.17, 0.48)