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

Сырник · 2 Авг 2019

Здарова всем, у меня такой вопрос. match.random только для цифр? есть что-то подобное для слов?, что бы рандомить разные предложения\слова

Dmitriy Makarov · 2 Авг 2019

как реализовать

Lua:

/uninvite [id] [Причина]
wait(0)
sampSendChat("/r Жетон [id][Nick_Name] аннулирован. Причина: [Причина]") -- [id] - который в uninvite, Nick_Name - ник у этого ид, причина - которая в uninvite

astynk · 2 Авг 2019

PAT4Y написал(а):
Как отправить серверу информацию о том, что я нажал клавишу?
setVirtualKeyDown эмулирует нажатие клавиши, но не отправляет серверу инфу о том, что я нажал ее.

В исходящей синхре подменять значение keysData.

Skeezzy написал(а):
Здарова всем, у меня такой вопрос. match.random только для цифр? есть что-то подобное для слов?, что бы рандомить разные предложения\слова

Lua:

string.char(math.random(97, 122)) -- получение рандомной буквы

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

как реализовать

Lua:

/uninvite [id] [Причина]
wait(0)
sampSendChat("/r Жетон [id][Nick_Name] аннулирован. Причина: [Причина]") -- [id] - который в uninvite, Nick_Name - ник у этого ид, причина - которая в uninvite

Ставить хук на onSendCommand, если введена команда uninvite - делать то что нужно.

Dmitriy Makarov · 2 Авг 2019

astynk написал(а):
Ставить хук на onSendCommand, если введена команда uninvite - делать то что нужно.

если бы я умел ставить то что нужно я бы сюда не писал

astynk · 2 Авг 2019

Lucifer написал(а):
если бы я умел ставить то что нужно я бы сюда не писал

Lua:

local events = require 'lib.samp.events'
function events.onSendCommand(text)
    local cmd, arg1, arg2 = text:match('(.+) (.+) (.+)')
    if cmd == '/uninvite' then
        local str = string.format('/r Жетон [%s][%s] аннулирован. Причина: [%s]', arg1, sampGetPlayerNickname(arg1), arg2)
        sampSendChat(str)
    end
end

brabus · 2 Авг 2019

PAT4Y написал(а):
Как отправить серверу информацию о том, что я нажал клавишу?
setVirtualKeyDown эмулирует нажатие клавиши, но не отправляет серверу инфу о том, что я нажал ее.

Хмм.. По сути setVirtualKeyDown должно отправлять.. Ну попробуй ещё
setGameKeyState(int key, int state)
int key индекс клавиши (также указаны в библиотеке game.keys)
int state статус(-32768 до 32767)
Статусы отрицательного значения (-32768, -256, -128 и т.п.) предназначены только для тех клавиш, которые имеют два действия: GOLEFT_GORIGHT, GOFORWARD_GOBACK, ANSWERPHONE_FIREWEAPONALT, LOOKBEHIND_LOOKRIGHT и подобных.

Kuharz · 2 Авг 2019

brabus написал(а):
Хмм.. По сути setVirtualKeyDown должно отправлять.. Ну попробуй ещё
setGameKeyState(int key, int state)
int key индекс клавиши (также указаны в библиотеке game.keys)
int state статус(-32768 до 32767)
Статусы отрицательного значения (-32768, -256, -128 и т.п.) предназначены только для тех клавиш, которые имеют два действия: GOLEFT_GORIGHT, GOFORWARD_GOBACK, ANSWERPHONE_FIREWEAPONALT, LOOKBEHIND_LOOKRIGHT и подобных.

Уже нашел, спасибо открытому коду рекордер бота ковра)
setGameKeyState(int key, int state) то, что нужно.

The Spark · 2 Авг 2019

Jason Muller написал(а):
Посмотреть вложение 36246

imgui.BeginChild справой стороны, в него нужно впихнуть imgui.Text(). Как сделать так что бы он был по центру, не на глаз? Длина строки 600, высота 25

Lua:

local encoding = require 'encoding'
encoding.default = 'CP1251'
local u8 = encoding.UTF8

-- Пример использования:
imgui.CenterTextColoredRGB('Строка {ff0000}номер {SSSSSS}один\nДва\n{ff0000}И даже {0059B3}три!')

function imgui.CenterTextColoredRGB(text)
    local width = imgui.GetWindowWidth()
    local style = imgui.GetStyle()
    local colors = style.Colors
    local ImVec4 = imgui.ImVec4

    local explode_argb = function(argb)
        local a = bit.band(bit.rshift(argb, 24), 0xFF)
        local r = bit.band(bit.rshift(argb, 16), 0xFF)
        local g = bit.band(bit.rshift(argb, 8), 0xFF)
        local b = bit.band(argb, 0xFF)
        return a, r, g, b
    end

    local getcolor = function(color)
        if color:sub(1, 6):upper() == 'SSSSSS' then
            local r, g, b = colors[1].x, colors[1].y, colors[1].z
            local a = tonumber(color:sub(7, 8), 16) or colors[1].w * 255
            return ImVec4(r, g, b, a / 255)
        end
        local color = type(color) == 'string' and tonumber(color, 16) or color
        if type(color) ~= 'number' then return end
        local r, g, b, a = explode_argb(color)
        return imgui.ImColor(r, g, b, a):GetVec4()
    end

    local render_text = function(text_)
        for w in text_:gmatch('[^\r\n]+') do
            local textsize = w:gsub('{.-}', '')
            local text_width = imgui.CalcTextSize(u8(textsize))
            imgui.SetCursorPosX( width / 2 - text_width .x / 2 )
            local text, colors_, m = {}, {}, 1
            w = w:gsub('{(......)}', '{%1FF}')
            while w:find('{........}') do
                local n, k = w:find('{........}')
                local color = getcolor(w:sub(n + 1, k - 1))
                if color then
                    text[#text], text[#text + 1] = w:sub(m, n - 1), w:sub(k + 1, #w)
                    colors_[#colors_ + 1] = color
                    m = n
                end
                w = w:sub(1, n - 1) .. w:sub(k + 1, #w)
            end
            if text[0] then
                for i = 0, #text do
                    imgui.TextColored(colors_[I] or colors[1], u8(text[I]))
                    imgui.SameLine(nil, 0)
                end
                imgui.NewLine()
            else
                imgui.Text(u8(w))
            end
        end
    end
    render_text(text)
end

[/I][/I]

.SADBOYS. · 2 Авг 2019

Привет! Есть такой скрипт под названием getmarker (Прикреплю его сюда)
В общем он отвечает за взятие красного пикапа на расстоянии с синхроном.
Работает с ног. Так вот как бы можно было бы реализовать его, сделав так чтобы он работал так же, только в транспорте? Ибо на сервере идёт кик если пробывать брать пикам сидя в транспорте.

Я в луа полный ноль, хоть обосцыте, но я хочу понять как работает этот скрипт и как можно реализовать его с нужной мне функцией взятия пикапа на расстоянии в транспорте?

Lua:

local memory = require 'memory'
local toggle = false
local event = require 'lib.samp.events'
--////////////////FYP Sync function///////////////////
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
--get marker pos by hnnssy
function getMarkerPos()
   local mem1 = memory.getint32(sampGetBase() + 0x21A10C, false)
   local enabled = memory.read(mem1 + 0x24, 4, true)
   if enabled == 1 then
      local mposX = memory.getfloat(mem1 + 0xC, false)
      local mposY = memory.getfloat(mem1 + 0x10, false)
      local mposZ = memory.getfloat(mem1 + 0x14, false)
      return enabled, mposX, mposY, mposZ
   end
   return false, nil, nil, nil
end

function getMarker()
    local isExists, mpx, mpy, mpz = getMarkerPos()
    if isExists then
        local data = samp_create_sync_data('player')
        data.position.x = mpx
        data.position.y = mpy
        data.position.z = mpz
        data.send()
    end
end

function checkpointauto()
toggle = not toggle
printStringNow(string.format('autogcp %s', tostring(toggle)), 1337)
end

function main()
    while not isSampAvailable do wait(0) end
    sampRegisterChatCommand('gcp', getMarker)
    sampRegisterChatCommand('autogcp', checkpointauto)
    while true do
        wait(0)
        if toggle then
            local isExists, mpx, mpy, mpz = getMarkerPos()
            mpz = getGroundZFor3dCoord(mpx, mpy, mpz)
            local plx, ply, plz = getCharCoordinates(PLAYER_PED)
            local dist = getDistanceBetweenCoords3d(mpx, mpy, plz, plx, ply, plz)
            if isExists and dist < 40.0 then
                local data = samp_create_sync_data('player')
                data.position.x = mpx
                data.position.y = mpy
                data.position.z = mpz
                data.send()
            end
            printStringNow(string.format('%d',dist), 3000)
        end
        if isKeyJustPressed(114) then
            local isExists, mpx, mpy, mpz = getMarkerPos()
            local plx, ply, plz = getCharCoordinates(PLAYER_PED)
            local dist = getDistanceBetweenCoords3d(mpx, mpy, mpz, plx, ply, plz)
            if isExists and dist < 40.0 then
                local data = samp_create_sync_data('player')
                data.position.x = mpx
                data.position.y = mpy
                data.position.z = mpz
                --data.keysData = --вписать нужные кнопки
                data.send()
            end
        end
    end
end

C.Cross · 2 Авг 2019

Как взаимодействовать с созданными в LUA пикапами? Проверять координаты игрока?

Dmitriy Makarov · 2 Авг 2019

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

Lua:

local events = require 'lib.samp.events'
function events.onSendCommand(text)
    local cmd, arg1, arg2 = text:match('(.+) (.+) (.+)')
    if cmd == '/uninvite' then
        local str = string.format('/r Жетон [%s][%s] аннулирован. Причина: [%s]', arg1, sampGetPlayerNickname(arg1), arg2)
        sampSendChat(str)
    end
end

2 раза в рацию пишет, хз из-за чего, я 1 раз ввожу, отправляет 2 раза

brabus · 2 Авг 2019

кто знает? на арз сбоку надпись you are hungry это тестдрав или че? и каким образом сделать проверку на неё(появилась она или нет)?

damag · 2 Авг 2019

как открыть файл(mp4), и чтобы его не возможно была закрыть?

ImPasha · 2 Авг 2019

Damag написал(а):
как открыть файл(mp4), и чтобы его не возможно была закрыть?

=_=
Выключаешь диспечер задач, открываешь на весь экран какую-нибудь хрень, которую нельзя закрыть и всё - profit.

FrankNitty · 2 Авг 2019

Многоуважаемый БластХаковцы, а как открыть диалог то?

Поиск

Поиск

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

Сырник

Известный

Dmitriy Makarov

25.05.2021

astynk

Известный

Dmitriy Makarov

25.05.2021

astynk

Известный

brabus

Известный

Kuharz

Известный

The Spark

Известный

.SADBOYS.

Известный

C.Cross

Новичок

Dmitriy Makarov

25.05.2021

brabus

Известный

damag

Женюсь на официантке в моем любимом баре

ImPasha

Software Developer & System Administrator

FrankNitty

Новичок

Похожие темы