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

MISTER_GONWIK · 29 Мар 2016

Devil1606 написал(а):
Я читал про этот Опкод на вики и там сказано, что "Данный опкод не поддерживает сохранения какого-либо просканированного текста в выделенный буфер. Для сохранения используйте локальные переменные(1@s, 1@v), но не забывайте о том, что они имеют лимит(15-16 символов)" и подумал, что он не подойдет.
Допусти: 0AD4: 30@ = = scan_string 0@ format "Ваша «Сытость»: %i / 100" 2@
То %i запишется в 2@ ?

CLEO:

while true
wait 0
    if 0ADC: "check"
    then
        alloc 0@ 128
        0AD3: 0@ = format "Ваша «Сытость»: / 100"

        if 0AD4: 1@ = scan_string 0@ format "Ваша «Сытость»: %d / 100" 2@ //IF and SET
        then
            chatmsg "Сытость равна: %d" -1 2@
        else
            chatmsg "Не удалось чёт вытащить значение" -1
        end
       
        free 0@    
    end    
end

iTz_WEEZY · 29 Мар 2016

iTz_W33Z7 написал(а):
Пишет не известная команда memset
и скажи как мне настроить на цвет напр. Нажмите [Левый ALT]{FF0000} ".ALT"

и нельзя никак сделать чтобы он реагировал на частичное, не полное сообщение из чата??

MISTER_GONWIK · 29 Мар 2016

iTz_W33Z7 написал(а):
и нельзя никак сделать чтобы он реагировал на частичное, не полное сообщение из чата??

CLEO:

0C18: 2@ = strstr string1 0@ string2 1@

hnnssy · 29 Мар 2016

iTz_W33Z7 написал(а):
и нельзя никак сделать чтобы он реагировал на частичное, не полное сообщение из чата??

мемсет - 0c11
можно

iTz_WEEZY · 29 Мар 2016

hnnssy написал(а):
можно

Расскажи подробнее
и.. никуя не поня как правильно использовать
Это

CLEO:

0C18: 2@ = strstr string1 0@ string2 1@

и как правельно его тут вставить

CLEO:

{$CLEO}
{$INCLUDE SF}
0000:

wait 2000

alloc 4@ 256
0c11: 4@ 0 256

0BE3: raknet setup_incoming_rpc_hook @ClientMessage

while true
wait 0
end

:ClientMessage
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
        say "угу"
    end                                                
end
0BE0: raknet hook_ret true

hnnssy · 29 Мар 2016

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

Расскажи подробнее
и.. никуя не поня как правильно использовать
Это

CLEO:

0C18: 2@ = strstr string1 0@ string2 1@

и как правельно его тут вставить

CLEO:

{$CLEO}
{$INCLUDE SF}
0000:

wait 2000

alloc 4@ 256
0c11: 4@ 0 256

0BE3: raknet setup_incoming_rpc_hook @ClientMessage

while true
wait 0
end

:ClientMessage
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
        say "угу"
    end                                               
end
0BE0: raknet hook_ret true

А ничего, что он тут уже есть?

iTz_WEEZY · 29 Мар 2016

hnnssy написал(а):
А ничего, что он тут уже есть?

Вот тоже так думаю..
Но всётаки как сделать чтобы он читал сообшение не целиком а частисно..
Ни хуя не понял
я заебал наверно с этой хуйней

hnnssy · 29 Мар 2016

iTz_W33Z7 написал(а):
Вот тоже так думаю..
Но всётаки как сделать чтобы он читал сообшение не целиком а частисно..
Ни хуя не понял
я заебал наверно с этой хуйней

прочитай, блять, описание этого опкода на вики

01EG · 29 Мар 2016

iTz_W33Z7 написал(а):
Вот тоже так думаю..
Но всётаки как сделать чтобы он читал сообшение не целиком а частисно..
Ни хуя не понял
я заебал наверно с этой хуйней

1)Если тебе в чат придет сообщение со стороны сервере и в нем будет заданное значение после string2 "слово какое-то(Привет)"
И в какой-то строке в которой сервер тебе пришлет, найдут записанное в string2, то код отреагирует и сделает указанное.
Вот например в этом скрипте(я только что проверил), я написал в чат Ывффыафыа Привет Ывфафыа, скрипт отыскал слово Привет и отреагировал ответом:"Хует". Все работает, я тебе сразу скинул рабочил код в котором нужно только поменять значения искаемого. Единственное, что я не понимаю почему если убрать {$INCLUDE SF} и wait 2000, все это заменять проверкой на repeat wait 0 until 0afa , то скрипт не будет компилиться, да ладно.

CLEO:

{$CLEO}
{$INCLUDE SF}
0000:

wait 2000

alloc 4@ 256
0c11: memset 4@ 0 256

0BE3: raknet setup_incoming_rpc_hook @ClientMessage

while true
wait 0
end

:ClientMessage
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
        say "Хует"
    end                                               
end
0BE0: raknet hook_ret true

2) Если тебе понадобиться отыскать какую-то строку, то ты должен сначала знать что это за строка. Например ты ждешь, бля я даже не знаю что, ну например какую-то строку. Ты получил ее на сервере, заходишь в chatlog.txt (в документах сампа) там смотришь на эту строку. И копируешь ее, со всем {цветами}, если они будут, если их нету, то цвет стандартный. И так же записываешь в string2.
Надеюсь я помог тебе.

MISTER_GONWIK · 29 Мар 2016

Devil1606 написал(а):
1)Если тебе в чат придет сообщение со стороны сервере и в нем будет заданное значение после string2 "слово какое-то(Привет)"
И в какой-то строке в которой сервер тебе пришлет, найдут записанное в string2, то код отреагирует и сделает указанное.
Вот например в этом скрипте(я только что проверил), я написал в чат Ывффыафыа Привет Ывфафыа, скрипт отыскал слово Привет и отреагировал ответом:"Хует". Все работает, я тебе сразу скинул рабочил код в котором нужно только поменять значения искаемого. Единственное, что я не понимаю почему если убрать {$INCLUDE SF} и wait 2000, все это заменять проверкой на repeat wait 0 until 0afa , то скрипт не будет компилиться, да ладно.

CLEO:

{$CLEO} {$INCLUDE SF} 0000: wait 2000 alloc 4@ 256 0c11: memset 4@ 0 256 0BE3: raknet setup_incoming_rpc_hook @ClientMessage while true wait 0 end :ClientMessage 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 say "Хует" end end 0BE0: raknet hook_ret true

2) Если тебе понадобиться отыскать какую-то строку, то ты должен сначала знать что это за строка. Например ты ждешь, бля я даже не знаю что, ну например какую-то строку. Ты получил ее на сервере, заходишь в chatlog.txt (в документах сампа) там смотришь на эту строку. И копируешь ее, со всем {цветами}, если они будут, если их нету, то цвет стандартный. И так же записываешь в string2.
Надеюсь я помог тебе.

в {INCLUDE SF} хранятся константы на подобии

Код:

PARAM_BITSTREAM, PARAM_PACKETID

wait 2000 можно убрать, инклуд можно убрать только если заменить константы на числа

2Shae · 30 Мар 2016

Создал скрипт с диалогами по туториалу легенды (https://www.blast.hk/threads/506/), переделал под себя сделав открытие с DIALOG_STYLE_LIST (в нём 4 пункта влепил). При выборе в главном диалоге пункты работают. Но, если сделать, к примеру, при выборе там 2 пункта переход на другой диалог с ещё одним DIALOG_STYLE_LIST, то пункты уже в новом не работают (просто пропадает и всё). Надеюсь обьяснил нормально. Оно так и работает или я таки что-то пропустил в коде?
В кратце что хочу сделать, чтобы новые диалоги открывались не по нажатию клавиш, как в туториале.

hnnssy · 30 Мар 2016

2Shae написал(а):
Создал скрипт с диалогами по туториалу легенды (https://www.blast.hk/threads/506/), переделал под себя сделав открытие с DIALOG_STYLE_LIST (в нём 4 пункта влепил). При выборе в главном диалоге пункты работают. Но, если сделать, к примеру, при выборе там 2 пункта переход на другой диалог с ещё одним DIALOG_STYLE_LIST, то пункты уже в новом не работают (просто пропадает и всё). Надеюсь обьяснил нормально. Оно так и работает или я таки что-то пропустил в коде?
В кратце что хочу сделать, чтобы новые диалоги открывались не по нажатию клавиш, как в туториале.

Так может код приложишь хотя бы?

VADE · 30 Мар 2016

Можно ли каким либо образом визуально выдать себе кейс? Заранее спасибо :3

Perojek)0 · 30 Мар 2016

CLEO:

{$CLEO}
{$INCLUDE SF}
0000:

repeat
    wait 5000
until 0AFA:  is_samp_available
0B34: samp register_client_command "player" to_label @player
while true
wait 0
end

:player
2@=0
    for 0@ = 0 to 999 step 1
        if
        0B23: samp is_player_connected 0@
        then
        0B20: samp 1@ = actor_handle_by_samp_player_id 0@
            if
            1@==0
            then
            else
            2@++
            end
        end
    end
0AF8: samp add_message_to_chat "В зоне стрима %d игроков" color -1 2@   
0B43: samp cmd_ret

В чём ошибка?

BlackKnigga · 30 Мар 2016

Perojek)0 написал(а):

CLEO:

{$CLEO}
{$INCLUDE SF}
0000:

repeat
    wait 5000
until 0AFA:  is_samp_available
0B34: samp register_client_command "player" to_label @player
while true
wait 0
end

:player
2@=0
    for 0@ = 0 to 999 step 1
        if
        0B23: samp is_player_connected 0@
        then
        0B20: samp 1@ = actor_handle_by_samp_player_id 0@
            if
            1@==0
            then
            else
            2@++
            end
        end
    end
0AF8: samp add_message_to_chat "В зоне стрима %d игроков" color -1 2@ 
0B43: samp cmd_ret

В чём ошибка?

Если хендл не найден, то возвращается -1 а не 0.
И еще большие циклы не стоит вставлять в тело команды.

Поиск

Поиск

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

MISTER_GONWIK

Всефорумный гонщик

iTz_WEEZY

Известный

MISTER_GONWIK

Всефорумный гонщик

hnnssy

Известный

iTz_WEEZY

Известный

hnnssy

Известный

iTz_WEEZY

Известный

hnnssy

Известный

01EG

Известный

MISTER_GONWIK

Всефорумный гонщик

2Shae

Известный

hnnssy

Известный

VADE

Новичок

Perojek)0

Известный

BlackKnigga

Известный

Похожие темы