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

fiendshadow

3LFhocV726q7pKWWky2vv3W38Dm9sGJV86
Проверенный
455
122
Код:
0B34: samp register_client_command "/gdrugs" to_label @GetDrugs_68


2VmaNDI.jpg
31rIvQk.jpg
Мой кикает,потому-что я жду на точке
 

iAmerican

Известный
Друг
614
257
Хочу добавить в скрипт активацию , может кто пример показать ?
 

Dark_Knight

Me, me and me.
Друг
4,068
2,083
{$Cleo}
0000:
while true
wait 0
if 0ab0: key_down 1{Левая кнопка мышки}
then 0af8: "Скрипт активирован" -1
end
while 0ab0: key_down 1
wait 0
end
repeat
wait 0
{тут короче ебошишь ахуенный код}
until 0ab0: key_down 1
0af8: "Скрипт деактивирован" -1
end
 

OWSLA

Новичок
32
0
Ну короче сейчас вроде скрипт кое-как работает, но не так как мне нужно.
Изначально я хотел сделать покупку нарко с улицы. После фикса стало кикать, что и понятно, античит жи есть.
Я попытался сделать так, чтобы сначала брался пикап, а потом уже отправлял фейк координаты с ноги.
Ну вот сейчас пишет, что вы не в притоне, то есть пикап первым делом берется, раз не кикает, но ТПшить не тпшит, видимо.
Бтв взял с уроков сендпикапа от АйРиччи там чет херня была, я поменял цифры некоторые.

Код:
{$CLEO .cs}
 
if
    8AF7: get_samp_base_to 33@
then
    0A93: end_custom_thread
end
repeat
    wait 400
until 0AFA: is_samp_structures_available
0B34: samp register_client_command "/gdrugs" to_label @nark
 
while true
wait 0
 
if 1@ == 1
then
wait 1000
end
end
 
const 
      RPC_PICKEDUPPICKUP = 1480
      UNRELIABLE_SEQUENCED = 1   
      PRIORITY_HIGH = 1 
end 
 
:nark
wait 0
gosub @PickUp
call @1 3 323.35 1119.95 1083.88
0AF9: samp say_msg "/get drugs 5"
1@ = 1
Samp.CmdRet()
 
:1
0B2B: samp 3@ = get_player_id_by_actor_handle $PLAYER_ACTOR
0B24: samp 3@ = get_player_struct_ptr 3@
000A: 3@ += 55
0AC8: 4@ = allocate_memory_size 68
0C10: memcpy destination 4@ source 3@ size 68
0C0D: struct 4@ offset 6 size 4 = 0@
0C0D: struct 4@ offset 10 size 4 = 1@
0C0D: struct 4@ offset 14 size 4 = 2@
0B3D: raknet 5@ = new_bit_stream
0B40: raknet bit_stream 5@ write 212 type 0 size 1
0B40: raknet bit_stream 5@ write 4@ type 5 size 68
0B8B: raknet send bit_stream 5@
0B3E: raknet delete_bit_stream 5@
0AC9: free_allocated_memory 4@
0AB2: ret 0 
 
:PickUp
10@ = Raknet.NewBitStream() 
Raknet.Write(10@, 0@, BS_TYPE_INT, 4) 
Raknet.RPC(RPC_PICKEDUPPICKUP, 10@, PRIORITY_HIGH, UNRELIABLE_SEQUENCED, 0, false) 
Raknet.DeleteBitStream(10@) 
return
 

iAmerican

Известный
Друг
614
257
Код:
{$CLEO}
 
wait 0
 
repeat
    wait 400
until 0AFA: is_samp_structures_available
 
0b34: "floodgov" @floodgov
 
:gov
 
while true
wait 0
    if 0@ == 1
    then
    0b35: 1@
    0AF9: "/b 123456"   
    0@ = 0
    end
end
 
wait 3000
jump @gov
 
:floodgov
if
not 0@ == 1
then 0@ = 1
end
samp.CmdRet()

Почему не повторяет действие через 3 секунды ?
 

Dark_Knight

Me, me and me.
Друг
4,068
2,083
Код:
{$CLEO}
 
wait 0
 
repeat
    wait 400
until 0AFA: is_samp_structures_available
 
0b34: "floodgov" @floodgov
 
:gov
 
while true
wait 0
    if 0@ == 1
    then
    0b35: 1@
    0AF9: "/b 123456" 
    0@ = 0
    end
end
 
wait 3000
jump @gov
 
:floodgov
if
not 0@ == 1
then 0@ = 1
end
samp.CmdRet()

Почему не повторяет действие через 3 секунды ?

Потому что не правильно зациклен. Скрипт не доходит jump @gov
 

iAmerican

Известный
Друг
614
257
Как остановить зацикленость ?
допустим из примера выше . Я исправил уже там если что .