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

[FYP]

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

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

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

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

 

[Hyundai]

изменить активацию автопрожатия клавиш на мото/вело с клавиши левый шифт на левый alt

 

[mrdiimax]

изменить активацию автопрожатия клавиш на мото/вело с клавиши левый шифт на левый alt

 

[TimaXXX]

Просто в скриптах особо не шарю,c F3 на F4

 

[mrdiimax]

Просто в скриптах особо не шарю,c F3 на F4

 

[Hyundai]

Нужно скрыть текст при виде в чате строчки с текстом который я скинул ниже

[Информация] Состояние масла вашего авто крайне плохое!

[Информация] Автомобиль работает с перебоями, скорость снижена, машина может сломаться!

Необходимо заехать на станцию тех. обслуживания! ((Используйте /gps важные места - станция тех. обслуживания))

[Информация] Состояние вашего авто крайне плохое! Машина может сломаться!

 

[bomjoel]

флудер не работает, пишет тру и все. можете исправить?

 

[yara_sist228]

Здравствуйте, у меня клео скрипт выдает варнинги и отправляет на пляж. Это происходит когда выполнение доход до 0AF9: samp say_msg "текст" . Как исправить?

 

[b1gboi3s0tni]

этот срипт выдает бензин на экарн отдельно от спидомтера на аризоне,можете сделать чтобы его можно двигать в самой игре ил хотяб через ini,а еще можно как то шрифт поменять для этого,спасибо)

 

[awserver]

Нужно скрыть текст при виде в чате строчки с текстом который я скинул ниже

[Информация] Состояние масла вашего авто крайне плохое!

[Информация] Автомобиль работает с перебоями, скорость снижена, машина может сломаться!

Необходимо заехать на станцию тех. обслуживания! ((Используйте /gps важные места - станция тех. обслуживания))

[Информация] Состояние вашего авто крайне плохое! Машина может сломаться!

проверь, не тестил, к слову если там два цвета в сообщении, то не будет работать (negr.lua)

флудер не работает, пишет тру и все. можете исправить?

задержку сделал 3 секунды (vrf.lua)

Всем привет! Заранее спасибо за помощь.
Нужно, чтобы скипт при сообщении "[Гос. имущество]" вписывал /buy
пока, что так вот:

Спойлер: код который нашёл и поправил немного, но оставил то, что я не смогу поправить своими силами

было нагло спижено отсюда https://www.blast.hk/threads/43369/

local sampev = require 'lib.samp.events'
function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampAddChatMessage("Скрипт 'AutoBuy Namalsk RP' успешно загружен!", 0xD34A4F)
    sampAddChatMessage("Автор скрипта xcdco ak.Pavlov", 0xD34A4F)
    sampRegisterChatCommand('/ab, function() activated = not activated if activated then sampAddChatMessage('Вы Активировали скрипт "AutoBuy Namalsk RP".', 0x5A90CE) else sampAddChatMessage('Вы деактивировали скрипт "AutoBuy Namalsk RP".', 0x5A90CE) end end)
    while true do wait(0)
        if activated and testCheat('N') then
            sampSendChat('/buy)
        end
    end
    wait(-1)
end

(фотка текста при котором должна вписываться команда /buy Посмотреть вложение 141077)

(buy.lua)

 

[fwfsfsfsafaf]

проверку на чат/диалоги, может кто всунуть? что бы не срабатывала эта фигня когда я что-то пишу) спасибо.

 

[Hyundai]

подмените синхру так, чтобы скорость тс была 180-200

 

[Shonll]

require "lib.moonloader"
local keys = require "vkeys"
function main()
if not isSampLoaded() or not isSampFuncsLoaded()
then return
end
while not isSampAvilabe()
do wait(100)
end
sampAddChatMessage("привет", 0x6A5ACD")
while true do
wait(0)
end
end
Хочу чтобы надпись чате сампа отображалась, а оно не работает, в логах выдает ошибку!

 

[yung milonov]

require "lib.moonloader"
local keys = require "vkeys"
function main()
if not isSampLoaded() or not isSampFuncsLoaded()
then return
end
while not isSampAvilabe()
do wait(100)
end
sampAddChatMessage("привет", 0x6A5ACD")
while true do
wait(0)
end
end
Хочу чтобы надпись чате сампа отображалась, а оно не работает, в логах выдает ошибку!

require "lib.moonloader"
local keys = require "vkeys"
function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampAddChatMessage("привет", 0x6A5ACD)
    while true do wait(0)
    end
end

 

[yung milonov]

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

function main()
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("cmenu", menu)
    sampRegisterChatCommand("scar", scar)
    sampRegisterChatCommand("scarall", scarall)
    for k, v in pairs(getAllVehicles()) do
    local result, id = sampGetVehicleIdByCarHandle(arg)
        while true do
            wait(0)
            if main_window_state.v == false then
            imgui.Process = false
            end
        end

    end
end


function scar(arg)
    local result, car = sampGetCarHandleBySampVehicleId(arg)
    if result then
        sampSendVehicleDestroyed(arg)
        printStringNow("~g~Success!", 1000)
    else
        printStringNow("~r~Wrong id.", 1000)
    end
end
 
 
function scarall(arg)
    if doesVehicleExist(v) then
    local result, id = sampGetVehicleIdByCarHandle(v)
        if result then
            sampSendVehicleDestroyed(id)
            printStringNow("~g~Success!", 1000)   -- потом нахуй когда не лень будет)
        else
            printStringNow("~r~no cars.", 1000)
        end
    end
end

если я правильно понял что тебе нужно.

function main()
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("cmenu", menu)
    sampRegisterChatCommand("scar", scar)
    sampRegisterChatCommand("scarall", scarall)
    while true do wait(0)
    end
end


function scar(arg)
    local result, car = sampGetCarHandleBySampVehicleId(arg)
    if result then
        sampSendVehicleDestroyed(arg)
        printStringNow("~g~Success!", 1000)
    else
        printStringNow("~r~Wrong id.", 1000)
    end
end
  
  
function scarall(arg)
    for k, v in pairs(getAllVehicles()) do
        if doesVehicleExist(v) then
            local result, id = sampGetVehicleIdByCarHandle(v)
            sampSendVehicleDestroyed(id)
            printStringNow("~g~Success!", 1000)   -- потом нахуй когда не лень будет)
        end
    end
end

 

[zTechnology]

подмените синхру так, чтобы скорость тс была 180-200

85 строка с
data.moveSpeed = getMoveSpeed(heading, 1.250)
на
data.moveSpeed = getMoveSpeed(heading, 0.950)