Вопросы по 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

 

[meowprd]

local sampev = require "lib.samp.events"
require "lib.moonloader"



function main()
while not isSampAvailable() do wait(0) end wait(1)
while true do
wait(0)
end
end

function sampev.onServerMessage(color,text)
    if text:find("(.)plotas(.)") then
    local sync = samp_create_sync_data('player')
    sync.position.x = -2966
    sync.position.y = 476
    sync.position.z = 5
    sync.send()
    sampSendChat("/sellfish")
    end 
end



function samp_create_sync_data(sync_type)
    local ffi = require 'ffi'
    local sampfuncs = require 'sampfuncs'
    require 'samp.synchronization'
    local sync_traits = {unoccupied = {'UnoccupiedSyncData', require('samp.raknet').PACKET.UNOCCUPIED_SYNC, nil}}
    local sync_info = sync_traits[sync_type]
    local data_type = 'struct ' .. sync_info[1]
    local data = ffi.new(data_type, {})
    local raw_data_ptr = tonumber(ffi.cast('uintptr_t', ffi.new(data_type .. '*', data)))
    local func_send = function()
        local bs = raknetNewBitStream()
        raknetBitStreamWriteInt8(bs, sync_info[2])
        raknetBitStreamWriteBuffer(bs, raw_data_ptr, ffi.sizeof(data))
        raknetSendBitStreamEx(bs, sampfuncs.HIGH_PRIORITY, sampfuncs.UNRELIABLE_SEQUENCED, 1)
        raknetDeleteBitStream(bs)
    end
    local mt = {
        __index = function(t, index)
            return data[index]
        end,
        __newindex = function(t, index, value)
            data[index] = value
        end
    }
    return setmetatable({send = func_send}, mt)
end

i updated func in my post upper, try to replace

 

[.Makarov.]

Как через скрипт взаимодействовать с сторонним имгуи? Например с тем же самым имгуи от лаунчера азазоны РПе

 

[eqzzz]

insert this func to ur code

function samp_create_sync_data(sync_type, copy_from_player)
    local ffi = require 'ffi'
    local sampfuncs = require 'sampfuncs'
    -- from SAMP.Lua
    local raknet = require 'samp.raknet'
    require 'samp.synchronization'

    copy_from_player = copy_from_player or true
    local sync_traits = {
        player = {'PlayerSyncData', raknet.PACKET.PLAYER_SYNC, sampStorePlayerOnfootData},
        vehicle = {'VehicleSyncData', raknet.PACKET.VEHICLE_SYNC, sampStorePlayerIncarData},
        passenger = {'PassengerSyncData', raknet.PACKET.PASSENGER_SYNC, sampStorePlayerPassengerData},
        aim = {'AimSyncData', raknet.PACKET.AIM_SYNC, sampStorePlayerAimData},
        trailer = {'TrailerSyncData', raknet.PACKET.TRAILER_SYNC, sampStorePlayerTrailerData},
        unoccupied = {'UnoccupiedSyncData', raknet.PACKET.UNOCCUPIED_SYNC, nil},
        bullet = {'BulletSyncData', raknet.PACKET.BULLET_SYNC, nil},
        spectator = {'SpectatorSyncData', raknet.PACKET.SPECTATOR_SYNC, nil}
    }
    local sync_info = sync_traits[sync_type]
    local data_type = 'struct ' .. sync_info[1]
    local data = ffi.new(data_type, {})
    local raw_data_ptr = tonumber(ffi.cast('uintptr_t', ffi.new(data_type .. '*', data)))
    -- copy player's sync data to the allocated memory
    if copy_from_player then
        local copy_func = sync_info[3]
        if copy_func then
            local _, player_id
            if copy_from_player == true then
                _, player_id = sampGetPlayerIdByCharHandle(PLAYER_PED)
            else
                player_id = tonumber(copy_from_player)
            end
            copy_func(player_id, raw_data_ptr)
        end
    end
    -- function to send packet
    local func_send = function()
        local bs = raknetNewBitStream()
        raknetBitStreamWriteInt8(bs, sync_info[2])
        raknetBitStreamWriteBuffer(bs, raw_data_ptr, ffi.sizeof(data))
        raknetSendBitStreamEx(bs, sampfuncs.HIGH_PRIORITY, sampfuncs.UNRELIABLE_SEQUENCED, 1)
        raknetDeleteBitStream(bs)
    end
    -- metatable to access sync data and 'send' function
    local mt = {
        __index = function(t, index)
            return data[index]
        end,
        __newindex = function(t, index, value)
            data[index] = value
        end
    }
    return setmetatable({send = func_send}, mt)
end

что за функция такая getClosestPlayerOfCrosshair?
если она не самописная, то ее нет в стоковом мунлоадере.

function getClosestPlayerOfCrosshair()
    local relable_one, target = getCharPlayerIsTargeting(playerHandle)
    local relable_two, player = sampGetPlayerIdByCharHandle(target)
    if relable_two then
        return player, target
    end
    local minimal_distance = (((select(1, getScreenResolution())) / 2) / getCameraFov()) * elements.silеnt.fieldOfSearch.v
    local closestId, closestPed = -1, -1
    for i = 0, 999 do
        local result, handle = sampGetCharHandleBySampPlayerId(i)
        if result then
            local my_pos = {getCharCoordinates(playerPed)}
            local other_pos = {getCharCoordinates(handle)}
            if getDistanceBetweenCoords3d(my_pos[1], my_pos[2], my_pos[3], other_pos[1], other_pos[2], other_pos[3]) < 100.0 then
                local screen_coords = {convert3DCoordsToScreen(getCharCoordinates(handle))}
                local dist = math.sqrt( (screen_coords[1] - (( ( select(1, getScreenResolution() ) ) )) * representIntAsFloat(readMemory(0xB6EC14, 4, false))) ^ 2 + (screen_coords[2] - ((select(2, getScreenResolution() ) )) * representIntAsFloat(readMemory(0xB6EC10, 4, false))) ^ 2 )
                if dist < minimal_distance then
                    minimal_distance = dist
                    closestId, closestPed = i, handle
                end
            end
        end
    end
    return closestId, closestPed
end

 

[mills.]

как сделать так, чтобы renderFontDrawText показывался после загрузки персонажа на сервере? пример того, как оно не должно выглядеть

 

[[SA ARZ]]

подскажите как сделать, если открыл одно окно imgui, то второе окно imgui нельзя открыть пока не закрыто первое окно imgui ?

 

[qdIbp]

подскажите как сделать, если открыл одно окно imgui, то второе окно imgui нельзя открыть пока не закрыто первое окно imgui ?

require "lib.moonloader"
require 'lib.vkeys'
local imgui = require 'imgui'

local mainWindow = imgui.ImBool(false)
local extraWindow = imgui.ImBool(false)

function main()
    while true do wait(0)
        if wasKeyPressed(VK_L) then           
            if (not mainWindow.v or mainWindow.v) and not extraWindow.v then
                mainWindow.v = not mainWindow.v
            else
                print('Это так не работает')
            end
        end

        if wasKeyPressed(VK_K) then
            if (not extraWindow.v or extraWindow.v) and not mainWindow.v then
                extraWindow.v = not extraWindow.v
            else
                print('Это так не работает!!!')
            end
        end
        imgui.Process = extraWindow.v or mainWindow.v
    end
end

function imgui.OnDrawFrame()
    if mainWindow.v and not extraWindow.v then
        if imgui.Begin('Main Window', mainWindow) then
            imgui.Text('text 1')
            imgui.End()
        end
    end
    if extraWindow.v and not mainWindow.v then
        if imgui.Begin('Extra Window', extraWindow) then
            imgui.Text('text 2')
            imgui.End()
        end
        
    end
end

как сделать так, чтобы renderFontDrawText показывался после загрузки персонажа на сервере? пример того, как оно не должно выглядеть Посмотреть вложение 127882

смотря еще чей текстдрав(сервера или скрипта)

 

[Andrinall]

как сделать так, чтобы renderFontDrawText показывался после загрузки персонажа на сервере? пример того, как оно не должно выглядеть Посмотреть вложение 127882

if sampIsLocalPlayerSpawned() then
    -- render code
end

 

[qdIbp]

if sampIsLocalPlayerSpawned() then
    -- render code
end

Эта 'функция' работает как появится диалог а не сам игрок

 

[Andrinall]

Эта 'функция' работает как появится диалог а не сам игрок

Да неужели?
Тогда почему вот такой вот код выводит spawned после того, как спавнит перса, уже после авторизации, а не на самом диалоге?

if sampIsLocalPlayerSpawned() then print("spawned") end -- разумеется это в беск.цикле

Если где-то это работает иначе - это проблема сервера, а не функции. Функция выполняет свою функцию, да тавтология.

и да

sampIsLocalPlayerSpawned

Проверяет, заспавнился ли игрок

wiki.blast.hk

 

[qdIbp]

Да неужели?
Тогда почему вот такой вот код выводит spawned после того, как спавнит перса, уже после авторизации, а не на самом диалоге?

if sampIsLocalPlayerSpawned() then print("spawned") end -- разумеется это в беск.цикле

и да

sampIsLocalPlayerSpawned

Проверяет, заспавнился ли игрок

wiki.blast.hk

Хмм... возможно тогда серв был хреновый, раз выводилась раньше чем надо
Но выводится ток один раз, при спавне, даже в случаи если попаду в больницу, тюрьму, Jail и тд, если засунуть в беск.цикл будет флудить то не будет выводится, тогда лучше исп

function on.onSendSpawn()

 

[eqzzz]

Почему функкция выдает nil?

function getHarddiskSerial()
    local handle = io.popen('wmic diskdrive get serialnumber')
    local result = handle:read("*a")
    local serial = result:match('SerialNumber%s+(%d+)')
    handle:close()
    return serial
end

 

[YourAssistant]

Как декодировать русские буквы при выводе в чат с ini-файла? Выводит вот такое:

В ini записывается текст, введенный в imgui.InputText.

 

[SpongeBobus]

Откройте пожалуйста .luac, кому не сложно

 

[TrixTM]

Откройте пожалуйста .luac, кому не сложно

не в тот раздел отправил, тебе сюда - https://www.blast.hk/threads/18162/page-348#posts

 

[eqzzz]

Как декодировать русские буквы при выводе в чат с ini-файла? Выводит вот такое: Посмотреть вложение 127939

В ini записывается текст, введенный в imgui.InputText.

local input_text = imgui.ImBuffer(u8 (таблица), 256)

Как декодировать русские буквы при выводе в чат с ini-файла? Выводит вот такое: Посмотреть вложение 127939

В ini записывается текст, введенный в imgui.InputText.

sampSendChat(u8:decode(таблица))