Вопросы по 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.
Как получить транспорт, в котором сидит игрок?
Lua:
local veh = storeCarCharIsInNoSave(PLAYER_PED)
Как получить свой id или id другого игрока?
Lua:
local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED) -- получить свой ид
local _, id = sampGetPlayerIdByCharHandle(ped) -- получить ид другого игрока. ped - это хендл персонажа
Как проверить, что строка содержит какой-то текст?
Lua:
if string.find(str, 'текст', 1, true) then
-- строка str содержит "текст"
end
Как эмулировать нажатие игровой клавиши?
Lua:
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 другого игрока, в которого целюсь я?
Lua:
local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
  local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
  if result then -- проверить, прошло ли получение ида успешно
    -- здесь любые действия с полученным идом игрока
  end
end
Как зарегистрировать команду чата SAMP?
Lua:
-- До бесконечного цикла/задержки
sampRegisterChatCommand("mycommand", function (param)
     -- param будет содержать весь текст введенный после команды, чтобы разделить его на аргументы используйте string.match()
    sampAddChatMessage("MyCMD", -1)
end)
Крашит игру при вызове sampSendChat. Как это исправить?
Это происходит из-за бага в SAMPFUNCS, когда производится попытка отправки пакета определенными функциями изнутри события исходящих RPC и пакетов. Исправления для этого бага нет, но есть способ не провоцировать его. Вызов sampSendChat изнутри обработчика исходящих RPC/пакетов нужно обернуть в скриптовый поток с нулевой задержкой:
Lua:
function onSendRpc(id)
  -- крашит:
  -- sampSendChat('Send RPC: ' .. id)

  -- норм:
  lua_thread.create(function()
    wait(0)
    sampSendChat('Send RPC: ' .. id)
  end)
end
 
Последнее редактирование:

NetyEgo

Участник
164
10
как сделать чтоб при каждом изменении в checkbox всё сразу сохранялось в CFG и желательно чтоб было без лагов
 

copypaste_scripter

Известный
1,261
234
Lua:
if isKeyDown(VK_MENU) and isKeyJustPressed(VK_J) then
    int id = sampGetCurrentDialogId()
end
почему не работает? дает ошибку
[ML] (error) D:\Games\ARIZONA GAMES\bin\Arizona\moonloader\myscript.lua:85: '=' expected near 'id'
85 линия:
int id = sampGetCurrentDialogId()
 

Anton Nixon

Активный
474
48
Lua:
if isKeyDown(VK_MENU) and isKeyJustPressed(VK_J) then
    int id = sampGetCurrentDialogId()
end
почему не работает? дает ошибку
[ML] (error) D:\Games\ARIZONA GAMES\bin\Arizona\moonloader\myscript.lua:85: '=' expected near 'id'
85 линия:
int id = sampGetCurrentDialogId()
Lua:
if isKeyDown(VK_MENU) and isKeyJustPressed(VK_J) then
    id = sampGetCurrentDialogId()
end
 
  • Нравится
Реакции: copypaste_scripter

JustFedot

Известный
329
329
Решил попробовать сделать типа пищалку чтоб оно пищало когда админы пишут.
Вот код функции проигрывания:
Lua:
function play()
    lua_thread.create(function()
        playsound = loadAudioStream('moonloader/gonwik.mp3')
        setAudioStreamVolume(playsound, volume)
        while true do
            wait(0)
            setAudioStreamState(playsound, as_action.PLAY)
            printStringNow('Press Alt (Fedot OneLove)', 100)
            wait(upd_delay)
            setAudioStreamState(playsound, as_action.STOP)
            if isKeyJustPressed(VK_MENU) then
                playsound = nil
                ebosh = false
                return
            end
        end
    end)
end
Всё работает нормально, но вот в анти афк например оно не пищит, а хотелось бы, может вы подскажете решение?

P.S. Мб у вас есть нормальный анти афк который не будет творить вот такой фигни?)
photo_2020-05-04_20-44-22.jpg
 

copypaste_scripter

Известный
1,261
234
скрипт удаляет линии которых не должен, а ещё не убирает все что должен, как исправить?
 

Pu$$y

Участник
80
2
I have a string that has some coordinates. For example
Lua:
 S = "15 , 12, 20"
I want to do this

Lua:
 S = "15 , 12, 20"
x, y, z = tonumber(S)

Will it work?
 

copypaste_scripter

Известный
1,261
234
А код мы телепатией узнаем? 😁
Как кофе допьешь чашку мне отдай,буду на кофейной гуще гадать
Lua:
script_name('CPS_Script')
script_author('Copy_Paste_from_Internet')
script_description('Something')

require "lib.moonloader"
require "lib.samp.events"

local sampev = require "lib.samp.events"
local keys = require "vkeys"
local main_color = 0x8B0000

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    
    sampRegisterChatCommand("cg", cmd_cg)
    sampRegisterChatCommand("sellstuff", cmd_sellstuff)

    while true do
        wait(0)

        --[[if isKeyJustPressed(VK_CAPITAL) then
            wait(100)
            setVirtualKeyDown(VK_LMENU, true)
            wait(10)
            setVirtualKeyDown(VK_LSHIFT, true)
            wait(100)
            setVirtualKeyDown(VK_LMENU, false)
            setVirtualKeyDown(VK_LSHIFT, false)
        end]]

        if isKeyJustPressed(VK_F3) then            --    F3        /s text
            sampSendChat("/s 123")
        end
        
        if isKeyJustPressed(VK_F13) then        --    F13        /key
            sampSendChat("/key")
        end
        
        if isKeyJustPressed(VK_F14) then        --    F14        /lock
            sampSendChat("/lock")
        end
        
        if isKeyJustPressed(VK_F18) then        --    F18        /repcar
            sampSendChat("/repcar")
        end
        
        if isKeyJustPressed(VK_F19) then        --    F19        /fillcar
            sampSendChat("/fillcar")
        end
        
        if isKeyJustPressed(VK_F20) then        --    F20        /house
            sampSendChat("/house")
        end
        
        if isKeyJustPressed(VK_F16) then        --    F16        /cars
            sampSendChat("/cars")
        end
        
        if isKeyJustPressed(VK_NUMPAD0) then    --    Num0    /jlock
            sampSendChat("/jlock")
        end
        
        if isKeyJustPressed(VK_NUMPAD8) then    --    Num8    /beer
            sampSendChat("/beer")
        end
        
        if isKeyJustPressed(VK_F9) then            --    F9        /time
            sampSendChat("/time")
        end
        
        if isKeyJustPressed(VK_F2) then            --    F2        /unrentcar
            sampSendChat("/unrentcar")
        end
        
        if isKeyDown(VK_MENU) and isKeyJustPressed(VK_F11) then
            sampProcessChatInput("/fpslimit 90")
        end
        
        if isKeyDown(VK_MENU) and isKeyJustPressed(VK_F12) then
            sampProcessChatInput("/fpslimit 20")
        end
        
        if isKeyDown(VK_MENU) and isKeyJustPressed(VK_J) then
            id_dialog = sampGetCurrentDialogId()
            sampAddChatMessage(id_dialog, main_color)
        end
        
        if isKeyDown(VK_CONTROL) and isKeyJustPressed(VK_P) then
            sampSendChat("/phone")
            wait (300)
            setVirtualKeyDown(VK_RETURN)
        end
    end
end

function cmd_cg(arg)                                                --    /creategun > /cg
    sampSendChat("/creategun")
end

function cmd_sellstuff(arg)
    lua_thread.create(function()
        sampSendChat("/s ")
        wait (3500)
        sampSendChat("/s ")
        wait (3500)
        sampSendChat("/s ")
        wait (3500)
        sampSendChat("/s ")
        wait (3500)
        sampSendChat("/s ")
    end)
end

function sampev.onServerMessage(color, text)
--
--                    CHAT HELP
--
    if text:find("Вы успешно зарегистрировали новую SIM карту. Ваш новый номер телефона:") then
        lua_thread.create(function()
            wait (30000)
            sampAddChatMessage("SIM карта", main_color)
        end)
    end
    
    if text:find("Номера телефонов государственных служб:") then
        sampAddChatMessage("111 - баланс | 060 - время | 911 - полиция | 912 - скорая | 913 - такси | 914 - механик | 8828 - банк", main_color)
    end    --    rabotaet
    
    if text:find("Приветствуем нового члена нашей организации") then
        sampAddChatMessage("invite", main_color)    --    rabotaet
    end
--
--                    CHAT TRASH
--
    if text:find("Отредактировал сотрудник СМИ") then
        return false
    end    --    rabotaet
    
    if text:find("В нашем магазине ты можешь приобрести нужное количество игровых денег и потратить") or text:find("или на покупку каких-нибудь безделушек") or text:find("В магазине так-же можно приобрести редкие") or text:find("- Игроки со статусом VIP имеют большие возможности, подробнее /help [Преимущества VIP]") or text:find("предметы, которые выделят тебя из толпы! Наш сайт: arizona-rp.com") then
        return false
    end

    if text:find("начал работу новый инкассатор") or text:find("Убив его, вы сможете получить деньги") then
        return false
    end

    if text:find("Репортёр [LS]") or text:find("Репортёр [SF]") or text:find("Репортёр [LV]") or text:find(" Гость ") or text:find(" [ News LS ]") or text:find(" [ News SF ]") or text:find(" [ News LV ]") then
        return false
    end

    if text:find("[Внимание] Быстрее отправляйтесь на его разгрузку, чтобы его не забрали другие!") then
        return false
    end

    if text:find("Чтобы завести двигатель введите") or text:find("Для управления поворотниками используйте клавиши") or text:find("В транспорте присутствует радио") then
        return false
    end    --    rabotaet

    if text:find("Чтобы закрыть автомобиль используйте ") or text:find("Чтобы отказаться от аренды") then
        return false
    end

    if text:find("111 - Проверить баланс телефона") or text:find("060 - Служба точного времени") or text:find("911 - Полицейский участок") or text:find("912 - Скорая помощь") or text:find("913 - Такси") or text:find("914 - Механик") or text:find("8828 - Справочная центрального банка") then
        return false
    end

    if text:find("Состояние вашего авто крайне плохое! Машина может сломаться!") or text:find("Необходимо заехать на станцию тех. обслуживания!") then
        return false
    end
end

--[[
230 arenda
162 /cars
163 zagruzit mashinu
]]