PathogenDavid
commented
3 years ago - You should follow the issue template
- Large amounts of code should be shared using GitHub Gists (although ideally your problem description shouldn't even involve so much code.)
- This community does not support using Dear ImGui to develop cheats https://github.com/ocornut/imgui/issues/1586
local imgui = require('imgui') local neatJSON = require('neatjson') local sf = require('sampfuncs') local vk = require('vkeys') local encoding = require('encoding') local ev = require('lib.samp.events') local weapons = require 'game.weapons' local inicfg = require('inicfg') local sapi = require "SA-MP API.init"
local u8 = encoding.UTF8 encoding.default = 'CP1251'
local server = { ip = '', port = 0, }
local font = renderCreateFont('Arial', 8, 4 + 8)
local xw, yw = getScreenResolution()
local menuPos = imgui.ImVec2(xw / 2, yw / 2) local menuActive = imgui.ImBool(false) local preMenuActive = false local menuHideCursor = imgui.ImBool(false) local activeTab = 0
local needsInit = 0
local nopsMenuPos = imgui.ImVec2(xw / 2, yw / 2) local nopsMenu = imgui.ImBool(false) local nopsTab = 0 local nopsList = {} local selectedNop = imgui.ImInt(0) local nopFilerBox = imgui.ImBuffer(256)
local sendMenuPos = imgui.ImVec2(xw / 2, yw / 2) local sendMenu = imgui.ImBool(false) local sendGamestate = imgui.ImInt(0) local sendInterior = imgui.ImInt(0) local sendTextdraw = imgui.ImInt(0) local sendPickup = imgui.ImInt(0) local sendRC = imgui.ImInt(0) local sendConvertOnfootToSpectator = imgui.ImBool(false)
local logMenuPos = imgui.ImVec2(xw / 2, yw / 2) local logMenu = imgui.ImBool(false) local logRenderPickups = imgui.ImBool(false) local logPickedUpPickups = imgui.ImBool(false) local logRenderTextdraws = imgui.ImBool(false) local logClickedTextdraws = imgui.ImBool(false) local logBox = imgui.ImBuffer(1000000) local pickups = {}
local bruteMenuPos = imgui.ImVec2(xw / 2, yw / 2) local bruteMenu = imgui.ImBool(false) local bruteSelectedRpc = imgui.ImInt(0) local bruteDelay = imgui.ImInt(100) local bruteMin = imgui.ImInt(1) local bruteMax = imgui.ImInt(1000) local bruteBox = imgui.ImBuffer(1000000) local bruteFilterBox = imgui.ImBuffer(256) local bruteFilteredBox = imgui.ImBuffer(1000000) local bruteEnabled = false local brutePaused = false local bruteCurrent = 0 local bruteMode = 0
local anotherMenuPos = imgui.ImVec2(xw / 2, yw / 2) local anotherMenu = imgui.ImBool(false) local anotherSelectedWeapon = imgui.ImInt(0) local anotherRandomAmmo = imgui.ImBool(false) local anotherAmmoAmount = imgui.ImInt(1000)
local settingsMenuPos = imgui.ImVec2(xw / 2, yw / 2) local settingsMenu = imgui.ImBool(false) local settingsSelectedTheme = imgui.ImInt(0) local settingsSaveNops = imgui.ImBool(false) local settingsSaveSend = imgui.ImBool(false) local settingsSaveBrute = imgui.ImBool(false) local settingsSaveLog = imgui.ImBool(false) local settingsSaveAnother = imgui.ImBool(false) local settingsHideCursorCode = imgui.ImBuffer(5) local settingsShowMenuCode = imgui.ImBuffer(5)
local configMenuPos = imgui.ImVec2(xw / 2, yw / 2) local configMenu = imgui.ImBool(false) local configNameBox = imgui.ImBuffer(256) local configList = {} local selectedConfig = imgui.ImInt(0) local preConfig = selectedConfig.v
local snowEnabled = false local disableSnowForeverV = false local snows = {} local snowOnScreen = 50
local data = { rpc = { incoming = {
}
local configs = {} local settings = {defaultConfig = 1}
math.randomseed(os.time())
function imgui.OnDrawFrame() local xw, yw = getScreenResolution() local needsHide = false if needsInit == 1 then needsInit = 2 end if needsInit == 2 and not menuActive.v then needsHide = true menuActive.v = true end if menuActive.v then imgui.SetNextWindowSize(imgui.ImVec2(525, 340), imgui.Cond.FirstUseEver) imgui.SetNextWindowPos(menuPos, needsInit ~= 2 and imgui.Cond.FirstUseEver) imgui.Begin(u8'Bypasser', menuActive, imgui.WindowFlags.NoResize, imgui.WindowFlags.AutoResize) imgui.PushStyleVar(imgui.StyleVar.ItemSpacing, imgui.ImVec2(0, 0)) imgui.PushStyleVar(imgui.StyleVar.FrameRounding, 0) local i = -1 local maxElements = 5 local size = imgui.ImVec2(100, 20) if not nopsMenu.v then i = i + 1 if i < maxElements then imgui.SameLine() else i = 0 end if imgui.ButtonActivated(activeTab == 1, u8'Нопы', size) then activeTab = 1 end if imgui.IsItemClicked() and imgui.IsMouseDoubleClicked(0) then nopsMenu.v = true end end if not sendMenu.v then i = i + 1 if i < maxElements then imgui.SameLine() else i = 0 end if imgui.ButtonActivated(activeTab == 2, u8'Отправка', size) then activeTab = 2 end if imgui.IsItemClicked() and imgui.IsMouseDoubleClicked(0) then sendMenu.v = true end end if not bruteMenu.v then i = i + 1 if i < maxElements then imgui.SameLine() else i = 0 end if imgui.ButtonActivated(activeTab == 3, u8'Перебор', size) then activeTab = 3 end if imgui.IsItemClicked() and imgui.IsMouseDoubleClicked(0) then bruteMenu.v = true end end if not logMenu.v then i = i + 1 if i < maxElements then imgui.SameLine() else i = 0 end if imgui.ButtonActivated(activeTab == 4, u8'Лог / Рендер', size) then activeTab = 4 end if imgui.IsItemClicked() and imgui.IsMouseDoubleClicked(0) then logMenu.v = true end end if not anotherMenu.v then i = i + 1 if i < maxElements then imgui.SameLine() else i = 0 end if imgui.ButtonActivated(activeTab == 5, u8'Прочее', size) then activeTab = 5 end if imgui.IsItemClicked() and imgui.IsMouseDoubleClicked(0) then anotherMenu.v = true end end if not settingsMenu.v then i = i + 1 if i < maxElements then imgui.SameLine() else i = 0 end if imgui.ButtonActivated(activeTab == 6, u8'Настройки', size) then activeTab = 6 end if imgui.IsItemClicked() and imgui.IsMouseDoubleClicked(0) then settingsMenu.v = true end end if not configMenu.v then i = i + 1 if i < maxElements then imgui.SameLine() else i = 0 end if imgui.ButtonActivated(activeTab == 7, u8'Конфиги', size) then activeTab = 7 end if imgui.IsItemClicked() and imgui.IsMouseDoubleClicked(0) then configMenu.v = true end end imgui.PopStyleVar() imgui.PopStyleVar() imgui.Separator() if activeTab == 1 and not nopsMenu.v then imguiRenderNops() end if activeTab == 2 and not sendMenu.v then imguiRenderSend() end if activeTab == 3 and not bruteMenu.v then imguiRenderBrute() end if activeTab == 4 and not logMenu.v then imguiRenderLog() end if activeTab == 5 and not anotherMenu.v then imguiRenderAnother() end if activeTab == 6 and not settingsMenu.v then imguiRenderSettings() end if activeTab == 7 and not configMenu.v then imguiRenderConfig() end if imgui.IsWindowHovered() then menuPos = imgui.GetWindowPos() end if needsHide then needsHide = false menuActive.v = false end imgui.End() end
end
function imguiRenderNops() imgui.BeginChild('##noptabs', imgui.ImVec2(-0.1, 45 ), false) if imgui.ButtonActivated(nopsTab == 1, u8'Входящие пакеты##nop', imgui.ImVec2(123, 20)) then nopsTab = 1 end imgui.SameLine() if imgui.ButtonActivated(nopsTab == 2, u8'Входящие RPC##nop', imgui.ImVec2(123, 20)) then nopsTab = 2 end imgui.SameLine() if imgui.ButtonActivated(nopsTab == 3, u8'Исходящие пакеты##nop', imgui.ImVec2(123, 20)) then nopsTab = 3 end imgui.SameLine() if imgui.ButtonActivated(nopsTab == 4, u8'Исходящие RPC##nop', imgui.ImVec2(123, 20)) then nopsTab = 4 end if imgui.ButtonActivated(nopsTab == 5, u8'Нопнутые##nop', imgui.ImVec2(123, 20)) then nopsTab = 5 end imgui.EndChild() imgui.PushItemWidth(-0.1) nopsList = getNops() imgui.ListBox('##test', selectedNop, nopsList, 8, callback) if imgui.IsItemClicked() and imgui.IsMouseDoubleClicked(0) then local packet = getSelectedNop() if packet ~= nil then packet.isNopped = not packet.isNopped end end imgui.PopItemWidth() imgui.PushItemWidth(-0.1) imgui.InputTextWithHint('##nopfilter', u8'Фильтр', nopFilerBox) imgui.PopItemWidth() local packet = getSelectedNop() if packet ~= nil then if imgui.Button((packet.isNopped and u8'Выключить' or u8'Включить') .. ' NOP', imgui.ImVec2(100, 20)) then packet.isNopped = not packet.isNopped end imgui.SameLine() end if nopsTab ~= 0 then if imgui.Button(u8'Переключить всё', imgui.ImVec2(120, 20)) then for k, packetName in pairs(nopsList) do local packet = getNopByName(packetName, packetName:find('##outcoming')) packet.isNopped = not packet.isNopped end end end end
function imguiRenderSend() if imgui.Button(u8'Заспавниться', imgui.ImVec2(-0.1, 20)) then sampSpawnPlayer() restoreCameraJumpcut() end if imgui.Button(u8'Заспавниться (эмуляция)', imgui.ImVec2(-0.1, 20)) then emul_rpc('onRequestSpawnResponse', {true}) emul_rpc('onSetSpawnInfo', {0, getCharModel(PLAYER_PED), 0, {0, 0, 0}, 0, {0}, {0}}) restoreCameraJumpcut() end if imgui.Button(u8'RequestSpawn', imgui.ImVec2(-0.1, 20)) then sampSendRequestSpawn() end if imgui.Button(u8'В спектатор', imgui.ImVec2(100, 20)) then emul_rpc('onTogglePlayerSpectating', {true}) end imgui.SameLine() if imgui.Button(u8'Из спектатора', imgui.ImVec2(100, 20)) then emul_rpc('onTogglePlayerSpectating', {false}) end imgui.Checkbox(u8'Onfoot Sync >> Spectator Sync', sendConvertOnfootToSpectator) imgui.Text(u8'В спектаторе: ' .. (sapi.Get().pBase.pPools.pPlayer.pLocalPlayer.iIsSpectating == 1 and u8'Да' or u8'Нет')) if imgui.Combo(u8'Gamestate', sendGamestate, {'None', 'Wait Connect', 'Await Join', 'Connected', 'Restarting', 'Disconnected'}) then sampSetGamestate(sendGamestate.v) end imgui.PushItemWidth(50) imgui.InputInt('##sendinterior', sendInterior, 0, 0) imgui.PopItemWidth() imgui.SameLine() if imgui.Button(u8'Изменить интерьер', imgui.ImVec2(-0.1, 20)) then sampSendInteriorChange(sendInterior.v) setInteriorVisible(sendInterior.v) end imgui.PushItemWidth(50) imgui.InputInt('##sendtextdraw', sendTextdraw, 0, 0) imgui.PopItemWidth() imgui.SameLine() if imgui.Button(u8'Кликнуть textdraw', imgui.ImVec2(-0.1, 20)) then sampSendClickTextdraw(sendTextdraw.v) end imgui.PushItemWidth(50) imgui.InputInt('##sendpickup', sendPickup, 0, 0) imgui.PopItemWidth() imgui.SameLine() if imgui.Button(u8'Поднять pickup', imgui.ImVec2(-0.1, 20)) then sampSendPickedUpPickup(sendPickup.v) end imgui.PushItemWidth(50) imgui.InputInt('##sendrc', sendRC, 0, 0) imgui.PopItemWidth() imgui.SameLine() if imgui.Button(u8'RequestClass', imgui.ImVec2(-0.1, 20)) then sampRequestClass(sendRC.v) end end
function imguiRenderBrute() imgui.PushItemWidth(200) imgui.Combo(u8'Что будем перебирать?', bruteSelectedRpc, {u8'Текстдравы', u8'Пикапы', u8'RequestClass'}) imgui.PopItemWidth() imgui.SameLine() imgui.PushItemWidth(50) imgui.InputInt(u8'Задержка##brute', bruteDelay, 0, 0, bruteEnabled and imgui.InputTextFlags.ReadOnly) imgui.PopItemWidth() imgui.PushItemWidth(50) imgui.InputInt(u8'От##brute', bruteMin, 0, 0, bruteEnabled and imgui.InputTextFlags.ReadOnly) imgui.PopItemWidth() imgui.SameLine() imgui.PushItemWidth(50) imgui.InputInt(u8'До##brute', bruteMax, 0, 0, bruteEnabled and imgui.InputTextFlags.ReadOnly) imgui.PopItemWidth() if imgui.Button((bruteEnabled and u8'Выключить' or u8'Включить') .. u8' перебор', imgui.ImVec2(-0.1, 20)) then bruteEnabled = not bruteEnabled brutePaused = false if bruteEnabled then bruteBox.v = '' lua_thread.create(brute) end
end if bruteEnabled then if imgui.Button(brutePaused and u8'Продолжить' or u8'Пауза', imgui.ImVec2(-0.1, 20)) then brutePaused = not brutePaused end end imgui.Text(u8'Текущий ID: ' .. bruteCurrent) imgui.PushItemWidth(-0.1) imgui.InputTextMultiline('##brutegood', bruteGetFilteredString(), 10, imgui.InputTextFlags.ReadOnly) imgui.PopItemWidth() imgui.PushItemWidth(-0.1) imgui.InputTextWithHint('##brutefilter', u8'Фильтр', bruteFilterBox) imgui.PopItemWidth() end
function imguiRenderLog() imgui.Checkbox(u8'Отображать пикапы (место, id)', logRenderPickups) imgui.Checkbox(u8'Логгировать поднятые пикапы', logPickedUpPickups) imgui.Separator() imgui.Checkbox(u8'Отображать ID текстдравов', logRenderTextdraws) imgui.Checkbox(u8'Логгировать кликнутые текстдравы', logClickedTextdraws) imgui.Separator() imgui.InputTextMultiline('##logbox', logBox, imgui.ImVec2(-0.1, -0.1)) end
function imguiRenderAnother() if imgui.Button(u8'Показать диалог', imgui.ImVec2(110, 20)) then enableDialog(true) end imgui.SameLine() if imgui.Button(u8'Скрыть диалог', imgui.ImVec2(110, 20)) then enableDialog(false) end imgui.Combo(u8'Выбранное оружие', anotherSelectedWeapon, getWeaponNameList()) imgui.Checkbox(u8'Рандомное кол-во патронов', anotherRandomAmmo) if not anotherRandomAmmo.v then imgui.PushItemWidth(50) imgui.InputInt(u8'Кол-во патронов', anotherAmmoAmount, 0, 0) imgui.PopItemWidth() end if imgui.Button(u8'Выдать оружие', imgui.ImVec2(110, 20)) then local id = getRealWeaponId() requestModel(getWeapontypeModel(id)) loadAllModelsNow() local ammo = anotherRandomAmmo.v and math.random(1, 9999) or anotherAmmoAmount.v giveWeaponToChar(PLAYER_PED, id, ammo) end imgui.SameLine() if imgui.Button(u8'Забрать оружие', imgui.ImVec2(110, 20)) then local id = getRealWeaponId() removeWeaponFromChar(PLAYER_PED, id) end if imgui.Button(u8'Забрать всё оружие', imgui.ImVec2(-0.1, 20)) then removeAllCharWeapons(PLAYER_PED) end end
function imguiRenderConfig() configList = getConfigListNames() imgui.PushItemWidth(-0.1) imgui.ListBox(u8'##configlist', selectedConfig, configList, 8) imgui.PopItemWidth() if imgui.IsItemClicked(0) then lua_thread.create(function() wait(150) updateConfig(getConfigByIndex(preConfig).name) saveConfig(getConfigByIndex(preConfig)) setConfig(getConfigByIndex(selectedConfig.v).name) preConfig = selectedConfig.v end) end imgui.PushItemWidth(-0.1) imgui.InputTextWithHint('##configName', u8'Название', configNameBox) imgui.PopItemWidth() local size = imgui.ImVec2(100, 20) if imgui.Button(u8'Создать##config', size) then if configNameBox.v:len() > 0 then if isConfigNameAvailable(configNameBox.v) then lua_thread.create(function() wait(0) createConfig(configNameBox.v) updateConfig(getConfigByIndex(selectedConfig.v).name) saveConfig(getConfigByIndex(selectedConfig.v)) selectedConfig.v = table.getn(configs) - 1 preConfig = selectedConfig.v setConfig(configNameBox.v) end) end end end imgui.SameLine() if imgui.Button(u8'Удалить##config', size) then lua_thread.create(function() wait(0) deleteConfig(selectedConfig.v) if table.getn(configs) == 0 then createConfig('Default') end selectedConfig.v = 0 preConfig = 0 setConfig(getConfigByIndex(selectedConfig.v).name) end) end imgui.SameLine() if imgui.Button(u8'Дублировать##config', size) then if configNameBox.v:len() > 0 then if isConfigNameAvailable(configNameBox.v) then lua_thread.create(function() wait(0) local config = clone(getConfigByIndex(selectedConfig.v)) config.name = configNameBox.v table.insert(configs, config) updateConfig(getConfigByIndex(selectedConfig.v).name) saveConfig(getConfigByIndex(selectedConfig.v)) selectedConfig.v = table.getn(configs) - 1 preConfig = selectedConfig.v setConfig(configNameBox.v) end) end end end end
function imguiRenderSettings() if imgui.Combo(u8'Стиль ImGui', settingsSelectedTheme, getThemeNames(true)) then setTheme(settingsSelectedTheme.v) end imgui.Separator() imgui.Checkbox(u8'Сохранять вкладку "Нопы"', settingsSaveNops) imgui.Checkbox(u8'Сохранять вкладку "Отправка"', settingsSaveSend) imgui.Checkbox(u8'Сохранять вкладку "Перебор"', settingsSaveBrute) imgui.Checkbox(u8'Сохранять вкладку "Лог / Рендер"', settingsSaveLog) imgui.Checkbox(u8'Сохранять вкладку "Прочее"', settingsSaveAnother) imgui.Separator() imgui.PushItemWidth(50) imgui.InputText('##settingsHideCursor', settingsShowMenuCode) imgui.PopItemWidth() imgui.SameLine() imgui.Text(u8'Чит-Код для скрытия и показа меню') imgui.PushItemWidth(50) imgui.InputText('##settingsShowMenu', settingsHideCursorCode) imgui.PopItemWidth() imgui.SameLine() imgui.Text(u8'Чит-Код для скрытия и показа курсора') if snowEnabled then if imgui.Button(u8'УБРАТЬ ЭТОТ ЧЁРТОВ СНЕГОПАД НАВСЕГДА', imgui.ImVec2(-0.1, 20)) then disableSnowForever() end end end
function disableSnowForever() disableSnowForeverV = true snowEnabled = false sampAddChatMessage('{AAAAAA}Дед мороз не придёт к тебе, мерзавец...', 0xFFAAAAAA) end
function SnowAI() while snowEnabled do wait(math.random(100, 500)) if table.getn(snows) < snowOnScreen then local snow = {x = math.random(0, 1920), y = 0} table.insert(snows, snow) end end snows = {} end
function renderSnow() for k, snow in pairs(snows) do snow.y = snow.y + 1 snow.x = snow.x + math.random(-0.00010, 0.00010) if snow.y > yw then table.remove(snows, k) else if menuActive.v then renderDrawPolygon(snow.x, snow.y, 5, 5, 8, 0, 0xFFFFFFFF) end end end end
function getConfigListNames() local configListNames = {} for k, config in pairs(configs) do table.insert(configListNames, config.name) end return configListNames end
function loadSettings() local date = os.date('*t') local dir = getWorkingDirectory() .. '/config/bypasser/' local ini = inicfg.load(nil, dir .. 'settings.ini') selectedConfig.v = ini.settings.selectedConfig disableSnowForeverV = ini.settings.disableThisShitSnowfall snowEnabled = not disableSnowForeverV and ((date.month == 12 and date.day >= 24) or (date.month == 1 and date.day <= 7)) preConfig = selectedConfig.v if selectedConfig.v > table.getn(configs) - 1 then selectedConfig.v = 0 end setConfig(getConfigByIndex(selectedConfig.v).name) end
function loadConfigs() local dir = getWorkingDirectory() .. '/config/bypasser' dir = getWorkingDirectory() .. '/config/bypasser/configs' local handle, name = findFirstFile(dir .. '/*.json') while name do if handle then if not name then findClose(name) else loadConfig(name) name = findNextFile(handle) end end end if table.getn(configs) == 0 then local config = createConfig('Default') saveConfig(config) end end
function convertTableToJsonString(data) return (neatJSON(data, {sort = true, wrap = 40})) end
function setConfig(name) -- sampAddChatMessage('set: ' .. name, -1) local config = getConfig(name) if config ~= nil then disableAllNops()
end
function getConfigByIndex(index) return configs[index + 1] end
function isConfigNameAvailable(name) for k, config in pairs(configs) do if rusLower(config.name):lower() == rusLower(name):lower() then return false end end return true end
function getConfig(name) for k, config in pairs(configs) do if config.name == name then return config end end return nil end
function loadConfig(fileName) local dir = getWorkingDirectory() .. '/config/bypasser/configs/' local f = io.open(dir .. fileName, 'r') local jsonData = f:read('*a') f:close() local config = decodeJson(jsonData) table.insert(configs, config) end
function deleteConfig(index) local dir = getWorkingDirectory() .. '/config/bypasser/configs/' local configName = configs[index + 1].name table.remove(configs, index + 1) os.remove(dir .. u8:decode(configName) .. '.json') end
function updateConfig(name) local config = getConfig(name) if config ~= nil then config.settings.saveNops = settingsSaveNops.v config.settings.saveSend = settingsSaveSend.v config.settings.saveLog = settingsSaveLog.v config.settings.saveBrute = settingsSaveBrute.v config.settings.saveAnother = settingsSaveAnother.v
end
function saveConfig(config) local dir = getWorkingDirectory() .. '/config/bypasser/configs' local jsonData = convertTableToJsonString(config) local f = io.open(dir .. '/' .. u8:decode(config.name) .. '.json', 'w') f:write(jsonData) f:close() end
function createConfig(name) local xw, yw = getScreenResolution() local config = { name = name, settings = { nops = { enabled = {}, filter = '' }, send = { interior = 0, pickupId = 0, textdrawId = 0, convertOnfootToSpectator = false }, log = { renderPickups = false, renderTextdraws = false, logPickups = false, logTextdraws = false }, brute = { min = 1, max = 1000, delay = 100, filter = '' }, another = { randomAmmo = false, ammo = 1000, selectedWeapon = 0 }, codes = { showMenu = 'BP', hideCursor = 'BC' }, saveNops = false, saveSend = false, saveLog = false, saveBrute = false, saveAnother = false, selectedTheme = 0, }, windows = { main = { active = false, x = xw / 2, y = yw / 2 }, nops = { active = false, x = xw / 2, y = yw / 2 }, send = { active = false, x = xw / 2, y = yw / 2 }, log = { active = false, x = xw / 2, y = yw / 2 }, brute = { active = false, x = xw / 2, y = yw / 2 }, another = { active = false, x = xw / 2, y = yw / 2 }, configs = { active = false, x = xw / 2, y = yw / 2 }, settings = { active = false, x = xw / 2, y = yw / 2 } } } table.insert(configs, config) return config end
function brute() bruteMode = bruteSelectedRpc.v if bruteMin.v > bruteMax.v then local t = bruteMin.v bruteMin.v = bruteMax.v bruteMax.v = t end for i = bruteMin.v, bruteMax.v do while brutePaused do wait(0) end if not bruteEnabled then break end bruteCurrent = i if bruteMode == 0 then sampSendClickTextdraw(bruteCurrent) end if bruteMode == 1 then sampSendPickedUpPickup(bruteCurrent) end if bruteMode == 2 then sampRequestClass(bruteCurrent) end wait(bruteDelay.v) end bruteEnabled = false end
function bruteGetFilteredString() local filter = bruteFilterBox.v bruteFilteredBox.v = '' if filter ~= '' then local lines = split(bruteBox.v, '\n') for k, v in pairs(lines) do if v:lower():find(filter:lower(), 1, true) then bruteFilteredBox.v = bruteFilteredBox.v .. v .. '\n' end end else bruteFilteredBox.v = bruteBox.v end return bruteFilteredBox end
function bruteAddLog(text) bruteBox.v = bruteBox.v .. '[ID: ' .. bruteCurrent .. '] - ' .. text .. '\n' end
function main() repeat wait(0) until isSampAvailable() while not sapi.GetIsAvailable() do wait(0) end if sampGetGamestate() == 3 then server.ip, server.port = sampGetCurrentServerAddress() for pickupId = 1, 4096 do local pickup = sampGetPickupHandleBySampId(pickupId) if pickup ~= nil then local x, y, z = getPickupCoordinates(pickup) table.insert(pickups, {id = pickupId, pos = {x = x, y = y, z = z}}) end end end for k, v in pairs(sf) do local packet = {name = k, id = v, isNopped = false} if k:find('PACKET_', 1, true) then table.insert(data.packets.outcoming, packet) table.insert(data.packets.incoming, clone(packet)) elseif k:find('RPCSCR', 1, true) then table.insert(data.rpc.incoming, packet) elseif k:find('RPC', 1, true) then table.insert(data.rpc.outcoming, packet) end end loadConfigs() loadSettings() table.sort(data.packets.outcoming, function(a, b) return a.name:upper() < b.name:upper() end) table.sort(data.packets.incoming, function(a, b) return a.name:upper() < b.name:upper() end) table.sort(data.rpc.incoming, function(a, b) return a.name:upper() < b.name:upper() end) table.sort(data.rpc.outcoming, function(a, b) return a.name:upper() < b.name:upper() end) lua_thread.create(function() while true do wait(500) local gamestate = sampGetGamestate() if sendGamestate.v ~= gamestate then sendGamestate.v = gamestate end end end) if snowEnabled then lua_thread.create(SnowAI) end while true do wait(0) if snowEnabled then renderSnow() end imgui.Process = menuActive.v if preMenuActive ~= menuActive.v then preMenuActive = menuActive.v if not preMenuActive then local dir = getWorkingDirectory() .. '/config/bypasser/' --sampAddChatMessage('saving...', -1) updateConfig(getConfigByIndex(selectedConfig.v).name) saveConfig(getConfigByIndex(selectedConfig.v)) local ini = inicfg.save({ settings = { selectedConfig = selectedConfig.v, disableThisShitSnowfall=disableSnowForeverV } }, dir .. 'settings.ini') end end if imgui.Process then imgui.ShowCursor = not menuHideCursor.v end if testCheat(settingsShowMenuCode.v) then menuActive.v = not menuActive.v end if testCheat(settingsHideCursorCode.v) then menuHideCursor.v = not menuHideCursor.v end if logRenderPickups.v then local x, y, z = getCharCoordinates(PLAYER_PED) for k, pickup in pairs(pickups) do local pos = pickup.pos if isPointOnScreen(pos.x, pos.y, pos.z, 0) then if getDistanceBetweenCoords3d(x, y, z, pos.x, pos.y, pos.z) <= 1000 then local pxw, pyw = convert3DCoordsToScreen(pos.x, pos.y, pos.z) local xw, yw = convert3DCoordsToScreen(x, y, z) renderDrawLine(xw, yw, pxw, pyw, 1, getActualTheme()[3]) renderFontDrawText(font, 'Pickup: ' .. pickup.id, pxw, pyw, getActualTheme()[3]) end end end end if logRenderTextdraws.v then for id = 1, 2048 do if sampTextdrawIsExists(id) then local x, y = sampTextdrawGetPos(id) local xw, yw = convertGameScreenCoordsToWindowScreenCoords(x, y) renderFontDrawText(font, 'Textdraw: ' .. id, xw, yw, getActualTheme()[3]) end end end end end
function ev.onSendPlayerSync(data) if sendConvertOnfootToSpectator.v then sendSpectator(data) return false end end
local russian_characters = { [168] = 'Ё', [184] = 'ё', [192] = 'А', [193] = 'Б', [194] = 'В', [195] = 'Г', [196] = 'Д', [197] = 'Е', [198] = 'Ж', [199] = 'З', [200] = 'И', [201] = 'Й', [202] = 'К', [203] = 'Л', [204] = 'М', [205] = 'Н', [206] = 'О', [207] = 'П', [208] = 'Р', [209] = 'С', [210] = 'Т', [211] = 'У', [212] = 'Ф', [213] = 'Х', [214] = 'Ц', [215] = 'Ч', [216] = 'Ш', [217] = 'Щ', [218] = 'Ъ', [219] = 'Ы', [220] = 'Ь', [221] = 'Э', [222] = 'Ю', [223] = 'Я', [224] = 'а', [225] = 'б', [226] = 'в', [227] = 'г', [228] = 'д', [229] = 'е', [230] = 'ж', [231] = 'з', [232] = 'и', [233] = 'й', [234] = 'к', [235] = 'л', [236] = 'м', [237] = 'н', [238] = 'о', [239] = 'п', [240] = 'р', [241] = 'с', [242] = 'т', [243] = 'у', [244] = 'ф', [245] = 'х', [246] = 'ц', [247] = 'ч', [248] = 'ш', [249] = 'щ', [250] = 'ъ', [251] = 'ы', [252] = 'ь', [253] = 'э', [254] = 'ю', [255] = 'я', }
function rusLower(s) local strlen = s:len() if strlen == 0 then return s end s = s:lower() local output = '' for i = 1, strlen do local ch = s:byte(i) if ch >= 192 and ch <= 223 then -- upper russian characters output = output .. russian_characters[ch+32] elseif ch == 168 then -- Ё output = output .. russian_characters[184] else output = output .. string.char(ch) end end return output end
function sendSpectator(data) sync = samp_create_sync_data('spectator') sync.position = data.position sync.keysData = data.keysData sync.leftRightKeys = data.leftRightKeys sync.upDownKeys = data.upDownKeys sync.send() end
function ev.onSendPickedUpPickup(id) if logPickedUpPickups.v then logBox.v = logBox.v .. 'Pickup: ' .. id .. '\n' end end
function ev.onSendClickTextDraw(id) if logClickedTextdraws.v then logBox.v = logBox.v .. 'Textdraw: ' .. id .. '\n' end end
function ev.onCreatePickup(id, model, type, pos) for k, pickup in pairs(pickups) do if pickup.id == id then return {id, model, type, pos} end end table.insert(pickups, {id = id, pos = pos}) end
function ev.onSendClientJoin(ver, mod, nick, response, authkey, clientVer, unk) local ip, port = sampGetCurrentServerAddress() if ip ~= server.ip or port ~= server.port then server.ip = ip server.port = port pickups = {} end end
function getMyId() local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED) return id end
function enableDialog(bool) local memory = require 'memory' memory.setint32(sampGetDialogInfoPtr()+40, bool and 1 or 0, true) sampToggleCursor(bool) end
function onReceivePacket(id, bitStream) if isNopped(id, false, true) then return false end end
function getRealWeaponId() local weaponList = getWeaponNameList() local weaponName = weaponList[anotherSelectedWeapon.v + 1] for k, weapon in pairs(weapons.names) do if weapon == weaponName then return k end end return 0 end
function getWeaponNameList() local weaponList = {} for k, weapon in pairs(weapons.names) do table.insert(weaponList, weapon) end return weaponList end
function onReceiveRpc(id, bitStream) if bruteEnabled and not brutePaused then if id == 12 then bruteAddLog('SetPlayerPos') end if id == 13 then bruteAddLog('SetPlayerPosFindZ') end if id == 86 then local playerid = raknetBitStreamReadInt16(bitStream) if playerid == getMyId() then bruteAddLog('ApplyPlayerAnimation') end end if id == 87 then local playerid = raknetBitStreamReadInt16(bitStream) if playerid == getMyId() then bruteAddLog('ClearPlayerAnimation') end end if id == 153 then local playerid = raknetBitStreamReadInt32(bitStream) if playerid == getMyId() then bruteAddLog('SetPlayerSkin') end end if id == 15 then bruteAddLog('TogglePlayerControllable') end if id == 88 then bruteAddLog('SetPlayerSpecialAction') end if id == 69 then local playerid = raknetBitStreamReadInt16(bitStream) if playerid == getMyId() then bruteAddLog('SetPlayerTeam') end end if id == 124 then bruteAddLog('TogglePlayerSpectating') end if id == 16 then bruteAddLog('PlayerPlaySound') end if id == 18 then bruteAddLog('GivePlayerMoney') end if id == 20 then bruteAddLog('ResetPlayerMoney') end if id == 21 then bruteAddLog('ResetPlayerWeapons') end if id == 22 then bruteAddLog('GivePlayerWeapon') end if id == 66 then bruteAddLog('SetPlayerArmour') end if id == 145 then bruteAddLog('SetPlayerAmmo') end if id == 156 then bruteAddLog('SetPlayerInterior') end if id == 157 then bruteAddLog('SetPlayerCameraPos') end if id == 133 then bruteAddLog('SetPlayerWantedLevel') end if id == 74 then bruteAddLog('ForceClassSelection') end if id == 158 then bruteAddLog('SetPlayerCameraLookAt') end if id == 68 then bruteAddLog('SetSpawnInfo') end if id == 126 then bruteAddLog('SpectatePlayer') end if id == 127 then bruteAddLog('SpectateVehicle') end if id == 134 then bruteAddLog('ShowTextDraw') end if id == 61 then bruteAddLog('ShowDialog') end if id == 135 then bruteAddLog('HideTextDraw') end if id == 70 then bruteAddLog('PutPlayerInVehicle') end if id == 71 then bruteAddLog('RemovePlayerFromVehicle') end if id == 128 then bruteAddLog('RequestClass') end end if isNopped(id, false, false) then return false end end
function onSendPacket(id, bitStream, priority, reliability, orderingChannel) if isNopped(id, true, true) then return false end end
function onSendRpc(id, bitStream, priority, reliability, orderingChannel, shiftTs) if isNopped(id, true, false) then return false end end
function isNopped(id, outcoming, isPacket) if outcoming then if isPacket then for k, v in pairs(data.packets.outcoming) do if v.id == id then return v.isNopped end end else for k, v in pairs(data.rpc.outcoming) do if v.id == id then return v.isNopped end end end else if isPacket then for k, v in pairs(data.packets.incoming) do if v.id == id then return v.isNopped end end else for k, v in pairs(data.rpc.incoming) do if v.id == id then return v.isNopped end end end end return false end
function getSelectedNop() local nopName = nopsList[selectedNop.v + 1] if nopName ~= nil then if nopName:find('##incoming', 1, true) then return getNopByName(nopName, false) else return getNopByName(nopName, true) end end return nil end
function getNopByName(name, outcoming) if outcoming then for k, v in pairs(data.rpc.outcoming) do if name:find(v.name, 1, true) then return v end end for k, v in pairs(data.packets.outcoming) do if name:find(v.name, 1, true) then return v end end else for k, v in pairs(data.rpc.incoming) do if name:find(v.name, 1, true) then return v end end for k, v in pairs(data.packets.incoming) do if name:find(v.name, 1, true) then return v end end end return nil end
function getNops() local elements = {} local filter = nopFilerBox.v if nopsTab == 1 then for k, v in pairs(data.packets.incoming) do if filter == '' or v.name:lower():find(filter:lower(), 1, true) then table.insert(elements, v.name .. (v.isNopped and ' [NOPPED]' or '') .. '##incomingPacket') end end end if nopsTab == 2 then for k, v in pairs(data.rpc.incoming) do if filter == '' or v.name:lower():find(filter:lower(), 1, true) then table.insert(elements, v.name .. (v.isNopped and ' [NOPPED]' or '') .. '##incomingRPC') end end end if nopsTab == 3 then for k, v in pairs(data.packets.outcoming) do if filter == '' or v.name:lower():find(filter:lower(), 1, true) then table.insert(elements, v.name .. (v.isNopped and ' [NOPPED]' or '') .. '##outcomingPacket') end end end if nopsTab == 4 then for k, v in pairs(data.rpc.outcoming) do if filter == '' or v.name:lower():find(filter:lower(), 1, true) then table.insert(elements, v.name .. (v.isNopped and ' [NOPPED]' or '') .. '##outcomingRPC') end end end if nopsTab == 5 then for k, v in pairs(data.packets.incoming) do if v.isNopped then if filter == '' or v.name:lower():find(filter:lower(), 1, true) then table.insert(elements, u8'[Входящий] ' .. v.name .. '##incomingPacket') end end end for k, v in pairs(data.rpc.incoming) do if v.isNopped then if filter == '' or v.name:lower():find(filter:lower(), 1, true) then table.insert(elements, u8'[Входящий] ' .. v.name .. '##incomingRPC') end end end for k, v in pairs(data.packets.outcoming) do if v.isNopped then if filter == '' or v.name:lower():find(filter:lower(), 1, true) then table.insert(elements, u8'[Исходящий] ' .. v.name .. '##outcomingPacket') end end end for k, v in pairs(data.rpc.outcoming) do if v.isNopped then if filter == '' or v.name:lower():find(filter:lower(), 1, true) then table.insert(elements, u8'[Исходящий] ' .. v.name .. '##outcomingRPC') end end end end return elements end
function getNoppedPackets() local elements = {} for k, v in pairs(data.packets.incoming) do if v.isNopped then table.insert(elements, v.name .. '##incomingPacket') end end for k, v in pairs(data.rpc.incoming) do if v.isNopped then table.insert(elements, v.name .. '##incomingRPC') end end for k, v in pairs(data.packets.outcoming) do if v.isNopped then table.insert(elements, v.name .. '##outcomingPacket') end end for k, v in pairs(data.rpc.outcoming) do if v.isNopped then table.insert(elements, v.name .. '##outcomingRPC') end end return elements end
function disableAllNops() local elements = {} for k, v in pairs(data.packets.incoming) do if v.isNopped then v.isNopped = false end end for k, v in pairs(data.rpc.incoming) do if v.isNopped then v.isNopped = false end end for k, v in pairs(data.packets.outcoming) do if v.isNopped then v.isNopped = false end end for k, v in pairs(data.rpc.outcoming) do if v.isNopped then v.isNopped = false end end return elements 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
function imgui.ButtonActivated(activated, ...) if activated then imgui.PushStyleColor(imgui.Col.Button, imgui.GetStyle().Colors[imgui.Col.CheckMark]) imgui.PushStyleColor(imgui.Col.ButtonHovered, imgui.GetStyle().Colors[imgui.Col.CheckMark]) imgui.PushStyleColor(imgui.Col.ButtonActive, imgui.GetStyle().Colors[imgui.Col.CheckMark])
end
function imgui.InputTextWithHint(label, hint, buf, flags, callback, user_data) local l_pos = {imgui.GetCursorPos(), 0} local handle = imgui.InputText(label, buf, flags, callback, user_data) l_pos[2] = imgui.GetCursorPos() local t = (type(hint) == 'string' and buf.v:len() < 1) and hint or '\0' local t_size, l_size = imgui.CalcTextSize(t).x, imgui.CalcTextSize('A').x imgui.SetCursorPos(imgui.ImVec2(l_pos[1].x + 8, l_pos[1].y + 2)) imgui.TextDisabled((imgui.CalcItemWidth() and t_size > imgui.CalcItemWidth()) and t:sub(1, math.floor(imgui.CalcItemWidth() / l_size)) or t) imgui.SetCursorPos(l_pos[2]) return handle end
function exists(file) local ok, err, code = os.rename(file, file) if not ok then if code == 13 then return true end end return ok, err end
function isdir(path) return exists(path.."/") end
function split(inputstr, sep) if sep == nil then sep = "%s" end local t={} for str in string.gmatch(inputstr, "([^"..sep.."]+)") do table.insert(t, str) end return t end
function clone (t) if type(t) ~= "table" then return t end local meta = getmetatable(t) local target = {} for k, v in pairs(t) do if type(v) == "table" then target[k] = clone(v) else target[k] = v end end setmetatable(target, meta) return target end
function emul_rpc(hook, parameters) local bs_io = require 'samp.events.bitstream_io' local handler = require 'samp.events.handlers' local extra_types = require 'samp.events.extra_types' local hooks = {
end
function samp_create_sync_data(sync_type, copy_from_player) local ffi = require 'ffi' local sampfuncs = require 'sampfuncs' -- from SAMP.Lua local raknet = require 'samp.raknet' --require 'samp.synchronization'
end
local imguiThemes = { { 'Красная', function() local style = imgui.GetStyle() local colors = style.Colors local clr = imgui.Col local ImVec4 = imgui.ImVec4
}
function getActualTheme() return imguiThemes[settingsSelectedTheme.v + 1] end
function getThemeNames(utf8) themes = {} for k, v in pairs(imguiThemes) do table.insert(themes, utf8 and u8(v[1]) or v[1]) end return themes end
function setTheme(id) imgui.SwitchContext() imguiThemes[id + 1][2]() end