Вопросы по Lua скриптингу

abnomegd · 10 Окт 2021

апапапапхапахпахпах ну ладно

Lua:

require 'lib.moonloader'
local lsampev, sp = pcall(require, 'lib.samp.events')
local inicfg = require 'inicfg'

local directini = "moonloader\\config\\AdvanceConnect.ini"
local mainini = inicfg.load(nil, directini)

local parol = (mainini.config.parol)
local pinkod = (mainini.config.pinkod)
 
function check()
    local names = {
        'First_Name',
        'Second_Name',
        'Third_Name',
    }
    for i = 1, #names do
        if sampGetPlayerNickname(select(2, sampGetPlayerIdByCharHandle(PLAYER_PED))) == names[i] then
            name = true
            break
        end
    end
    if sampGetCurrentServerAddress() == '95.181.158.77' then srv = true end
    if name and srv then return true end
    return false
end

function main()
    repeat wait(0) until isSampAvailable()
    if check() then
        ssampAddChatMessage("[AdvanceConnect]: {FFFFFF}Скрипт загружен.", 0x5CBCFF)
    else
        sampAddChatMessage("[AdvanceConnect]: {FFFFFF}Проверка не пройдена, скрипт выгружен!", 0x5CBCFF)
        thisScript().unload()
    end
   
    sampRegisterChatCommand("rec", function(arg)
        if arg ~= nil then
            time = tonumber(arg)
            res = true
        end
    end)
    while true do
        wait(0)
        local chatstring = sampGetChatString(99)
        if chatstring == "Server closed the connection." or chatstring == "You are banned from this server." then
            sampDisconnectWithReason(false)
            sampAddChatMessage("Wait reconnecting...", 0xa9c4e4)
            wait(5000)
            sampSetGamestate(1)
        end

        if res and time ~= nil then
            sampDisconnectWithReason(quit)
            wait(time*1000)
            sampSetGamestate(1)
            res = false
        elseif res and time == nil then
            sampDisconnectWithReason(quit)
            wait(15500)
            sampSetGamestate(1)
            res = false
        end
    end
end

function sp.onShowDialog(id, style, title, button1, button2, text)
    if id == 2 or id == 1 or id == 10 then
        sampSendDialogResponse(id, 1, _, parol)
        return false
    end
    if id == 199 then
        sampSendDialogResponse(id, 1, _, pinkod)
        return false
    end
end

P3rsik · 10 Окт 2021

how to make script that only nicks i type can use the script ?

abnomegd · 10 Окт 2021

Lugers написал(а):
how to make script that only nicks i type can use the script ?

in what sense, in more detail

P3rsik · 10 Окт 2021

abnomegd написал(а):
in what sense, in more detail

Nicks that can use script like David_Kora then he can use the script

Dmitriy Makarov · 10 Окт 2021

Lugers написал(а):
how to make script that only nicks i type can use the script ?

Lua:

local requests = require 'requests'

function check() -- https://www.blast.hk/threads/52963/post-482157
    local request = requests.get('https://pastebin.com/raw/ifLnv4RK') -- URL link with pastebin nicknames. (RAW link)
    local nick = sampGetPlayerNickname(select(2, sampGetPlayerIdByCharHandle(PLAYER_PED)))
    local function res()
        for n in request.text:gmatch('[^\r\n]+') do -- split text into lines
            if nick:find(n) then
                return true
            end
        end
        return false
    end
    if res() then -- -- if the username of the script is in the pastebin list
        sampAddChatMessage("+", -1)
    else
        sampAddChatMessage("-", -1)
        -- thisScript():unload() -- unload the script if the nickname is not in the list
    end
end

-- use in main
--[[
function main()
    while not isSampAvailable() do wait(100) end
    check()
    wait(-1)
end
]]

SamperJostkiy · 11 Окт 2021

Skerzzzo написал(а):
Не понял зачем мне исправление иероглифов, если проблема в том что не делается скриншот после появления в чате заданного текста.

Что бы текст искало на русском, вот зачем тебе кодировка

Мира · 11 Окт 2021

что не так?

Lua:

function sampev.onSpectatePlayer(playerId, camType)

    if isKeyJustPressed(VK_LSHIFT)
        and not sampIsChatInputActive()
        and not sampIsDialogActive()
    then
        sampAddChatMessage(playerId, -1)
    end
    
end

MAHEKEH · 11 Окт 2021

Допустим я хочу создать рандом или задержку на получение бессмертия, как мне задать эту самую задержку?

Lua:

if TEST then require('lib.samp.events').onBulletSync = function(playerid, data)
wait(12345) -- omg what
return
  end

PanSeek · 11 Окт 2021

MAHEKEH написал(а):
Допустим я хочу создать рандом или задержку на получение бессмертия, как мне задать эту самую задержку?

Lua:

if TEST then require('lib.samp.events').onBulletSync = function(playerid, data) wait(12345) -- omg what return end

Math.random (Lua) — UoPilot

uopilot.uokit.com

Мира написал(а):

что не так?

Lua:

function sampev.onSpectatePlayer(playerId, camType)

    if isKeyJustPressed(VK_LSHIFT)
        and not sampIsChatInputActive()
        and not sampIsDialogActive()
    then
        sampAddChatMessage(playerId, -1)
    end
  
end

Lua:

local wm = require 'windows.message'
local id, active = nil, false

function onWindowMessage(msg, wparam, lparam)
    if msg == wm.WM_KEYUP and wparam == VK_LSHIFT and active and not sampIsChatInputActive() and not sampIsDialogActive() then
        sampAddChatMessage(id, -1)
        active = false
    end
end

function sampev.onSpectatePlayer(playerId, camType)
    if --[[условие]] then
        id, active = playerId, true
    end
end

Либо

Lua:

local id, active = nil, false
function main()
    while true do
        wait(0)
        if active and isKeyJustPressed(VK_LSHIFT) and not sampIsChatInputActive() and not sampIsDialogActive() then
            sampAddChatMessage(id, -1)
            active = false
        end
    end
end

function sampev.onSpectatePlayer(playerId, camType)
    if --[[условие]] then
        id, active = playerId, true
    end
end

UPD: Если LSHIFT не работает, то добавь библиотеку vkeys.

MAHEKEH · 11 Окт 2021

PanSeek написал(а):

Math.random (Lua) — UoPilot

uopilot.uokit.com

Lua:

local wm = require 'windows.message'
local id, active = nil, false

function onWindowMessage(msg, wparam, lparam)
    if msg == wm.WM_KEYUP and wparam == VK_LSHIFT and active and not sampIsChatInputActive() and not sampIsDialogActive() then
        sampAddChatMessage(id, -1)
        active = false
    end
end

function sampev.onSpectatePlayer(playerId, camType)
    if --[[условие]] then
        id, active = playerId, true
    end
end

Либо

Lua:

local id, active = nil, false
function main()
    while true do
        wait(0)
        if active and isKeyJustPressed(VK_LSHIFT) and not sampIsChatInputActive() and not sampIsDialogActive() then
            sampAddChatMessage(id, -1)
            active = false
        end
    end
end

function sampev.onSpectatePlayer(playerId, camType)
    if --[[условие]] then
        id, active = playerId, true
    end
end

UPD: Если LSHIFT не работает, то добавь библиотеку vkeys.

та проблема не в поиске функции рандома, а то что wait крашит хук, не знаю как заставить его пропускать по патрону раз в 2 секунды к примеру..

PanSeek · 11 Окт 2021

MAHEKEH написал(а):
та проблема не в поиске функции рандома, а то что wait крашит хук, не знаю как заставить его пропускать по патрону раз в 2 секунды к примеру..

в твоем случае юзать wait() в потоке

MAHEKEH · 11 Окт 2021

PanSeek написал(а):
в твоем случае юзать wait() в потоке

эта часть сама по себе в потоке вроде как, а как создавать поток в потоке на wait для функции в потоке, или третий поток, я понятия не имею, поэтому и интересуюсь куда дальше двигаться 🥴

Lua:

    Key_Go() --
    while true do
        wait(0)
        if ..presskey.. then test = not test end
        if test then --hook
           end
           end
           -- end...end... ...
        
              
                   function Key_Go()
                   lua_thread.create(function()
                   while true do
                    wait(0)
                    ------code------
                    ....
                    ....

PanSeek · 11 Окт 2021

MAHEKEH написал(а):
эта часть сама по себе в потоке вроде как, а как создавать поток в потоке на wait для функции в потоке, или третий поток, я понятия не имею, поэтому и интересуюсь куда дальше двигаться 🥴

да.
но так как ты хочешь использовать, то просто wait ставить нельзя.

Lua:

local se = require 'samp.events'
function se.onBulletSync(playerid, data)
    if TEST then
        lua_thread.create(function()
            wait(12345)
        end)
        return
    end
end

сомневаюсь конечно во всем этом, но работать должно.

mzxer · 11 Окт 2021

MAHEKEH написал(а):
не знаю как заставить его пропускать по патрону раз в 2 секунды к примеру..

я бы ебанул таймер
будет не больше одного пакета раз в две секунды

Lua:

local se = require 'samp.events'

local SendState = true
local LastSendTick = 0

function se.onBulletSync(playerid, data)
    if TEST then
        if not SendState then
            return false
        end
        
        -- если 2 секунды прошло и мы разрешаем пакет, то и записываем время его получения
        LastSendTick = os.clock()
    end
end

function main()
    if not isSampLoaded() then return end
    while not isSampAvailable() do wait(100) end
    
    while true do
        wait(0)
        -- true/false / проверка на то, прошло ли две секунды с момента последнего выстрела
        SendState = ((LastSendTick + 2) >= os.clock())
    end
end

а вот если тебе нужно задерживать получение пакета на 2 секунды, то...

Lua:

-- хук получения пакета
function onReceivePacket(id, bitStream)
    -- BulletSync packet
    if id == 206 then

        -- создаем поток
        lua_thread.create(function(bs)
            -- ебашим задержку 2 секунды
            wait(2000)

            -- после ожидания эмулируем его получение
            -- эмуляция ведь не должна привести нас обратно к хуку onReceivePacket???
            raknetEmulPacketReceiveBitStream(206, bs)
        end, bitStream) -- а тута передаем нашу битстру-менстру нашей поточной функе   

        -- отменяем получение нахуй
        return false
    end
end

я нихуя не тестил, это наброски. вообще не факт, что я тебя правильно понял

MAHEKEH · 11 Окт 2021

PanSeek написал(а):
да.
но так как ты хочешь использовать, то просто wait ставить нельзя.

Lua:

local se = require 'samp.events' function se.onBulletSync(playerid, data) if TEST then lua_thread.create(function() wait(12345) end) return end end

сомневаюсь конечно во всем этом, но работать должно.

l

Lua:

lua_thread.create(function()
            wait(12345)
        end)

вот за этот участок отдельная благодарность, теперь мне стало гораздо понятнее что куда, хоть твой код я не заюзал, но задуманное сделать всё же получилось по своему..

mzxer написал(а):

я бы ебанул таймер
будет не больше одного пакета раз в две секунды

Lua:

local se = require 'samp.events'

local SendState = true
local LastSendTick = 0

function se.onBulletSync(playerid, data)
    if TEST then
        if not SendState then
            return false
        end

        -- если 2 секунды прошло и мы разрешаем пакет, то и записываем время его получения
        LastSendTick = os.clock()
    end
end

function main()
    if not isSampLoaded() then return end
    while not isSampAvailable() do wait(100) end

    while true do
        wait(0)
        -- true/false / проверка на то, прошло ли две секунды с момента последнего выстрела
        SendState = ((LastSendTick + 2) >= os.clock())
    end
end

а вот если тебе нужно задерживать получение пакета на 2 секунды, то...

Lua:

-- хук получения пакета
function onReceivePacket(id, bitStream)
    -- BulletSync packet
    if id == 206 then

        -- создаем поток
        lua_thread.create(function(bs)
            -- ебашим задержку 2 секунды
            wait(2000)

            -- после ожидания эмулируем его получение
            -- эмуляция ведь не должна привести нас обратно к хуку onReceivePacket???
            raknetEmulPacketReceiveBitStream(206, bs)
        end, bitStream) -- а тута передаем нашу битстру-менстру нашей поточной функе

        -- отменяем получение нахуй
        return false
    end
end

я на проверки там всё выставил, получилось ущербно но пока знаний на большее не хватает. Вообще я пишу как на клео, максимально тупо, ибо не знаком с основными функциями луа и принципом работы 'function' получается как бы тот же клео, только луа чв

а вот кстати по идам пакетов гораздо понятнее писать

Lua:

if id == 206 then

не потерять бы этот момент на будущие..

там где то на 2-3 страницe ранее парень спрашивал как юзать function в цикле или что то в этом роде, меня тоже интересует этот вопрос, например как вызывать функцию в цикле...
типо че будет если сделать так

Lua:

while true do
wait(0)
if active then function penis() end
end
end

ну и в той функции какая-нибудь задача... Думаю это как то должно работать

Поиск

Поиск

Вопросы по Lua скриптингу

abnomegd

Известный

P3rsik

Активный

abnomegd

Известный

P3rsik

Активный

Dmitriy Makarov

25.05.2021

SamperJostkiy

Участник

Мира

Известный

MAHEKEH

Известный

PanSeek

t.me/dailypanseek

Math.random (Lua) — UoPilot

MAHEKEH

Известный

Math.random (Lua) — UoPilot

PanSeek

t.me/dailypanseek

MAHEKEH

Известный

PanSeek

t.me/dailypanseek

mzxer

Активный

MAHEKEH

Известный

Similar threads