помогите с клео!

Статус
В этой теме нельзя размещать новые ответы.

aleqsi

Новичок
Автор темы
20
0
Кароче.. У Меня Есть Клео "AutoCapture" для грузинсково сервера но нужно чтоб он флудил почаше

вся суть в том что в грузинском сервере другая система каптов она начинаетца когда после
"PayDay" Проидет 15-30 Секунд И Выскакивает Текст На Экране С Перевода
"Можно Каптит"
клео И Так Хороша Но Мне Нужно Чтоб Она Флудила Командой После Сообшения По Чаше
Помогите!

Кто Шарит В Клео Тот Поимёт О Чём Речь Вот Оно





{$CLEO}
{$INCLUDE SF}
wait 2500
0BFC: set_global_var "keyk" = 0
0BE3: raknet setup_incoming_rpc_hook @in_rpc
0BE2: raknet setup_outcoming_packet_hook @out_packet

0BDE: pause_thread 0

:out_packet
0BE5: raknet 0@ = get_hook_param PARAM_PACKETID
if 0@ == PACKET_PLAYER_SYNC
then
0BFD: 21@ = get_global_var "keyk"
/////////////////////////////////////////////
if
0AB0: 72
then
/////////////////////////////////
if
21@ == 1
then
say "/capture"
end
///////////////////////////////////
if
21@ == 2
then
call @send_key 1 128
end
/////////////////////////////////////
end
end
0BE0: raknet hook_ret true

:in_rpc
0BE5: raknet 0@ = get_hook_param PARAM_PACKETID
if
0@ == 73
then
0BE5: raknet 1@ = get_hook_param PARAM_BITSTREAM
0BE7: raknet 2@ = bit_stream_read 1@ type BS_TYPE_SHORT
0BE7: raknet 3@ = bit_stream_read 1@ type BS_TYPE_BYTE
0BE7: raknet 4@ = bit_stream_read 1@ type BS_TYPE_BYTE
0BE7: raknet 5@ = bit_stream_read 1@ type BS_TYPE_BYTE
0BE7: raknet 6@ = bit_stream_read 1@ type BS_TYPE_BYTE
0BE7: raknet 8@ = bit_stream_read 1@ type BS_TYPE_BYTE
0BE7: raknet 9@ = bit_stream_read 1@ type BS_TYPE_BYTE
0BE7: raknet 10@ = bit_stream_read 1@ type BS_TYPE_BYTE
0BE7: raknet 11@ = bit_stream_read 1@ type BS_TYPE_BYTE
0BE7: raknet 12@ = bit_stream_read 1@ type BS_TYPE_BYTE
0BE7: raknet 13@ = bit_stream_read 1@ type BS_TYPE_BYTE
alloc 7@ 256
0BE8: raknet bit_stream 1@ read_array 7@ size 10@
0C1E: array 7@ element 10@ el_size 1 = 0
////////////////////////////////////////////////
if
0C18: 20@ = strstr string1 7@ string2 "C"
then
0BFC: set_global_var "keyk" = 1
end

if
0C18: 20@ = strstr string1 7@ string2 "N"
then
0BFC: set_global_var "keyk" = 2
end
////////////////////////////////////////////////
free 7@
end
0BE0: raknet hook_ret true

:send_key
0ac8: alloc 1@ 68
2@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
0BBA: samp store_player 2@ onfoot_data 1@
0C0D: struct 1@ offset 36 size 1 = 0@
0BC0: samp send_onfoot_data 1@
0ac9: free 1@
0ab2: ret 0
 

kraft1k

Вынь х*й из головы и все получится © hnnssy
Друг
1,479
1,163
Гыыы, просто проверить текст "можно атаковать" и каптурить?
 
  • Нравится
Реакции: SPNN13

я воскрес

Активный
245
36
спасибо Но Всеровно Я Рукожоп И Немогу Понять Как Настроить Флуд Чтоб В Секунд По 5 /capture было
CLEO:
{$CLEO}
{$INCLUDE SF}

0000: nop

wait 2000
0B12: 0@ = 0@ XOR 0
0B34: samp register_client_command "flooder" to_label @new_cmd

while true
           wait 0
                  if 0@ == 1
                    then
                               say "/Capture"
                               wait 5000
                     end
                     end

:new_cmd
if 0@ == 0
    then
       0B12: 0@ = 0@ XOR 1
        0AF8: samp add_message_to_chat "script on" color 0xFFFFFF
    else
       0B12: 0@ = 0@ XOR 0
        0AF8: samp add_message_to-chat "script off" color 0xFFFFFF
end
0B43: samp cmd_ret
 

kraft1k

Вынь х*й из головы и все получится © hnnssy
Друг
1,479
1,163
спасибо Но Всеровно Я Рукожоп И Немогу Понять Как Настроить Флуд Чтоб В Секунд По 5 /capture было
Включить "/капт" - будет флудить в чат "/capture" 5 раз в секунду.
CLEO:
{$CLEO .cs}
0000: NOP
thread "kraft1k"

repeat
wait 0
until samp.Available()

0B34: samp register_client_command "капт" to_label @cmd

while true
wait 0
if 0@ == 1
then
say "/capture"
wait 200
end
end

:cmd
0B12: 0@ = 0@ XOR 1
samp.CmdRet()
 

Вложения

  • капт.cs
    17.5 KB · Просмотры: 11

я воскрес

Активный
245
36
Включить "/капт" - будет флудить в чат "/capture" 5 раз в секунду.
CLEO:
{$CLEO .cs}
0000: NOP
thread "kraft1k"

repeat
wait 0
until samp.Available()

0B34: samp register_client_command "капт" to_label @cmd

while true
wait 0
if 0@ == 1
then
say "/capture"
wait 200
end
end

:cmd
0B12: 0@ = 0@ XOR 1
samp.CmdRet()
ты же его потом не выключишь. У тебя так и будет флудить /capture
 
Статус
В этой теме нельзя размещать новые ответы.