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

#saniwe

глаза пофикси
218
107
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Как сделать, чтобы после телепорта на опред. точку, через несколько секунд он обратно телепортировался на свое место


CLEO:
{$CLEO}

0001: wait 0 ms

repeat
wait 400
until 0AFA: is_samp_available

0B34: samp register_client_command "mati" to_label @mati

while true
wait 0
end

:mati
Actor.PutAt($PLAYER_ACTOR, 224.1240,1889.0620,19.5550)
0B43: samp cmd_ret
 

Lord

Новичок
236
42
Как сделать, чтобы после телепорта на опред. точку, через несколько секунд он обратно телепортировался на свое место


CLEO:
{$CLEO}

0001: wait 0 ms

repeat
wait 400
until 0AFA: is_samp_available

0B34: samp register_client_command "mati" to_label @mati

while true
wait 0
end

:mati
Actor.PutAt($PLAYER_ACTOR, 224.1240,1889.0620,19.5550)
0B43: samp cmd_ret
Бери пикап на расстоянии
 

Lord

Новичок
236
42
А у меня нет, лол... Что не так? Даже для проверки именно этот скрипт, не изменяя, поставил себе, прописал "вступил в нашу фракцию", и ничего не произошло. Мб я что-то не так делаю?
Вопрос - Вопросы по CLEO-скриптингу(https://blast.hk/threads/13410/page-419#post-189094)
 
  • Нравится
Реакции: Skelerll

Skelerll

Известный
154
8
Хук юзай, в конце-то концов. Выше я кидал
Неее, я это хочу. Хуки это сложно, это надо, чтобы что-то объясняли, Таир про них рассказал только какую-то часть, и
непонятно мне, как от туда чат получать.
Причём, хук тут (я думаю) не причём(я про ошибку), так как эта фигня происходит именно тогда, когда доходит до опкода 0С18. Так значит, если у тебя все работает, тогда я что-то не так делаю.
Код:
        0C2C: 22@ = strrchr 31@ char 91
        0C11: memset destination 22@ value 0 size 1
        000A: 22@ += 1
        0C1A: 1@ = atoi 22@
∆Что это должно делать?∆
 
Последнее редактирование:

DarkL1ght

Новичок
252
112
Как сделать, чтобы после телепорта на опред. точку, через несколько секунд он обратно телепортировался на свое место


CLEO:
{$CLEO}

0001: wait 0 ms

repeat
wait 400
until 0AFA: is_samp_available

0B34: samp register_client_command "mati" to_label @mati

while true
wait 0
end

:mati
Actor.PutAt($PLAYER_ACTOR, 224.1240,1889.0620,19.5550)
0B43: samp cmd_ret
Фиговая получится личка лучше использовать синхронизацию
CLEO:
{$CLEO .cs}
0000: NOP

repeat
wait 0
until Samp.Available()
0B34: samp register_client_command "mati" to_label @mati

repeat
wait 0
    if 0@ == 1
    then
        Actor.StorePos($player_actor, 1@, 2@, 3@)
        Actor.PutAt($player_actor, 224.1240,1889.0620,19.5550)
        wait 1000
        Actor.PutAt($player_actor, 1@, 2@, 3@)
    end
    0@ = 0
until false

:mati
0@ = 1
samp.CmdRet()
 
Последнее редактирование:

grandpafromghetto

НАСТАЯЩИЙ ДАГИСТАНИЦ
Проверенный
335
119
Как сделать, чтобы после телепорта на опред. точку, через несколько секунд он обратно телепортировался на свое место


CLEO:
{$CLEO}

0001: wait 0 ms

repeat
wait 400
until 0AFA: is_samp_available

0B34: samp register_client_command "mati" to_label @mati

while true
wait 0
end

:mati
Actor.PutAt($PLAYER_ACTOR, 224.1240,1889.0620,19.5550)
0B43: samp cmd_ret
CLEO:
{$CLEO}
0000:

repeat
wait 0
until samp.Available()
0b34: "tp" @SCRIPT_ON

while true
wait 0

if 0@ == 1
then

0AB6: store_target_marker_coords_to 4@ 5@ 6@ // IF and SET
actor.PutAt($player_actor, 4@, 5@, 6@)
wait 5000
actor.PutAt($player_actor, 1@, 2@, 3@)

end

0@ = 0

end

:SCRIPT_ON
actor.StorePos($player_actor, 1@, 2@, 3@)
0B12: 0@ = 0@ XOR 1
cmdret
 

grandpafromghetto

НАСТАЯЩИЙ ДАГИСТАНИЦ
Проверенный
335
119
Как сделать, чтобы после телепорта на опред. точку, через несколько секунд он обратно телепортировался на свое место


CLEO:
{$CLEO}

0001: wait 0 ms

repeat
wait 400
until 0AFA: is_samp_available

0B34: samp register_client_command "mati" to_label @mati

while true
wait 0
end

:mati
Actor.PutAt($PLAYER_ACTOR, 224.1240,1889.0620,19.5550)
0B43: samp cmd_ret
CLEO:
{$CLEO}
0000:

repeat
wait 0
until samp.Available()
0b34: "tp" @SCRIPT_ON

while true
wait 0

if 0@ == 1
then

0AB6: store_target_marker_coords_to 4@ 5@ 6@ // IF and SET
call @ON_FOOT_DATA 3 4@ 5@ 6@
wait 5000
call @ON_FOOT_DATA 3 1@ 2@ 3@

end

0@ = 0

end

:ON_FOOT_DATA
0B2B: samp 10@ = get_player_id_by_actor_handle $player_actor
0BBA: samp store_player 10@ onfoot_data 11@
alloc 11@ 256
0C0D: struct 11@ offset 6 size 4 = 12@
0C0D: struct 11@ offset 10 size 4 = 13@
0C0D: struct 11@ offset 14 size 4 = 14@
0BC0: samp send_onfoot_data 11@
free 11@
ret 0

:SCRIPT_ON
actor.StorePos($player_actor, 1@, 2@, 3@)
0B12: 0@ = 0@ XOR 1
cmdret
 

Lord

Новичок
236
42
Неее, я это хочу. Хуки это сложно, это надо, чтобы что-то объясняли, Таир про них рассказал только какую-то часть, и
непонятно мне, как от туда чат получать.
Причём, хук тут (я думаю) не причём(я про ошибку), так как эта фигня происходит именно тогда, когда доходит до опкода 0С18. Так значит, если у тебя все работает, тогда я что-то не так делаю.
Код:
        0C2C: 22@ = strrchr 31@ char 91
        0C11: memset destination 22@ value 0 size 1
        000A: 22@ += 1
        0C1A: 1@ = atoi 22@
∆Что это должно делать?∆
значение получаешь между []
 

Skelerll

Известный
154
8
Ну это же тоже самое, и опять эта фигня не работает, как ни крути... Бесит уже. А у других почему-то работает, мдаааааааааа..

IF 0C18: 0 = strstr string1 31@ string2 "text"
если text есть, то условие не работает.. Скрипт тупо стоит на месте, и только не говорите переустановить Sunny Builder. Вот что не так? А? Все правильно, пишу так, как вы написали..
А не работает.. Не работает.. А у вас да, работает.
 
Последнее редактирование модератором:

grandpafromghetto

НАСТАЯЩИЙ ДАГИСТАНИЦ
Проверенный
335
119
Ну это же тоже самое, и опять эта фигня не работает, как ни крути... Бесит уже. А у других почему-то работает, мдаааааааааа..
возможно, ты совмещаешь метки с высок. конструкциями и это вызывает такой вот результат, попробуй выучить высок. конструкции и писать только на них
 
  • Нравится
Реакции: Skelerll

Skelerll

Известный
154
8
возможно, ты совмещаешь метки с высок. конструкциями и это вызывает такой вот результат, попробуй выучить высок. конструкции и писать только на них
Хе-хе, ну-ка скажи, где тут метки?
Код:
{$CLEO}
0000:
repeat
wait 0
until 0AFA:
alloc 31@ 256

while true
wait 0
0B75: samp get_chat_string 99 text_to 31@ prefix_to 0 color_to 0 prefix_color_to 0
IF 0C18: 0 = strstr string1 31@ string2 "лол" // Текст есть, но почему-то скрипт не доходит до then....
THEN
say "Бла" // Сообщения нет
wait 500
END
cmdret
END
Попробуй в самп зайти и ввести "лол" в чат, если скрипт отправит "бла", то тогда именно у меня проблемы