on *:join:#team7:{ if ($nick == $me) { timeridleDEOP 0 600 /chkidle | timeridleDEVO 0 600 /chkidle2 | timeridleOP 0 300 /chkidle3 | timeridleVO 0 300 /chkidle4 } } alias chkidle { var %x = 1 while (%x <= $nick(#Team7,0,o)) { if (($nick(#Team7,%x,o).idle > 1200) && ($nick(#Team7,%x,o) != $me)) { if ($nick(#Team7,%x,o) !isin %idle.permissoes) { mode #Team7 -o $nick(#Team7,%x,o) set %idle.ops $addtok(%idle.ops,$nick(#Team7,%x,o),32) } } inc %x } } alias chkidle2 { var %x = 1 while (%x <= $nick(#Team7,0,v)) { if (($nick(#Team7,%x,v).idle > 1800) && ($nick(#team7,%x,v) != $me)) { if ($nick(#Team7,%x,v) !isin %idle.permissoes) { mode #Team7 -v $nick(#Team7,%x,v) set %idle.vo $addtok(%idle.vo,$nick(#Team7,%x,v),32) } } inc %x } } alias chkidle3 { var %x = 1 while (%x <= $numtok(%idle.ops,32)) { if (($nick(#Team7,$gettok(%idle.ops,%x,32)).idle <= 180) && ($nick(#Team7,%x) != $me)) { mode #Team7 +o $gettok(%idle.ops,%x,32) var %z = $findtok(%idle.ops,$gettok(%idle.ops,%x,32),32) set %idle.ops $deltok(%idle.ops,%z,32) } inc %x } } alias chkidle4 { var %x = 1 while (%x <= $numtok(%idle.vo,32)) { if (($nick(#Team7,$gettok(%idle.vo,%x,32)).idle < 180) && ($nick(#Team7,%x) != $me)) { mode #Team7 +v $gettok(%idle.vo,%x,32) var %z = $findtok(%idle.vo,$gettok(%idle.vo,%x,32),32) set %idle.vo $deltok(%idle.vo,%z,32) } inc %x } } menu nicklist { .Idle Permissoes ..Adicionar:/addidle $$1 ..Remover:/delidle $$1 } alias addidle { set %idle.permissoes $addtok(%idle.permissoes,$1,32) | echo Info: $1 Adicionado a' lista IDLE Permissões } alias delidle { var %z = $findtok(%idle.permissoes,$1,32) | set %idle.permissoes $deltok(%idle.permissoes,%z,32) | echo Info: $$1 Removido da lista IDLE Permissões }