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

[CarLCas]

Место вставки кода в скрипт имеит значение?, я вставил при начале крашит, в конце не работаит. Центр не вставлял

Не имеет значения, лучше вставлять после того как загрузилась гта.

 

[Davis'ka]

Не имеет значения, лучше вставлять после того как загрузилась гта.

Можешь помочь?) кинь скуп покажу демонстрацию)

 

[itsLegend]

Как делать проверку на анимацию?

if 0611: actor $PLAYER_ACTOR performing_animation "LRGIRL_IDLE_TO_L0"
then
end

LRGIRL_IDLE_TO_L0 - название анимации.

 

[itsLegend]

Можешь помочь?) кинь скуп покажу демонстрацию)

{$CLEO}
 
0000:
 
while not SAMP.Available()
    wait 400
end
 
0af8: samp add_message_to_chat "Олололо" color_hex 0xffffff
 
while true
    wait 0
end

Код просто в

[code]...здесь текст...[/code]

кидай

 

[АндрейЧотак]

if 0611: actor $PLAYER_ACTOR performing_animation "LRGIRL_IDLE_TO_L0"
then
end

LRGIRL_IDLE_TO_L0 - название анимации.

Самповские тоже работают? То есть эти - https://sampwiki.blast.hk/wiki/Animations

Просто что то у меня не работает эта анимация if 0611: actor $PLAYER_ACTOR performing_animation "sword_4" (sword_4 это добыча руда из шахты)

Не работает:

{$CLEO .cs}
{$include /includes/RakNetDefines.txt}
thread "lalala"
 
if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
        wait 100
end
 
0B34: samp register_client_command "tttest" to_label @lyl
 
while true
wait 0
if 12@ == 1
then
wait 500
if 0611: actor $PLAYER_ACTOR performing_animation "Sword_4"
then
actor.PutAt($PLAYER_ACTOR, -1866.97, -1612.11, 21.76)
end
end
end
 
:lyl
actor.putat($PLAYER_ACTOR, -1859.57 -1626.59 -79.22)
Samp.CmdRet()

 

[itsLegend]

А как оно должно работать, если условие не выполняется и до проверки анимации не доходит?
12@ = 0 и я не вижу, где бы она стала когда-нибудь 1

 

[АндрейЧотак]

А как оно должно работать, если условие не выполняется и до проверки анимации не доходит?
12@ = 0 и я не вижу, где бы она стала когда-нибудь 1

Так,что ли?

{$CLEO .cs}
{$include /includes/RakNetDefines.txt}
thread "lalala"
 
if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
        wait 100
end
 
0B34: samp register_client_command "tttest" to_label @lyl
0B34: samp register_client_command "tttest_off" to_label @lyl_off
 
while true
wait 0
if 12@ == 1
then
wait 500
if 0611: actor $PLAYER_ACTOR performing_animation "Sword_4"
then
actor.PutAt($PLAYER_ACTOR, -1866.97, -1612.11, 21.76)
end
end
end
 
:lyl
12@ = 1
actor.putat($PLAYER_ACTOR, -1859.57 -1626.59 -79.22)
Samp.CmdRet()
 
:lyl_off
12@ = 0
Samp.CmdRet()

 

[fiendshadow]

Так,что ли?

{$CLEO .cs}
{$include /includes/RakNetDefines.txt}
thread "lalala"
 
if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
        wait 100
end
 
0B34: samp register_client_command "tttest" to_label @lyl
0B34: samp register_client_command "tttest_off" to_label @lyl_off
 
while true
wait 0
if 12@ == 1
then
wait 500
if 0611: actor $PLAYER_ACTOR performing_animation "Sword_4"
then
actor.PutAt($PLAYER_ACTOR, -1866.97, -1612.11, 21.76)
end
end
end
 
:lyl
12@ = 1
actor.putat($PLAYER_ACTOR, -1859.57 -1626.59 -79.22)
Samp.CmdRet()
 
:lyl_off
12@ = 0
Samp.CmdRet()

Если делаешь для шахты адванса,то тебе выбьет ошибку тип "Начальство не довольно вашей работой,бла-бла-бла"

 

[АндрейЧотак]

Если делаешь для шахты адванса,то тебе выбьет ошибку тип "Начальство не довольно вашей работой,бла-бла-бла"

http://silent-hack.url.ph/threads/Телепорт-без-потери-скорости-и-без-сброса-анимации.39/
С этим всё нормально работает

 

[itsLegend]

Так,что ли?

Да. Не работает?

 

[smart1337]

Подскажите пожалуйста, как сделать такой скрипт: когда я ЗАЖАЛ кнопку(допустим 86(V)) тогда выполняется действие

Actor.SetImmunities($PLAYER_ACTOR, 1, 1, 1, 1, 1)

а когда я уже ОТЖАЛ мою кнопку тогда выполняется

Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)

Подскажите пожалуйста)

 

[itsLegend]

{$CLEO}
 
wait 0
 
:while_true
wait 0
if 0ab0: key_down 86
then
Actor.SetImmunities($PLAYER_ACTOR, 1, 1, 1, 1, 1)
while 0ab0: key 86
wait 0
end
Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)
end
goto @while_true

Код поверхностный.

 

[TheMonstercat]

Hey i need to disable the SAMP Nametags or set the disance to 0 but the Normal Nametag adresses they i got dont work anymore...:/

Can someone give me the New Nametag Adresses or a Patch to Patch them Off

 

[itsLegend]

Hey i need to disable the SAMP Nametags or set the disance to 0 but the Normal Nametag adresses they i got dont work anymore...:/

Can someone give me the New Nametag Adresses or a Patch to Patch them Off

This?

{$CLEO}
 
0000:
0662: "by legend2360"
0662: "BlastHack - cheating is art"
 
while not SAMP.Available()
    wait 400
end
           
0b34: reg_cmd "showtagname" @cmd
0b34: reg_cmd "stn" @cmd
 
1@ = SAMP.Base()
1@ += 0x212A80
0A8D: 1@ = read_memory 1@ size 4 virtual_protect 0
1@ += 0x3D5
0A8D: 1@ = read_memory 1@ size 4 virtual_protect 0
1@ += 0x38
 
0@ = true
 
while true
    wait 0
end
 
:cmd
0B12: 0@ = 0@ XOR 1
0A8C: write_memory 1@ size 1 value 0@ virtual_protect 0
0b43: cmdret

 

[АндрейЧотак]

Да. Не работает?

Не работает.