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

LaRossa

LaRossa

Потрачен
429
117
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
LaRossa

LaRossa

Потрачен
429
117
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Почему не завершится основой топок ?
CLEO: 
{$CLEO}
0000:

while not Samp.Available()
    wait 0
end

0C6A: 25@ = create_custom_thread_at_label @Then

while true
    wait 0
    if 0AB0:   key_pressed 50
        then
        0B12: 0@ = 0@ XOR 1
        repeat
        wait 0
        0af8: "123" -1
        until 0@ == 0 
    end   
end   

:Then
while true
    wait 0
    if 0AB0:   key_pressed 49
        then
        0af8: "reload" -1
        0A92: create_custom_thread "Then.cs" 
        0A93: end_custom_thread
    end       
end
 
randazzo

randazzo

.
1,417
1,037
LaRossa написал(а):
Почему не завершится основой топок ?
CLEO: 
{$CLEO}
0000:

while not Samp.Available()
    wait 0
end

0C6A: 25@ = create_custom_thread_at_label @Then

while true
    wait 0
    if 0AB0:   key_pressed 50
        then
        0B12: 0@ = 0@ XOR 1
        repeat
        wait 0
        0af8: "123" -1
        until 0@ == 0
    end 
end 

:Then
while true
    wait 0
    if 0AB0:   key_pressed 49
        then
        0af8: "reload" -1
        0A92: create_custom_thread "Then.cs"
        0A93: end_custom_thread
    end     
end
Нажмите для раскрытия...
потому что у тебя переменная 0 не становится равной 0
 
L

LokoLoyKoo

Новичок
103
8
Крашит, что не так?
CLEO: 
{$CLEO}

0000: NOP

:Noname_2
wait 400
0AFA:  is_samp_available
else_jump @Noname_2
0AF8: samp add_message_to_chat "{FFFF00}____---___" color 12834622 

WHILE 8AFA: not is_samp_available
    wait 0
END

0B34: samp register_client_command "lol" to_label @mphelp

while true
    while 8039: not 0@ == 1
        wait 0
    end
    0AC6: 1@ = label @text offset
    0B3B: samp show_dialog id 2233 caption "{FFFFFF}Выберете мероприятие" text 1@ button_1 "Выбрать" button_2 "Закрыть" style 2
    while 8B3C: not samp is_dialog_responded id 2233 button 2@ list_item 3@ input_text 0
        if 8B4C: not samp is_dialog_active 2233
        then
            jump @bhelps
        end
        wait 0
    end
    if 0039: 2@ == 1
    then
        if 0039: 3@ == 0
        then
            jump @text_1 
        end
        if 0039: 3@ == 1
        then
            0AF9: samp say_msg "helloy" 
        end 
    end   
    :end
    0006: 0@ = 0  
end

:mphelp
0006: 0@ = 1
0B43: samp cmd_ret

:bhelps
0AC6: 4@ = label @capt_1 offset
0AC6: 5@ = label @text_1 offset
0B3B: samp show_dialog id 45 caption 4@ text 5@ button_1 "Закрыть" button_2 "" style 0
0B43: samp cmd_ret
jump @Noname_2

:capt_1
hex
"{FFFFFF}Кря-кря" 00
end

:text_1
hex
"Кря-кря, крякает уточка" A
"Привет, уточка" 00
end

:text
hex
"{F6DB6A}врум-врум" A   // 0 
"{FF00FF}Кря-кря" 00    // 1
end
 
randazzo

randazzo

.
1,417
1,037
LokoLoyKoo написал(а):
Крашит, что не так?
Нажмите для раскрытия...
почти все
CLEO: 
{$CLEO}

0000: NOP

repeat
wait 0
until 0AFA:

0AF8: samp add_message_to_chat "{FFFF00}____---___" color 12834622
0B34: samp register_client_command "lol" to_label @mphelp



while true
wait 0
    IF 0B3C: samp is_dialog_responded id 2233 button 2@ list_item 3@ input_text 0
    THEN
        IF AND
        2@ == 1
        3@ == 1
        THEN
            0AF9: samp say_msg "helloy"
        ELSE
            0AC6: 4@ = label @capt_1 offset
            0AC6: 5@ = label @text_1 offset
            0B3B: samp show_dialog id 45 caption 4@ text 5@ button_1 "Закрыть" button_2 "" style 0  
        END
    END   
END

:mphelp
0AC6: 1@ = label @text offset
0B3B: samp show_dialog id 2233 caption "{FFFFFF}Выберете мероприятие" text 1@ button_1 "Выбрать" button_2 "Закрыть" style 2
0B43: samp cmd_ret


:capt_1
hex
"{FFFFFF}Кря-кря" 00
end

:text_1
hex
"Кря-кря, крякает уточка" A
"Привет, уточка" 00
end

:text
hex
"{F6DB6A}врум-врум" A   // 0
"{FF00FF}Кря-кря" 00    // 1
end
 
L

LokoLoyKoo

Новичок
103
8
randazzo написал(а):
почти все
CLEO: 
{$CLEO}

0000: NOP

repeat
wait 0
until 0AFA:

0AF8: samp add_message_to_chat "{FFFF00}____---___" color 12834622
0B34: samp register_client_command "lol" to_label @mphelp



while true
wait 0
    IF 0B3C: samp is_dialog_responded id 2233 button 2@ list_item 3@ input_text 0
    THEN
        IF AND
        2@ == 1
        3@ == 1
        THEN
            0AF9: samp say_msg "helloy"
        ELSE
            0AC6: 4@ = label @capt_1 offset
            0AC6: 5@ = label @text_1 offset
            0B3B: samp show_dialog id 45 caption 4@ text 5@ button_1 "Закрыть" button_2 "" style 0 
        END
    END  
END

:mphelp
0AC6: 1@ = label @text offset
0B3B: samp show_dialog id 2233 caption "{FFFFFF}Выберете мероприятие" text 1@ button_1 "Выбрать" button_2 "Закрыть" style 2
0B43: samp cmd_ret


:capt_1
hex
"{FFFFFF}Кря-кря" 00
end

:text_1
hex
"Кря-кря, крякает уточка" A
"Привет, уточка" 00
end

:text
hex
"{F6DB6A}врум-врум" A   // 0
"{FF00FF}Кря-кря" 00    // 1
end
Нажмите для раскрытия...
Объяснил.
 
randazzo

randazzo

.
1,417
1,037
LokoLoyKoo написал(а):
Объяснил.
Нажмите для раскрытия...
CLEO: 
{$CLEO}

0000: NOP

:Noname_2
wait 400
0AFA:  is_samp_available
else_jump @Noname_2
0AF8: samp add_message_to_chat "{FFFF00}____---___" color 12834622

WHILE 8AFA: not is_samp_available        // нахуй ещё одна проверка на загруженность сампа?
    wait 0
END

0B34: samp register_client_command "lol" to_label @mphelp

while true
    while 8039: not 0@ == 1 // нахуй это, если можно использовать IF 0@ == 1
        wait 0
    end
    0AC6: 1@ = label @text offset
    0B3B: samp show_dialog id 2233 caption "{FFFFFF}Выберете мероприятие" text 1@ button_1 "Выбрать" button_2 "Закрыть" style 2  // нахуй выводить первый диалог, если это можно сделать в теле команды?
    while 8B3C: not samp is_dialog_responded id 2233 button 2@ list_item 3@ input_text 0 // нахуй использовать цикл, если можно поставить обычную проверку IF
        if 8B4C: not samp is_dialog_active 2233      // просто, нахуй?
        then
            jump @bhelps
        end
        wait 0
    end
    if 0039: 2@ == 1
    then
        if 0039: 3@ == 0
        then
            jump @text_1 // зачем прыграть на метку с хексом для диалога?
        end
        if 0039: 3@ == 1
        then
            0AF9: samp say_msg "helloy"
        end
    end  
    :end
    0006: 0@ = 0 
end

:mphelp
0006: 0@ = 1
0B43: samp cmd_ret

:bhelps
0AC6: 4@ = label @capt_1 offset     // зачем это выводить сюда, если можно юзать в основном цикле?
0AC6: 5@ = label @text_1 offset
0B3B: samp show_dialog id 45 caption 4@ text 5@ button_1 "Закрыть" button_2 "" style 0
0B43: samp cmd_ret
jump @Noname_2

:capt_1
hex
"{FFFFFF}Кря-кря" 00
end

:text_1
hex
"Кря-кря, крякает уточка" A
"Привет, уточка" 00
end

:text
hex
"{F6DB6A}врум-врум" A   // 0
"{FF00FF}Кря-кря" 00    // 1
end
держи.
 
N

noob213

Известный
33
2
как я могу достичь этого

CLEO: 
then
    0AF0: 5@ = get_int_from_ini_file "cleo\config.ini" section "settings" key "hp"
    0226: 4@ = actor $PLAYER_ACTOR health
    if
    4@ <= 5@                                 
    then
        0B28: samp disconnect_with_reason 0
        end
    end

проверьте, соответствует ли жизнь актера или меньше значения, полученного из файла ini
пытался скомпилировать, но некорректное выражение
 
Последнее редактирование:
K

kawa operand

перерывпятьминут
602
333
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
noob213 написал(а):
как я могу достичь этого

CLEO: 
then
    0AF0: 5@ = get_int_from_ini_file "cleo\config.ini" section "settings" key "hp"
    0226: 4@ = actor $PLAYER_ACTOR health
    if
    4@ <= 5@                                
    then
        0B28: samp disconnect_with_reason 0
        end
    end

проверьте, соответствует ли жизнь актера или меньше значения, полученного из файла ini
пытался скомпилировать, но некорректное выражение
Нажмите для раскрытия...
весь код дай

kewa opcode написал(а):
весь код дай
Нажмите для раскрытия...
а вообще попробуй до сравнения

CLEO: 
var
4@: int
5@: int
end
 
Последнее редактирование модератором:
  • Нравится
Реакции: noob213
K

Kaktyc007

Известный
166
11
есть код флудера и я хочу чтобы при выводе в чат сообщения [Внимание] флудер выключался. помогите кому не сложно
Код: 
{$CLEO}
0000: NOP

const

    DIALOG_STYLE_MSGBOX = 0
   
end

var
0@ : Int = 0
1@ : Int = 985
2@ : String
end

repeat
wait 0
until 0AFA:  is_samp_available

0B34: samp register_client_command "flood" to_label @fact
0B34: samp register_client_command "ftime" to_label @ftime

while true
wait 0
    if 0@ == 1
    then
    say 2@
    wait 1@
    end
end

:fact
0B35: samp 2@ = get_last_command_params
if 0@ == 0
then
0@ = 1
else
0@ = 0
end
if
0C29: 15@ = stristr string1 14@ string2 "У вас есть 2 минуты, чтобы решить"
then
0@ = 1
else
0@ = 0
end
0B43: samp cmd_ret

:ftime
0B35: samp 1@ = get_last_command_params
0C1A: 1@ = atoi 1@
chatmsg "{8DB600}[УСТАНОВЛЕНО]: Заддержка: {FFBF00}%i" -1 1@
0B43: samp cmd_ret
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. YarikVL
    [Перезапуск] Интервью с ARMOR
      • Bug
      • Нравится
      • Ха-ха
    Ответы
    25
    Просмотры
    4K
    Общение
    Арсений Пиво
    Арсений Пиво
  2. G
    • Закрыта
    [CLEO] Счётчик убийств/смертей.
      • Нравится
    Ответы
    15
    Просмотры
    21K
    Другое
    Забавный Бандит
    З
  3. iTz_WEEZY
    • Закрыта
    Помогите сделать [Авто Викторина]
    Ответы
    6
    Просмотры
    2K
    Архив
    iTz_WEEZY
    iTz_WEEZY
  4. PanSeek
    Интервью с DarkP1xel
      • Нравится
      • Влюблен
      • Злость
    Ответы
    55
    Просмотры
    11K
    Общение
    nikusyaxxs
    nikusyaxxs
  5. PanSeek
    Интервью с chapo
      • Нравится
      • Клоун
    Ответы
    16
    Просмотры
    4K
    Общение
    Стэнфорд
    Стэнфорд
Сверху Снизу