Можно опкоды? :)на опкодах все делается, изи
подбирай синонимы к afk и ищи сам лентяй блинМожно опкоды? :)
8B5C: samp is_player 0@ pausedподбирай синонимы к afk и ищи сам лентяй блин
Если не сложно, можно мне опкод ? :Cну начнем с того что ты его отрицательным делаешь
а еще он принимает ид игрока а не хендл
0B5C вернет тру если игрок в афк
а 8B5C вернет тру если игрок не в афк
for 0@ = 0 to 999
wait 0
if samp.IsPlayerConnected(0@)
then
if
8B5C: samp is_player 0@ paused
then
8B5C
мне нужен этот.
Но он не проверяет игроков
CLEO:for 0@ = 0 to 999 wait 0 if samp.IsPlayerConnected(0@) then if 8B5C: samp is_player 0@ paused then
Игрок в игре, но афк.прими во внимание тот факт что ты можешь проверить афк игрок или нет только если он в зоне стрима
а надо еще быть в зоне стримаИгрок в игре
А глобальную проверку нельзя сделать?а надо еще быть в зоне стрима
нет конечно лол))А глобальную проверку нельзя сделать?
CLEO:{$CLEO} 0000: repeat wait 400 until samp.Available() 0C74: 10@ = create_timer_interval 20000 on_label @timer 0C78: set_timer 10@ active false while true wait 0 if 0B4C: samp is_dialog_active -1 then alloc 1@ 64 0BD8: samp get_dialog_caption 1@ if 0C18: 0 = strstr string1 1@ string2 "Обыск" then alloc 0@ 2048 alloc 3@ 60 alloc 6@ 20 0BD7: samp get_dialog_text 0@ if 0C18: 0 = strstr string1 0@ string2 "Игрок в розыске" then 7@ = 1 end if 0C18: 0 = strstr string1 0@ string2 "Нарко" then 7@ = 1 2@ += 1 0AD3: 6@ = format "нарко " 0C15: strcat destination 3@ source 6@ end if 0C18: 0 = strstr string1 0@ string2 "Материалы" then 7@ = 1 2@ += 1 0AD3: 6@ = format "материалы " 0C15: strcat destination 3@ source 6@ end if 0C18: 0 = strstr string1 0@ string2 "Набор отмычек" then 7@ = 1 2@ += 1 0AD3: 6@ = format "отмычки " 0C15: strcat destination 3@ source 6@ end if 7@ = 1 then 0C72: set_virtual_key 119 down 1 0C72: set_virtual_key 119 down 0 end if 2@ > 0 then 0C2C: 4@ = strrchr 1@ char 91 0C11: memset destination 4@ value 0x0 size 1 4@++ 0C1A: 5@ = atoi 4@ 0C78: set_timer 10@ active true while 0C79: is_timer 10@ active wait 0 if and 0AB0: key_pressed 89 8B21: not samp is_chat_opened then 0C78: set_timer 10@ active false say "/su %d %d %s" 5@ 2@ 3@ wait 300 end end end free 0@ free 3@ free 6@ 2@ = 0 7@ = 0 end free 1@ end end :timer 0C78: set_timer 10@ active false samp.CmdRet()
Возможно кто-то догадается, не скринит обыск никак, выдача звезд тоже не работает. В чем проблема?
P.S. Скриншот обыска
// Диалог: "Обыск НИКНЕЙМ[АЙДИ], УРОВЕНЬ lvl.", предметы: "Нарко", "Материалы", "Набор отмычек".
{$CLEO .cs}
0000: NOP
0AC8: 0@ = allocate_memory_size 256
0AC8: 1@ = allocate_memory_size 64 // Найденные предметы
0AC8: 3@ = allocate_memory_size 25 // Никнейм
repeat
wait 0
until SAMP.Available()
while true
wait 0
if 0B4C: samp is_dialog_active -1
then
0BD8: samp get_dialog_caption 0@
if 0C18: 31@ = strstr string1 0@ string2 "Обыск"
then
0B4E: samp 11@ = get_current_dialog_id
6@ = 0
while 6@ < 1000
0B36: samp 3@ = get_player_nickname 6@
0B65: samp 7@ = player 6@ score
0AD3: 1@ = format "Обыск %s[%d], %d lvl." 3@ 6@ 7@
if 0C14: strcmp string1 0@ string2 1@
then
4@ = 0
005A: 4@ += 6@
6@ = 999
end
6@ += 1
end
0BD7: samp get_dialog_text 0@
0AD3: 1@ = format ""
2@ = 0 // Уровень розыска
if 0C18: 31@ = strstr string1 0@ string2 "Нарко"
then
0C15: strcat destination 1@ source "Нарко"
2@ += 1
end
if 0C18: 31@ = strstr string1 0@ string2 "Материалы"
then
if 2@ == 0
then
0C15: strcat destination 1@ source "Материалы"
else
0C15: strcat destination 1@ source ", материалы"
end
2@ += 1
end
if 0C18: 31@ = strstr string1 0@ string2 "Набор отмычек"
then
if 2@ == 0
then
0C15: strcat destination 1@ source "Отмычки"
else
0C15: strcat destination 1@ source ", отмычки"
end
2@ += 1
end
if 2@ == 0
then
0AF8: samp add_message_to_chat "У %s ничего не обнаружено." color 0x00BFFF 3@
else
0AD3: 0@ = format "{FFFFFF}У %s обнаружено: {F1DF6C}%s{FFFFFF}. Ты хочешь объявить его в розыск (%d зв.)?" 3@ 1@ 2@
0B3B: samp show_dialog id 987 caption "{FFFFFF}Обьявление в розыск" text 0@ button_1 "Выдать" button_2 "Закрыть" style 0
end
end
end
if 0B3C: samp is_dialog_responded id 987 button 14@ list_item 0 input_text 0 // 0AF9: samp say_msg "/su %d %d %s" 4@ 2@ 1@
then
if 14@ == 1
then
6@ = 0
0B2B: samp 15@ = get_player_id_by_actor_handle $PLAYER_ACTOR
while 6@ < 1000
if or
003B: 6@ == 15@
0B23: samp is_player_connected 6@
then
0B36: samp 0@ = get_player_nickname 6@
else
0AD3: 0@ = format ""
end
if 0C14: strcmp string1 0@ string2 3@
then
0AF9: samp say_msg "/su %d %d %s" 6@ 2@ 1@
6@ = 1000
end
6@ += 1
if 6@ == 1000
then
0AF8: samp add_message_to_chat "%s оффлайн." color 0x00BFFF 3@
end
end
end
end
end