Нужен код relog с задержкой

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

VJVL

Новичок
Автор темы
26
0
Привет всем.
Скиньте кто-нибудь готовый код для клео relog с задержкой в 10 секунд
С меня лайк)
 

woksonal

Известный
Проверенный
268
154
из исходников ph func
Код:
{$CLEO .cs}
{$INCLUDE SF}

if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end

while not SAMP.Available()
    wait 100
end

0B34: samp register_client_command "rej" to_label @rej
0B34: samp register_client_command "nick" to_label @nick
0B34: samp register_client_command "q" to_label @q
0B34: samp register_client_command "quit" to_label @q
0AC8: 9@ = allocate_memory_size 24

while true
    wait 0
    if 31@ == 1
    then
        0AF8: samp add_message_to_chat "Lost connection to the server. Reconnecting.." color -5651228
        0B27: samp set_gamestate 5
        0B28: samp disconnect_with_reason 0
        0B27: samp set_gamestate 4
        wait 7@
        0B27: samp set_gamestate 1
        31@ = 0
    end
end

:rej
0B35: samp 0@ = get_last_command_params
if
0AD4: 0@ = scan_string 0@ format "%d" 7@
then
    0012: 7@ *= 1000
else
    0006: 7@ = 1000
end
31@ = 1
samp.CmdRet()

:nick
0B2B: samp 8@ = get_player_id_by_actor_handle $PLAYER_ACTOR
0B36: samp 9@ = get_player_nickname 8@
0B35: samp 0@ = get_last_command_params
0AD3: 9@ = format "%s" 0@
31@ = 1
7@ = 1000
samp.CmdRet()

:q
0B28: samp disconnect_with_reason 1
0AA5: call 0x823BDB num_params 3 pop 3 0 0 0
samp.CmdRet()
 
Статус
В этой теме нельзя размещать новые ответы.