Заказываем Lua скрипты | Reborn

[Musaigen]

Допустим я заДГАНил оружие, прицелился и выстрелил, после чего у меня пропало ВСЕ оружие. Даже то, которое не было заДГАНено.
Как называется этот рпс или пакет?
RPC_SCRRESETPLAYERWEAPONS
RPC_SCRSETPLAYERARMEDWEAPON
PACKET_WEAPONS_UPDATE
Что-то из этих?
Пытался сделать обход этой системы, чтобы когда сервер пытался забрать оружие, то обработка прекращалась, но чет не очень получилось.
Скажите, можно ли обойти это таким образом?
Посмотреть вложение 15633

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

 

[checkdasound]

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

Да все, я уже с собом потестил, там оказывается после таких трех предупреждений кикает, но если прекращать обработу исходящей weapon data, то три выстрела делаешь и оружие не пропадает, но кикает после трех все таки.

 

[JEEMBО]

Дядьки,ляпните сюда команду активации и деактивации /nn

function main()
    repeat wait(0) until isSampAvailable()
    while true do wait(0)
        for i = 0, sampGetMaxPlayerId(true) do
            if sampIsPlayerConnected(i) then
                local result, ped = sampGetCharHandleBySampPlayerId(i)
                if result then
                    local positionX, positionY, positionZ = getCharCoordinates(ped)
                    local localX, localY, localZ = getCharCoordinates(PLAYER_PED)
                    local distance = getDistanceBetweenCoords3d(positionX, positionY, positionZ, localX, localY, localZ)
                    if distance <= 3.0 then
                        EmulShowNameTag(i, true)
                    else
                        EmulShowNameTag(i, false)
                    end
                end
            end
        end
    end
end

function EmulShowNameTag(id, value)
    local bs = raknetNewBitStream()
    raknetBitStreamWriteInt16(bs, id)
    raknetBitStreamWriteBool(bs, value)
    raknetEmulRpcReceiveBitStream(80, bs)
    raknetDeleteBitStream(bs)
end

 

[randazzo]

Дядьки,ляпните сюда команду активации и деактивации /nn

function main()
    repeat wait(0) until isSampAvailable()
    while true do wait(0)
        for i = 0, sampGetMaxPlayerId(true) do
            if sampIsPlayerConnected(i) then
                local result, ped = sampGetCharHandleBySampPlayerId(i)
                if result then
                    local positionX, positionY, positionZ = getCharCoordinates(ped)
                    local localX, localY, localZ = getCharCoordinates(PLAYER_PED)
                    local distance = getDistanceBetweenCoords3d(positionX, positionY, positionZ, localX, localY, localZ)
                    if distance <= 3.0 then
                        EmulShowNameTag(i, true)
                    else
                        EmulShowNameTag(i, false)
                    end
                end
            end
        end
    end
end

function EmulShowNameTag(id, value)
    local bs = raknetNewBitStream()
    raknetBitStreamWriteInt16(bs, id)
    raknetBitStreamWriteBool(bs, value)
    raknetEmulRpcReceiveBitStream(80, bs)
    raknetDeleteBitStream(bs)
end

function main()
    repeat wait(0) until isSampAvailable()
    sampRegisterChatCommand('nn', function() status = not status end)
    while true do wait(0)
        if status then
            for i = 0, sampGetMaxPlayerId(true) do
                if sampIsPlayerConnected(i) then
                    local result, ped = sampGetCharHandleBySampPlayerId(i)
                    if result then
                        local positionX, positionY, positionZ = getCharCoordinates(ped)
                        local localX, localY, localZ = getCharCoordinates(PLAYER_PED)
                        local distance = getDistanceBetweenCoords3d(positionX, positionY, positionZ, localX, localY, localZ)
                        if distance <= 3.0 then
                            EmulShowNameTag(i, true)
                        else
                            EmulShowNameTag(i, false)
                        end
                    end
                end
            end
        end
    end
end

function EmulShowNameTag(id, value)
    local bs = raknetNewBitStream()
    raknetBitStreamWriteInt16(bs, id)
    raknetBitStreamWriteBool(bs, value)
    raknetEmulRpcReceiveBitStream(80, bs)
    raknetDeleteBitStream(bs)
end

 

[madrasso]

Луа который отправляет get запросы через вк апи, и возвращает их в переменную \ текстовый документ

 

[madrasso]

Сделайте пожалуйста :D

 

[Musaigen]

Коллизия на кары(ну если возможно), премного благодарен \m/

 

[madrasso]

Как сделать вот такие чек боксы?

 

[Frapsy]

Как сделать вот такие чек боксы?
Посмотреть вложение 15648

imgui.Checkbox(u8"Название", varible)

 

[madrasso]

У меня такая проблема, скачал и установил пакеты Atoma как указано в теме MoonLoader'a, но при сохранение скриптов через Atom, не сохраняется некоторый код, что делать?

 

[Frapsy]

sampAddChatMessage(text, color) = notifrep.v

В этой строке ошибка, что ты хочешь сделать?

 

[madrasso]

В этой строке ошибка, что ты хочешь сделать?

Я тут чуток темой ошибся)) Хотел вообще в вопросы написать, это я исправил

notifrep.v = not notifrep.v
sampAddChatMessage(string.format("Уведомление о репорте включено"), 0xCC0000)

 

[Frapsy]

Я тут чуток темой ошибся)) Хотел вообще в вопросы написать, это я исправил

notifrep.v = not notifrep.v
sampAddChatMessage(string.format("Уведомление о репорте включено"), 0xCC0000)

function imgui.OnDrawFrame()
    -- Main Window
    if show_main_window.v then
        local sw, sh = getScreenResolution()
        -- center
        imgui.SetNextWindowPos(imgui.ImVec2(sw / 2, sh / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
        imgui.SetNextWindowSize(imgui.ImVec2(300, 300), imgui.Cond.FirstUseEver)
        imgui.Begin(u8'Управление аккаунтом SAMP, через VK.', show_main_window)
        local btn_size = imgui.ImVec2(-0.1, 0)
        if imgui.Button(u8'Настройки', btn_size) then
            settings_imgui.v = not settings_imgui.v
        end
        if imgui.Checkbox('Уведомление о репорте.', notifrep) then
            notifrep.v = not notifrep.v
            sampAddChatMessage(string.format("Уведомление о репорте включено"), 0xCC0000)
        end
        imgui.End()
    end
    if settings_imgui.v then
        imgui.Begin(u8'Основное окно')
        if imgui.InputText(u8'Введите ваш ID Вконтакте.', moonimgui_text_buffer) then
            print('ID:', u8:decode(moonimgui_text_buffer.v))
        end
        imgui.Text(u8'Введите номер страницы, узнать его можно в настройках изменения ID.')
        imgui.End()
    end
end

вроде бы это так должно быть, откуда ты взял 2 end'а - без понятия

 

[randazzo]

Я тут чуток темой ошибся)) Хотел вообще в вопросы написать, это я исправил

notifrep.v = not notifrep.v
sampAddChatMessage(string.format("Уведомление о репорте включено"), 0xCC0000)

notifrep.v = not notifrep.v
sampAddChatMessage("Уведомление о репорте "..(notifrep.v and "включено." or "выключено."), 0xCC0000)

 

[emmett hattay]

Дефолтное - нет

Всм дефолтное?