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

[PoccoJI]

Привет! Подскажите, почему этот скрипт не работает, просто зависает при вводе комманды /reconnect

{$CLEO .cs}
 
//-------------MAIN---------------
29@ = SAMP.Base()
 
:Reconnect1
wait 400
  SAMP.Available
else_jump @Reconnect1
0B34: samp register_client_command "reconnect" to_label @Reconnect2
 
:Reconnect3
wait 150
jump @Reconnect4
 
:Reconnect4
wait 150
jump @Reconnect3
 
:Reconnect2
wait 0
0B28: samp disconnect_with_reason 0
wait 1000
0B27: samp set_gamestate 3
jump @Reconnect3

И как исправить? Заранее спасибо!

Вот код

{$CLEO .cs}
0000:
 
if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end
 
while not SAMP.Available()
wait 100
end
 
0B34: samp register_client_command "reconnect" to_label @r
 
while true
wait 0
if 1@ == 1
then
0B28: samp disconnect_with_reason 0
0B27: samp set_gamestate [здесь мог быть твой геймстат]
0B27: samp set_gamestate [здесь мог быть твой геймстат]
0B27: samp set_gamestate [здесь мог быть твой геймстат]
0B27: samp set_gamestate [здесь мог быть твой геймстат]
1@ = 0
end
end
 
:r
1@ = 1
0B43:

Геймстаты сам настроишь
PS: Вроде 4, 2, 3 геймстаты

 

[LFK_Morgan]

Подскажите, почему постоянно - ?
Походу
0AD3: 7@ = format "%d" 27@
0AD3: 8@ = format "%d" 28@
0AD3: 9@ = format "%d" 29@
Не работает?

{$CLEO .cs}
 
//-------------MAIN---------------
if
0@ = SAMP.Base()
else_jump @Noname_16
 
:Noname_16
  not SAMP.Available
else_jump @Noname_36
wait 100
goto @Noname_16
 
:Noname_36
0B34: samp register_client_command "gg" to_label @Noname_206
0B34: samp register_client_command "wp" to_label @Noname_371
 
:Noname_58
wait 0
if
  30@ == 1
else_jump @Noname_169
call @Noname_536 1 100.0 27@ 28@ 29@
wait 100
0AD3: 7@ = format "%d" 27@
0AD3: 8@ = format "%d" 28@
0AD3: 9@ = format "%d" 29@
if and
  7@ == 1142608850
  8@ == 1147596988
  9@ == -1036833470
else_jump @Noname_176
0AF8: samp add_message_to_chat "+" color 65280 
 
:Noname_169
goto @Noname_58
 
:Noname_176
0AF8: samp add_message_to_chat "-" color 65280 
goto @Noname_58
 
:Noname_206
30@ = 1 
SAMP.CmdRet
 
:Noname_371
30@ = 0 
SAMP.CmdRet
 
:Noname_536
10@ = 13098328
6@ = 3
 
:Noname_553
0085: 14@ = 6@ // (int)
14@ *= 160
0A8E: 13@ = 10@ + 14@ // int
0A8E: 11@ = 13@ + 48 // int
0A8D: 3@ = read_memory 11@ size 4 virtual_protect 0
0A8E: 11@ = 13@ + 52 // int
0A8D: 4@ = read_memory 11@ size 4 virtual_protect 0
0A8E: 11@ = 13@ + 56 // int
0A8D: 5@ = read_memory 11@ size 4 virtual_protect 0
if and
  not 3@ == 0.0
  not 4@ == 0.0
else_jump @Noname_727
Actor.StorePos($PLAYER_ACTOR, 20@, 21@, 22@)
0509: 12@ = distance_between_XY 3@ 4@ and_XY 20@ 21@
if
0025:  12@ > 0@ // (float)
else_jump @Noname_748
 
:Noname_727
6@ += 1
  6@ > 32
else_jump @Noname_553
 
:Noname_748
ret 3 3@ 4@ 5@

 

[itsLegend]

На выходе дробные числа и зачем эти числа вгонять в переменную?

 

[LFK_Morgan]

На выходе дробные числа и зачем эти числа вгонять в переменную?

А как эти цифры получить, а потом сравнить тогда?

 

[itsLegend]

А как эти цифры получить, а потом сравнить тогда?

Обычно.
if and
27@ == 122.0
28@ == 123.0
29@ == 555.51236

 

[LFK_Morgan]

А как мне узнать координаты которые нашла функция? Я чат выводил через 0.2f и сравнивал, они не совпадают...

 

[itsLegend]

А как мне узнать координаты которые нашла функция? Я чат выводил через 0.2f и сравнивал, они не совпадают...

Как же ты интересно сравнивал...

 

[LFK_Morgan]

Обычно.
if and
27@ == 122.0
28@ == 123.0
29@ == 555.51236

Объясни как сделать пожалуйста

 

[hnnssy]

Обычно.
if and
27@ == 122.0
28@ == 123.0
29@ == 555.51236

Объясни как сделать пожалуйста

Дай теперь полный код.

 

[LFK_Morgan]

{$CLEO .cs}
 
//-------------MAIN---------------
if
0@ = SAMP.Base()
else_jump @Noname_16
 
:Noname_16
  not SAMP.Available
else_jump @Noname_36
wait 100
goto @Noname_16
 
:Noname_36
0B34: samp register_client_command "gg" to_label @Noname_206
0B34: samp register_client_command "wp" to_label @Noname_371
 
:Noname_58
wait 0
if
  30@ == 1
else_jump @Noname_169
call @Noname_536 1 100.0 27@ 28@ 29@
wait 100
if and
  27@ == 618,56
  28@ == 890,73
  29@ == -38,17
else_jump @Noname_176
0AF8: samp add_message_to_chat "+" color 65280
 
:Noname_169
goto @Noname_58
 
:Noname_176
0AF8: samp add_message_to_chat "-" color 65280
goto @Noname_58
 
:Noname_206
30@ = 1
SAMP.CmdRet
 
:Noname_371
30@ = 0
SAMP.CmdRet
 
:Noname_536
10@ = 13098328
6@ = 3
 
:Noname_553
0085: 14@ = 6@ // (int)
14@ *= 160
0A8E: 13@ = 10@ + 14@ // int
0A8E: 11@ = 13@ + 48 // int
0A8D: 3@ = read_memory 11@ size 4 virtual_protect 0
0A8E: 11@ = 13@ + 52 // int
0A8D: 4@ = read_memory 11@ size 4 virtual_protect 0
0A8E: 11@ = 13@ + 56 // int
0A8D: 5@ = read_memory 11@ size 4 virtual_protect 0
if and
  not 3@ == 0.0
  not 4@ == 0.0
else_jump @Noname_727
Actor.StorePos($PLAYER_ACTOR, 20@, 21@, 22@)
0509: 12@ = distance_between_XY 3@ 4@ and_XY 20@ 21@
if
0025:  12@ > 0@ // (float)
else_jump @Noname_748
 
:Noname_727
6@ += 1
  6@ > 32
else_jump @Noname_553
 
:Noname_748
ret 3 3@ 4@ 5@

 

[Избранный]

такой вопрос, вот есть к примеру несколько переменных и в них записано либо 1 либо 0. как найти кол-во переменных с единицой? опкод какой мб.

 

[Dark_Knight]

такой вопрос, вот есть к примеру несколько переменных и в них записано либо 1 либо 0. как найти кол-во переменных с единицой? опкод какой мб.

Перебирай каждую.

 

[LFK_Morgan]

if and
0025: 27@ == 618,56
0025: 28@ == 890,73
0025: 29@ == -38,17
else_jump @Noname_176

+ но почему летят варнинги?

 

[runbust]

Как отправить эмуляцию клавиш пакетом? Что бы работало в свёрнутом режиме?

 

[itsLegend]

+ но почему летят варнинги?

Я сказал, с точкой, а не запятой.
Даже пример привел.