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

itsLegend · 18 Ноя 2017

LaRossa написал(а):
Как узнать размер файла ?

romanblinov2013 · 19 Ноя 2017

Если ли возможность свернуть игру в оконный режим? Если 'да', то как это сделать в cleo?

D3.Pheonix · 19 Ноя 2017

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

со stristr вроде все нормально, юзаешь мб неправильно

Нажмите для раскрытия...

CLEO:

alloc 11@ 150 alloc 19@ 60 0AF4: 19@ = read_string_from_ini_file "cleo\config.ini" section "sad" key "asd" 0C29: 11@ = stristr string1 2@ string2 19@ free 19@ free 11@

Суть не меняется. Если я в ini напишу капсом, то и искать будет только капс, иначе не реагирует

В общем я немного разобрался
Получается так: если записываешь латиницей, то опкод, как и должно быть, не различает регистр.
Если на русском, то придирается к регистру, хотя не должен
Хелп

randazzo · 19 Ноя 2017

romanblinov2013 написал(а):
Если ли возможность свернуть игру в оконный режим? Если 'да', то как это сделать в cleo?

Полезные сниппеты и SCM-функции^{(https://blast.hk/threads/897/page-3#post-71913)}

Babushka написал(а):
Как найти определенную строчку в чате и написать ее в say ""

CLEO:

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

0BE3: raknet setup_incoming_rpc_hook @hook
0b34: "cmd" @cmd
0BDE: pause_thread 0

:hook
0BE5: raknet 1@ = get_hook_param 1
IF AND
0@ == 1
1@ == 93
THEN
    0BE5: raknet 2@ = get_hook_param 0
    0BE7: raknet 3@ = bit_stream_read 2@ type 3
    0BE7: raknet 4@ = bit_stream_read 2@ type 3
    0AC8: 5@ = allocate_memory_size 145
    0BE8: raknet bit_stream 2@ read_array 5@ size 4@
    0C1E: array 5@ element 4@ el_size 1 = 0
    IF 0C29: 6@ = stristr string1 5@ string2 "слово/слова которое(-ые) надо найти"
    THEN
        say "%s" 5@
    END
    0AC9: free_allocated_memory 5@
0BE0: raknet hook_ret TRUE

:cmd
0B12: 0@ = 0@ XOR 1
IF 0@ == 1
THEN
    printf "~g~ON" 1000
ELSE
    printf "~r~OFF" 1000
END
cmdret
0b43:

D3.Pheonix написал(а):
В общем я немного разобрался
Получается так: если записываешь латиницей, то опкод, как и должно быть, не различает регистр.
Если на русском, то придирается к регистру, хотя не должен
Хелп

мб в коде ошибка, скинь этот кусок

D3.Pheonix · 19 Ноя 2017

randazzo написал(а):
мб в коде ошибка, скинь этот кусок

CLEO:

// выделяю память
get chat string 99 text to 2@ ...
0AF4: 19@ = read_string_from_ini_file "cleo\config.ini" section "sad" key "asd" // Привет
if
0C29: 11@ = stristr string1 2@ string2 19@ // привет
jf @1
say "привет"
// free memory.....
jump

Так вот, если регистр текста в сканируемой строке чата отличается от того что в ini, опкод пропустит эту строку (утверждение верно для кирилицы)

enziweee · 19 Ноя 2017

как сделать такую менюшку?)

kawa operand · 19 Ноя 2017

enziweee написал(а):
как сделать такую менюшку?)

0B80: dialog 2@ = create "SF Dialog"

itsLegend · 19 Ноя 2017

enziweee написал(а):
как сделать такую менюшку?)

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

Azller Lollison · 19 Ноя 2017

Хочу сделать короче что-то типо подбора алогина 4-х значного для нубо-рп, и всё вроде бы работало если бы не уебищная скорость из-за системы антифлуда. Короче, подбирать 1 раз в секунду слишком уебищно, и я решил написать быструю систему основанную на проверке чата, и если там пишет "Не флуди!", то скрипт повторяет попытку с те-же самым числом и вроде как заебись всё должно быть да? Хуй на, нихуя не работает. Черный экран при загрузке и всё..
Если можете сделать лучше - сделайте, но киньте скрипт пожалуйста.)
Или посоветуйте как можно пофиксить ту шнягу.

CLEO:

{$CLEO .cs}
{$INCLUDE SF}
0000: NOP

:Samp
wait 600
   SAMP.Available
jf @Samp


0BE3: raknet setup_incoming_rpc_hook @ClientMessage
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
wait 15000
5@ = 1000
while 5@ < 9999
wait 600
say "/alogin %d" 5@
0A8E: 5@ = 5@ + 1
end
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
:ClientMessage
wait 0
alloc 4@ 256
0c11: memset 4@ 0 256
0BE5: raknet 0@ = get_hook_param PARAM_BITSTREAM
0BE5: raknet 1@ = get_hook_param PARAM_PACKETID
if
1@ == RPC_ScrClientMessage // DWORD color, DWORD strLen, char[] msg
then
0BE7: raknet 2@ = bit_stream_read 0@ type BS_TYPE_INT // color
0BE7: raknet 3@ = bit_stream_read 0@ type BS_TYPE_INT // strLen
0C11: memset destination 4@ value 0 size 256
0BE8: raknet bit_stream 0@ read_array 4@ size 3@ // Text
0C0F: array 4@ element 3@ = 0x00
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if
0C18: 7@ = strstr string1 4@ string2 "Не флуди!"
then
wait 300
say "/alogin %d" 5@
0A8E: 5@ = 5@ - 1
end
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
end
0BE0: raknet hook_ret true

Azller Lollison · 19 Ноя 2017

includelow написал(а):
Код:

0@ = SAMP.GetSAMPPlayerIDByActorHandle(0@) 0@ = SAMP.GetPlayerPing(0@) 0ACD: show_text_highpriority "~y~ %d" time 100 0@

И у меня в n-ый момент выводится %d
Как исправить?

CLEO:

0AD1: show_formatted_text_highpriority "~y~ %d" time 100 0@

Dark_Knight · 19 Ноя 2017

Hельзя в хуках использовать воит

Azller Lollison · 19 Ноя 2017

Dark_Knight написал(а):
Hельзя в хуках использовать воит

убрал воит и чет всё равно ниггер нападает на экран

randazzo · 19 Ноя 2017

Azller написал(а):
убрал воит и чет всё равно ниггер нападает на экран

CLEO:

{$CLEO .cs}
{$INCLUDE SF}
0000: NOP

:Samp
wait 600
   SAMP.Available
jf @Samp


0BE3: raknet setup_incoming_rpc_hook @ClientMessage
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
wait 15000
5@ = 1000
while 5@ < 9999
wait 600
say "/alogin %d" 5@
0A8E: 5@ = 5@ + 1
end
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
:ClientMessage
0BE5: raknet 1@ = get_hook_param PARAM_PACKETID
if
1@ == RPC_ScrClientMessage // DWORD color, DWORD strLen, char[] msg
then      
0BE5: raknet 0@ = get_hook_param PARAM_BITSTREAM
0BE7: raknet 2@ = bit_stream_read 0@ type BS_TYPE_INT // color
0BE7: raknet 3@ = bit_stream_read 0@ type BS_TYPE_INT // strLen
alloc 4@ 256
0C11: memset destination 4@ value 0 size 256
0BE8: raknet bit_stream 0@ read_array 4@ size 3@ // Text
0C1E: array 4@ element 3@ el_size 1 = 0
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if 0C18: 7@ = strstr string1 4@ string2 "Не флуди!"
then
say "/alogin %d" 5@
0A8E: 5@ = 5@ - 1
end
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
end
0BE0: raknet hook_ret true

система обхода антифлуда такая себе, легче просто сделать задержку

Azller Lollison · 19 Ноя 2017

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

CLEO:

{$CLEO .cs}
{$INCLUDE SF}
0000: NOP

:Samp
wait 600
   SAMP.Available
jf @Samp


0BE3: raknet setup_incoming_rpc_hook @ClientMessage
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
wait 15000
5@ = 1000
while 5@ < 9999
wait 600
say "/alogin %d" 5@
0A8E: 5@ = 5@ + 1
end
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
:ClientMessage
0BE5: raknet 1@ = get_hook_param PARAM_PACKETID
if
1@ == RPC_ScrClientMessage // DWORD color, DWORD strLen, char[] msg
then     
0BE5: raknet 0@ = get_hook_param PARAM_BITSTREAM
0BE7: raknet 2@ = bit_stream_read 0@ type BS_TYPE_INT // color
0BE7: raknet 3@ = bit_stream_read 0@ type BS_TYPE_INT // strLen
alloc 4@ 256
0C11: memset destination 4@ value 0 size 256
0BE8: raknet bit_stream 0@ read_array 4@ size 3@ // Text
0C1E: array 4@ element 3@ el_size 1 = 0
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if 0C18: 7@ = strstr string1 4@ string2 "Не флуди!"
then
say "/alogin %d" 5@
0A8E: 5@ = 5@ - 1
end
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
end
0BE0: raknet hook_ret true

система обхода антифлуда такая себе, легче просто сделать задержку

тогда будет очень долго) А там такая херня что система антифлуда работает раз через раз, и проще просто вставить то же самое значение) Спасибо, сейчас попробую

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

CLEO:

{$CLEO .cs}
{$INCLUDE SF}
0000: NOP

:Samp
wait 600
   SAMP.Available
jf @Samp


0BE3: raknet setup_incoming_rpc_hook @ClientMessage
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
wait 15000
5@ = 1000
while 5@ < 9999
wait 600
say "/alogin %d" 5@
0A8E: 5@ = 5@ + 1
end
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
:ClientMessage
0BE5: raknet 1@ = get_hook_param PARAM_PACKETID
if
1@ == RPC_ScrClientMessage // DWORD color, DWORD strLen, char[] msg
then     
0BE5: raknet 0@ = get_hook_param PARAM_BITSTREAM
0BE7: raknet 2@ = bit_stream_read 0@ type BS_TYPE_INT // color
0BE7: raknet 3@ = bit_stream_read 0@ type BS_TYPE_INT // strLen
alloc 4@ 256
0C11: memset destination 4@ value 0 size 256
0BE8: raknet bit_stream 0@ read_array 4@ size 3@ // Text
0C1E: array 4@ element 3@ el_size 1 = 0
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if 0C18: 7@ = strstr string1 4@ string2 "Не флуди!"
then
say "/alogin %d" 5@
0A8E: 5@ = 5@ - 1
end
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
end
0BE0: raknet hook_ret true

система обхода антифлуда такая себе, легче просто сделать задержку

Спавнит короче в деревне со скином сиджея, и когда начинает слать "Не флуди", оно почему-то начинает флудить еще быстрее и зависает гта спустя время

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

CLEO:

{$CLEO .cs}
{$INCLUDE SF}
0000: NOP

:Samp
wait 600
   SAMP.Available
jf @Samp


0BE3: raknet setup_incoming_rpc_hook @ClientMessage
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
wait 15000
5@ = 1000
while 5@ < 9999
wait 600
say "/alogin %d" 5@
0A8E: 5@ = 5@ + 1
end
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
:ClientMessage
0BE5: raknet 1@ = get_hook_param PARAM_PACKETID
if
1@ == RPC_ScrClientMessage // DWORD color, DWORD strLen, char[] msg
then     
0BE5: raknet 0@ = get_hook_param PARAM_BITSTREAM
0BE7: raknet 2@ = bit_stream_read 0@ type BS_TYPE_INT // color
0BE7: raknet 3@ = bit_stream_read 0@ type BS_TYPE_INT // strLen
alloc 4@ 256
0C11: memset destination 4@ value 0 size 256
0BE8: raknet bit_stream 0@ read_array 4@ size 3@ // Text
0C1E: array 4@ element 3@ el_size 1 = 0
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if 0C18: 7@ = strstr string1 4@ string2 "Не флуди!"
then
say "/alogin %d" 5@
0A8E: 5@ = 5@ - 1
end
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////
end
0BE0: raknet hook_ret true

система обхода антифлуда такая себе, легче просто сделать задержку

извиняюсь за неверную инфу, у меня просто два скрипта стояло, по этому и крашило. Но главная проблема осталась, при появлении "Не флуди!", начинает еще быстрее флудить и причем не тем-же самым числом, а увеличивая его на один каждый раз..

randazzo · 19 Ноя 2017

Azller написал(а):
извиняюсь за неверную инфу, у меня просто два скрипта стояло, по этому и крашило. Но главная проблема осталась, при появлении "Не флуди!", начинает еще быстрее флудить и причем не тем-же самым числом, а увеличивая его на один каждый раз..

скрипт сделан потому что не совсем правильно, в хуке нельзя использовать задержку, поэтому после того, как придет сообщение с антифлудом, скрипт тут же отправляет другое сообщение из хука, соответственно тебе ещё раз приходит сообщение с антифлудом

Поиск

Поиск

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

itsLegend

Фонд борьбы за жуков 🐞

romanblinov2013

RB_PRO

D3.Pheonix

🎹

randazzo

.

D3.Pheonix

🎹

enziweee

Участник

Вложения

kawa operand

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

itsLegend

Фонд борьбы за жуков 🐞

Azller Lollison

ещкере

Azller Lollison

ещкере

Dark_Knight

Me, me and me.

Azller Lollison

ещкере

randazzo

.

Azller Lollison

ещкере

randazzo

.

Похожие темы