;; Usage /banlist [channel]
alias banlist { var %trg = $iif($1,$1,$active) | mode %trg +b | set -u1800 %banlist [ $+ [ %trg ] ] $iif($1,$1,$true) }
raw 367:*:{ if (%banlist [ $+ [ $2 ] ]) { var %e = echo $color(info2) $iif(%banlist [ $+ [ $2 ] ] == $2,-ag,-g $2) * | %e [Ban: $3 $+ ][Set by: $4 $+ ][Banned since: $unix.dur($calc($ctime - $5)) $+ ] | haltdef } }
raw 368:*:{ if (%banlist [ $+ [ $2 ] ]) { var %trg = $iif(%banlist [ $+ [ $2 ] ] == $2,-ag,-g $2) | echo $color(info2) %trg * End of /banlist $2 | linesep %trg | haltdef | unset %banlist [ $+ [ $2 ] ] } }
alias unix.dur { %t = $1 | var %z = $left($asctime(z),1) $+ $calc($asctime(zz) * 36) | return $unix.s(86400,day) $+ , $iif($version < 6.1,$asctime($calc(%t $replace(%z,+,f,-,+,f,-)),HH:nn:ss),$duration(%t,3)) | unset %t }
alias unix.s { %x = $int($calc(%t /$1)) | %t = %t % $1 | return %x $+ $2 $+ $iif(%x != 1,s) }