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

MArkoas_Gonzaleees

Новичок
22
0
Надеюсь проверку на дигл сам добавить сможешь

CLEO:
{$CLEO}Мне надо бота создать. А не колокольчик на сервер
0000:
while not Samp.Available()
    wait 0
end
0AAC: 0@ = load_audiostream "CLEO\название.mp3"
0B34: samp register_client_command "kolokol" to_label @cmd
0BE1: raknet setup_outcoming_rpc_hook @hook
0BDE: pause_thread 0

:cmd
0B12: 1@ = 1@ XOR 1
if 0@ == 1
    then
    chatmsg "ON" -1
else
    chatmsg "OFF" -1
end
Samp.CmdRet()

:Hook
0BE5: raknet 2@ = get_hook_param 1
if and
1@ == 1
2@ == 115 {RPC_GIVETAKEDAMAGE}
    then
    0BE5: raknet 3@ = get_hook_param 0
    0BE7: raknet 4@ = bit_stream_read 3@ type 1
    if 4@ == 0
        then
        0AAD: set_mp3 0@ perform_action 1
    end
end
0BE0: raknet hook_ret 1
Мне надо бота создать. А не колокольчик на сервер
 

Mihan

Новичок
2
0
Приветствую. Помогите пожалуйста найти гайд. Вообщем надумал сделать бота дальнобойщика drp. Ни где не могу найти как сделать в cleo езду по кординатам. Если не сложно расскажите где можно найти похожие уроки
 

Trawer2289

Известный
48
9
Что не так с кодом скажите пожалуйста? И помогите исправить прошу! Суть клео такова, активируем команду вот допустим /ckill [ID игрока] то после смерти нашего персонажа тому игроку кто нас убил прибудет смс типа say "/sms %d ГРЯЗНОЕ ЖИВОТНОЕ",а у меня херь вообще получилась! Помогите прошу.
CLEO:
{$CLEO .cs}
0000: NOP

repeat
    wait 0
until 0AFA:  is_samp_available
0B34: samp register_client_command "ckill" to_label @cmd

WHILE TRUE
wait 0
    IF 0@ == 1
    THEN
        Samp.IsCommandTyped(1@)
        IF 0AD4: 2@ = scan_string 1@ format "%d" 3@
            THEN
            IF 0B20: samp 4@ = actor_handle_by_samp_player_id 3@
            THEN
                IF 0118:   actor $PLAYER_ACTOR dead
                THEN
                    say "/sms %d ГРЯЗНОЕ ЖИВОТНОЕ! СЛИТ!!!" -1
                ELSE
                    018C: play_sound 1139 at 0.0 0.0 0.0
                    msg "{FF0000}[Ckill] {FFFFFF}Неверный {FF0000}ID {FFFFFF}игрока" -1
                END
                ELSE
                    018C: play_sound 1139 at 0.0 0.0 0.0
                    msg "{FF0000}[Ckill] {FFFFFF}Введите: {FF0000}/ckill {FFFFFF}[ID игрока]" -1
                END
            END
        0@ = 0
    END
END

:cmd
IF 0@ == 1
THEN
0@ = 0
018C: play_sound 1139 at 0.0 0.0 0.0
msg "{FF0000}[Ckill] {FFFFFF}Деактивирован" -1
else
0@ = 1
018C: play_sound 1139 at 0.0 0.0 0.0
msg "{FF0000}[Ckill] {FFFFFF}Активирован" -1
END
Samp.CmdRet()
 

LaRossa

Потрачен
429
117
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Что не так с кодом скажите пожалуйста? И помогите исправить прошу! Суть клео такова, активируем команду вот допустим /ckill [ID игрока] то после смерти нашего персонажа тому игроку кто нас убил прибудет смс типа say "/sms %d ГРЯЗНОЕ ЖИВОТНОЕ",а у меня херь вообще получилась! Помогите прошу.
CLEO:
{$CLEO .cs}
0000: NOP

repeat
    wait 0
until 0AFA:  is_samp_available
0B34: samp register_client_command "ckill" to_label @cmd

WHILE TRUE
wait 0
    IF 0@ == 1
    THEN
        Samp.IsCommandTyped(1@)
        IF 0AD4: 2@ = scan_string 1@ format "%d" 3@
            THEN
            IF 0B20: samp 4@ = actor_handle_by_samp_player_id 3@
            THEN
                IF 0118:   actor $PLAYER_ACTOR dead
                THEN
                    say "/sms %d ГРЯЗНОЕ ЖИВОТНОЕ! СЛИТ!!!" -1
                ELSE
                    018C: play_sound 1139 at 0.0 0.0 0.0
                    msg "{FF0000}[Ckill] {FFFFFF}Неверный {FF0000}ID {FFFFFF}игрока" -1
                END
                ELSE
                    018C: play_sound 1139 at 0.0 0.0 0.0
                    msg "{FF0000}[Ckill] {FFFFFF}Введите: {FF0000}/ckill {FFFFFF}[ID игрока]" -1
                END
            END
        0@ = 0
    END
END

:cmd
IF 0@ == 1
THEN
0@ = 0
018C: play_sound 1139 at 0.0 0.0 0.0
msg "{FF0000}[Ckill] {FFFFFF}Деактивирован" -1
else
0@ = 1
018C: play_sound 1139 at 0.0 0.0 0.0
msg "{FF0000}[Ckill] {FFFFFF}Активирован" -1
END
Samp.CmdRet()
0118: actor $PLAYER_ACTOR dead
Грязное животное это ты xD
0118: actor 4@ dead
 

romanblinov2013

RB_PRO
Проверенный
212
196
Приветствую. Помогите пожалуйста найти гайд. Вообщем надумал сделать бота дальнобойщика drp. Ни где не могу найти как сделать в cleo езду по кординатам. Если не сложно расскажите где можно найти похожие уроки

Ну если ты сможешь интегрировать ИИ в CLEO, то у тебя получится сделать такого бота.
А теперь трезво: Ну вот ты сделаешь бота, который гоняет по корам и перетаскивает грузы, но во время пути какая-то собачка может тебя подрезать/слить ну или просто взаимодействовать с тобой. Такое клео сделать ну почти нереально, максимум телепорт под землёй, посредством кордмастера, но нахуя, если можно фармить на других работах и не ебать себе мозг с такой ересью)))
 

bomber!

Известный
Проверенный
958
465
1)нужен клео NOP ResetPlayerMoney

2)можно кого попросить (если не впадло)
написать рандомный антистан. 1 сек работает- 1 секунду нет
автоматом
 
Последнее редактирование модератором:

D3.Pheonix

🎹
Модератор
2,865
1,649
нужен клео NOP ResetPlayerMoney
CLEO:
{$CLEO}
0000:

repeat
wait 0
until SAMP.Available()
0BE3: raknet setup_incoming_rpc_hook @money
0BDE: pause_thread 0

:money
0BE5: raknet 0@ = get_hook_param 1
if 0@ == 20
then
0be0: 0
end
0be0: 1

можно кого попросить (если не впадло)
написать рандомный антистан. 1 сек работает- 1 секунду нет
автоматом
CLEO:
{$CLEO}
0000:

while true
wait 1000
0946: set_actor $PLAYER_ACTOR actions_uninterupted_by_weapon_fire 1
wait 1000
0946: set_actor $PLAYER_ACTOR actions_uninterupted_by_weapon_fire 0
end
 
Последнее редактирование:
  • Нравится
Реакции: bomber!

shailkiller

Известный
164
35
Код:
{$CLEO .cs}
0000:

0662: printstring "Anti-freeze"

repeat
wait 0
until SAMP.Available()
0AF8: samp add_message_to_chat "Anti-Freeze by shailkiller" color 0xFF0000

while true
wait 0
if
0AB0: 73
then
0ACD: show_text_highpriority "Anti-freeze ON" time 1000
SAMP.ReadSAMPMemory(1@, 0x168E0, 2)
SAMP.WriteSAMPMemory(0x168E0, 50064, 2)
wait 228       
repeat
wait 0
until 0AB0: 73
0ACD: show_text_highpriority "Anti-freeze OFF" time 1000
SAMP.WriteSAMPMemory(0x168E0, 1@, 2)
wait 228
end
end
Как сделать так что-бы активация в клео не работала при включённом чате?
 

kawa operand

перерывпятьминут
602
333
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
CLEO:
0B21:     samp is_chat_opened
 

Sashka

Известный
11
0
Можно ли как-то высчитать, на какой именно строчке находится нужный мне текст в диалоге? А потом нажать на эту строчку