Помощь в изменении скриптов

[FYP]

Здесь вы можете попросить других пользователей внести какие-то небольшие изменения в скрипт, например, изменить активацию.
Для вопросов по программированию и разработке на форуме есть отдельная категория Разработка.

Рекомендации:

1. Не просите о редактировании .asi, .sf, .luac, .dll, .exe и прочих файлов, не поддающихся простой декомпиляции. Скрипты формата .ahk (AutoHotKey), .lua (Lua/MoonLoader) и .cs (CLEO) легко поддаются изменению.
2. Сообщения по типу "спасибо, помог" по правилам форума считаются флудом и скорее всего будут удалены. Если вам помогли, вы можете нажать кнопку Мне нравится под ответом - это даст понять, что ответ верный.
3. За злонамеренное распространение вредоносного ПО - перманентный бан. Имейте это в виду.

Удаление копирайтов является нарушением авторских прав, если автор не дал на это своего разрешения. Правила BlastHack запрещают нарушать авторские права, поэтому если вам нужно их убрать - обращайтесь к автору.

 

[Ivan2077]

Здравствуйте! Хотел-бы попросить об изменении скрипта ниже, мне нужно что-б было вырезано авто-отправление сообщений и осталось только разветвление /vr-общения чата и /vra-рекламы

 

[NaStile]

Всем привет, вот нашёл автоответ на клады, но нада помощь как переделать сайт, то-есть нада заменить как то в скрипте так что бы скрипт брал инфу с сайта который мне нада
нада замнить сайт https://arzmap.fun/developer.php?answer на сайт https://arz-wiki.com/faq/otvety-na-klady-y-na-arizona-rp/
такое реально сделать?

 

[nanashimoe]

Кто может помочь вырезать отдельно от скрипта функцию продажи рыбы и артефактов чтобы фулл легит было с этого скрипта.

 

[Beluga111]

Нужно вырезать все 3д надписи которые появляются и все сообщения в чате которые появляются при его вкл/выкл и все что его палит, кроме полоски к игроку - maniak






Нужно убрать все сообщения в чате которые появляются при его включении/выключении, что бы нельзя было по чату узнать что включил -

Players in stream​

 

[KOCMOCTAP]

Нужна помощь чтобы сделать активацию по клавише, с определение ид за которым находишься в spec

 

[Gost_BRO]

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

 

[qwywudbqqd]

может кто нибудь поменять активацию с единицы на английскую клавишу K? заранее благодарен

 

[Molodoy_Chelovek]

Скрипт - таймер, фиксирующий онлайн на сервере.
Нужно изменить его так, чтобы я - игрок, мог сделать на нем фейк онлайн, и не отыгрывать норму
Скрипт прикрепил!

 

[Barako]

someone change the activation key from alt+1 to alt+f

 

[nps]

может кто помочь объединив 2 скрипта основу обычный боне хп на кс https://www.blast.hk/threads/15321/ и статус индикатор https://www.blast.hk/threads/59352/
мне нужно основа боне хп + хп кара с статус индикатора в одном скрипте или просто с статус индикатора вырезать хп персонажа и армора

 

[HEMI]

someone change the activation key from alt+1 to alt+f

activating alt+f

может кто нибудь поменять активацию с единицы на английскую клавишу K? заранее благодарен

активация клавиша K

 

[Митя Евгеньевич]

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

Прикрепленный скрипт добавляет визуально на радар элементы твоего hud.txd
Чтобы отображались именно те картинки, которые ты прикрепил, эти картинки нужно тебе самостоятельно заменить через txd редактор в файле hud.txd
Аналогичные разъяснения указаны автором скрипта в теме:

Исходник - Компас

Написал простой пример компас на LUA. id радаров/значков // This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 6.14.2013 {$CLEO .cs} //-------------MAIN--------------- 0000: NOP $MARKER_EMMETS_N = Marker.CreateIconAndSphere(24, 0.0...

www.blast.hk

 

[Barako]

Could someone help me modify this Lua script change the health to armor and when armor hits 15, it automatically executes '/used vest' and then presses 'B' without delay

 

[Ivan2077]

Здравствуйте! Хотел-бы попросить об изменении скрипта ниже, мне нужно что-б было вырезано авто-отправление сообщений и осталось только разветвление /vr-общения чата и /vra-рекламы

 

[Rossi98]

Как сделать задержку между отправками сообщения в чат, т.к. сейчас оно делить длинное сообщение на 2, и отправляет его в одну и ту же секунду, а нужно между первой и второй строкой сделать задержку 1250мск?! Заранее спасибо.

script_name("extraMessages")
script_version_number("0.3.1")
script_description("Divides one long message into two short messages.")
script_author("AppleThe")

local sampev = require 'lib.samp.events'
commands = {"f", "r", "t", "n", "w", "s"}
bi = false

function sampev.onSendCommand(msg)
    if bi then bi = false; return end
    local cmd, msg = msg:match("/(%S*) (.*)")
    if msg == nil then return end
    -- cmd = cmd:lower()

    --Рация, радио, ООС чат, шепот, крик (с поддержкой переноса ООС-скобок)
    for i, v in ipairs(commands) do if cmd == v then
        local length = msg:len()
        if msg:sub(1, 2) == "((" then
            msg = string.gsub(msg:sub(4), "%)%)", "")
            if length > 80 then divide(msg, "/" .. cmd .. " (( ", " ))"); return false end
        else
            if length > 80 then divide(msg, "/" .. cmd .. " ", ""); return false end
        end
    end end

    --РП команды
    if cmd == "me" or cmd == "do" then
        local length = msg:len()
        if length > 75 then divide(msg, "/" .. cmd .. " ", "", "ext"); return false end
    end

    --SMS
    if cmd == "sms" then
        local msg = "{}" .. msg
        local number, _msg = msg:match("{}(%d+) (.*)")
        local msg = msg:sub(3)
        if _msg == nil then -- если номер не указан, ищется ближайшее полученное/отправленное сообщение
            for i = 1, 99 do                     -- номер берется из него
                local test = sampGetChatString(i):match("SMS: .* | .*: (.*)")
                if test ~= nil then number = string.match(test, ".* %[.*%.(%d+)%]") end
            end
        else msg = _msg end
        if number == nil then return end
        local length = msg:len()

        -- long SMS
        if length > 66 then divide(msg, "/sms " .. number .. " ", "", "sms"); return false end

        -- short SMS
        if length < 66 then bi = true; sampSendChat("/sms " .. number .. " " .. msg); return false end
    end
end

function sampev.onServerMessage(color, text)
    if color == -65281 and text:find(" %| Получатель: ") then
        return {bit.tobit(0xFFCC00FF), text}
    end
end

function sampev.onSendChat(msg) -- IC чат
    if bi then bi = false; return end
    local length = msg:len()
    if length > 90 then
        divide(msg, "", "")
        return false
    end
end

function divide(msg, beginning, ending, doing) -- разделение сообщения msg на два
    if doing == "sms" then limit = 57 else limit = 72 end
    
    -- -- -- ВЕРСИЯ С ПРИОРИТЕТОМ ТЕКСТА ДЛЯ ПЕРВОГО СООБЩЕНИЯ (ХУЕТА) -- -- --
    -- local one, two = string.match(msg:sub(limit), "(%S*) (.*)")
    -- if one == nil then one = "" end
    -- local one, two = msg:sub(1, limit - 1) .. one .. "...", "..." .. two
    
    -- ВЕРСИЯ С ПРИОРИТЕТОМ ТЕКСТА ДЛЯ ВТОРОГО СООБЩЕНИЯ (ЗБС НО НЕ РАБОТАЕТ) --
    -- local one, two = string.match(msg:sub(1, msg:len() - limit), "(.*) (.*)")
    -- if two == nil then two = "" end
    -- local one, two = one .. "...", "..." .. two .. msg:sub(msg:len() - limit + 1, msg:len())
    
    -- ВЕРСИЯ С ПРИОРИТЕТОМ ТЕКСТА ДЛЯ ВТОРОГО СООБЩЕНИЯ (ПОКА ЧТО РАБОТАЕТ) --
    local one, two = string.match(msg:sub(1, limit), "(.*) (.*)")
    if two == nil then two = "" end
    local one, two = one .. "...", "..." .. two .. msg:sub(limit + 1, msg:len())

    bi = true; sampSendChat(beginning .. one .. ending)
    if doing == "ext" then
        beginning = "/do "
        if two:sub(-1) ~= "." then two = two .. "." end
    end
    bi = true; sampSendChat(beginning .. two .. ending)
end

function main()
  if not isCleoLoaded() or not isSampfuncsLoaded() or not isSampLoaded() then return end
  while not isSampAvailable() do wait(100) end
    if not sampGetCurrentServerName():find("Advance RolePlay") then return end
    wait(-1)
end