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

[hnnssy]

Крашит

:GetInfo
alloc 0@ 126
alloc 1@ 126
alloc 2@ 126
alloc 3@ 126
alloc 11@ 126
alloc 12@ 126
alloc 13@ 126
0B5B: samp get_listbox_item 0 text_to 0@
0B5B: samp get_listbox_item 1 text_to 1@
0B5B: samp get_listbox_item 2 text_to 2@
0AD4: 10@ = scan_string 0@ format "{AAFF10}Номер: %d" 11@
                                   
0AD4: 10@ = scan_string 1@ format "{AAFF10}Класс: %s" 12@

0AD4: 10@ = scan_string 2@ format "{AAFF10}Цена: %d$" 13@
0af8: "%d" -1 11@
0af8: "%s" -1 12@
0af8: "%d" -1 13@
free 0@
free 1@
free 2@
free 11@
free 12@
free 13@
ret 0

я ведь говорил, что с классом нужно не через скан_стринг, а через +15
просто 1@ += 15

 

[LaRossa]

я ведь говорил, что с классом нужно не через скан_стринг, а через +15
просто 1@ += 15

Спасибо огромное! Но почему 1@ += 15 а не 1@ -= 15 ?

 

[hnnssy]

Спасибо огромное! Но почему 1@ += 15 а не 1@ -= 15 ?

сдвиг на 15 байт вперёд, поэтому +
и не нужно столько выделений памяти

 

[Clarence]

Помогите, крашит когда сажусь в авто
Идея проста - сделать свою полоску
Проблема не в ее динамике, а в том, что корректно вывести на экран не могу
То появляется, и дико моргает
То вообще не появится
А то так и вылетает все нафиг
Помогите, как правильно рендерить ?

wait 3500

repeat
wait 0
until SAMP.Available()

:1
wait 0
repeat
wait 0
until Actor.Driving($PLAYER_ACTOR) 
03C0: 10@ = actor $PLAYER_ACTOR car
0227: 0@ = car 10@ health

if and
8AB0:   not key_pressed 9
0BDB: samp is_chat_visible
then
    if and
    0@ >= 800
    0@ <= 1000
    then 
    0B69: render draw_box_pos 1639 142 size 185 22 color 0xFF000000
    0B69: render draw_box_pos 1639 142 size 185 22 color 0xFF594AFF
    wait 0
        if and
        0@ >= 0
        0@ <= 799
        then
        0B69: render draw_box_pos 1639 142 size 185 22 color 0xFF000000
        0B69: render draw_box_pos 1639 142 size 185 22 color 0xFF594AFF
        wait 0
        end
    end
end

 

[LUCHARE]

То появляется, и дико моргает
То вообще не появится

потому-что ты задержек налепил

{$CLEO}
0000:

const
HVEH       = 0@
VEH_HEALTH = 1@
end

repeat
    wait 100
until SAMP.Available() 

while true
    wait 0 
    if Actor.Driving($PLAYER_ACTOR)
    then
        HVEH = Actor.CurrentCar($PLAYER_ACTOR)
        VEH_HEALTH = Car.Health(HVEH)
        if and
            VEH_HEALTH >= 800
            VEH_HEALTH <= 1000
        then
            0B69: render draw_box_pos 1639 142 size 185 22 color 0xFF000000
            0B69: render draw_box_pos 1639 142 size 185 22 color 0xFF594AFF
        else
            0B69: render draw_box_pos 1639 142 size 185 22 color 0xFF000000
            0B69: render draw_box_pos 1639 142 size 185 22 color 0xFF594AFF
        end
    end
end

 

[kawa operand]

:1

нахуя

 

[Lord]

Нужен код, чтобы отключал скрипт полностью и не показывало при нажатии Esc в игре. (N Custom script loaded)

 

[JEEMBО]

Что бы скрипт не отображался в счетчике подключенных скриптов в игре,то просто вставь этот код в начало скрипта, до задержек. После 0000: или thread (c) SR_Team (сам скрипт не выгрузит,покупай у SR_Team его инжектор cleo скриптов)

0AA2: 31@ = load_library "kernel32.dll"
0AA4: 30@ = get_proc_address "GetModuleHandleA" library 31@
0AA7: call_function 30@ num_params 1 pop 0 "CLEO.asi" 0@
0@ += 0x43154
0A8D: 1@ = read_memory 0@ size 4 virtual_protect 0
1@ -= 1
0A8C: write_memory 0@ size 4 value 1@ virtual_protect 0

 

[kawa operand]

0A93: end_custom_thread

 

[noob213]

проверьте, равна ли жизнь игрока 10 или меньше, что бы мне пришлось надеть

0226: 0@ = actor $PLAYER_ACTOR health
if

then
0223: set_actor $PLAYER_ACTOR health_to 100

 

[itsLegend]

Я не очень хорошо знаю коды операций, если я хочу проверить, равна ли жизнь игрока 10 или меньше, что я должен был бы поставить

if 0@ <= 10
then
    0223: set_actor $PLAYER_ACTOR health_to 100
end

 

[serhiyrubin]

Наверно таким себе никто ещё голову не забивал, я тут попытался сделать scm функцию проверки на подключение к интернету
Но подлагивает при проверке, ставил в цикл сразу без scm, тоже лаги
Надеюсь я ошибся и можно это исправить

:SCM_InternetCheckConnectionA  // call @SCM_InternetCheckConnectionA 3 0@ 1 0 1@   // 0@ - ссылка // 1@ = code
0AA2: 25@ = load_library "Wininet.dll"
0AA4: 26@ = get_proc_address "InternetCheckConnectionA" library 25@
0AA7: call_function 26@ num_params 3 pop FALSE | dword_0 2@ | dword_1 1@ | URL 0@ | _errorCode 27@ |
0AA3: free_library 25@
0AB2: RET 1 | _errorCode 27@ |

 

[Dominik_FlowHeep]

Я хочу написать cleo "tp" с ног. Я написал одно tp уже, но оно с машины (с посожирского сиденья и машина со мной не тпхается) но меня это не устраивает, т.к. оно баганое не всегда работает и не всегда машина рядом. И по этому я захотел написать cleo "tp с ног" мне говорили что оно просто должно работать по другому, это как? Что надо добавить или изменить что бы заработало "тп с ног"?

 

[samp is meme]

Я хочу написать cleo "tp" с ног. Я написал одно tp уже, но оно с машины (с посожирского сиденья и машина со мной не тпхается) но меня это не устраивает, т.к. оно баганое не всегда работает и не всегда машина рядом. И по этому я захотел написать cleo "tp с ног" мне говорили что оно просто должно работать по другому, это как? Что надо добавить или изменить что бы заработало "тп с ног"?

Ответ, достойный твоего вопроса: Что-то надо добавить.

 

[itsLegend]

Наверно таким себе никто ещё голову не забивал, я тут попытался сделать scm функцию проверки на подключение к интернету
Но подлагивает при проверке, ставил в цикл сразу без scm, тоже лаги
Надеюсь я ошибся и можно это исправить

:SCM_InternetCheckConnectionA  // call @SCM_InternetCheckConnectionA 3 0@ 1 0 1@   // 0@ - ссылка // 1@ = code
0AA2: 25@ = load_library "Wininet.dll"
0AA4: 26@ = get_proc_address "InternetCheckConnectionA" library 25@
0AA7: call_function 26@ num_params 3 pop FALSE | dword_0 2@ | dword_1 1@ | URL 0@ | _errorCode 27@ |
0AA3: free_library 25@
0AB2: RET 1 | _errorCode 27@ |

Это возможно исправить только вызывая в отдельном потоке. В клео это будет костылями.