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

FYP

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

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

Mishuta2013

Новичок
8
1
Можете пожалуйста исправить мой код чтобы задержки работали opcode 0b34 не дает работать wait а задержки очень нужны для того чтобы в дмг не кидали

CLEO:
{$CLEO}
0000:


:cmdlist
0B34: samp register_client_command "de" to_label @Deagle
0B34: samp register_client_command "sh" to_label @shotgun
0B34: samp register_client_command "hl" to_label @healme
0B34: samp register_client_command "us" to_label @Drugs
0B34: samp register_client_command "m4" to_label @m4


:deagle
0B35: samp 0@ = get_last_command_params
if
0AD4: 0@ = scan_string 0@ format "%d" 1@
004D: jump_if_false @deaglemessange
say "/makegun 3 %d" 1@
0B43: cmd_ret


:shotgun
0B35: samp 0@ = get_last_command_params
if
0AD4: 0@ = scan_string 0@ format "%d" 1@
004D: jump_if_false @shotgunmessange
say "/makegun 4 %d" 1@
0B43: cmd_ret


:healme
0AF9: samp say_msg "/me Достал Аптеку с кармана."
wait 2000
0AF9: samp say_msg "/me Перебинтовал рану."
wait 2000
0AF9: samp say_msg "/do Процесс..."
wait 2000
0AF9: say "/healme"
0B43: samp cmd_ret


:drugs
0B35: samp 0@ = get_last_command_params
if
0AD4: 0@ = scan_string 0@ format "%d" 1@
004D: jump_if_false @drugsmessange
0AF9: samp say_msg "/me Косяк с кармана."
wait 2000
0AF9: samp say_msg "/me Косяк в руке."
wait 2000
0AF9: samp say_msg "/do Закурил."
wait 2000
say "/drugs %d" 1@
0B43: cmd_ret


:m4
0B35: samp 0@ = get_last_command_params
if
0AD4: 0@ = scan_string 0@ format "%d" 1@
004D: jump_if_false @m4messange
say "/makegun 7 %d" 1@
0B43: cmd_ret



:deaglemessange
0AF8: samp add_message_to_chat "{FFFFFF}Неверный формат команды: {FF5F5F}Пример: {FFFFFF}/de - кол-во пт" color -1
0B43: samp cmd_ret

:shotgunmessange
0AF8: samp add_message_to_chat "{FFFFFF}Неверный формат команды: {FF5F5F}Пример: {FFFFFF}/sh - кол-во пт" color -1
0B43: samp cmd_ret

:drugsmessange
0AF8: samp add_message_to_chat "{FFFFFF}Неверный формат команды: {FF5F5F}Пример: {FFFFFF}/us - кол-во грамм" color -1
0B43: samp cmd_ret

:m4messange
0AF8: samp add_message_to_chat "{FFFFFF}Неверный формат команды: {FF5F5F}Пример: {FFFFFF}/m4 - кол-во пт" color -1
0B43: samp cmd_ret
 
Последнее редактирование модератором:

D3.Pheonix

🎹
Модератор
2,868
1,647
@Mishuta2013
CLEO:
{$CLEO}
0000:


repeat
wait 0
until 0AFA:  is_samp_available
0B34: samp register_client_command "de" to_label @Deagle
0B34: samp register_client_command "sh" to_label @shotgun
0B34: samp register_client_command "hl" to_label @healme
0B34: samp register_client_command "us" to_label @Drugs
0B34: samp register_client_command "m4" to_label @m4


while true
wait 0
    if 31@ == 1 // healme trigger
    then
    0AF9: samp say_msg "/me Достал Аптеку с кармана."
    wait 2000
    0AF9: samp say_msg "/me Перебинтовал рану."
    wait 2000
    0AF9: samp say_msg "/do Процесс..."
    wait 2000
    0AF9: say "/healme"
    31@ = 0
    end
   
    if 31@ == 2 // drugs trigger
    then
    0AF9: samp say_msg "/me Косяк с кармана."
    wait 2000
    0AF9: samp say_msg "/me Косяк в руке."
    wait 2000
    0AF9: samp say_msg "/do Закурил."
    wait 2000
    say "/drugs %d" 1@
    31@ = 0
    end
end
   
:deagle
0B35: samp 0@ = get_last_command_params
if
0AD4: 0@ = scan_string 0@ format "%d" 1@
004D: jump_if_false @deaglemessange
say "/makegun 3 %d" 1@
0B43: cmd_ret

:shotgun
0B35: samp 0@ = get_last_command_params
if
0AD4: 0@ = scan_string 0@ format "%d" 1@
004D: jump_if_false @shotgunmessange
say "/makegun 4 %d" 1@
0B43: cmd_ret

:healme
31@ = 1
0B43: samp cmd_ret

:drugs
0B35: samp 0@ = get_last_command_params
if
0AD4: 0@ = scan_string 0@ format "%d" 1@
004D: jump_if_false @drugsmessange
31@ = 2
0B43: cmd_ret

:m4
0B35: samp 0@ = get_last_command_params
if
0AD4: 0@ = scan_string 0@ format "%d" 1@
004D: jump_if_false @m4messange
say "/makegun 7 %d" 1@
0B43: cmd_ret
 
  • Нравится
Реакции: Mishuta2013

friendly

Известный
900
262
Сделайте подобный скрипт который будет выгружать транспорт из /cars на клавишу (англ. буква) O (с проверкой на чат и диалог)
Если что, вот текст (который в /cars)
{FFD848}[Twin Turbo]{FFFFFF} Cadillac Escalade 2020(1714)
 

Вложения

  • Auto Reload Cars.lua
    8.5 KB · Просмотры: 2

friendly

Известный
900
262
Можете добавить чтобы при нажатие клавиши F3 флудер включался (имею виду чтобы НЕ меню настройки флудера открывалось, а флудило то что задано было в настройках)

А на клавишу M открывались настройки флудера
 

Вложения

  • Custom Flooder by VRush.lua
    12.1 KB · Просмотры: 4

raphael romanov

Участник
42
1
Вырезать всё кроме велика, и поменять активацию на 1.
 

Вложения

  • AutoBikeMotoRunSwimOnMaxSpeed.lua
    1.4 KB · Просмотры: 3

жопа22222222

Новичок
4
0
можно ли как нибудь переделать этот скрипт, что бы его можно было включать/выключать командой?
 

Вложения

  • timer10.lua
    713 байт · Просмотры: 5

jezuszxc

Новичок
12
6
можно пожалуйста изменить команду активации в скрипте, и название скрипта в коде, если оно есть. Команду сделать /fixclouds
Название скрипта fixclouds
 

Вложения

  • ARZ_Bcar.lua
    107.1 KB · Просмотры: 4

raphael romanov

Участник
42
1
Чтобы было 1 отступление от слово SERVER TIME.
 

Вложения

  • sa-mp-007.png
    sa-mp-007.png
    732.4 KB · Просмотры: 18
  • Server Time by Kalashnikov.lua
    1.2 KB · Просмотры: 4

playerongambit

Новичок
6
1
Простенький бот на рыбалку на Gambit RP, только я хочу чтобы он начинал заново рыбачить не по строке в чате "Вы успешно поймали", а по исчезновению текстдрава.

Объясню сис-му ловли рыбы: у тебя появляется текстдрав, и ты нажимаешь то Y то N.

Cобсна можете мне помочь сделать так, чтобы по заполнению шкалы, прописывалась команда fish.

Скрипт прикрепил к своему сообщению и добавил весь код ниже. ИД текстдрава: sampTextdrawGetString(2076). Вот код которые я хочу заменить:


Lua:
function sampev.onServerMessage(color, text)

    lua_thread.create(function()

        if activation then

            if text:match('{33AA33}| {ffffff}Вы успешно поймали') then

                wait(2000) -- задержка перед тем как начать снова рыбачить

                sampSendChat('/fish')

            end

        end

    end)

end

Весь код:

Lua:
script_name('Bfish')
script_author('Adept')

require 'lib.moonloader'
local sampev = require 'lib.samp.events'
local vkeys = require 'vkeys'

activation = false


function main()
    repeat wait(0) until isSampAvailable()
    sampAddChatMessage('{d000ff}| {ffffff}Бот работает! Активация: {d000ff}/bfish', -1)
    sampRegisterChatCommand('bfish', bot)
    sampRegisterChatCommand('delm', msg)
   
    while true do
        wait(0)
       
        if activation then
           
            if isKeyJustPressed(VK_1) and not (sampIsChatInputActive() or sampIsDialogActive() or isSampfuncsConsoleActive()) then
                activation = not activation -- быстрая деактивация по нажатию на кнопку 1 (не num)
            end
       
            if isKeyJustPressed(VK_2) and not (sampIsChatInputActive() or sampIsDialogActive() or isSampfuncsConsoleActive()) then
                sampSendChat('/fish') -- если боту не получится поймать рыбу по нажатию на кнопку 2 (не num) снова начнется рыбалка
            end
       
            if isKeyJustPressed(VK_3) and not (sampIsChatInputActive() or sampIsDialogActive() or isSampfuncsConsoleActive()) then
                sampSendChat('/b да') -- быстрый ответ админам по нажатию на кнопку 3 (не num)
            end
       
        end
    end  
end

function msg(t)
    if t==nil or t=='' or t==' ' then
        printStringNow('~g~[DelMsg]~r~ Nety chto ydalit', 2000)
    else
        slov = 0
        for i = 0, 100 do
            text = sampGetChatString(i)
            if text:find(t) then
                sampSetChatString(i, '{AA3333}| {ffffff}Команда не найдена. Используйте {4a86b6}Y{ffffff} для помощи.', '', -1, -1) -- на это будет меняться текст указаный в /delm
                slov = slov + 1
            end
        end
        printStringNow('~>~ ~r~ Deleting end. Zameneno slov: '..slov..' ~<~', 2500)
    end
end


function bot(arg)
    activation = not activation
    if activation then
        sampAddChatMessage('{d000ff}| {ffffff}Бот запущен!', -1)
        sampSendChat('/fish')
    else
        sampAddChatMessage('{d000ff}| {ffffff}Бот выключился!', -1)
    end
end

function sampev.onServerMessage(color, text)
    lua_thread.create(function()
        if activation then
            if text:match('{33AA33}| {ffffff}Вы успешно поймали') then
                wait(2000) -- задержка перед тем как начать снова рыбачить
                sampSendChat('/fish')
            end
        end
    end)
end


function sampev.onShowTextDraw(textdrawId, data) -- Тута нажатия
    lua_thread.create(function()
        if activation and not (sampIsChatInputActive() or sampIsDialogActive() or isSampfuncsConsoleActive()) then
            if sampTextdrawGetString(2076):find('N')
                wait(450) -- задержки нажатия N
                setVirtualKeyDown(VK_N, true)
                wait(450) -- задержки нажатия N
                setVirtualKeyDown(VK_N, false)
            elseif sampTextdrawGetString(2076):find('Y')
                wait(450) -- задержки нажатия Y
                setVirtualKeyDown(VK_Y, true)
                wait(450) -- задержки нажатия Y
                setVirtualKeyDown(VK_Y, false)
            end
        end
    end)
end

function sampev.onShowDialog(dialogId, style, title, button1, button2, text) -- это короче чтобы бот случайно не открыл меню на Y
    if activation then
        if dialogId == 32700 then
            return false
        end
    end
end
 

Вложения

  • bfish.lua
    3 KB · Просмотры: 5
  • Влюблен
Реакции: silentium2006

playerongambit

Новичок
6
1
на что можно тригерится? Текст в чате? Текст на экране? Диалог?
текст на в текстдраве есть вроде, там в боте есть такая строка:

Код:
if sampTextdrawGetString(2076):find('N')

Не совсем понимаю смысл слова "тригерить".

Я хочу чтобы по исчезновению текстдрава (тоесть как я заканчиваю заполнять шкалу), у меня писалось в чат /fish

на что можно тригерится? Текст в чате? Текст на экране? Диалог?
Ну так что, сможешь помочь?
 
Последнее редактирование:

VRush

https://t.me/vrushscript
2,415
1,195
текст на в текстдраве есть вроде, там в боте есть такая строка:

Код:
if sampTextdrawGetString(2076):find('N')

Не совсем понимаю смысл слова "тригерить".

Я хочу чтобы по исчезновению текстдрава (тоесть как я заканчиваю заполнять шкалу), у меня писалось в чат /fish


Ну так что, сможешь помочь?
напиши в тг

текст на в текстдраве есть вроде, там в боте есть такая строка:

Код:
if sampTextdrawGetString(2076):find('N')

Не совсем понимаю смысл слова "тригерить".

Я хочу чтобы по исчезновению текстдрава (тоесть как я заканчиваю заполнять шкалу), у меня писалось в чат /fish


Ну так что, сможешь помочь?
напиши в тг
 

cesarikk

Новичок
24
2
Кто сможет вырезать данные функции с данного скрипта? (стрелочками указал)
Заранее спасибо.
1653043135451.png
 

Вложения

  • zdarova_1.lua
    8.5 KB · Просмотры: 3