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

Freym

Известный
489
204
Как сделать так что бы персонаж нечего не делал но сам скрипт персонажа телепортировал для сервера.[CLEO]
Если вы не поняли , напишите мне.
 

itsOkke

Потрачен
86
38
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
ну начнем с того что ты его отрицательным делаешь
а еще он принимает ид игрока а не хендл
 

itsOkke

Потрачен
86
38
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
ты мне сам только что скинул его алло прием

0B5C вернет тру если игрок в афк
а 8B5C вернет тру если игрок не в афк
 
Последнее редактирование модератором:

itsOkke

Потрачен
86
38
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
прими во внимание тот факт что ты можешь проверить афк игрок или нет только если он в зоне стрима
 

NookieONE

Участник
128
1
8B5C
мне нужен этот.
Но он не проверяет игроков
CLEO:
for 0@ = 0 to 999
wait 0
if samp.IsPlayerConnected(0@)
    then
    if
    8B5C: samp is_player 0@ paused
    then
прими во внимание тот факт что ты можешь проверить афк игрок или нет только если он в зоне стрима
Игрок в игре, но афк.
Но он все равно не определяет этого
 

Vintik

Через тернии к звёздам
Проверенный
1,565
1,037
CLEO:
{$CLEO}

0000:

repeat
wait 400
until samp.Available()
0C74: 10@ = create_timer_interval 20000 on_label @timer
0C78: set_timer 10@ active false

while true
wait 0
    if 0B4C:  samp is_dialog_active -1
    then
        alloc 1@ 64
        0BD8: samp get_dialog_caption 1@
        if 0C18: 0 = strstr string1 1@ string2 "Обыск"
        then
            alloc 0@ 2048
            alloc 3@ 60
            alloc 6@ 20
            0BD7: samp get_dialog_text 0@
            if 0C18: 0 = strstr string1 0@ string2 "Игрок в розыске"
            then
                7@ = 1
            end
            if 0C18: 0 = strstr string1 0@ string2 "Нарко"
            then
                7@ = 1
                2@ += 1
                0AD3: 6@ = format "нарко "
                0C15: strcat destination 3@ source 6@
            end
            if 0C18: 0 = strstr string1 0@ string2 "Материалы"
            then
                7@ = 1
                2@ += 1
                0AD3: 6@ = format "материалы "
                0C15: strcat destination 3@ source 6@
            end
            if 0C18: 0 = strstr string1 0@ string2 "Набор отмычек"
            then
                7@ = 1
                2@ += 1
                0AD3: 6@ = format "отмычки "
                0C15: strcat destination 3@ source 6@
            end
            if 7@ = 1
            then
                0C72: set_virtual_key 119 down 1
                0C72: set_virtual_key 119 down 0
            end
            if 2@ > 0
            then
                0C2C: 4@ = strrchr 1@ char 91
                0C11: memset destination 4@ value 0x0 size 1
                4@++
                0C1A: 5@ = atoi 4@
                0C78: set_timer 10@ active true
                while 0C79:    is_timer 10@ active
                wait 0
                    if and
                    0AB0: key_pressed 89
                    8B21: not samp is_chat_opened
                    then
                        0C78: set_timer 10@ active false
                        say "/su %d %d %s" 5@ 2@ 3@
                        wait 300
                    end
                end
            end
            free 0@
            free 3@
            free 6@
            2@ = 0
            7@ = 0
        end
        free 1@
    end
end

:timer
0C78: set_timer 10@ active false
samp.CmdRet()

Возможно кто-то догадается, не скринит обыск никак, выдача звезд тоже не работает. В чем проблема?
P.S. Скриншот обыска

Извини, прошла почти неделя. Вот, бери данный скрипт за основу (открывает диалог, который подтверждает выдачу розыска):
CLEO:
// Диалог: "Обыск НИКНЕЙМ[АЙДИ], УРОВЕНЬ lvl.", предметы: "Нарко", "Материалы", "Набор отмычек".

{$CLEO .cs}
0000: NOP
0AC8: 0@ = allocate_memory_size 256
0AC8: 1@ = allocate_memory_size 64 // Найденные предметы
0AC8: 3@ = allocate_memory_size 25 // Никнейм

repeat
wait 0
until SAMP.Available()

while true
wait 0

    if 0B4C:  samp is_dialog_active -1
    then
    0BD8: samp get_dialog_caption 0@
        if 0C18: 31@ = strstr string1 0@ string2 "Обыск"
        then
        0B4E: samp 11@ = get_current_dialog_id
        6@ = 0
            while 6@ < 1000
            0B36: samp 3@ = get_player_nickname 6@
            0B65: samp 7@ = player 6@ score
            0AD3: 1@ = format "Обыск %s[%d], %d lvl." 3@ 6@ 7@
                if 0C14: strcmp string1 0@ string2 1@
                then
                4@ = 0
                005A: 4@ += 6@
                6@ = 999
                end
            6@ += 1
            end
        0BD7: samp get_dialog_text 0@
        0AD3: 1@ = format ""
        2@ = 0 // Уровень розыска
            if 0C18: 31@ = strstr string1 0@ string2 "Нарко"
            then
            0C15: strcat destination 1@ source "Нарко"
            2@ += 1
            end
            if 0C18: 31@ = strstr string1 0@ string2 "Материалы"
            then
                if 2@ == 0
                then
                0C15: strcat destination 1@ source "Материалы"
                else
                0C15: strcat destination 1@ source ", материалы"
                end
            2@ += 1
            end
            if 0C18: 31@ = strstr string1 0@ string2 "Набор отмычек"
            then
                if 2@ == 0
                then
                0C15: strcat destination 1@ source "Отмычки"
                else
                0C15: strcat destination 1@ source ", отмычки"
                end
            2@ += 1
            end
         
            if 2@ == 0
            then
            0AF8: samp add_message_to_chat "У %s ничего не обнаружено." color 0x00BFFF 3@
            else
            0AD3: 0@ = format "{FFFFFF}У %s обнаружено: {F1DF6C}%s{FFFFFF}. Ты хочешь объявить его в розыск (%d зв.)?" 3@ 1@ 2@
            0B3B: samp show_dialog id 987 caption "{FFFFFF}Обьявление в розыск" text 0@ button_1 "Выдать" button_2 "Закрыть" style 0
            end
        end
    end
 
    if 0B3C:  samp is_dialog_responded id 987 button 14@ list_item 0 input_text 0 // 0AF9: samp say_msg "/su %d %d %s" 4@ 2@ 1@
    then
        if 14@ == 1
        then
        6@ = 0
        0B2B: samp 15@ = get_player_id_by_actor_handle $PLAYER_ACTOR
            while 6@ < 1000
                if or
                003B:   6@ == 15@
                0B23:  samp is_player_connected 6@
                then
                0B36: samp 0@ = get_player_nickname 6@
                else
                0AD3: 0@ = format ""
                end
                if 0C14: strcmp string1 0@ string2 3@
                then
                0AF9: samp say_msg "/su %d %d %s" 6@ 2@ 1@
                6@ = 1000
                end
            6@ += 1
                if 6@ == 1000
                then
                0AF8: samp add_message_to_chat "%s оффлайн." color 0x00BFFF 3@
                end
            end
        end
    end

end
 
Последнее редактирование:

cheatsampdrp

Участник
57
3
Привет хочу написать клео скрипт типу чекер риелтокри подскажите как сделать так что б скрипт наживал кнопки например есть табличка и там есть далее и при активации он нажимает это и действия повторяютса а если появитса какойто новый елемент то скрипт напише что появилось