Untitled

alias masshl { var %x = 1,%c $iif($1 ischan,$1,#),%n | while ($nick(%c,%x,ohv)) { var %n = %n $v1 | if ($len(%n) > 400) { msg %c %n | var %n } | inc %x } | if (%n) { msg %c %n } }

 

alias masshl2 msg # $regsubex($str(.,$nick(#,0,voh)),/./g,$nick(#,\n,voh) $chr(32))

 

 

alias masshl3 { var %x = 1,%c $iif($1 ischan,$1,#),%n | while ($nick(%c,%x,ohv)) { var %n = %n $v1 | if ($len(%n) > 400) { notice + $+ %c %n | var %n } | inc %x } | if (%n) { notice + $+ %c %n } }