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

[Удалённый пользователь 123482]

да, чела ид надо, с год назад что то делал подобное всё забыл
получается взять ник вместе с идом, не смотря на то что чек на цифры не указан -_-

В переменной 1@ должен быть id

IF 0AD4: 0@ = scan_string 0@ format "Администратор Billy_Herrington[%d] ..." 1@
THEN
    // ...
END

 

[MAHEKEH]

В переменной 1@ должен быть id

IF 0AD4: 0@ = scan_string 0@ format "Администратор Billy_Herrington[%d] ..." 1@
THEN
    // ...
END

да чет толкового ничего не выходит
вот тут - https://www.blast.hk/threads/13871/ есть отличный пример
но он упорно не хочет брать ни ИД ни цифры с чата

изначально так делал, без цифр всё работает нормально
...

WHILE TRUE                                                                                     
0001: 0                                                                                         
0B75: samp get_chat_string 99 text_to 0@ prefix_to 0 color_to 0 prefix_color_to 0               
IF 0C29: 1@ = stristr string1 0@ string2 "bad? %d" 2@                                       
THEN SAY "not bad! %d" 2@
END                                                                                           
  END

 

[ROBERT PUSHER]

{$CLEO}
0000: NOP

REPEAT
0001: WAIT 0 MS
UNTIL 0AFA:  is_samp_available

WHILE TRUE
0001: WAIT 0 MS
    IF 0ADC:   test_cheat "1"
    THEN
        03C0: 0@ = actor $PLAYER_ACTOR car
        0A97: 0@ = car 0@ struct
        0@ += 0x084C // fRotorSpeed
        0A8D: 0@ = read_memory 0@ size 4 virtual_protect 1
        0AD1: show_formatted_text_highpriority "fRotorSpeed: %f" time 1500 0@
    END
END

Привет, Mozze. Не мог бы ты показать мне пример на луа? хоть и тут это является оффтопом.

Спойлер: пытка

function main()
    repeat wait(0) until isSampAvailable()
    while true do
        wait(0)
        if isCharInAnyCar(PLAYER_PED) and not isCharDead(PLAYER_PED) then
            local car = storeCarCharIsInNoSave(PLAYER_PED)
            local ptr = getCarPointer(car)
            ptr = ptr + 0x084C
            local value = readMemory(ptr, 4, true)
            printString(string.format('fRotorSpeed: %.1f', value), 500)
        end
    end
end

Что выходит:

 

[Удалённый пользователь 123482]

Привет, Mozze. Не мог бы ты показать мне пример на луа? хоть и тут это является оффтопом.

Спойлер: пытка

function main()
    repeat wait(0) until isSampAvailable()
    while true do
        wait(0)
        if isCharInAnyCar(PLAYER_PED) and not isCharDead(PLAYER_PED) then
            local car = storeCarCharIsInNoSave(PLAYER_PED)
            local ptr = getCarPointer(car)
            ptr = ptr + 0x084C
            local value = readMemory(ptr, 4, true)
            printString(string.format('fRotorSpeed: %.1f', value), 500)
        end
    end
end

Что выходит:
Посмотреть вложение 95205

getStructFloatElement(getCarPointer(storeCarCharIsInNoSave(PLAYER_PED)), 0x84C)

 

[D3.Pheonix]

да чет толкового ничего не выходит
вот тут - https://www.blast.hk/threads/13871/ есть отличный пример
но он упорно не хочет брать ни ИД ни цифры с чата

изначально так делал, без цифр всё работает нормально
...

WHILE TRUE                                                                                   
0001: 0                                                                                       
0B75: samp get_chat_string 99 text_to 0@ prefix_to 0 color_to 0 prefix_color_to 0             
IF 0C29: 1@ = stristr string1 0@ string2 "bad? %d" 2@                                     
THEN SAY "not bad! %d" 2@
END                                                                                         
  END

Попробуй такой вариант

 

[mc_alex]

Создал на клео что то типо "бота". При активации на команду от начинает телепортироваться по кординатам, прописанным в скрипте. Бот доход до последней кординаты и завершает работу. Нужно сделать так, чтобы бот работал циклированно (то есть, бесконено) до тех пор, пока не будет введена команда ещё раз. Пробовал ввсети until, но ничего не выходит, пишет ошибка. Помогите, пожалуйста.

 

[Bili Djin]

Создал на клео что то типо "бота". При активации на команду от начинает телепортироваться по кординатам, прописанным в скрипте. Бот доход до последней кординаты и завершает работу. Нужно сделать так, чтобы бот работал циклированно (то есть, бесконено) до тех пор, пока не будет введена команда ещё раз. Пробовал ввсети until, но ничего не выходит, пишет ошибка. Помогите, пожалуйста.

Сделал активация на чит-код "CCB", так же деактивация тоже на чит-код "CCB". Деактивировать скрипт можно в любой момент.
Чтобы поменять задержку используй: 59 строку, а именно "13@ > 14" в место 14 можешь поставить другое значение по формуле: x = y / 50, где y - значение задержки ms, которое тебе необходимо, а x - значение, которое необходимо вписать в скрипт на место "14".

 

[mc_alex]

Сделал активация на чит-код "CCB", так же деактивация тоже на чит-код "CCB". Деактивировать скрипт можно в любой момент.
Чтобы поменять задержку используй: 59 строку, а именно "13@ > 14" в место 14 можешь поставить другое значение по формуле: x = y / 50, где y - значение задержки ms, которое тебе необходимо, а x - значение, которое необходимо вписать в скрипт на место "14".

Благодарю.

 

[Bili Djin]

Благодарю.

Не за что. Кстати, когда ставишь корды лучше брать z на 1 ед. меньше, так ты будешь телепортировать прямо на землю, а не в воздухе. То есть если z = 12.39, то лучше ставить z = 11.39

 

[mc_alex]

Привет всем ещё раз! Есть ли такой опкод, который нажимает на определённую клавишу?

 

[mc_alex]

Вопрос решён, нашёл опкод 0C72

 

[D3.Pheonix]

HELP! Что не так с этим кодом?

Циклы не так, акти/деактивация не так

{$CLEO}
{$NOSOURCE}
0000:


:1
wait 0
0AFA:  is_samp_available
jf @1
0B34: samp register_client_command "hb" to_label @hb
0B34: samp register_client_command "hboff" to_label @hboff

while true
wait 0
    if 31@ == 1
    then
    0C72: set_virtual_key 70 down true
    wait 100
    0C72: set_virtual_key 70 down false
    end
end

:hb
31@ = 1
0B43: samp cmd_ret

:hboff
31@ = 0
0B43: samp cmd_ret

 

[mc_alex]

помогите, после активации, у меня действует всё моментально

:1
wait 0
Samp.Available()
jf @1
0B34: samp register_client_command "mon1" to_label @cmd
0BDE: pause_thread 0@

:cmd
wait 1000
0109: player $PLAYER_CHAR money += 20000
wait 1000
0109: player $PLAYER_CHAR money += 999999999
wait 1000
0AF9: samp say_msg "/pay 1 10000"
0B43: samp cmd_ret

 

[D3.Pheonix]

Ерундой какой то занимаешься. Код идёт сверху вниз, изучи синтаксис, циклы, конструкции...
P.S, чтобы остановить текущий поток, нужно 0BDE: pause_thread 0@ 0BDE: pause_thread 0

 

[MAHEKEH]

помогите, после активации, у меня действует всё моментально

:1
wait 0
Samp.Available()
jf @1
0B34: samp register_client_command "mon1" to_label @cmd
0BDE: pause_thread 0@

:cmd
wait 1000
0109: player $PLAYER_CHAR money += 20000
wait 1000
0109: player $PLAYER_CHAR money += 999999999
wait 1000
0AF9: samp say_msg "/pay 1 10000"
0B43: samp cmd_ret

через команду задержку не воткнешь
можешь сделать триггер и цикл