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

[FYP]

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

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

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

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

 

[Hlorry]

Пожете пожалуйста из авто активации сделать по команде или как чит код, только что бы было не сложно вводить
Если командой то можно /drun,

 

[Akog]

Помогите убрать ссылку https://raw.githubusercontent.com/Quiken/rrsg/master/rrsg из скрипта и вставить мою https://raw.githubusercontent.com/048PVG/rrsg/main/rrsg

 

[Fix Play12390]

Помогите убрать ссылку https://raw.githubusercontent.com/Quiken/rrsg/master/rrsg из скрипта и вставить мою https://raw.githubusercontent.com/048PVG/rrsg/main/rrsg

 

[Fix Play12390]

мне нужен колдун, который сделает активацию этого луа на insert

 

[Fix Play12390]

Помогите убрать надпись деактивации скрипта (House/business Catcher Deactivited), так чтобы она не высвечивалась на экране, при этом не удаляя надписи активации.

 

[Bot.cs]

Пацаны помогите поменять активацию на букву E.

 

[Scooby Doo]

Помогите! Сделайте пожалуйста активацию на команду /slap
Сейчас стоит активация на F5. Надо убрать активацию с клавиши и сделать на команду.

 

[dosin30]

Переделайте активацию на команду /ddsbiv и добавьте nop SetPlayerAnimation = 0x16FA0 пожалуйста

{$CLEO .cs}
0000: NOP

0662: printstring "Chapper"

repeat
wait 0
until SAMP.Available()

while true
wait 0
if
0AB0: 121 // Нажата клавиша F10 (включаем NOP)
then
0ACD: show_text_highpriority "~G~NOP'S ON" time 1000 // Вывод текста при активации NOP'a
SAMP.ReadSAMPMemory(1@, 0x15970, 2) // Чтобы выключить в дальнейшем NOP, нам нужно сначала прочитать его.
SAMP.WriteSAMPMemory(0x15970, 50064, 2) // Записывает значение в память сампа

repeat
wait 0
until 0AB0: 120 // Нажата клавиша F9 (отключаем NOP)
0ACD: show_text_highpriority "~R~NOP'S OFF" time 1000 // Вывод текста при деактивации NOP'a
SAMP.WriteSAMPMemory(0x15970, 1@, 2) // Запись значение в память сампа

end
end

 

[Akog]

Помогите восстановить переменные и привести в рабочее состояние

function main()
    while not isSampAvailable() do
        wait(0)
    end
    httpRequest("ссылка", nil, function (slot0, slot1, slot2, slot3)
        if slot0 then
            for slot7 in slot0:gmatch("[^\r\n]+") do
                table.insert(uv0.prt, slot7)
            end
        else
            uv0.pr = 3
        end
    end)
    if uv0.pr == 3 then
        thisScript():unload()
    else
        while #uv0.prt == 0 do
            wait(0)
        end
        if checkIntable(uv0.prt, sampGetPlayerNickname(select(2, sampGetPlayerIdByCharHandle(PLAYER_PED)))) then
            sampAddChatMessage("CRASH {ffffff}| Автор: .", 11420477)
            sampAddChatMessage("CRASH {ffffff}| Скрипт успешно загружен!", 11420477)

 

[dosin30]

Помогите восстановить переменные и привести в рабочее состояние

function main()
    while not isSampAvailable() do
        wait(0)
    end
    httpRequest("ссылка", nil, function (slot0, slot1, slot2, slot3)
        if slot0 then
            for slot7 in slot0:gmatch("[^\r\n]+") do
                table.insert(uv0.prt, slot7)
            end
        else
            uv0.pr = 3
        end
    end)
    if uv0.pr == 3 then
        thisScript():unload()
    else
        while #uv0.prt == 0 do
            wait(0)
        end
        if checkIntable(uv0.prt, sampGetPlayerNickname(select(2, sampGetPlayerIdByCharHandle(PLAYER_PED)))) then
            sampAddChatMessage("CRASH {ffffff}| Автор: .", 11420477)
            sampAddChatMessage("CRASH {ffffff}| Скрипт успешно загружен!", 11420477)

это что за скрипт?

 

[Akog]

это что за скрипт?

 

[Fix Play12390]

кинь ориг без декомпа

 

[Жесос]

прошу когда я скриню - вх не виднелась на скрине

 

[xusum]

Переделайте активацию на команду /ddsbiv и добавьте nop SetPlayerAnimation = 0x16FA0 пожалуйста

готово. сделал две версии скрипта - первая с адресами, как в оригинале, вторая - с хуком, что я думаю будет более понятнее и легче

{$CLEO}
0000:
repeat
wait 0
until 0AFA:  is_samp_available
0B34: samp register_client_command "ddsbiv" to_label @sbiv
0BDE: pause_thread 0

:sbiv
0B12: 0@ = 0@ XOR 1
if 0@ == true
then
    0ACC: show_text_lowpriority "~y~activated" time 2000
    0B2E: 20@ = read_samp_memory offset 0x15970 size 2 // setplayerpos
    0B2D: write_samp_memory offset 0x15970 value 50064 size 2
    0B2E: 21@ = read_samp_memory offset 0x16FA0 size 2 // setplayeranimation
    0B2D: write_samp_memory offset 0x16FA0 value 50064 size 2
else
    0ACC: show_text_lowpriority "~y~disabled" time 2000 
    0B2D: write_samp_memory offset 0x15970 value 20@ size 2 // setplayerpos 
    0B2D: write_samp_memory offset 0x16FA0 value 21@ size 2 // setplayeranimation
end
0B43: samp cmd_ret

{$CLEO}
0000:
repeat // повторять
wait 0 // ожидание
until 0AFA:  is_samp_available // пока самп не загрузит структуры
0B34: samp register_client_command "ddsbiv" to_label @sbiv // регистрация команды
0BE3: raknet setup_incoming_rpc_hook @iRPC // регистрация хука на входящие рпс
0BDE: pause_thread 0 // пауза скрипта, чтобы он не пошел дальше

:sbiv
0B12: 0@ = 0@ XOR 1 // логическая операция ИЛИ. если 0@ == 1, то станет 0@ = 0 и наоборот. работает только при значениях 0 и 1
if 0@ == true // если 0@ == true, то есть занопить
then 0ACC: show_text_lowpriority "~y~activated" time 2000 // тогда сообщение
else 0ACC: show_text_lowpriority "~y~disabled" time 2000  // иначе тоже сообщение
end // конец
0B43: samp cmd_ret // закрываем тело команды

:iRPC
0BE5: raknet 1@ = get_hook_param 1 // ставим хук на packetid (будет отлавливать ид входящих рпс)
if 0@ == true // если ноп включен
then
    if or // если какое-то условие соблюдается
    1@ == 12 // setplayerpos
    1@ == 86 // applyanimation
    1@ == 87 // clearanimation
    then 0BE0: raknet hook_ret = false // отклоняем пакет
    end
end
0BE0: raknet hook_ret = true // возвращаем прием пакетов

 

[xusum]

Помогите! Сделайте пожалуйста активацию на команду /slap
Сейчас стоит активация на F5. Надо убрать активацию с клавиши и сделать на команду.

{$CLEO}                                       
0000:
repeat
wait 0
until 0AFA:  is_samp_available
0B34: samp register_client_command "slap" to_label @slap
0BDE: pause_thread 0

:slap
04C4: store_coords_to 0@ 1@ 2@ from_actor $3 with_offset 0.0 0.0 6.0
00A1: put_actor $3 at 0@ 1@ 2@
0B43: samp cmd_ret