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

[Guin]

{$CLEO}
0000:

repeat
wait 0
until 0AFA:  is_samp_available

0B34: samp register_client_command "comanda" to_label @cmd

WHILE TRUE
wait 0
    IF 0@ == 1
    THEN
        say "123456"
        wait 3000
        say "qwerty"
        wait 3000
        say "/comanda %d" 3@
        0@ = 0
    END
END

:cmd
0B35: samp 1@ = get_last_command_params
IF 0AD4: 2@ = scan_string 1@ format "%d" 3@
THEN
    0@ = 1
END
0B43: samp cmd_ret

А как их несколько сделать?

 

[randazzo]

А как их несколько сделать?

регаешь опкодом 0b34 на другой label и будет другая команда

 

[memir]

А как их несколько сделать?

repeat
wait 0
until 0AFA:  is_samp_available

0B34: samp register_client_command "comanda" to_label @cmd0
0B34: samp register_client_command "comanda1" to_label @cmd1
WHILE TRUE
wait 0
    IF 0@ == 1
    THEN
        say "123456"
        wait 3000
        say "qwerty"
        wait 3000
        say "/comanda %d" 3@
        0@ = 0
    END
      IF 0@ == 2
    THEN
        say "123456"
        wait 3000
        say "awrijawir"         // Вот тут типа новая команда, окей да
        wait 3000
        say "/comanda %d" 3@
        0@ = 0
    END
END

:cmd0
0B35: samp 1@ = get_last_command_params
IF 0AD4: 2@ = scan_string 1@ format "%d" 3@
THEN
    0@ = 1
END
0B43: samp cmd_ret
:cmd1
0B35: samp 1@ = get_last_command_params
IF 0AD4: 2@ = scan_string 1@ format "%d" 3@
THEN
    0@ = 2
END
0B43: samp cmd_ret

Не проверял, но должно работать

 

[Kaktyc007]

"Ищет подстроку в строке c учетом регистра"

{$CLEO}
0000:
repeat
wait 0
until samp.Available()

0B34: "cmd" @cmd

while true
wait 0
    IF 0@ == 1
    THEN      
        0B75: samp get_chat_string 99 text_to 1@ prefix_to 0 color_to 0 prefix_color_to 0
        IF 0C18: 2@ = strstr string1 1@ string2 "привет"
        THEN
            wait 1000
            say "ку"
        END
    END
end     

:cmd
0B12: 0@ = 0@ XOR 1
IF 0@ == 1
THEN
    alloc 1@ 256
ELSE
    free 1@
END
cmdret

Скомпилил твой код, захожу и игру - ничего не работает

 

[randazzo]

Скомпилил твой код, захожу и игру - ничего не работает

а команду вводил?

 

[Kaktyc007]

а команду вводил?

так, я видимо вообще отсталый, куда и какую команду вводить? /cmd в чат?

 

[randazzo]

так, я видимо вообще отсталый, куда и какую команду вводить? /cmd в чат?

да

 

[Kaktyc007]

да

щас попробовал не работает

 

[randazzo]

щас попробовал не работает

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

 

[Kaktyc007]

сейчас в News (на самп рп и евольв рп) чтобы редактору отправить объявление нужно кучу раз кликать по ентеру, а я ищу клео при зажатом ентере будет происходить нажатие на него(на ентер) для отправки объявления

 

[romanblinov2013]

Доброй ночи. Возник небольшой вопросик....
Как мне убрать фриз камеры и всего актёра? Этот фриз полностью блокирует актёра на ~1-2 секунды.

 

[debil :))]

Как ввести текст в диалог?Что-то на типе авто логина.

 

[memir]

Как ввести текст в диалог?Что-то на типе авто логина.

0B4B: samp set_current_dialog_editbox_text 1@

 

[randazzo]

Доброй ночи. Возник небольшой вопросик....
Как мне убрать фриз камеры и всего актёра? Этот фриз полностью блокирует актёра на ~1-2 секунды.

отключать рпц 15, 157, 158, 134 на время и ещё че то, вроде

 

[randazzo]

сейчас в News (на самп рп и евольв рп) чтобы редактору отправить объявление нужно кучу раз кликать по ентеру, а я ищу клео при зажатом ентере будет происходить нажатие на него(на ентер) для отправки объявления

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

WHILE TRUE
wait 0
    IF AND
    0AB0:   key_pressed 13
    0B61:  samp is_local_player_spawned
    THEN           
        0C72: set_virtual_key 13 down true
        wait 0
        0C72: set_virtual_key 13 down false
    END
END