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

randazzo · 26 Дек 2017

LutMut написал(а):
Я понял, что не так, можешь пример скинуть?

CLEO:

{$CLEO}
0000: NOP
repeat
wait 100
until Samp.Available()

0AAC: 1@ = load_audiostream "CLEO\Alarm\Alarm.mp3"


WHILE TRUE               
wait 0
    IF 0B4C:  samp is_dialog_active -1
    THEN
        0BD8: samp get_dialog_caption 0@
        IF 0C14: strcmp string1 0@ string2 "Банк"
        THEN
            0AF8: samp add_message_to_chat "{00FA9A}[Captch Notification]: Капча!" color 0xFFFFFF
            0AAD: set_mp3 1@ perform_action 1
            wait 27000
        END
    END
END

Caxei · 26 Дек 2017

LUCHARE написал(а):
На всяких нубосерверах без проверки дистанции между игроком и пикапом - можно

а как это реализовать? именно по координате

randazzo · 26 Дек 2017

sHau написал(а):
а как это реализовать? именно по координате

отправляешь фейк позицию на нужные корды, отлавливаешь RPC_SCRCREATEPICKUP и берешь нужный

LaRossa · 26 Дек 2017

Что не так с хуком ?

CLEO:

:Hook
if 0@ == 0
    then
    0BE5: raknet 20@ = get_hook_param 1
    if 20@ == 61
        then
        0BE5: raknet 21@ = get_hook_param 0
        0AB1: call_scm_func @Memory 2 4096 1 | 22@
        0BF4: raknet bit_stream 21@ decode_string 22@ size 4096
        0af8: "%s" -1 22@
        free 22@
    end
end
0BE0: raknet hook_ret 1

:Memory
005A: 0@ += 1@
0AC8: 2@ = allocate_memory_size 0@
0C11: memset destination 2@ value 0 size 0@
ret 1 2@

randazzo · 26 Дек 2017

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

Что не так с хуком ?

CLEO:

:Hook
if 0@ == 0
    then
    0BE5: raknet 20@ = get_hook_param 1
    if 20@ == 61
        then
        0BE5: raknet 21@ = get_hook_param 0
        0AB1: call_scm_func @Memory 2 4096 1 | 22@
        0BF4: raknet bit_stream 21@ decode_string 22@ size 4096
        0af8: "%s" -1 22@
        free 22@
    end
end
0BE0: raknet hook_ret 1

:Memory
005A: 0@ += 1@
0AC8: 2@ = allocate_memory_size 0@
0C11: memset destination 2@ value 0 size 0@
ret 1 2@

Вопрос - Вопросы по CLEO-скриптингу^{(https://blast.hk/threads/13410/page-333#post-167096)}
или посчитай, сколько надо проигнорировать битов и поставь 0BEB: raknet bit_stream 21@ ignore_bits ... перед вызовом функции

kawa operand · 26 Дек 2017

а что ты хукаешь?

LaRossa · 26 Дек 2017

kewa opcode написал(а):
а что ты хукаешь?

Хук на Диалог. Хочу вытащить текст диалога

Hatemaker · 26 Дек 2017

Помогите, пожалуйста, сделать автоматическую активацию при входе и деактивацию при вводе команды.

CLEO:

 {$CLEO .cs}
//-------------MAIN---------------
0000: NOP 
thread "NoAnimation" 
:NOANIMATION_20
wait 0 
   SAMP.Available
jf @NOANIMATION_20 
:NOANIMATION_152
0BE3: raknet setup_incoming_rpc_hook @NOANIMATION_346 
0B34: samp register_client_command "noanim" to_label @NOANIMATION_202 
:NOANIMATION_173
wait 0 
if 
  31@ == 1 
jf @NOANIMATION_195 
:NOANIMATION_195
goto @NOANIMATION_173 
:NOANIMATION_202
wait 0 
if 
  31@ == 0 
jf @NOANIMATION_287 
31@ = 1 
chatmsg "{FFFF00}NoAnimation | {00FF00}Enable" 15435422 
goto @NOANIMATION_344 
:NOANIMATION_287
31@ = 0 
chatmsg "{FFFF00}NoAnimation | {FF0000}Disable" 15435422 
:NOANIMATION_344
SAMP.CmdRet
:NOANIMATION_346
0BE5: raknet 5@ = get_hook_param 1 
if 
  31@ == 1 
jf @NOANIMATION_393 
if 
  5@ == 86 
jf @NOANIMATION_393 
0BE0: raknet hook_ret 0 
:NOANIMATION_393
0BE0: raknet hook_ret 1

randazzo · 26 Дек 2017

Dizz Hate написал(а):

Помогите, пожалуйста, сделать автоматическую активацию при входе и деактивацию при вводе команды.

CLEO:

 {$CLEO .cs}
//-------------MAIN---------------
0000: NOP
thread "NoAnimation"
:NOANIMATION_20
wait 0
   SAMP.Available
jf @NOANIMATION_20
:NOANIMATION_152
0BE3: raknet setup_incoming_rpc_hook @NOANIMATION_346
0B34: samp register_client_command "noanim" to_label @NOANIMATION_202
:NOANIMATION_173
wait 0
if
  31@ == 1
jf @NOANIMATION_195
:NOANIMATION_195
goto @NOANIMATION_173
:NOANIMATION_202
wait 0
if
  31@ == 0
jf @NOANIMATION_287
31@ = 1
chatmsg "{FFFF00}NoAnimation | {00FF00}Enable" 15435422
goto @NOANIMATION_344
:NOANIMATION_287
31@ = 0
chatmsg "{FFFF00}NoAnimation | {FF0000}Disable" 15435422
:NOANIMATION_344
SAMP.CmdRet
:NOANIMATION_346
0BE5: raknet 5@ = get_hook_param 1
if
  31@ == 1
jf @NOANIMATION_393
if
  5@ == 86
jf @NOANIMATION_393
0BE0: raknet hook_ret 0
:NOANIMATION_393
0BE0: raknet hook_ret 1

CLEO:

{$CLEO}
0000: NOP
repeat
wait 0
until 0AFA:
31@ = 1

0BE3: raknet setup_incoming_rpc_hook @hook
0B34: samp register_client_command "noanim" to_label @cmd
0bde: 0

:cmd
0B12: 31@ = 31@ XOR 1
IF 31@ == 1
THEN
chatmsg "{FFFF00}NoAnimation | {00FF00}Enable" 15435422
ELSE
chatmsg "{FFFF00}NoAnimation | {FF0000}Disable" 15435422
END
0b43:

:hook
0BE5: raknet 5@ = get_hook_param 1
IF AND
31@ == 1
5@ == 86
THEN
    0BE0: raknet hook_ret FALSE
END
0BE0: raknet hook_ret TRUE

LaRossa · 26 Дек 2017

Dizz Hate написал(а):

Помогите, пожалуйста, сделать автоматическую активацию при входе и деактивацию при вводе команды.

CLEO:

 {$CLEO .cs}
//-------------MAIN---------------
0000: NOP
thread "NoAnimation"
:NOANIMATION_20
wait 0
   SAMP.Available
jf @NOANIMATION_20
:NOANIMATION_152
0BE3: raknet setup_incoming_rpc_hook @NOANIMATION_346
0B34: samp register_client_command "noanim" to_label @NOANIMATION_202
:NOANIMATION_173
wait 0
if
  31@ == 1
jf @NOANIMATION_195
:NOANIMATION_195
goto @NOANIMATION_173
:NOANIMATION_202
wait 0
if
  31@ == 0
jf @NOANIMATION_287
31@ = 1
chatmsg "{FFFF00}NoAnimation | {00FF00}Enable" 15435422
goto @NOANIMATION_344
:NOANIMATION_287
31@ = 0
chatmsg "{FFFF00}NoAnimation | {FF0000}Disable" 15435422
:NOANIMATION_344
SAMP.CmdRet
:NOANIMATION_346
0BE5: raknet 5@ = get_hook_param 1
if
  31@ == 1
jf @NOANIMATION_393
if
  5@ == 86
jf @NOANIMATION_393
0BE0: raknet hook_ret 0
:NOANIMATION_393
0BE0: raknet hook_ret 1

CLEO:

{$CLEO}
0000:
while not Samp.Available()
    wait 0
end
31@ = 1
0BE3: raknet setup_incoming_rpc_hook @Hook
0B34: "noanim" to_label @cmd
0BDE: pause_thread 0

:cmd
0B12: 31@ = 31@ XOR 1
if 31@ == 1
    then
    0af8: "{FFFF00}NoAnimation | {00FF00}Enable" 15435422
else
    0af8: "{FFFF00}NoAnimation | {FF0000}Disable" 15435422  
end
Samp.CmdRet()

:Hook
if 31@ == 1
    then
    0BE5: raknet 5@ = get_hook_param 1
    if 5@ == 86
        then
    0BE0: raknet hook_ret 0
    end
end
0BE0: raknet hook_ret 1

randazzo · 27 Дек 2017

CLEO:

{$CLEO}
0000:
repeat
wait 0
until 0AFA:

WHILE TRUE
wait 0
    IF 0C89:  key_just_pressed 113
    THEN
        0AF9: samp say_msg "/capture"
        repeat
        wait 0
        until 0B4C:  samp is_dialog_active -1
        0B49: samp set_current_dialog_list_item 3
        wait 50
        0B47: samp close_current_dialog_with_button 1   
    END
END

Cleo909009 · 27 Дек 2017

Почему в say нельзя поставить много пробелов?
В чат выводит без пробелов

randazzo · 27 Дек 2017

Cleo909009 написал(а):
Почему в say нельзя поставить много пробелов?
В чат выводит без пробелов

форматируй

CLEO:

alloc 0@ 20
format 0@ = "%c%c%c%c" 0x20 0x20 0x20 0x20
say 0@
free 0@

LUCHARE · 27 Дек 2017

randazzo написал(а):
форматируй

CLEO:

alloc 0@ 20 format 0@ = "%c%c%c%c" 0x20 0x20 0x20 0x20 say 0@ free 0@

CLEO:

say "lel%c%c%clel" 0x20 0x20 0x20

#saniwe · 27 Дек 2017

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

CLEO:

{$CLEO}
0000:
repeat
wait 0
until 0AFA:

WHILE TRUE
wait 0
    IF 0C89:  key_just_pressed 113
    THEN
        0AF9: samp say_msg "/capture"
        repeat
        wait 0
        until 0B4C:  samp is_dialog_active -1
        0B49: samp set_current_dialog_list_item 3
        wait 50
        0B47: samp close_current_dialog_with_button 1 
    END
END

гуд

Поиск

Поиск

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

randazzo

.

Caxei

Известный

randazzo

.

LaRossa

Потрачен

randazzo

.

kawa operand

перерывпятьминут

LaRossa

Потрачен

Hatemaker

Известный

randazzo

.

LaRossa

Потрачен

randazzo

.

Cleo909009

Новичок

randazzo

.

LUCHARE

Известный

#saniwe

глаза пофикси

Похожие темы