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

[FYP]

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

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

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

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

 

[AlexBlunted1234]

Сделайте пжлст включен или выключен на экран чтоб выводилось пожалуйста

 

[Frent]

скрипт переписал, держи, должен работать (активация/деактивация NUM * (активация/деактивация не отображается))


где скрипт???

Забыл скрипт(

 

[Frent]

Не работает

 

[Unnecess4ry]

Не работает

на 116 поставил тогда,вот 166клавиша

 

[KirikRus299]

Сделайте пжлст включен или выключен на экран чтоб выводилось пожалуйста

 

[l Piko l]

эм. зачем это здесь?

 

[diva]

hello, can anyone make for me easy cleo? it's like if player write /padmins help > and i need answer in it like /padeti ID player > /kviesti (help) so i need cleo like /cuff and automatic cuffed player if i'm a cop

so ye, i need like /cuff and automatically u can cuff the player, if u're cop
but if you're admin and someone need help he write /padmins help, heal.
so i can press 3-4-5 key and answer it like /padeti ID player /kviesti

 

[AlexBlunted1234]

Лучший!

 

[-MaDnEsS-]

Добрый день.
Найдите мне автора здесь, или измените параметр кода пожалуйста.
На данный момент это Авто-Чипсы которое работает на Arizona RP при определенном голоде, он хавает 1 пачку чипсов автоматически.
Что нужно сделать?
Подкорректировать с 85% голода (Это значит через кмд /satiety 15 / 100 сытности), а на 75% голода ( 25 / 100 сытности ), то есть перс голоден 75% и тогда хавал эти чипсы.
То есть при сытности 25 / 100 через кмд /satiety он должен хавать 1 пачку чипсов скриптом.

Я лишь прошу изменить параметр , в каком месте он сработает автоматически.
Спасибо.

 

[-MaDnEsS-]

Спойлер

// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0662: printstring "==============================================================="
0662: printstring "My VK: vk.com/id138101483"
0662: printstring "My Skype: hackes8"
0662: printstring "Group VK: vk.com/by_air"
0662: printstring "My YouTube Channel: www.youtube.com/spacebmxair"
0662: printstring "All rights reserved ©"
0662: printstring "==============================================================="

:Label00011F
0001: wait 0 ms
0AFA:  is_samp_available
004D: jump_if_false @Label00011F

:Label00012C
0001: wait 0 ms
0B61:  samp is_local_player_spawned
004D: jump_if_false @Label00012C
0006: 0@ = 1
0006: 9@ = 0
0BE3: raknet setup_incoming_rpc_hook @Label000236
0B34: samp register_client_command "achps" to_label @Label0001DF
0AF8: samp add_message_to_chat "[AutoCheeps {CC0000}by AIR{33FF33}]: {FFFFFF}Loaded! (/achps)" color 3407667

:Label0001A3
0001: wait 0 ms
00D6: if and
0039:   0@ == 1
0039:   9@ == 1
004D: jump_if_false @Label0001D8
0001: wait 555 ms
0AF9: samp say_msg "/cheeps"
0006: 9@ = 0

:Label0001D8
0002: jump @Label0001A3

:Label0001DF
0006: 9@ = 0
0B12: 0@ = 0@ XOR 1
0AF8: samp add_message_to_chat "[AutoCheeps {CC0000}by AIR{33FF33}]: {FFFFFF}State: %d!" color 3407667 0@
0B43: samp cmd_ret

:Label000236
00D6: if
0039:   0@ == 1
004D: jump_if_false @Label000461
0BE5: raknet 1@ = get_hook_param 1
00D6: if
0039:   1@ == 73
004D: jump_if_false @Label0002F1
0BE5: raknet 7@ = get_hook_param 0
0BEB: raknet bit_stream 7@ ignore_bits 64
0BE7: raknet 2@ = bit_stream_read 7@ type 3
000A: 2@ += 4
0AC8: 8@ = allocate_memory_size 2@
000E: 2@ -= 4
0BE8: raknet bit_stream 7@ read_array 8@ size 2@
0C1E: array 8@ element 2@ el_size 1 = 0
00D6: if or
0C14: strcmp string1 8@ string2 "~r~You are very hungry!"
0C14: strcmp string1 8@ string2 "You are hungry!"
004D: jump_if_false @Label0002EC
0006: 9@ = 1

:Label0002EC
0AC9: free_allocated_memory 8@

:Label0002F1
00D6: if
0039:   1@ == 93
004D: jump_if_false @Label0003C3
0BE5: raknet 7@ = get_hook_param 0
0BEB: raknet bit_stream 7@ ignore_bits 32
0BE7: raknet 2@ = bit_stream_read 7@ type 3
000A: 2@ += 4
0AC8: 8@ = allocate_memory_size 2@
000E: 2@ -= 4
0BE8: raknet bit_stream 7@ read_array 8@ size 2@
0C1E: array 8@ element 2@ el_size 1 = 0
00D6: if
0C14: strcmp string1 8@ string2 "Ó òåáÿ íåò ÷èïñîâ!"
004D: jump_if_false @Label0003BE
0006: 0@ = 0
0006: 9@ = 0
0AF8: samp add_message_to_chat "[AutoCheeps {CC0000}by AIR{33FF33}]: {FFFFFF}State: %d!" color 3407667 0@

:Label0003BE
0AC9: free_allocated_memory 8@

:Label0003C3
00D6: if
0039:   1@ == 134
004D: jump_if_false @Label000461
0BE5: raknet 7@ = get_hook_param 0
0BEB: raknet bit_stream 7@ ignore_bits 120
0BE7: raknet 2@ = bit_stream_read 7@ type 4
0BE7: raknet 3@ = bit_stream_read 7@ type 4
0BE7: raknet 4@ = bit_stream_read 7@ type 3
0BEB: raknet bit_stream 7@ ignore_bits 64
0BE7: raknet 5@ = bit_stream_read 7@ type 4
0BE7: raknet 6@ = bit_stream_read 7@ type 4
00D6: if and
8021:   not  2@ > 1141932032
0043:   3@ == 40.0
0039:   4@ == -1436898180
0043:   5@ == 549.5
0043:   6@ == 60.0
004D: jump_if_false @Label000461
0006: 9@ = 1

:Label000461
0BE0: raknet hook_ret 1
0000: NOP

работает через текст выводимый на экран

Понял. Спасибо.

 

[.Domen.]

Кароче, это клео которое делает Логотип Аризоны фиолетовым (Лого типо которое в правом верхнем углу), но он работает только на Saint Rose, кто нибудь помогите, сделайте его для Tucson'a.

// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP
wait 4000
thread '$DAPO_#SHOW'
alloc 1@ 16
SAMP.GetCurrentServerAddress(1@, 2@)
if
0C14: strcmp string1 1@ string2 "185.169.134.5"
else_jump @$DAPO_#SHOW_279
free 1@
jump @$DAPO_#SHOW_84

:$DAPO_#SHOW_84
wait 0
0C48: samp textdraw 1050 create "A" pos 1141473280 1065353216
0C4C: samp textdraw 1050 set_style 4.0
0C4E: samp textdraw 1050 set_outline 1 color -16777216
0C52: samp textdraw 1050 set_letter_size 1057803452 1077097259 color -4148481
0C48: samp textdraw 1051 create "Rizona" pos 1141719040 1086324736
0C4C: samp textdraw 1051 set_style 3
0C4E: samp textdraw 1051 set_outline 1 color -16777216
0C52: samp textdraw 1051 set_letter_size 1050924743 1067030921 color -4148481
0C48: samp textdraw 1052 create "Tucson" pos 1141686272 1096810496
0C4C: samp textdraw 1052 set_style 2
0C4E: samp textdraw 1052 set_outline 1 color -16777216
0C52: samp textdraw 1052 set_letter_size 1043207224 1068708651 color -1
jump @$DAPO_#SHOW_84

:$DAPO_#SHOW_279
free 1@
0BDE: pause_thread 0

Добрый вечер,я диспетчер.Можете пожалуйста закриптовать эти клео чтобы их фиг кто нашел.Желательно зашифровать их.
И еще.Можно склеить 2 этих клео и чтобы их не расклеили ? И желательно сделать так чтобы они якобы были сделаны 7 мая 2017 года) Это важно)
Заранее спасибо,добрые люди.

Закриптил.

 

[diva]

hello, can anyone make for me easy cleo? it's like if player write /padmins help > and i need answer in it like /padeti ID player > /kviesti (help) so i need cleo like /cuff and automatic cuffed player if i'm a cop

so ye, i need like /cuff and automatically u can cuff the player, if u're cop
but if you're admin and someone need help he write /padmins help, heal.
so i can press 3-4-5 key and answer it like /padeti ID player /kviesti


here is cleo, if u press 4 u can cuff player like /ant ID player > but i need if i press NUMPAD4 if player say something in /padmins help > i can answer like /padeti ID player /kviesti

 

[sep]

после отк пропадиют ники вообще можете подправить ?

script_name("nameTag")
script_description("alt + F3 to turn on/off")
script_version_number(1)
script_version("v.002")
script_authors("hnnssy")

local mem = require "memory"

function main()
  if not isSampfuncsLoaded() or not isSampLoaded() then return end
  while true do
    wait(0)
    if isKeyDown(18) and isKeyJustPressed(114) then -- ALT+F3
      while isKeyDown(18) or isKeyDown(114) do
              wait(10)
      end
      local pStSet = sampGetServerSettingsPtr();
      NTdist = mem.getfloat(pStSet + 250) -- дальность
      NTwalls = mem.getint8(pStSet + 250) -- видимость через стены
      NTshow = mem.getint8(pStSet + 250) -- видимость тегов
      nameTagOn()
      sampfuncsLog("on", 0xFFFF00)
      repeat
        wait(0)
        if isKeyDown(119) then
          nameTagOff()
          wait (1000)
          nameTagOn()
        end
      until isKeyDown(18) and isKeyJustPressed(114)
      while isKeyDown(18) or isKeyDown(114) do
              wait(10)
      end
      nameTagOff()
      sampfuncsLog("off", 0xFFFF00)
    end
  end
end

function nameTagOn()
  local pStSet = sampGetServerSettingsPtr();
  mem.setfloat(pStSet + 39, 1488.0)
  mem.setint8(pStSet + 47, 0)
  mem.setint8(pStSet + 56, 1)
end


function nameTagOff()
  local pStSet = sampGetServerSettingsPtr();
  mem.setfloat(pStSet + 39, NTdist)
  mem.setint8(pStSet + 47, NTwalls)
  mem.setint8(pStSet + 56, NTshow)
end

 

[Stormie]

поменяйте пожалуйста активацию с цифры 2 на кнопку Pause

 

[Stormie]

пробуй,сделал.
п.с. скрипт работает при активации чит кода,можешь тупо поменять сразу чит код. (скрипт думает,шо ,,2,, это чит код.)

теперь крашит спустя пару секунд