Вопросы по CLEO-скриптингу

Удалённый пользователь 126082 · 27 Фев 2018

А возможно сделать так, чтобы скрипт работал в меню игры?

TriggerExe · 27 Фев 2018

Народ,я бы хотел изменить 1 скрипт,но на нем неизвестный кодек,а при использовании IGNORE_UNKNOWN появляется это:

CLEO:

// This file was decompiled using SASCM.ini published by GTAG ([URL]http://gtag.gtagaming.com/opcode-database[/URL]) on 14.6.2013
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
:NONAME_2
wait 100
0AFA:
jf @NONAME_2
hex
 34 0B 0E 02 74 69 01 E2 FF FF FF DE 0B 04 00 A2
 0A 0E 0C 6B 65 72 6E 65 6C 33 32 2E 64 6C 6C 03
 00 00
end
0AA4: 1@ = get_proc_address "GetLocalTime" library 0@ // IF and SET
0AC8: 2@ = allocate_memory_size 16
0AA5: call 1@ num_params 1 pop 0 2@
0085: 3@ = 2@ // (int)
3@ += 8
0A8D: 8@ = read_memory 3@ size 2 virtual_protect 0
3@ += 2
0A8D: 9@ = read_memory 3@ size 2 virtual_protect 0
0AC9: free_allocated_memory 2@
0AA3: free_library 0@
0AF9:
hex
 0E 05 2F 74 69 6D 65 00
end
0687: clear_actor $PLAYER_ACTOR task
0AF9:
hex
 0E 23 2F 64 6F 20 D7 E0 F1 FB 20 EC E0 F0 EA E8
 20 22 42 41 53 54 41 52 44 20 4D 43 2E 22 2E 00
 F9 0A 0E 12 2F 64 6F 20 CD E0 20 F7 E0 F1 E0 F5
 20 25 64 3A 25 64
end
   Car.HasHydraulics()
0903: NOP
0000: NOP
0687: clear_actor $PLAYER_ACTOR task
hex
 43 0B

DarkL1ght · 27 Фев 2018

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

Народ,я бы хотел изменить 1 скрипт,но на нем неизвестный кодек,а при использовании IGNORE_UNKNOWN появляется это:

CLEO:

// This file was decompiled using SASCM.ini published by GTAG ([URL]http://gtag.gtagaming.com/opcode-database[/URL]) on 14.6.2013
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
:NONAME_2
wait 100
0AFA:
jf @NONAME_2
hex
 34 0B 0E 02 74 69 01 E2 FF FF FF DE 0B 04 00 A2
 0A 0E 0C 6B 65 72 6E 65 6C 33 32 2E 64 6C 6C 03
 00 00
end
0AA4: 1@ = get_proc_address "GetLocalTime" library 0@ // IF and SET
0AC8: 2@ = allocate_memory_size 16
0AA5: call 1@ num_params 1 pop 0 2@
0085: 3@ = 2@ // (int)
3@ += 8
0A8D: 8@ = read_memory 3@ size 2 virtual_protect 0
3@ += 2
0A8D: 9@ = read_memory 3@ size 2 virtual_protect 0
0AC9: free_allocated_memory 2@
0AA3: free_library 0@
0AF9:
hex
 0E 05 2F 74 69 6D 65 00
end
0687: clear_actor $PLAYER_ACTOR task
0AF9:
hex
 0E 23 2F 64 6F 20 D7 E0 F1 FB 20 EC E0 F0 EA E8
 20 22 42 41 53 54 41 52 44 20 4D 43 2E 22 2E 00
 F9 0A 0E 12 2F 64 6F 20 CD E0 20 F7 E0 F1 E0 F5
 20 25 64 3A 25 64
end
   Car.HasHydraulics()
0903: NOP
0000: NOP
0687: clear_actor $PLAYER_ACTOR task
hex
 43 0B

hex убирать нужно, а вообще скинь сюда сам скрипт.

TriggerExe · 27 Фев 2018

Вот.

DoNaT1k написал(а):
hex убирать нужно, а вообще скинь сюда сам скрипт.

Возник еще 1 вопрос.Мне сказали,что нужно установить настройку SB от Dark Pixel(a)
Что за настройка и как ее поставить?

D3.Pheonix · 27 Фев 2018

TriggerExe написал(а):
Возник еще 1 вопрос.Мне сказали,что нужно установить настройку SB от Dark Pixel(a)
Что за настройка и как ее поставить?

Темы для Sanny Builder^{(https://blast.hk/threads/12227/)}
Но это только дизайн ...

TriggerExe · 27 Фев 2018

Из-за чего может вылазить ошибка ''Неизвестный параметр 64h по адресу 202'' ?

Dark_Knight · 27 Фев 2018

TriggerExe написал(а):
Из-за чего может вылазить ошибка ''Неизвестный параметр 64h по адресу 202'' ?

Крипт на скрипте.

TriggerExe · 27 Фев 2018

Dark_Knight написал(а):
Крипт на скрипте.

Можно ли это как-то исправить?

jenekbueno · 28 Фев 2018

декриптануть

serfik228 · 28 Фев 2018

что не так? должно отправлять ид, а значение постоянно 0

CLEO:

{$CLEO}
{$INCLUDE SF}
0000:
wait 3000

chatmsg "1" -1

0BE3: raknet setup_incoming_rpc_hook @1
alloc 9@ 256
alloc 11@ 20

while true
wait 0
    if and
    0C18: 0 = 9@ "SMS:"
    0C18: 0 = 9@ "| Ïîëó÷åíî"
    then
        0AA5: call 0x8220AD num_params 3 pop 3 params 12@v 11@ 13@ "SMS: %s[id: %d]: %s | Ïîëó÷åíî" 9@
        0AF9: "/sms %d test" 12@
        wait 10000
    end
    0C11: memset destination 9@ value 0 size 256
end

:1
0BE5: raknet 5@ = get_hook_param PARAM_BITSTREAM
0BE5: raknet 6@ = get_hook_param PARAM_PACKETID
if
6@ == RPC_ScrClientMessage
then
    0BE7: raknet 7@ = bit_stream_read 5@ type BS_TYPE_INT
    0BE7: raknet 8@ = bit_stream_read 5@ type BS_TYPE_INT
    0C11: memset destination 9@ value 0 size 256
    0BE8: raknet bit_stream 5@ read_array 9@ size 8@
    0C0F: array 9@ element 8@ = 0x00
end
0BE0: raknet hook_ret true

Ranto · 28 Фев 2018

Vlad_Barmin написал(а):
Подскажите, хочу например написать /act, и что бы выскочилила табличка, и там будет меню, как сделать?

Информация - Гайд - Создание локальных диалогов^{(https://blast.hk/threads/506/#post-4933)}

D3.Pheonix · 28 Фев 2018

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

что не так? должно отправлять ид, а значение постоянно 0

CLEO:

{$CLEO}
{$INCLUDE SF}
0000:
wait 3000

chatmsg "1" -1

0BE3: raknet setup_incoming_rpc_hook @1
alloc 9@ 256
alloc 11@ 20

while true
wait 0
    if and
    0C18: 0 = 9@ "SMS:"
    0C18: 0 = 9@ "| Ïîëó÷åíî"
    then
        0AA5: call 0x8220AD num_params 3 pop 3 params 12@v 11@ 13@ "SMS: %s[id: %d]: %s | Ïîëó÷åíî" 9@
        0AF9: "/sms %d test" 12@
        wait 10000
    end
    0C11: memset destination 9@ value 0 size 256
end

:1
0BE5: raknet 5@ = get_hook_param PARAM_BITSTREAM
0BE5: raknet 6@ = get_hook_param PARAM_PACKETID
if
6@ == RPC_ScrClientMessage
then
    0BE7: raknet 7@ = bit_stream_read 5@ type BS_TYPE_INT
    0BE7: raknet 8@ = bit_stream_read 5@ type BS_TYPE_INT
    0C11: memset destination 9@ value 0 size 256
    0BE8: raknet bit_stream 5@ read_array 9@ size 8@
    0C0F: array 9@ element 8@ = 0x00
end
0BE0: raknet hook_ret true

Изучи
Гайд - Использование функции sscanf напрямую^{(https://blast.hk/threads/7486/)}

Kotovasya · 28 Фев 2018

CLEO:

{$CLEO}

0000:

repeat
    wait 400
until samp.Available()

0BE3: raknet setup_incoming_rpc_hook @stroka
0AC8: 27@ = allocate_memory_size 144
0C11: memset destination 27@ value 0 size 144

WHILE TRUE
wait 0   
    IF 5@ == 1
    THEN
        say "/pm %d Welcome" 1@
    5@ = 0
    END
END

:stroka
0BE5: raknet 30@ = get_hook_param 1
IF 30@ == 93
THEN
0BE5: raknet 29@ = get_hook_param 0
0BEB: raknet bit_stream 29@ ignore_bits 32
0BE7: raknet 28@ = bit_stream_read 29@ type 3
0BE8: raknet bit_stream 29@ read_array 27@ size 28@
0C1E: array 27@ element 28@ el_size 1 = 0
    IF 0C18: 28@ = strstr string1 27@ string2 "вступил в нашу фракцию"
    THEN
        IF 0AD4: 4@ = scan_string 27@ format "{01FCFF}[%d]" 1@
        THEN
            5@ = 1   
        ELSE
            0AF8: samp add_message_to_chat "Опять какая-то хуйня" color 0xFFFFFF
        END   
    END
END
0BE0: raknet hook_ret 1

Не может отсканить ID в строке. sscanf юзал когда-то, там тоже такая дичь была. В чем причина?

Lord · 28 Фев 2018

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

CLEO:

{$CLEO}

0000:

repeat
    wait 400
until samp.Available()

0BE3: raknet setup_incoming_rpc_hook @stroka
0AC8: 27@ = allocate_memory_size 144
0C11: memset destination 27@ value 0 size 144

WHILE TRUE
wait 0
    IF 5@ == 1
    THEN
        say "/pm %d Welcome" 1@
    5@ = 0
    END
END

:stroka
0BE5: raknet 30@ = get_hook_param 1
IF 30@ == 93
THEN
0BE5: raknet 29@ = get_hook_param 0
0BEB: raknet bit_stream 29@ ignore_bits 32
0BE7: raknet 28@ = bit_stream_read 29@ type 3
0BE8: raknet bit_stream 29@ read_array 27@ size 28@
0C1E: array 27@ element 28@ el_size 1 = 0
    IF 0C18: 28@ = strstr string1 27@ string2 "вступил в нашу фракцию"
    THEN
        IF 0AD4: 4@ = scan_string 27@ format "{01FCFF}[%d]" 1@
        THEN
            5@ = 1
        ELSE
            0AF8: samp add_message_to_chat "Опять какая-то хуйня" color 0xFFFFFF
        END
    END
END
0BE0: raknet hook_ret 1

Не может отсканить ID в строке. sscanf юзал когда-то, там тоже такая дичь была. В чем причина?

Активацию можешь убрать.

CLEO:

{$CLEO}
{$INCLUDE SF}
0000:
repeat
wait 0
until 0AFA:
0B34: "cmd" @cmd
18@ = 0
17@ = 0
32@ = 0

alloc 31@ 256

WHILE TRUE
wait 0
0B75: samp get_chat_string 99 text_to 31@ prefix_to 0 color_to 0 prefix_color_to 0
    IF AND
        27@ == 1
        0C18: 0 = strstr string1 31@ string2 "вступил в нашу фракцию"
        THEN
        0C2C: 22@ = strrchr 31@ char 0x5B
        0C11: memset destination 22@ value 0x0 size 1
        22@++
        0C1A: 1@ = atoi 22@
        SAY "/pm %d Welcome" 1@
        wait 1000
    END
    0B43:
END
  
:cmd
00D6: if
0039:   27@ == 0
then
chatmsg "welc is ON" color 0x33AA33
0006: 27@ = 1
else
chatmsg "welc is OFF" color 0xFF6347
0006: 27@ = 0
end
0B43:

grandpafromghetto · 28 Фев 2018

как вставить сообщение в появившийся диалог?

Поиск

Поиск

Вопросы по CLEO-скриптингу

Удалённый пользователь 126082

Гость

TriggerExe

Новичок

DarkL1ght

Новичок

TriggerExe

Новичок

Вложения

D3.Pheonix

🎹

TriggerExe

Новичок

Dark_Knight

Me, me and me.

TriggerExe

Новичок

jenekbueno

Известный

serfik228

Известный

Ranto

Участник

D3.Pheonix

🎹

Kotovasya

Участник

Lord

Новичок

grandpafromghetto

НАСТАЯЩИЙ ДАГИСТАНИЦ

Похожие темы