Заказываем Lua скрипты | Reborn

Статус
В этой теме нельзя размещать новые ответы.

AnWu

Guardian of Order
Автор темы
Всефорумный модератор
4,686
5,166
Lua:
function main()
    while not isSampAvailable() do wait(0) end
    while true do wait(0)
        if testCheat('POTOMIZMENUMBESLINEZABUDU') then
            sampSendChat('/get guns')
            repeat
            wait(0)
            id = sampGetCurrentDialogId()
            until id == 9599
            sampSendDialogResponse(9599,1,4,'')
            sampSendDialogResponse(9599,1,5,'')
        end
    end
end
Садизм зашкаливает, ты проверял работает ли?
 

AnWu

Guardian of Order
Автор темы
Всефорумный модератор
4,686
5,166
а что там может не работать (п.с. даже не знаю чо за сервер на котором оно должно работать)
Сама идея не оч. Ты прерываешь все проверки main. Если это ему нужно вшить куда либо - будут проблемы. Да и если на то пошло - лучше SAMP.Lua, даже если нужно скачать его и установить. Убер важно что можно полностью контролировать диалоги, вплоть до их не показа.
 

™ ChipFamily

По ту сторону надежды.
5,144
1,980
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Чтобы можно было вписывать wait через которое будут нажиматься кнопки, ибо тут его нету.
Lua:
script_name("Klans Y/N Tapper")
script_authors("Kapa211")
script_moonloader(0.21)

require "lib.moonloader"
local hook = require 'lib.samp.events'

grogger = false


function main()
    repeat wait(0) until isSampAvailable()
    sampAddChatMessage("Klans Y/N Tapper загружен /txd", 0xc0c24e)
    sampRegisterChatCommand("txd",
    function()
        grogger = not grogger
        if grogger then sampAddChatMessage("Klans Y/N Tapper активирован", 0xc0c24e)
        else sampAddChatMessage("Klans Y/N Tapper деактивирован", 0xc0c24e) end
    end)
    wait(-1)
end


function hook.onShowTextDraw(textdrawId, data)
    if textdrawId > 3 then
    if grogger then
        if data.text:find("Y") then
            sendKey(64)
        elseif data.text:find("N") then
            sendKey(128)
        elseif data.text:find("H") then
            sendKey(192)
        end
    end
    end
end

function sendKey(key)
    local _, myId = sampGetPlayerIdByCharHandle(PLAYER_PED)
    local data = allocateMemory(68)
    sampStorePlayerOnfootData(myId, data)
    setStructElement(data, 36, 1, key, false)
    sampSendOnfootData(data)
    freeMemory(data)
end
--#SAMP RIP
 
  • Bug
Реакции: Shepi

AnWu

Guardian of Order
Автор темы
Всефорумный модератор
4,686
5,166
Чтобы можно было вписывать wait через которое будут нажиматься кнопки, ибо тут его нету.
Lua:
script_name("Klans Y/N Tapper")
script_authors("Kapa211")
script_moonloader(0.21)

require "lib.moonloader"
local hook = require 'lib.samp.events'

grogger = false


function main()
    repeat wait(0) until isSampAvailable()
    sampAddChatMessage("Klans Y/N Tapper загружен /txd", 0xc0c24e)
    sampRegisterChatCommand("txd",
    function()
        grogger = not grogger
        if grogger then sampAddChatMessage("Klans Y/N Tapper активирован", 0xc0c24e)
        else sampAddChatMessage("Klans Y/N Tapper деактивирован", 0xc0c24e) end
    end)
    wait(-1)
end


function hook.onShowTextDraw(textdrawId, data)
    if textdrawId > 3 then
    if grogger then
        if data.text:find("Y") then
            sendKey(64)
        elseif data.text:find("N") then
            sendKey(128)
        elseif data.text:find("H") then
            sendKey(192)
        end
    end
    end
end

function sendKey(key)
    local _, myId = sampGetPlayerIdByCharHandle(PLAYER_PED)
    local data = allocateMemory(68)
    sampStorePlayerOnfootData(myId, data)
    setStructElement(data, 36, 1, key, false)
    sampSendOnfootData(data)
    freeMemory(data)
end
--#SAMP RIP
не понял как это должно работать. Типа КД на нажатие добавить?
 
  • Нравится
Реакции: Heliotrope

deddosouru

Смотрю аниме, служу Сатане
Друг
2,036
1,319
Колокольчик. когда попадаешь по персу воспроизводится звук.
на Lua еще такого нету, как мне известно.
вложение
Сама идея не оч. Ты прерываешь все проверки main. Если это ему нужно вшить куда либо - будут проблемы. Да и если на то пошло - лучше SAMP.Lua, даже если нужно скачать его и установить. Убер важно что можно полностью контролировать диалоги, вплоть до их не показа.
щас бы яйца через хуки чесать чтоб под ногтями не пахло. всё там нормально.
 

Вложения

  • kolokol4ik.rar
    192.4 KB · Просмотры: 42

™ ChipFamily

По ту сторону надежды.
5,144
1,980
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.

TheMicrosoft

Новичок
105
17
Можешь сделать авто-ловлю мяса в ТСР для аризоны? Может быть ещё авто-ловля одежды?
 

TheMicrosoft

Новичок
105
17
Какая ловля, что происходит
На Аризоне в ТСР исправительная работа "приготовить еду" самая жестокая, там надо дожить мясо в духовку, и через 100 секугс мы получаем готовое мясо. Так вот, чтобы его получить, надо соблюдать тайминги, и нажимать быстрее всех. Ну прям как ловля домов, но без капчи
 

Aniki

🐰
Администратор
1,225
1,506
На Аризоне в ТСР исправительная работа "приготовить еду" самая жестокая, там надо дожить мясо в духовку, и через 100 секугс мы получаем готовое мясо. Так вот, чтобы его получить, надо соблюдать тайминги, и нажимать быстрее всех. Ну прям как ловля домов, но без капчи
Если там типа через клик текстдрава то по идее ничего сложного. Пиши
 

checkdasound

Известный
Проверенный
963
406
Допустим я заДГАНил оружие, прицелился и выстрелил, после чего у меня пропало ВСЕ оружие. Даже то, которое не было заДГАНено.
Как называется этот рпс или пакет?
RPC_SCRRESETPLAYERWEAPONS
RPC_SCRSETPLAYERARMEDWEAPON
PACKET_WEAPONS_UPDATE
Что-то из этих?
Пытался сделать обход этой системы, чтобы когда сервер пытался забрать оружие, то обработка прекращалась, но чет не очень получилось.
Скажите, можно ли обойти это таким образом?
upload_2018-7-2_17-58-14.png
 
Статус
В этой теме нельзя размещать новые ответы.