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

FYP · 14 Авг 2017

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

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

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

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

Qsany · 1 Апр 2018

CLEO:

{$CLEO}
{$INCLUDE SF}

0001: wait 0 ms
:SAMPAv
wait 0
0AFA:  is_samp_available
jf @SAMPAv

while not SAMP.Available()
    wait 400
end

0BE3: raknet setup_incoming_rpc_hook @inrpc_hook

0AC8: 3@ = allocate_memory_size 144
0C11: memset destination 3@ value 0 size 144

0C74: 4@ = create_timer_interval 113000 on_label @reload_message
0C78: set_timer 4@ active false

0BDE: pause_thread 0

:inrpc_hook
0BE5: raknet 0@ = get_hook_param PARAM_PACKETID
if 0@ == RPC_SCRCLIENTMESSAGE
then
    0BE5: raknet 1@ = get_hook_param PARAM_BITSTREAM
    0BEB: raknet bit_stream 1@ ignore_bits 32 // skip string's color
    0BE7: raknet 2@ = bit_stream_read 1@ type BS_TYPE_INT // message len

    0BE8: raknet bit_stream 1@ read_array 3@ size 2@ // read message
    0C1E: array 3@ element 2@ el_size 1 = 0x0 // \0
    if 0C18: 2@ = strstr string1 3@ string2 "[Ðåêëàìà]:"
    then
        0C78: set_timer 4@ active true
        0C76: reset_timer 4@
    end
end
0BE0: raknet hook_ret true

:reload_message
0AF8: samp add_message_to_chat "{FF0000}nice rofl" color -1
0AF8: samp add_message_to_chat "{33AA33}pivet bh {FFFFFF}BlastHackTop[id]" color -1
0C78: set_timer 4@ active false
0B43: samp cmd_ret

ребят замутите так, что бы в строчке 0AF8: samp add_message_to_chat "{33AA33}pivet bh {FFFFFF}BlastHackTop[id]" color -1
там где id писался мой id взятый из таба
надеюсь понятно объяснил

DarkL1ght · 1 Апр 2018

Qsany написал(а):

CLEO:

{$CLEO}
{$INCLUDE SF}

0001: wait 0 ms
:SAMPAv
wait 0
0AFA:  is_samp_available
jf @SAMPAv

while not SAMP.Available()
    wait 400
end

0BE3: raknet setup_incoming_rpc_hook @inrpc_hook

0AC8: 3@ = allocate_memory_size 144
0C11: memset destination 3@ value 0 size 144

0C74: 4@ = create_timer_interval 113000 on_label @reload_message
0C78: set_timer 4@ active false

0BDE: pause_thread 0

:inrpc_hook
0BE5: raknet 0@ = get_hook_param PARAM_PACKETID
if 0@ == RPC_SCRCLIENTMESSAGE
then
    0BE5: raknet 1@ = get_hook_param PARAM_BITSTREAM
    0BEB: raknet bit_stream 1@ ignore_bits 32 // skip string's color
    0BE7: raknet 2@ = bit_stream_read 1@ type BS_TYPE_INT // message len

    0BE8: raknet bit_stream 1@ read_array 3@ size 2@ // read message
    0C1E: array 3@ element 2@ el_size 1 = 0x0 // \0
    if 0C18: 2@ = strstr string1 3@ string2 "[Ðåêëàìà]:"
    then
        0C78: set_timer 4@ active true
        0C76: reset_timer 4@
    end
end
0BE0: raknet hook_ret true

:reload_message
0AF8: samp add_message_to_chat "{FF0000}nice rofl" color -1
0AF8: samp add_message_to_chat "{33AA33}pivet bh {FFFFFF}BlastHackTop[id]" color -1
0C78: set_timer 4@ active false
0B43: samp cmd_ret

ребят замутите так, что бы в строчке 0AF8: samp add_message_to_chat "{33AA33}pivet bh {FFFFFF}BlastHackTop[id]" color -1
там где id писался мой id взятый из таба
надеюсь понятно объяснил

CLEO:

0B2B: samp 0@ = get_player_id_by_actor_handle $PLAYER_ACTOR
chatmsg "Ваш ID: %d" 0xFFFFFF 0@

Qsany · 1 Апр 2018

DoNaT1k написал(а):
CLEO:

0B2B: samp 0@ = get_player_id_by_actor_handle $PLAYER_ACTOR chatmsg "Ваш ID: %d" 0xFFFFFF 0@

CLEO:

{$CLEO}
{$INCLUDE SF}

0001: wait 0 ms
:SAMPAv
wait 0
0AFA:  is_samp_available
jf @SAMPAv

while not SAMP.Available()
    wait 400
end

0BE3: raknet setup_incoming_rpc_hook @inrpc_hook

0AC8: 3@ = allocate_memory_size 144
0C11: memset destination 3@ value 0 size 144

0C74: 4@ = create_timer_interval 113000 on_label @reload_message
0C78: set_timer 4@ active false

0BDE: pause_thread 0

:inrpc_hook
0BE5: raknet 0@ = get_hook_param PARAM_PACKETID
if 0@ == RPC_SCRCLIENTMESSAGE
then
    0BE5: raknet 1@ = get_hook_param PARAM_BITSTREAM
    0BEB: raknet bit_stream 1@ ignore_bits 32 // skip string's color
    0BE7: raknet 2@ = bit_stream_read 1@ type BS_TYPE_INT // message len

    0BE8: raknet bit_stream 1@ read_array 3@ size 2@ // read message
    0C1E: array 3@ element 2@ el_size 1 = 0x0 // \0
    if 0C18: 2@ = strstr string1 3@ string2 "[Ðåêëàìà]:"
    then
        0C78: set_timer 4@ active true
        0C76: reset_timer 4@
    end
end
0BE0: raknet hook_ret true

:reload_message
0AF8: samp add_message_to_chat "{FF0000}nice rofl" color -1
0B2B: samp 0@ = get_player_id_by_actor_handle $PLAYER_ACTOR
    chatmsg "Qsany[%d]" 0xFFFFFF 0@
0C78: set_timer 4@ active false
0B43: samp cmd_ret

так?

DarkL1ght · 1 Апр 2018

Qsany написал(а):

CLEO:

{$CLEO}
{$INCLUDE SF}

0001: wait 0 ms
:SAMPAv
wait 0
0AFA:  is_samp_available
jf @SAMPAv

while not SAMP.Available()
    wait 400
end

0BE3: raknet setup_incoming_rpc_hook @inrpc_hook

0AC8: 3@ = allocate_memory_size 144
0C11: memset destination 3@ value 0 size 144

0C74: 4@ = create_timer_interval 113000 on_label @reload_message
0C78: set_timer 4@ active false

0BDE: pause_thread 0

:inrpc_hook
0BE5: raknet 0@ = get_hook_param PARAM_PACKETID
if 0@ == RPC_SCRCLIENTMESSAGE
then
    0BE5: raknet 1@ = get_hook_param PARAM_BITSTREAM
    0BEB: raknet bit_stream 1@ ignore_bits 32 // skip string's color
    0BE7: raknet 2@ = bit_stream_read 1@ type BS_TYPE_INT // message len

    0BE8: raknet bit_stream 1@ read_array 3@ size 2@ // read message
    0C1E: array 3@ element 2@ el_size 1 = 0x0 // \0
    if 0C18: 2@ = strstr string1 3@ string2 "[Ðåêëàìà]:"
    then
        0C78: set_timer 4@ active true
        0C76: reset_timer 4@
    end
end
0BE0: raknet hook_ret true

:reload_message
0AF8: samp add_message_to_chat "{FF0000}nice rofl" color -1
0B2B: samp 0@ = get_player_id_by_actor_handle $PLAYER_ACTOR
    chatmsg "Qsany[%d]" 0xFFFFFF 0@
0C78: set_timer 4@ active false
0B43: samp cmd_ret

так?

По идее да :happy:

Bananious · 1 Апр 2018

Вообщем мне нужно что бы при вводе команды /test выводилось меню но я тут что-то делал делал но так и не работает нечего помогите)

CLEO:

{$CLEO}
0000: NOP

repeat
wait 1000
until 0AFA:  is_samp_available
0B34: samp register_client_command "test" to_label @1
0AF8: samp add_message_to_chat "Test Loaded" 0xF8F8FF

while true
    wait 0
    if 1@ == 1
    then
    alloc 2@ 512
                format 2@ "test" 0xA 0xA
                0B3B: samp show_dialog id 64 caption "{ffffff}Test" text 2@ button_1 "Тык" button_2 "Не тык" style 2
                free 2@
    end
    if 0B3C: samp is_dialog_responded id 64 button 3@ list_item 4@ input_text 0
            then
    if 3@ == 1
            then
                018C: play_sound 1058 at 0.0 0.0 0.0
    if 4@ == 0
            then
            say "/me тест"
            end
        end
    end
          
:1
4@ = 1
SAMP.CmdRet()

D3.Pheonix · 1 Апр 2018

SaMMpeR написал(а):
Вообщем мне нужно что бы при вводе команды /test выводилось меню но я тут что-то делал делал но так и не работает нечего помогите)

CLEO:

{$CLEO}
0000: NOP

repeat
wait 1000
until 0AFA:  is_samp_available
0B34: samp register_client_command "test" to_label @1
0AF8: samp add_message_to_chat "Test Loaded" 0xF8F8FF

while true
wait 0
if
1@ == 1
then
    if
    0B3C: samp is_dialog_responded id 64 button 3@ list_item 4@ input_text 0
    then
        if
        3@ == 1
        then
        018C: play_sound 1058 at 0.0 0.0 0.0
            if 4@ == 0
            then
            say "/me тест"
            1@ = 0
            end
        end
    end
end
end
        
:1
0B3B: samp show_dialog id 64 caption "{ffffff}Test" text "test" button_1 "Тык" button_2 "Не тык" style 2
1@ = 1
SAMP.CmdRet()

Bananious · 1 Апр 2018

D3.Pheonix написал(а):

CLEO:

{$CLEO}
0000: NOP

repeat
wait 1000
until 0AFA:  is_samp_available
0B34: samp register_client_command "test" to_label @1
0AF8: samp add_message_to_chat "Test Loaded" 0xF8F8FF

while true
wait 0
if
1@ == 1
then
    if
    0B3C: samp is_dialog_responded id 64 button 3@ list_item 4@ input_text 0
    then
        if
        3@ == 1
        then
        018C: play_sound 1058 at 0.0 0.0 0.0
            if 4@ == 0
            then
            say "/me тест"
            1@ = 0
            end
        end
    end
end
end
   
:1
0B3B: samp show_dialog id 64 caption "{ffffff}Test" text "test" button_1 "Тык" button_2 "Не тык" style 2
1@ = 1
SAMP.CmdRet()

Спасибо, а вот у меня вопрос, а если мне нужно добавить еще 2 строку куда дописывать и как. Тут где-то?

CLEO:

:1
0B3B: samp show_dialog id 64 caption "{ffffff}Test" text "test" button_1 "Тык" button_2 "Не тык" style 2
1@ = 1
SAMP.CmdRet()

и что бы при нажатии 2 строки выводился 2 текст

D3.Pheonix · 1 Апр 2018

SaMMpeR написал(а):
.Тут где-то?

CLEO:

:1 0B3B: samp show_dialog id 64 caption "{ffffff}Test" text "test" button_1 "Тык" button_2 "Не тык" style 2 1@ = 1 SAMP.CmdRet()

Нет, не тут. Там вызывается сам диалог

CLEO:

{$CLEO}
0000: NOP

repeat
wait 1000
until 0AFA:  is_samp_available
0B34: samp register_client_command "test" to_label @1
0AF8: samp add_message_to_chat "Test Loaded" 0xF8F8FF

while true
wait 0
if and
0B87:  dialog 64 is_visible
1@ == 1
then
    if
    0B3C: samp is_dialog_responded id 64 button 3@ list_item 4@ input_text 0
    then
        if
        3@ == 1
        then
        018C: play_sound 1058 at 0.0 0.0 0.0
            if 4@ == 0 // первая строка
            then
            say "/me тест"
            end
          
            if 4@ == 1 // вторая строка
            then
            say "/me тест2"
            end
        end
    end
end
end
      
:1
0B3B: samp show_dialog id 64 caption "{ffffff}Test" text "test" button_1 "Тык" button_2 "Не тык" style 2
1@ = 1
SAMP.CmdRet()

Bananious · 1 Апр 2018

D3.Pheonix написал(а):

Нет, не тут. Там вызывается сам диалог

CLEO:

{$CLEO}
0000: NOP

repeat
wait 1000
until 0AFA:  is_samp_available
0B34: samp register_client_command "test" to_label @1
0AF8: samp add_message_to_chat "Test Loaded" 0xF8F8FF

while true
wait 0
if and
0B87:  dialog 64 is_visible
1@ == 1
then
    if
    0B3C: samp is_dialog_responded id 64 button 3@ list_item 4@ input_text 0
    then
        if
        3@ == 1
        then
        018C: play_sound 1058 at 0.0 0.0 0.0
            if 4@ == 0 // первая строка
            then
            say "/me тест"
            end
       
            if 4@ == 1 // вторая строка
            then
            say "/me тест2"
            end
        end
    end
end
end
   
:1
0B3B: samp show_dialog id 64 caption "{ffffff}Test" text "test" button_1 "Тык" button_2 "Не тык" style 2
1@ = 1
SAMP.CmdRet()

Да ок но я про то как добавить 2 строчку в меню. Я просто не могу понять одно как добавлять строки и текст к каждой из них. Я уже читал тему Информация - Гайд - Создание локальных диалогов^{(https://blast.hk/threads/506/)} кучу раз , так и не понял я даун)

D3.Pheonix · 1 Апр 2018

SaMMpeR написал(а):
Да ок но я про то как добавить 2 строчку в меню
Посмотреть вложение 12932

Cоздай свой диалог с блекджеком и шлюхами.
Информация - Гайд - Работа с DXUT диалогами с помощью SAMPFUNCS^{(https://blast.hk/threads/17438/)}

Bananious · 1 Апр 2018

Что за фигня? Переход на нулевой оффсет?

CLEO:

{$CLEO}

const
    DIALOG_STYLE_LIST = 2 // Со списком
end

while not SAMP.Available()
    wait 400
end

0ac8: alloc 2@ size 64 // буфер для хранения введенего текста

while true
    wait 0
    if 0ab0: key_down 66
    then
        while 0ab0: key_down 66
        wait 0
        if 0ab0: key_down 51
        then
            0ac8: alloc 0@ size 64
            0ad3: format_stirng 0@ = "Первый пункт%cВторой пункт%cТретий пункт" 0xA 0xA
            0B3B: samp show_dialog id 47 caption "Третий диалог" text 0@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
            0ac9: free 0@
            break
        end
   
    // DIALOG_STYLE_LIST
    if 0B3C: samp is_dialog_responded id 47 button 1@ list_item 3@ input_text 0 // Логгируем нажатие кнопки диалога и выбранного элемента из списка диалога 47
    then
        if 1@ == 1 // Была нажата первая кнопка
        then
            0af8: chat "Была нажата первая кнопка: {ffff00}Уря" -1
            0af8: chat "Был выбран элемент номер: {ffff00}%d" -1 3@
            if 3@ == 0
            then
                say "/me 1"
            end

            if 3@ == 1
            then
                say "/me 2"
            end

            if 3@ == 2
            then
                say "/me 3"
            end
        end
    end
end
end

D3.Pheonix · 1 Апр 2018

SaMMpeR написал(а):

Что за фигня? Переход на нулевой оффсет?

CLEO:

{$CLEO}

const
    DIALOG_STYLE_LIST = 2 // Со списком
end

while not SAMP.Available()
    wait 400
end

0ac8: alloc 2@ size 64 // буфер для хранения введенего текста

while true
    wait 0
    if 0ab0: key_down 66
    then
        while 0ab0: key_down 66
        wait 0
        if 0ab0: key_down 51
        then
            0ac8: alloc 0@ size 64
            0ad3: format_stirng 0@ = "Первый пункт%cВторой пункт%cТретий пункт" 0xA 0xA
            0B3B: samp show_dialog id 47 caption "Третий диалог" text 0@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
            0ac9: free 0@
            break
        end
 
    // DIALOG_STYLE_LIST
    if 0B3C: samp is_dialog_responded id 47 button 1@ list_item 3@ input_text 0 // Логгируем нажатие кнопки диалога и выбранного элемента из списка диалога 47
    then
        if 1@ == 1 // Была нажата первая кнопка
        then
            0af8: chat "Была нажата первая кнопка: {ffff00}Уря" -1
            0af8: chat "Был выбран элемент номер: {ffff00}%d" -1 3@
            if 3@ == 0
            then
                say "/me 1"
            end

            if 3@ == 1
            then
                say "/me 2"
            end

            if 3@ == 2
            then
                say "/me 3"
            end
        end
    end
end
end

под {Cleo} пропиши 0000:
Я ж тебе ссылку дал. Там по полочкам всё разложено, с картиночками, че ты опять какую то залупу пишешь
Больше не отвечу

Bananious · 1 Апр 2018

D3.Pheonix написал(а):
под {Cleo} пропиши 0000:
Я ж тебе ссылку дал. Там по полочкам всё разложено, с картиночками, че ты опять какую то залупу пишешь
Больше не отвечу

Мне нужно именно диалоговое окно то что ты сделал только с добавлением строк в диалоговое окно

D3.Pheonix · 1 Апр 2018

SaMMpeR написал(а):
Мне нужно именно диалоговое окно то что ты сделал только с добавлением строк в диалоговое окно

не знаю. Я юзаю только dxut

Qsany · 2 Апр 2018

активацию и деактивацию как читкод, спасибо)

Поиск

Поиск

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

FYP

Известный

Qsany

Потрачен

DarkL1ght

Новичок

Qsany

Потрачен

DarkL1ght

Новичок

Bananious

Известный

D3.Pheonix

🎹

Bananious

Известный

D3.Pheonix

🎹

Bananious

Известный

D3.Pheonix

🎹

Bananious

Известный

D3.Pheonix

🎹

Bananious

Известный

D3.Pheonix

🎹

Qsany

Потрачен

Вложения

Похожие темы