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

1,417
1,029
Код:
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP

repeat
wait 0
until Samp.Available()
0B34: register_client_command "qdrop" to_label @qdrop

alloc 1@ 60
0BDE: pause_thread 0

:qdrop
0B35: samp 9@ = get_last_command_params
0AF9: samp say_msg "/drop"
0BC9: samp send_dialog_response dialog 124 button 1 listitem 1 input 0
    0B75: samp get_chat_string 99 text_to 1@ prefix_to 0 color_to 0 prefix_color_to 0  
0001: wait 300 ms  
    IF  0C29: 2@ = stristr string1 1@ string2 "deagle"
THEN
        0BC9: samp send_dialog_response dialog 335 button 1 listitem 3 input 0
        wait 100
        0B47: samp close_current_dialog_with_button 0
end
0B43: samp cmd_ret

Срабатывает через раз, HELP
CLEO:
{$CLEO}
0000: NOP

repeat
wait 0
until 0AFA:

0B34: register_client_command "qdrop" to_label @qdrop

WHILE TRUE
wait 0
    IF AND
    0@ == 1
    0B4C:  samp is_dialog_active -1
    THEN
        0BC9: samp send_dialog_response dialog 124 button 1 listitem 1 input 0
        0B75: samp get_chat_string 99 text_to 1@ prefix_to 0 color_to 0 prefix_color_to 0  
        IF 0C29: 2@ = stristr string1 1@ string2 "deagle"
        THEN
            0BC9: samp send_dialog_response dialog 335 button 1 listitem 3 input 0
            wait 100
            0B47: samp close_current_dialog_with_button 0   
            0@ = 0 
            free 1@     
        END
    END
END

:qdrop
0AF9: samp say_msg "/drop"
alloc 1@ 128
0@ = 1
0B43: samp cmd_ret
 
1,417
1,029
Код:
{$CLEO}
0000: NOP

repeat
wait 0
until 0AFA:

0B34: register_client_command "qdrop" to_label @qdrop


:drop
WHILE TRUE
wait 0
    IF AND
    0@ == 1
    0B4C:  samp is_dialog_active -1
    THEN
        0BC9: samp send_dialog_response dialog 124 button 1 listitem 1 input 0
        0B75: samp get_chat_string 99 text_to 1@ prefix_to 0 color_to 0 prefix_color_to 0
        IF 0C29: 2@ = stristr string1 1@ string2 "deagle"
        THEN
            0BC9: samp send_dialog_response dialog 335 button 1 listitem 3 input 0
            wait 100
            0B47: samp close_current_dialog_with_button 0 
            0@ = 0
            free 1@
            jump @qdrop2
            ELSE
        IF 0C29: 2@ = stristr string1 1@ string2 "AK-47"
        THEN
            0BC9: samp send_dialog_response dialog 335 button 1 listitem 2 input 0
            wait 100
            0B47: samp close_current_dialog_with_button 0 
            0@ = 0
            free 1@
            jump @qdrop2            
        END
    END
END

:qdrop2
0AF9: samp say_msg "/drop"
alloc 1@ 128
       0BC9: samp send_dialog_response dialog 124 button 1 listitem 4 input 0
IF 0C29: 2@ = stristr string1 1@ string2 "patr"
        THEN
            0BC9: samp send_dialog_response dialog 336 button 1 listitem 2 input 0
            wait 100
            0B47: samp close_current_dialog_with_button 0 
            0@ = 0
            free 1@
            end
            jump @drop

:qdrop
0AF9: samp say_msg "/drop"
alloc 1@ 128
0@ = 1
0B43: samp cmd_ret

Спасибо за прошлый ответ, теперь другая проблема
qdrop2 теперь срабатывает через раз
что ты хочешь сделать?
 
1,417
1,029
пишу /qdrop
далее
1 - скрипт прописывает /drop, выскакивает диалог в котором выбирает 2 строчку, далее чекает чат на слова либо DEAGLE либо AK-47 и в зависимости от слова выбирает нужную строчку в диалоге.
2 - После, скрипт снова прописывает /drop и уже выбирает не 2, а 5 строчка и также чекает чат на слова(допустим patr и health) и выбирает нужные строчки(если patr то выбирает 3 строчку, если ammo то 4)
C первым ты мне помог, теперь не могу объединить 1 и 2, чтобы после 1 выполнялось 2
CLEO:
{$CLEO}
0000: NOP

repeat
wait 0
until 0AFA:

0B34: register_client_command "qdrop" to_label @qdrop

WHILE TRUE
wait 0
    IF AND
    0@ == 1
    0B4C:  samp is_dialog_active -1
    THEN
        0BC9: samp send_dialog_response dialog 124 button 1 listitem 1 input 0
        0B75: samp get_chat_string 99 text_to 1@ prefix_to 0 color_to 0 prefix_color_to 0
        IF 0C29: 2@ = stristr string1 1@ string2 "deagle"
        THEN
                0BC9: samp send_dialog_response dialog 335 button 1 listitem 3 input 0
        END
        IF 0C29: 2@ = stristr string1 1@ string2 "AK-47"
        THEN
                0BC9: samp send_dialog_response dialog 335 button 1 listitem 2 input 0       
        END
        0AF9: samp say_msg "/drop"
        wait 200
        0BC9: samp send_dialog_response dialog 124 button 1 listitem 4 input 0
        0B75: samp get_chat_string 99 text_to 1@ prefix_to 0 color_to 0 prefix_color_to 0
        IF 0C29: 2@ = stristr string1 1@ string2 "patr"
        THEN
            0BC9: samp send_dialog_response dialog 336 button 1 listitem 3 input 0
        END
        IF 0C29: 2@ = stristr string1 1@ string2 "ammo"
        THEN
            0BC9: samp send_dialog_response dialog 336 button 1 listitem 4 input 0
        END
        0B47: samp close_current_dialog_with_button 0 
        free 1@
        0@ = 0
    END
END

:qdrop
0AF9: samp say_msg "/drop"
alloc 1@ 128
0@ = 1
0B43: samp cmd_ret
 

enziweee

Участник
28
32
hi
Можно же как-то либо выгрузить модель актёра, либо просто переместить модель в другой интерьер
Я хочу чтоб модели не было, а ник соответсвенно остался
 

LUCHARE

Известный
Друг
545
688
hi
Можно же как-то либо выгрузить модель актёра, либо просто переместить модель в другой интерьер
Я хочу чтоб модели не было, а ник соответсвенно остался
CLEO:
009B: destroy_actor_instantly $CHAR_GUNSHOPOWNER

034F: destroy_actor_with_fade $PATIENT1
 

kawa operand

перерывпятьминут
602
333
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
CLEO:
{$CLEO}
0000: NOP

repeat
    wait 0
until samp.Available()
0AF8: samp add_message_to_chat "script by noob_name loaded" color 0x00cc00
 

kawa operand

перерывпятьминут
602
333
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
переход на нулевой оффсет
 

kawa operand

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

kizn

О КУ)))
Всефорумный модератор
2,405
2,058
короче помогите так как в слео я очень туповат, как сделать такой скрипт чтобы когда наводил пкм на игрока и нажимал на P (аризона), писалась сразу в чат команда /givelicense айдиигроканакоторогоянажалпкмP
 
1,417
1,029
короче помогите так как в слео я очень туповат, как сделать такой скрипт чтобы когда наводил пкм на игрока и нажимал на P (аризона), писалась сразу в чат команда /givelicense айдиигроканакоторогоянажалпкмP
CLEO:
{$CLEO}
0000:
repeat
wait 0
until 0AFA:

WHILE TRUE
wait 0
    IF AND
    0C89:  key_just_pressed 80
    0AD2: 0@ = player $PLAYER_CHAR targeted_actor //IF and SET
    THEN
        0B2B: samp 1@ = get_player_id_by_actor_handle 0@
        say "/givelicense %d" 1@
        wait 550
    END
END
 

kizn

О КУ)))
Всефорумный модератор
2,405
2,058
CLEO:
{$CLEO}
0000:
repeat
wait 0
until 0AFA:

WHILE TRUE
wait 0
    IF AND
    0C89:  key_just_pressed 80
    0AD2: 0@ = player $PLAYER_CHAR targeted_actor //IF and SET
    THEN
        0B2B: samp 1@ = get_player_id_by_actor_handle 0@
        say "/givelicense %d" 1@
        wait 550
    END
END
Спасибо, а короче возможно сделать так чтобы после того как в чат выводилась надпись "Добро пожаловать на Arizona Role Play!" выводилась моя надпись (в скрипте собсна)?
 

kawa operand

перерывпятьминут
602
333
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
скан 100 строки и в strcmp в условие ставь и там уже пиши че надо
 
  • Нравится
Реакции: kizn