STATISTIQUES DE SALON

;###########################
;                       Statx
;###########################

menu channel {
 Get stats:/stats
}

alias stats {
  if ( $me isop $chan ) { set %meop ON }
  elseif ( $me !isop $chan ) { set %meop OFF }
  if ( $chan(#).key == $null ) { set %channelkey There is no password for this channel }
  elseif ( $chan(#).key != $null ) { set %channelkey $chan($chan).key }
  if ( $chan(#).topic == $null ) { set %topic No topic for $chan }
  elseif ( $chan(#).topic != $null ) { set %topic $chan(#).topic }
  if ( $chan(#).limit == $null ) { set %chanlimit OFF }
  elseif ( $chan(#).limit != $null ) { set %chanlimit ON }
  //echo $chan 1 $+ $timestamp $+ 1[2Stat/ $+ $chan $+ 1] ---------------------------------------------------------
  //echo $chan 1 $+ $timestamp $+ 1[2Stat/ $+ $chan $+ 1] 2Topic is : 1[2 3 $chan($chan).topic 1]
  //echo $chan 1 $+ $timestamp $+ 1[2Stat/ $+ $chan $+ 1] 2Channel modes are : 1[23 $chan($chan).mode 1]
  //echo $chan 1 $+ $timestamp $+ 1[2Stat/ $+ $chan $+ 1] 2Channel Password is : 1[23 %channelkey 1]
  //echo $chan 1 $+ $timestamp $+ 1[2Stat/ $+ $chan $+ 1] 2Channel limit : 1[23 %chanlimit 1] 1[23 $chan(#).limit 1]
  //echo $chan 1 $+ $timestamp $+ 1[2Stat/ $+ $chan $+ 1] 2There are : 4@ 1[2 $nick(#,0,o) 1] 5% 1[2 $nick(#,0,h) 1] 3+ 1[2 $nick(#,0,v) 1] Normal 1[2 $nick(#,0,r) 1]
  //echo $chan 1 $+ $timestamp $+ 1[2Stat/ $+ $chan $+ 1] 2A total of : 1[2 $nick(#,0) 1] users
  //echo $chan 1 $+ $timestamp $+ 1[2Stat/ $+ $chan $+ 1] 2Channel operator status for $me : 1[2 %meop 1]
  //echo $chan 1 $+ $timestamp $+ 1[2Stat/ $+ $chan $+ 1] ---------------------------------------------------------
}