Project

General

Profile

[script] Hide all idle channels and querys (no new messag... » Hide all idle channels and querys (no new message color) v0.3.1.ini

Mr. BS, 01/20/2017 12:44 AM

 
; http://dev.adiirc.com/boards/5/topics/475
; v0.3.1 by pereba

; Hide all idle channels and querys (no new message color):
; /hidle

; Force unhide all windows if need:
; /hidle -u

; Lets hide inactive windows after xx seconds on AdiIRC startup?!
on *:START: .timerhidle 0 120 hidle

; Restore windows on unloading script
on *:UNLOAD: hidle -u

alias F3 {
hidle -u
}

alias hidle {
scon -a dohidle $1
}

alias -l dohidle {
var %w $window(*,0), %wtype, %wname, %wid, %wcolor
while (%w) {
%wtype = $istok(channel query,$window(*,%w).type,32)
%wname = $window(*,%w)
%wid = $window(*,%w).wid
%wcolor = $istok(message highlight,$window(*,%w).sbcolor,32)
if ($1 == -u) && (%wtype) {
window -w3 %wname
}
elseif (!%wcolor) && (%wtype && $activewid != %wid) {
window -w0 %wname
}
dec %w
}
}

; Unhide on focus
on *:ACTIVE:#,?: {
if (!$window($active).tbstate) window -w3 $active
}

; Unhide on activity
on *:TEXT:*:#,?: {
var %w $iif(#,#,$nick)
if (!$window(%w).tbstate) window -w3 %w
}

menu menubar {
-
Idle Windows
.Hide no new message windows: hidle
.Force unhide all: hidle -u
.-
.Auto hide control $chr(9) $iif($timer(Hidle),On,Off):$iif($timer(hidle),.timerhidle off,.timerhidle 0 60 hidle)
}
(6-6/11)