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

Perojek)0

Известный
205
3
CLEO:
{$CLEO}
{$INCLUDE SF}
0000:

repeat
    wait 2000
until 0AFA:  is_samp_available

while true
wait 0
    if
    0ADC:   test_cheat "6"
    then
    0AB1: call_scm_func @test 1 "Random text"
    end
end

:test
//...
0AB2: ret 0
Что не так?
 

TasherEgor1337

Новичок
16
0
Подскажите как можно сделать бег на координаты, не тот, что просто бежит. А который наводится на координаты.
 

iTz_WEEZY

Известный
298
88
Опкод 0AE1 Работает в сампе? там написано что не работает или работает не корректно, где то видел что не рабочие опкоды на самом деле работают.. хуй поймешь

или посоветуйте какой нибудь другой опкод, мне главное получить ID ближайшего ко мне игрока
 
Последнее редактирование:

DarkP1xel

Сила воли наше всё.
BH Team
3,635
4,982
Опкод 0AE1 Работает в сампе? там написано что не работает или работает не корректно, где то видел что не рабочие опкоды на самом деле работают.. хуй поймешь

или посоветуйте какой нибудь другой опкод, мне главное получить ID ближайшего ко мне игрока
Не работает. Можно например циклом for пройтись по ID игроков и проверять дистанцию их от себя.
 

RedBoxWhite

Известный
337
27
Почему жестко флудит? Надо чтобы по 1 сообщению только отправляло, а не флудило.
CLEO:
{$CLEO}
0000:
wait 2000

repeat
wait 400
until samp.Available()
0B00: delete_file "cleo\test.txt"

alloc 2@ 256

while true
wait 0
0B75: samp get_chat_string 99 text_to 2@ prefix_to 0 color_to 0 prefix_color_to 0
if and
0C18: 0 = strstr string1 2@ string2 "[O]"
0C18: 0 = strstr string1 2@ string2 ":"
then
    if 5@ = File.Open("cleo\test.txt", "at+")
    then
        0AD9: write_formatted_text "%s%c" in_file 5@ 2@ 0xA
        File.Close(5@)
    end
end
end
 

BlackKnigga

Известный
BH Team
922
446
Почему жестко флудит? Надо чтобы по 1 сообщению только отправляло, а не флудило.
CLEO:
{$CLEO}
0000:
wait 2000

repeat
wait 400
until samp.Available()
0B00: delete_file "cleo\test.txt"

alloc 2@ 256

while true
wait 0
0B75: samp get_chat_string 99 text_to 2@ prefix_to 0 color_to 0 prefix_color_to 0
if and
0C18: 0 = strstr string1 2@ string2 "[O]"
0C18: 0 = strstr string1 2@ string2 ":"
then
    if 5@ = File.Open("cleo\test.txt", "at+")
    then
        0AD9: write_formatted_text "%s%c" in_file 5@ 2@ 0xA
        File.Close(5@)
    end
end
end
Проверка в цикле стоит, вот и флудит. На одно и тоже сообщение реагирует. Лучше хук использовать
 

TasherEgor1337

Новичок
16
0
Подскажите как можно сделать бег на координаты, не тот, что просто бежит. А который наводится на координаты.