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

Общая тема для вопросов по разработке скриптов на языке программирования Lua, в частности под MoonLoader.

• Задавая вопрос, убедитесь, что его нет в списке частых вопросов и что на него ещё не отвечали (воспользуйтесь поиском).
• Поищите ответ в теме посвященной разработке Lua скриптов в MoonLoader
• Отвечая, убедитесь, что ваш ответ корректен.
• Старайтесь как можно точнее выразить мысль, а если проблема связана с кодом, то обязательно прикрепите его к сообщению, используя блок [code=lua]здесь мог бы быть ваш код[/code].
• Если вопрос связан с MoonLoader-ом первым делом желательно поискать решение на wiki.

Частые вопросы

— Как научиться писать скрипты? С чего начать?
Информация - Гайд - Всё о Lua скриптинге для MoonLoader^{(https://blast.hk/threads/22707/)}
— Как вывести текст на русском? Вместо русского текста у меня какие-то каракули.

Спойлер

Изменить кодировку файла скрипта на Windows-1251. В Atom: комбинация клавиш Ctrl+Shift+U, в Notepad++: меню Кодировки -> Кодировки -> Кириллица -> Windows-1251.

— Как получить транспорт, в котором сидит игрок?

Спойлер

local veh = storeCarCharIsInNoSave(PLAYER_PED)

— Как получить свой id или id другого игрока?

Спойлер

local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED) -- получить свой ид
local _, id = sampGetPlayerIdByCharHandle(ped) -- получить ид другого игрока. ped - это хендл персонажа

— Как проверить, что строка содержит какой-то текст?

Спойлер

if string.find(str, 'текст', 1, true) then
-- строка str содержит "текст"
end

— Как эмулировать нажатие игровой клавиши?

Спойлер

local game_keys = require 'game.keys' -- где-нибудь в начале скрипта вне функции main

setGameKeyState(game_keys.player.FIREWEAPON, -1) -- будет сэмулировано нажатие клавиши атаки

Все иды клавиш находятся в файле moonloader/lib/game/keys.lua.
Подробнее о функции setGameKeyState здесь: lua - setgamekeystate | BlastHack — DEV_WIKI^{(https://www.blast.hk/wiki/lua:setgamekeystate)}

— Как получить id другого игрока, в которого целюсь я?

Спойлер

local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
  local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
  if result then -- проверить, прошло ли получение ида успешно
    -- здесь любые действия с полученным идом игрока
  end
end

— Как зарегистрировать команду чата SAMP?

Спойлер

-- До бесконечного цикла/задержки
sampRegisterChatCommand("mycommand", function (param)
     -- param будет содержать весь текст введенный после команды, чтобы разделить его на аргументы используйте string.match()
    sampAddChatMessage("MyCMD", -1)
end)

— Крашит игру при вызове sampSendChat. Как это исправить?

Спойлер

Это происходит из-за бага в SAMPFUNCS, когда производится попытка отправки пакета определенными функциями изнутри события исходящих RPC и пакетов. Исправления для этого бага нет, но есть способ не провоцировать его. Вызов sampSendChat изнутри обработчика исходящих RPC/пакетов нужно обернуть в скриптовый поток с нулевой задержкой:

function onSendRpc(id)
  -- крашит:
  -- sampSendChat('Send RPC: ' .. id)

  -- норм:
  lua_thread.create(function()
    wait(0)
    sampSendChat('Send RPC: ' .. id)
  end)
end

 

[Dark_Knight]

При создании ShowDialog использовать стиль 5.

 

[trefa]

как сделать такой диалог?

Стиль 5, между словами ставь /t

 

[atizoff]

Как сделать автовыдачу наказаний, что бы скрипт искал в чате прозьбу от админа последнию, где написано /kick 45 Помеха, а не по всему чат логу и выдавал только последние прозьбу, а не весь чат лог где написано /kick
я вот сделал кое что
но он выдает весь чат лог, я поставил время типо в течение 10 секунд, это не то, хочу без времени и последнее /kick

require "moonloader"

function main()
    wait(-1)
end

function ev.onServerMessage(color, msg)
    if msg:find("%a+_%a+%[%d+%]: /kick%s*.+") and color == 8388607 then
        msg1 = msg
        lua_thread.create(function()
        local bykva, family, param1 = msg1:match("%[A%] (.)%w+_(%w+)%[%d+%]: /kick%s*(.+)")
        local time = os.clock() + 10
        sampAddChatMessage("• {"..DB4.."}["..scriptname.." | Подсказка] {"..Wbe.."}Прозьба прописать команду: {"..Wvc.."}/skin "..param1.."",-1)
        sampAddChatMessage("• {"..DB4.."}["..scriptname.." | Подсказка] {"..Wbe.."}Нажмите {7FFF00}Alt+Y {"..Wbe.."}для одобрение или {FC2847}Alt+N {"..Wbe.."}для отказа",-1)
        while os.clock() < time do
        wait(0)
        if isKeyDown(VK_MENU) and isKeyJustPressed(VK_Y) then
            sampAddChatMessage("• {"..DB4.."}["..scriptname.." | Информация] {"..Wbe.."}Вы приняли прозьбу", -1)
            sampAddChatMessage("/kick "..id.." | "..family.."",-1)
        elseif isKeyDown(VK_MENU) and isKeyJustPressed(VK_N) then
            sampAddChatMessage("• {"..DB4.."}["..scriptname.." | Информация] {"..Wbe.."}Вы отказали прозьбу", -1)
        end
        end
        end)
    end
end

local ev = require("lib.samp.events") :thinking:
И не проЗьба, а проСьба

 

[штейн]

local info = https.request('https://docs.google.com/spreadsheets/d/e/2PACX-1vRvLG8kYIfkWA9laq_JW3XNEf4PAeYm1lRoSXqz9AnHC0q-n4k7HFNrenDU-CJzoxI2iRzeeCxRXCY5/pubhtml?gid=0&single=true')
local nick, lvl, otv = info:match('.+colspan="2">(%a+ %a+)</td>.+'), info:match('.+colspan="2">(%d+)</td>.+'), info:match('.+rowspan="2">.+-<br>(%a+ %a+)</td>.+')
print (nick, lvl, otv)

нужно чтобы он брал несколько ников с сайта, а берёт только один, как это пофиксить

 

[Lenow]

с чего начать писать имгуи биндер?

 

[madrasso]

как сделать картинку в imgui ?

 

[штейн]

как сделать картинку в imgui ?

icon = imgui.CreateTextureFromFile('moonloader\\config\\images\\icon.png')
imgui.Image(icon, imgui.ImVec2(x, y))

--

с чего начать писать имгуи биндер?

Исходник - Сырая наработка биндера + IMGUI))^{(https://blast.hk/threads/22639/)}

 

[trefa]

Можно ли как то узнать координаты оружия в руках у персонажа?

 

[Petr_Sergeevich]

ФПС не пострадает, если в бесконечном цикле делать inicfg.save?

 

[ШPEK]

Как скачать исходник любого сайта?
Тип того

 

[Lenow]

icon = imgui.CreateTextureFromFile('moonloader\\config\\images\\icon.png')
imgui.Image(icon, imgui.ImVec2(x, y))

--


Исходник - Сырая наработка биндера + IMGUI))^{(https://blast.hk/threads/22639/)}

стой что для него нужно самой сырой наработки

 

[Musaigen]

стой что для него нужно самой сырой наработки

А ты чё хотел? Что бы тебе всю на блюдичке поднесли? Свежое и рабочее?

 

[штейн]

ФПС не пострадает, если в бесконечном цикле делать inicfg.save?

нет вроде, я в цикле делал и норм всё

----

Как скачать исходник любого сайта?
Тип того
Посмотреть вложение 17957

local https = require 'ssl.https'

text = https.request('ссылка на сайт да')
print (text)

либо через downloadUrlToFile:

local dlstatus = require('moonloader').download_status

function govno()
    downloadUrlToFile('ssilka', os.getenv('TEMP') .. '\\test.txt', function(id, status, p1, p2)
        if status == dlstatus.STATUS_ENDDOWNLOADDATA then
            local f = io.open(os.getenv('TEMP') .. '\\test.txt', 'r')
            if f then
                local info = f:read('*a')
                print (info)
            end
        end
    end)
end

 

[ШPEK]

нет вроде, я в цикле делал и норм всё

----

local https = require 'ssl.https'

text = https.request('ссылка на сайт да')
print (text)

Мне надо скачать, а не получить ибо requests у меня не работает.

 

[штейн]

Мне надо скачать, а не получить ибо requests у меня не работает.

либо через downloadUrlToFile:

local dlstatus = require('moonloader').download_status

function govno()
    downloadUrlToFile('ssilka', os.getenv('TEMP') .. '\\test.txt', function(id, status, p1, p2)
        if status == dlstatus.STATUS_ENDDOWNLOADDATA then
            local f = io.open(os.getenv('TEMP') .. '\\test.txt', 'r')
            if f then
                local info = f:read('*a')
                print (info)
            end
        end
    end)
end

-----------

local info = https.request('https://docs.google.com/spreadsheets/d/e/2PACX-1vRvLG8kYIfkWA9laq_JW3XNEf4PAeYm1lRoSXqz9AnHC0q-n4k7HFNrenDU-CJzoxI2iRzeeCxRXCY5/pubhtml?gid=0&single=true')
local nick, lvl, otv = info:match('.+colspan="2">(%a+ %a+)</td>.+'), info:match('.+colspan="2">(%d+)</td>.+'), info:match('.+rowspan="2">.+-<br>(%a+ %a+)</td>.+')
print (nick, lvl, otv)

нужно чтобы он брал несколько ников с сайта, а берёт только один, как это пофиксить

@Trefa_ @Musaigen