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

[FYP]

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

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

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

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

 

[Sawqg]

Можете пожалуйста сменить открытие окна не на "В",а на "Z",на В баттл пасс открывается и не удобно его постоянно закрывать

 

[kizn]

Можете пожалуйста сменить открытие окна не на "В",а на "Z",на В баттл пасс открывается и не удобно его постоянно закрывать

 

[HUNTERWAYNE]

Нужно чтобы параметры скрипта не сбрасывались при перезаходе в игру.

 

[Харигато]

Парни, прошу пожалуйста изменить чаты в этом скрипте ->https://www.blast.hk/threads/40790/
/s - оставить
/j - (просто я не буду трогать)
/vr - /vc
Чтобы писалось без выбора станции, просто /ad и мой текст, и желательно чтобы после этого автоматически жался энтр
Надеюсь вы сможете это сделать, заранее обнимаю :3

 

[tiago1st]

{$CLEO .cs}

//-------------MAIN---------------
0000: NOP

:Noname_2
wait 400
   SAMP.Available
jf @Noname_2
0661: NOP "Anti AFK with Dialog"
0661: NOP "by MogAika"
0661: NOP "And translated by 0x1E4"
0661: NOP "BlastHack.net"
0661: NOP "Version 2.0"
Dialog.Create(0@, "AFK Master by MogAika")
Dialog.SetRECT(0@, 0, 0, 360, 152)
call @Noname_911 1 0@
Dialog.AddCheckBox(0@, 1, "Run script on windowed mode", 8, 8, 356, 24)
Dialog.AddCheckBox(0@, 2, "Run Script on minimized mode", 8, 32, 356, 24)
Dialog.AddCheckBox(0@, 3, "Loop the mouse", 8, 56, 316, 24)
Dialog.AddCheckBox(0@, 4, "Disable mouse centering", 8, 80, 316, 24)
Dialog.AddButton(0@, 255, "Close", 8, 104, 316, 24)
Dialog.SetControlVisible(0@, 2, 0)
Dialog.SetCheckBoxChecked(0@, 4, 1)
Dialog.SetVisible(0@, 0)
0B34: samp register_client_command "aafk" to_label @Noname_898
0C11: memset destination 7623723 value 144 size 8
20@ = 0

:Noname_415
wait 0
call @Noname_911 1 0@
if
  20@ == 1
jf @Noname_454
SAMP.SetCursorMode(2)

:Noname_454
   Dialog.PopEvent(0@, 1@, 2@)
jf @Noname_889
wait 0
if
  2@ == 1
jf @Noname_641
if
   Dialog.CheckBoxIsChecked(0@, 1)
jf @Noname_584
Dialog.SetControlVisible(0@, 2, 1)
0A8C: write_memory 7634870 size 1 value 1 virtual_protect 1
0A8C: write_memory 7635034 size 1 value 1 virtual_protect 1
if
   Dialog.CheckBoxIsChecked(0@, 2)
jf @Noname_577
0C11: memset destination 5499528 value 144 size 6

:Noname_577
goto @Noname_641

:Noname_584
Dialog.SetControlVisible(0@, 2, 0)
0A8C: write_memory 7634870 size 1 value 0 virtual_protect 1
0A8C: write_memory 7635034 size 1 value 0 virtual_protect 1
0AC6: 3@ = label @Noname_927 offset
0C10: memcpy destination 5499528 source 3@ size 6

:Noname_641
if
  2@ == 2
jf @Noname_718
if
   Dialog.CheckBoxIsChecked(0@, 2)
jf @Noname_696
0C11: memset destination 5499528 value 144 size 6
goto @Noname_718

:Noname_696
0AC6: 3@ = label @Noname_927 offset
0C10: memcpy destination 5499528 source 3@ size 6

:Noname_718
if
  2@ == 3
jf @Noname_775
if
   Dialog.CheckBoxIsChecked(0@, 3)
jf @Noname_768
20@ = 1
goto @Noname_775

:Noname_768
20@ = 0

:Noname_775
if
  2@ == 4
jf @Noname_852
if
   Dialog.CheckBoxIsChecked(0@, 4)
jf @Noname_830
0C11: memset destination 7623723 value 144 size 8
goto @Noname_852

:Noname_830
0AC6: 3@ = label @NONAME_933 offset
0C10: memcpy destination 7623723 source 3@ size 8

:Noname_852
if
  2@ == 255
jf @Noname_882
Dialog.SetVisible(0@, 0)
SAMP.ToggleCursor(0)

:Noname_882
goto @Noname_454

:Noname_889
goto @Noname_415
0A93: end_custom_thread

:Noname_898                                     
Dialog.SetVisible(0@, 1)
SAMP.ToggleCursor(1)
SAMP.CmdRet

:NONAME_927
hex
 0F 84 7B 01 00 00
end

:NONAME_933
hex
 50 51 FF 15 00 83 85 00
end

:Noname_911
Dialog.GetRECT(0@, 1@, 2@, 3@, 4@)
SAMP.GetScreenResolution(5@, 6@)
0062: 5@ -= 3@ // (int)
5@ /= 2
0062: 6@ -= 4@ // (int)
Dialog.SetRECT(0@, 5@, 6@, 3@, 4@)
ret 0
0@ += 338
0A8C: write_memory 0@ size 1 value 1@ virtual_protect 1
ret 0

:NONAME_1011
0@ += 338
0C11: memset destination 0@ value 1@ size 1
ret 0

:NONAME_1034
10@ = SAMP.Base()
10@ += 618944
0AA8: call_function_method 10@ struct 0@ num_params 1 pop 0 1@ 2@
ret 1 2@

pls make options 1 , 2 and 4 always enabled

 

[alarm0]

require 'moonloader'

function main()
  while true do
    wait(0)
    if not sampIsChatInputActive() then
      if isKeyDown(VK_X) then
        requestAnimation("BIKES")
        taskPlayAnim(PLAYER_PED, "BIKES_BACK", "BIKES", 4.0, false, false, false, false, -1)
      end
    end
  end
end

Почему то работает только визуально, хотя с другой анимкой все гуд, и другие её тоже видят.

 

[skertov]

Обычный телепорт по метке как в собейте.

Здрасьте, мне бы телепортер точно такой же как в собейте ну тот что ставишь метку и правой кнопкой мыши ТПшишся на метку, такой бы только в клео, и по команде /tp. Спасибо.

www.blast.hk

телепорт по метке моментальный НО без команды, метку поставил = тпшнулся

 

[TastyBread123]

Обычный телепорт по метке как в собейте.

Здрасьте, мне бы телепортер точно такой же как в собейте ну тот что ставишь метку и правой кнопкой мыши ТПшишся на метку, такой бы только в клео, и по команде /tp. Спасибо.

www.blast.hk

телепорт по метке моментальный НО без команды, метку поставил = тпшнулся

В чем вопрос?

 

[Харигато]

Парни, прошу пожалуйста изменить чаты в этом скрипте ->https://www.blast.hk/threads/40790/
/s - оставить
/j - (просто я не буду трогать)
/vr - /vc
Чтобы писалось без выбора станции, просто /ad и мой текст, и желательно чтобы после этого автоматически жался энтр
Надеюсь вы сможете это сделать, заранее обнимаю :3

 

[andrey050807]

добавьте пожалуйста сохранение настроек

 

[Agent_Sby]

Если комуто не тяжело сделать с этого готовый скрипт буду очень благодарен :) https://www.blast.hk/threads/103899/post-858091

Если комуто не тяжело сделать с этого готовый скрипт буду очень благодарен :) https://www.blast.hk/threads/103899/post-858091

Уже не надо

 

[Alex07]

Ку, кто поможет глупому добавить проверку на фразу в чате?
Сейчас в пд ищется фраза в чате и кидается команда, на которую настроен другой скрипт. Хочется чтобы команда с задержкой в пару секунд повторялась до тех пор, пока в чате не будет ошибка

function sampev.onServerMessage(color, text)
    if text:find('text') then sampAddChatMessage("{73B461}text", -1)
        sampSendChat('/command')
    end
end

Хотелось бы добавить повтор на отправку команды, пока в чате не высветится

[Ошибка] {FFFFFF}Рекламу полностью выкупили, попробуйте после Payday!

 

[Nomillix]

Парни, можете вырезать из этого скрипта круиз контроль ? Чтобы его можно было установить отдельно. Включался на Shift. а выключился при нажатии Shift, либо W или S (на выбор) На любое нажатие из этих кнопок круиз выключался. Думаю не так тяжело, исходник есть, на пивас закину) Скачайте этот файл и посмотрите как работает круиз, нужно точно такой же

 

[kolinggom]

хочу сделать что бы у меня с диглом оружие скролилось на букву E, а так оно скролит только с Диглом и шот ганом, а нужно без шот гана

 

[MLycoris]

Ку, кто поможет глупому добавить проверку на фразу в чате?

В теории должно работать, будет раз в секунду прописывать команду до тех пор, пока в чате не высветится "Рекламу полностью выкупили..."

function sampev.onServerMessage(color, text)
    if text:find('text') then
        lua_thread.create(function()
            repeat
                sampAddChatMessage("{73B461}text", -1)
                sampSendChat('/command')
                wait(1000)
            until text:find('Рекламу полностью выкупили%, попробуйте после')
        end)
    end
end