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

[randazzo]

:label
wait 0
03C0: 0@ = actor $PLAYER_ACTOR car
if and
00DF: actor $PLAYER_ACTOR driving
8ABE: vehicle 0@ engine_on
jf @label
wait 100
0AF9: samp say_msg "/lock"
wait 100
0AF9: samp say_msg "/engine"
jump @label2

:Label2
wait 0
if
80DF: actor $PLAYER_ACTOR driving
jf @Label2
jump @label

WHILE TRUE
wait 0
    IF 00DF: actor $PLAYER_ACTOR driving
    THEN
        03C0: 0@ = actor $PLAYER_ACTOR car
        IF 8ABE: vehicle 0@ engine_on
        THEN
            wait 100
            0AF9: samp say_msg "/lock"
            wait 100
            0AF9: samp say_msg "/engine"
        END
    END
END

 

[kawa operand]

как в клео сделать асинхронный поток чтоб UrlDownloadToFile не останавливала поток игры

 

[BlackKnigga]

как в клео сделать асинхронный поток чтоб UrlDownloadToFile не останавливала поток игры

В клео асинхронный не сделать никак.
Юзай опкоды сампфункс для загрузки файлов

 

[LaRossa]

Как проверить сидит ли игрок в машине

 

[kawa operand]

actor.driving (handle)

 

[LutMut]

Ребята, я уже битый час пытаюсь найти адресс памяти сирены, тоесть включена или выключена, я в поиске вообще не шарю, так есть ли такой адресс. Спасибо заранее

 

[LUCHARE]

CVeh + 1069 [byte]

 

[LutMut]

Вот код:

{$CLEO}
0000: nop

repeat
    wait 100
    until Samp.Available()
  

wait 2000
0B34: samp register_client_command "siren" to_label @siren

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

:siren
0B12: 0@ = 0@ XOR 1
if 0@ == 1
    then
        0AF8: samp add_message_to_chat "{00FA9A}[Siren]: {FFFFFF}Сирена включена." color 0xFFFFFF
        0A97: 20@ = car $MyCar struct // Получаем структуру CVeh
        0A8E: 1@ = 20@ + 0x514 // Указатель на CVeh Сирена
        0A8C: write_memory 1@ size 1 value 1 virtual_protect 1   // Записываем память

    else
        0AF8: samp add_message_to-chat "{00FA9A}[Siren]: {FFFFFF}Сирена выключена." color 0xFFFFFF
        0A97: 20@ = car $MyCar struct // Получаем структуру CVeh
        0A8E: 1@ = 20@ + 0x514 // Указатель на CVeh Сирена
        0A8C: write_memory 1@ size 1 value 0 virtual_protect 1   // Записываем память
end
0B43: samp cmd_ret

Пытаюсь что то сделать уже 2 часа, ничего не выходит. Никто не поможет? Игра намертво виснет при написании /siren
Sampfuncs, Samp 0.3.7 R1, cleo установлены

 

[LUCHARE]

Вот код:

{$CLEO}
0000: nop

repeat
    wait 100
    until Samp.Available()
 

wait 2000
0B34: samp register_client_command "siren" to_label @siren

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

:siren
0B12: 0@ = 0@ XOR 1
if 0@ == 1
    then
        0AF8: samp add_message_to_chat "{00FA9A}[Siren]: {FFFFFF}Сирена включена." color 0xFFFFFF
        0A97: 20@ = car $MyCar struct // Получаем структуру CVeh
        0A8E: 1@ = 20@ + 0x514 // Указатель на CVeh Сирена
        0A8C: write_memory 1@ size 1 value 1 virtual_protect 1   // Записываем память

    else
        0AF8: samp add_message_to-chat "{00FA9A}[Siren]: {FFFFFF}Сирена выключена." color 0xFFFFFF
        0A97: 20@ = car $MyCar struct // Получаем структуру CVeh
        0A8E: 1@ = 20@ + 0x514 // Указатель на CVeh Сирена
        0A8C: write_memory 1@ size 1 value 0 virtual_protect 1   // Записываем память
end
0B43: samp cmd_ret

Пытаюсь что то сделать уже 2 часа, ничего не выходит. Никто не поможет? Игра намертво виснет при написании /siren
Sampfuncs, Samp 0.3.7 R1, cleo установлены

if Actor.Driving($PLAYER_ACTOR)
then   
    0@ = Actor.CurrentCar($PLAYER_ACTOR)
    0397: enable_car 0@ siren true
end

 

[memir]

как сделать цикл внутри цикла?

while {условие}
    wait 0 // здарова без меня краш
    while {условие}
        wait 0 // здарова без меня тоже краш
        // здарова я цикл внутри цикла
    end
end

 

[LaRossa]

Можно как-то узнать путь к ГТА где лежит cleo

 

[kawa operand]

GetCurrentDirectoryW
lib: Kernel32.dll

Спойлер: надеюсь на клео сам переведешь

int main() {
    setlocale(LC_ALL, "rus");
    wchar_t buff[1000];
    GetCurrentDirectoryW(sizeof(buff), buff);

    wcout << buff << endl;
    system("pause");
}

 

[Jeemmi]

Почему в таблице нету пробелов? Зависит это как-то от настроек СБ, если да, то киньте настройки(нормальные).
Скриншот ниже

 

[Dark_Knight]

Потому, что код кривой.

 

[Jeemmi]

Потому, что код кривой.

и шо добавить?