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

[cover]

Вот код

{$CLEO}

const
    DIALOG_STYLE_LIST = 2
end

0000:

repeat
    wait 400
until 0AFA:  is_samp_available // Ожидаем инициализации структур SAMP'а

while true
    wait 0
        if 0AB0: key_pressed 121
        then
        0AC8: 0@ = allocate_memory_size 64 // Выделяем память под список элементов(кол-во текста должно быть не больше 64 символов(пробелы и переходы на новую строку тоже равны 1 символу))
        0ad3: format_stirng 0@ = "Первый пункт%cВторой пункт%cТретий пункт" 0xA 0xA // Создаем список, 0xA - означает переход на новую строку, а %c указывается в самой строке
        0B3B: samp show_dialog id 17 caption "Третий диалог" text 0@ button_1 "Выбрать" button_2 "Закрыть" style DIALOG_STYLE_LIST
        0AC9: free_allocated_memory 0@ // Освобождаем память, больше не нужна.
        while 0AB0: key_pressed 121
        wait 20
    end
end
    if
        0B3C: samp is_dialog_responded id 17 button 1@ list_item 3@ input_text 0
    then

        0AF8: samp add_message_to_chat "Была нажата кнопка %d" color -1 params 1@

        if
            1@ == 1
        then
            0AF8: samp add_message_to_chat "А именно: Уря" color -1
            0AF8: samp add_message_to_chat "Элемент №%d" color -1 params 3@

            if 3@ == 0
            then 0AF8: samp add_message_to_chat "Это первый пункт" color -1
            end

            if 3@ == 1 // Был выбран второй пункт
            then 0AF8: samp add_message_to_chat "Это второй пункт" color -1
            end

            if 3@ == 2 // Был выбран третий пункт
            then 0AF8: samp add_message_to_chat "Это третий пункт" color -1
            end
        else
        end
    end
end

Картинки нормально прикрепи, чтобы я увидел как ты хочешь, я тебе сделаю все.

 

[Alex7227]

Картинки нормально прикрепи, чтобы я увидел как ты хочешь, я тебе сделаю все, у тебя код дерьмо.

Вот ссылка на картинки: Клик

 

[TheMonstercat]

No thats not what i mean but its good to thx :)
I mean this Left to right turn :

On my 2. gSA i have many mods and low FPS and this combined with the Framelimiter in my s0b makes me soooo slow...

 

[Alex7227]

Ребята помогите пишет: Слишком длинная строка "Строка....".
Допускается максимум 255 символов. Что делать? Как перенести строку? в PAWNO " \n " перенос строки!

 

[Dark_Knight]

0ac6: 0@ = @label
<code>
:label
hex
"test\ntest\ntest\0"
end

 

[Enjoy]

Подкиньте опкод, который проверяет, целюсь ли я с гана.(не снайперский скоп)

 

[Alex7227]

Как сделать таймер на 9 минут?
Вот видео с сервера (Не реклама! Нашёл самый первый нубо сервер). Мне надо как на видео время, но только таймер на 9 минут! Расположение таймера хоть где!

 

[Joy]

Тогда ФПС будет показыватся, который был 3 секунды назад.

wait 100
:D
Может поможет.

 

[Estintax]

Почему у меня опкод 0af8 добавляет в чат текст с КАПСОМ?

 

[Dark_Knight]

Почему у меня опкод 0af8 добавляет в чат текст с КАПСОМ?

Настройки - форматирование - реестр букв "Как есть"

 

[Piratekapitan]

Можно ли изменить этот скрипт, чтобы менялась модель машины?

{$CLEO}

thread "setskin"
0662: "Made by FYP"
0662: "BlastHack.Net"

while not SAMP.Available()
wait 500
end
0B34: samp register_client_command "setskin" to_label @cmd_setskin

0BDE: pause_thread 0

:cmd_setskin
0B35: samp 0@ = get_last_command_params
0C17: 1@ = strlen 0@
if 1@ > 0
then
0AD4: 2@ = scan_string 0@ format "%d %d" 3@ 4@ //IF and SET
if 2@ == 2
then
if 0B20: samp 2@ = actor_handle_by_samp_player_id 3@
then call @CPed__SetModelIndex 2 2@ 4@
end
end
end
cmdret

:CPed__SetModelIndex // 0@ handle, 1@ model
if 1@ > 289
then ret 0
end
0247: load_model 1@
038B: load_requested_models
while 8248: not model 1@ available
wait 0
end
0A96: 0@ = actor 0@ struct
0AA6: call_method 0x5E4880 struct 0@ num_params 1 pop 0 1@
ret 0

 

[Xample]

помогите написать скрипт, нужно постоянно проверять последнюю строку в чате и если она содержит одно из слов "адммин" "стой" или только корень слова, актёр выполнял действие например нажал ESC
0DBF: emul_key_press 0x1B is_up 0
wait 64
0DBF: emul_key_press 0x1B is_up 1

 

[XyJluraH_J]

помогите написать скрипт, нужно постоянно проверять последнюю строку в чате и если она содержит одно из слов "адммин" "стой" или только корень слова, актёр выполнял действие например нажал ESC
0DBF: emul_key_press 0x1B is_up 0
wait 64
0DBF: emul_key_press 0x1B is_up 1

{$CLEO}
{$INCLUDE SF}

0AC8: allocate_memory_size 1@ 128
0AC8: allocate_memory_size 2@ 64
while true
wait 0
0B75: samp get_chat_string 99 text_to 1@ prefix_to 2@ color_to 3@ prefix_color_to 4@
if 0C18: 6@ = strstr string1 1@ string2 "Админ, стой"
then
wait 1000
0DBF: emul_key_press 0x1B is_up 0
wait 1000
end
end

 

[Xample]

{$CLEO}
{$INCLUDE SF}

0AC8: allocate_memory_size 1@ 128
0AC8: allocate_memory_size 2@ 64
while true
wait 0
0B75: samp get_chat_string 99 text_to 1@ prefix_to 2@ color_to 3@ prefix_color_to 4@
if 0C18: 6@ = strstr string1 1@ string2 "Админ, стой"
then
wait 1000
0DBF: emul_key_press 0x1B is_up 0
wait 1000
end
end

крашит при заходе в игру

Спойлер: Спойлер

SA-MP 0.3z
Exception At Address: 0x004874A2
Base: 0x047A0000

Registers:
EAX: 0x00000000    EBX: 0x01A4FD98    ECX: 0x00000000    EDX: 0xFFFFFFF1
ESI: 0x04E9D818    EDI: 0x04E85940    EBP: 0x0046A201    ESP: 0x0028FC48
EFLAGS: 0x00010246

Stack:
+0000: 0x01A4FC88   0x01A4FD98   0x0046A201   0x00000001
+0010: 0x00000000   0x00000000   0x01C28410   0x00000000
+0020: 0x0028FC78   0x00A904B0   0x00A903D0   0x00A903D0
+0030: 0x01A4FD98   0x01A4FEA8   0x0046A201   0x00000001
+0040: 0x0047E36F   0x00000203   0x01A4FC88   0x01A4FD98
+0050: 0x00000001   0xBD72297F   0x3E7289B9   0xBC6C9CA7
+0060: 0x00000000   0x80000000   0x00493DB3   0x01A4FD98
+0070: 0x01A4FEA8   0x01A4FEA8   0x00000001   0x004696B1
+0080: 0x00000000   0x01A4FD98   0x01A4FEA8   0x0046A201
+0090: 0x01A4FD98   0x01A4FEA8   0x0046A201   0x00000001
+00A0: 0x00465E99   0x00000001   0x01A4FD98   0x01A4FEA8
+00B0: 0x76B029D5   0x76B029B8   0x000000DC   0x0046A201
+00C0: 0x6E7B3040   0x0028FD84   0x00838353   0xFFFFFFFF
+00D0: 0x00469FF7   0x00000203   0x01A4FD98   0x00000000
+00E0: 0x0046A220   0x8CB2D713   0x00000079   0x0028FD94
+00F0: 0x00000000   0x00000010   0xFFE1E1E1   0x80808080
+0100: 0xFF000000   0x0053BFCC   0x0000001A   0x8CB2D6C6
+0110: 0x00000000   0x0000001A   0x8CB2D6C6   0x04FF09E0
+0120: 0x04805B5D   0x0000001A   0x8CB2D6C6   0x00000000
+0130: 0x76B1F9B0   0x0028FD6C   0x0028F81C   0x0028FF78
+0140: 0x04850AA4   0x04872EB0   0x00000001   0x76B1F9B0
+0150: 0x0053E986   0x00000001   0x00000003   0x00000064
+0160: 0x0053ECC2   0x00000001   0x00619B71   0x0000001A
+0170: 0x00000001   0x00000001   0x0000000A   0x00748DA0
+0180: 0x0000001A   0x00000001   0x768E1225   0x00000000
+0190: 0x0028FF88   0x7EFDE000   0x01750000   0x4F0CB2D6
+01A0: 0x01751E70   0x00000008   0x00000100   0x00000008
+01B0: 0x00000102   0x44340000   0x43E10000   0x00000000
+01C0: 0x00000000   0x000005A0   0x00000384   0x00000000
+01D0: 0x00000001   0x00110AD0   0x0000C042   0x00000000
+01E0: 0x00000000   0x12DE404D   0x000002D0   0x000001C2
+01F0: 0x0000002C   0x0028FE2C   0x00825EA4   0x768E1225
+0200: 0x00000000   0x7EFDE000   0xFFFFFFFF   0x00821D17
+0210: 0x00000065   0x00000065   0x0028FF88   0x008246F1
+0220: 0x00400000   0x00000000   0x01A82F5E   0x0000000A
+0230: 0x00000094   0x00000006   0x00000001   0x00001DB0
+0240: 0x00000002   0x00000000   0x00000000   0x00000000
+0250: 0x00000000   0x00000000   0x00000000   0x00000000
+0260: 0x00000000   0x00000000   0x00000000   0x00000000
+0270: 0x00000000   0x00000000   0x00000000   0x00000000

SCM Op: 0x446, lDbg: 0 LastRendObj: 0

Game Version: US 1.0

 

[cover]

Ребята, такая просьба, проверьте пожалуйста у себя этот опкод "0AE1: 0@ = random_actor_near_point 1@ 2@ 3@ in_radius 50.0 find_next 0 pass_deads 1" на работоспособность.
У меня не работает. Не записывает в переменную хендл актера.