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

FYP

FYP

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

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

qwywudbqqd

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

Вложения

  • WH_private.cs
    19.4 KB · Просмотры: 4
Molodoy_Chelovek

Molodoy_Chelovek

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

Вложения

  • Arena_Timer.lua
    21.1 KB · Просмотры: 4
Barako

Barako

Новичок
11
0
someone change the activation key from alt+1 to alt+f
 

Вложения

  • HeadShotAimBot.cs
    6 KB · Просмотры: 2
nps

nps

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

HEMI

Новичок
2
0

Вложения

  • HeadShotAimBot.cs
    6 KB · Просмотры: 0
  • WH_private.cs
    19.4 KB · Просмотры: 0
Последнее редактирование:
D

deleted-user-222200

Гость
Gost_BRO написал(а):
Cделайте так чтоб стороны сета были юг, север, запад, восток
Прикрепляю ниже на что нужно заменить
Нажмите для раскрытия...
Прикрепленный скрипт добавляет визуально на радар элементы твоего hud.txd
Чтобы отображались именно те картинки, которые ты прикрепил, эти картинки нужно тебе самостоятельно заменить через txd редактор в файле hud.txd
Аналогичные разъяснения указаны автором скрипта в теме:
www.blast.hk

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

Написал простой пример компас на 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 www.blast.hk
 
Barako

Barako

Новичок
11
0
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
 

Вложения

  • armorhelp.lua
    465 байт · Просмотры: 1
Ivan2077

Ivan2077

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

Вложения

  • vip-resend.lua
    2.5 KB · Просмотры: 1
R

Rossi98

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


Lua: 
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
 
Brrskibidi

Brrskibidi

Новичок
1
0
Добрый день, нужно сделать так чтобы скрипт не бежал к маркеру со сменой формы, если на нем скин 240 id, буду благодарен.
 

Вложения

  • afkZP.lua
    5.6 KB · Просмотры: 0
  • settingsZP.ini
    5 байт · Просмотры: 0
D

deleted-user-222200

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


Lua: 
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
Нажмите для раскрытия...
Lua: 
function divide(msg, beginning, ending, doing) -- разделение сообщения msg на два
    if doing == "sms" then limit = 57 else limit = 72 end
    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())
    lua_thread.create(function()
        bi = true; sampSendChat(beginning .. one .. ending)
        if doing == "ext" then
            beginning = "/do "
            if two:sub(-1) ~= "." then two = two .. "." end
        end
        wait(1250) -- задержка
        bi = true; sampSendChat(beginning .. two .. ending)
    end)
end
 
Последнее редактирование модератором:
M

Masterfada

Новичок
15
0
Доброе утро, нужно убрать логотип активации
1715488341490.png
 

Вложения

  • antiP.lua
    9.6 KB · Просмотры: 10
R

Rossi98

Новичок
3
0
Митя Евгеньевич написал(а):
Lua: 
function divide(msg, beginning, ending, doing) -- разделение сообщения msg на два
    if doing == "sms" then limit = 57 else limit = 72 end
    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())
    lua_thread.create(function()
        bi = true; sampSendChat(beginning .. one .. ending)
        if doing == "ext" then
            beginning = "/do "
            if two:sub(-1) ~= "." then two = two .. "." end
        end
        wait(1250) -- задержка
        bi = true; sampSendChat(beginning .. two .. ending)
    end)
end
Нажмите для раскрытия...
Спасибо огромное. Но я уже раньше сделал, нашёл похожий скрипт, и там позаимствовал. А такой вопрос, можно ли это сделать так, что если сообщение ещё длиннее, то скрипт будет делить его на 3 штуки, или самп всё равно не даст отправить в чат более 128ми символов?!
Я делал, чтобы делило на 3, оно делит, но второе сообщение получается короткое, примерно в 8-10 символов...
 
M

Masterfada

Новичок
15
0
Митя Евгеньевич написал(а):
В функции main убери из цикла while true do строчку renderFontDrawText(my_font, 'Anti - Polizei:\n'.. (act and '{00FF00}Включен' or '{FF0000}Выключен'), 50, pos, 0xFFFFFFFF)Сп
Митя Евгеньевич написал(а):
В функции main убери из цикла while true do строчку renderFontDrawText(my_font, 'Anti - Polizei:\n'.. (act and '{00FF00}Включен' or '{FF0000}Выключен'), 50, pos, 0xFFFFFFFF)
Нажмите для раскрытия...
Спасибо. А можно сделать так что бы в углу экрана загоралась какая нибудь точка когда он включен
Нажмите для раскрытия...
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. Carlos777
    Исходник Гайд Изменяем скомпилированные луа-скрипты
      • Нравится
    Ответы
    4
    Просмотры
    5K
    Lua
    MrCreepTon
    MrCreepTon
  2. chapo
    • Закрыта
    • Вопрос
      Помогите дауну в изменении цлео скриптов
      • Нравится
    Ответы
    1
    Просмотры
    921
    Помощь
    enrique newskii
    E
  3. samperskiy
    • Решено
    Помощь в изменении скриптов
      • Bug
    Ответы
    4
    Просмотры
    961
    Помощь
    YarikVL
    YarikVL
  4. Use[R]
    Заказ Фикс клео снегопада
    Ответы
    0
    Просмотры
    557
    Работа и услуги
    Use[R]
    Use[R]
  5. Lumonton
    • Вопрос
    Помощь в изменении скриптов
    Ответы
    16
    Просмотры
    1K
    Помощь
    BakiHanma1
    B
Сверху Снизу