stats.ini

[script]
n0=on 500,543:TEXT:*:#: { halt }
n1=on *:START: {
n2=  set %gettingstats 0
n3=}
n4=on *:LOAD: {
n5=  set %gettingstats 0
n6=  echo -at Loaded stats script
n7=  echo -at Set gettingstats to default
n8=}
n9=on *:UNLOAD: {
n10=  unset %gettingstats
n11=  unset %gettingstatschan
n12=  unset %gettingstatsnick
n13=  echo -at Unloaded stats script
n14=  echo -at Unset getting stats
n15=}
n16=on *:JOIN:#: {
n17=  if ($chan_log($chan) && $me == %bot1) {
n18=    inc_joins $chan
n19=    if ($nick($chan,0) > $chan_peak($chan)) {
n20=      upd_peak $chan
n21=    }
n22=  }
n23=  if ($me == %bot1 && $me == $nick && $chan_log($chan)) {
n24=    .timer 1 1 checkchantopic $chan
n25=  }
n26=}
n27=alias -l checkchantopic {
n28=  if ($me ison $1 && $chan($1).topic != $chan_topic($1)) {
n29=    writeini channels\ $+ $1 $+ .ini settings oldtopic $chan_topic($1)
n30=    writeini channels\ $+ $1 $+ .ini settings topic $chan($1).topic
n31=  }
n32=}
n33=on *:PART:#: {
n34=  if ($chan_log($chan) && $me == %bot1) {
n35=    inc_leaves $chan
n36=  }
n37=}
n38=on *:BAN:#: {
n39=  if ($chan_log($chan) && $me == %bot1) {
n40=    inc_bans $chan
n41=  }
n42=}
n43=on *:KICK:#: {
n44=  if ($chan_log($chan) && $me == %bot1) {
n45=    inc_kicks $chan
n46=  }
n47=}
n48=on *:TOPIC:#: {
n49=  if ($chan_log($chan) && $me == %bot1) {
n50=    writeini channels\ $+ $chan $+ .ini settings oldtopic $chan_topic($chan)
n51=    writeini channels\ $+ $chan $+ .ini settings topic $1-
n52=  }
n53=}
n54=
n55=on *:TEXT:!avg:#: {
n56=  if ($me == %bot1) {
n57=    if ($chan_log($chan)) {
n58=      scon $bot_say($chan) msg $chan Average users for $chan is: $round($chan_avg($chan),0) users (counted $chan_avgc($chan) times)
n59=    }
n60=    else {
n61=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n62=    }
n63=  }
n64=}
n65=on *:TEXT:!avg*:#: {
n66=  if ($me == %bot1 && $1 == !avg) {
n67=    if (!$2) {
n68=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !avg <channel>
n69=    }
n70=    elseif ($chan_log($2)) {
n71=      scon $bot_say($chan) msg $chan Average users for $chan($2) is: $round($chan_avg($2),0) users (counted $chan_avgc($2) times)
n72=    }
n73=    else {
n74=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n75=    }
n76=  }
n77=}
n78=on *:TEXT:!average:#: {
n79=  if ($me == %bot1) {
n80=    if ($chan_log($chan)) {
n81=      scon $bot_say($chan) msg $chan Average users for $chan is: $round($chan_avg($chan),0) users (counted $chan_avgc($chan) times)
n82=    }
n83=    else {
n84=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n85=    }
n86=  }
n87=}
n88=on *:TEXT:!average*:#: {
n89=  if ($me == %bot1 && $1 == !average) {
n90=    if (!$2) {
n91=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !avg <channel>
n92=    }
n93=    elseif ($chan_log($2)) {
n94=      scon $bot_say($chan) msg $chan Average users for $chan($2) is: $round($chan_avg($2),0) users (counted $chan_avgc($2) times)
n95=    }
n96=    else {
n97=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n98=    }
n99=  }
n100=}
n101=
n102=on *:TEXT:!peak:#: {
n103=  if ($me == %bot1) {
n104=    if ($chan_log($chan)) {
n105=      scon $bot_say($chan) msg $chan Peak for $chan is: $chan_peak($chan) users ( $+ $asctime($chan_peakt($chan),dddd dd mmmm) at $asctime($chan_peakt($chan),HH:nn:ss)  GMT)
n106=    }
n107=    else {
n108=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n109=    }
n110=  }
n111=}
n112=on *:TEXT:!peak*:#: {
n113=  if ($me == %bot1 && $1 == !peak) {
n114=    if (!$2) {
n115=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !peak <channel>
n116=    }
n117=    elseif ($chan_log($2)) {
n118=      scon $bot_say($chan) msg $chan Peak for $chan($2) is: $chan_peak($2) users ( $+ $asctime($chan_peakt($2),dddd dd mmmm) at $asctime($chan_peakt($2),HH:nn:ss)  GMT)
n119=    }
n120=    else {
n121=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n122=    }
n123=  }
n124=}
n125=
n126=on *:TEXT:!lastmsg:#: {
n127=  if ($me == %bot1) {
n128=    if ($chan_log($chan)) {
n129=      scon $bot_say($chan) msg $chan Last message sent in $chan was at: $asctime($chan_lastmsg($chan),dddd dd mmmm) at $asctime($chan_lastmsg($chan),HH:nn:ss)  GMT
n130=    }
n131=    else {
n132=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n133=    }
n134=  }
n135=}
n136=on *:TEXT:!lastmsg*:#: {
n137=  if ($me == %bot1 && $1 == !lastmsg) {
n138=    if (!$2) {
n139=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !lastmsg <channel>
n140=    }
n141=    elseif ($chan_log($2)) {
n142=      scon $bot_say($chan) msg $chan Last message sent in $chan($2) was at: $asctime($chan_lastmsg($2),dddd dd mmmm) at $asctime($chan_lastmsg($2),HH:nn:ss) GMT
n143=    }
n144=    else {
n145=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n146=    }
n147=  }
n148=}
n149=on *:TEXT:!lastmessage:#: {
n150=  if ($me == %bot1) {
n151=    if ($chan_log($chan)) {
n152=      scon $bot_say($chan) msg $chan Last message sent in $chan was at: $asctime($chan_lastmsg($chan),dddd dd mmmm) at $asctime($chan_lastmsg($chan),HH:nn:ss)  GMT
n153=    }
n154=    else {
n155=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n156=    }
n157=  }
n158=}
n159=on *:TEXT:!lastmessage*:#: {
n160=  if ($me == %bot1 && $1 == !lastmessage) {
n161=    if (!$2) {
n162=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !lastmessage <channel>
n163=    }
n164=    elseif ($chan_log($2)) {
n165=      scon $bot_say($chan) msg $chan Last message sent in $chan($2) was at: $asctime($chan_lastmsg($2),dddd dd mmmm) at $asctime($chan_lastmsg($2),HH:nn:ss) GMT
n166=    }
n167=    else {
n168=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n169=    }
n170=  }
n171=}
n172=
n173=on *:TEXT:!joins:#: {
n174=  if ($me == %bot1) {
n175=    if ($chan_log($chan)) {
n176=      scon $bot_say($chan) msg $chan I counted $chan_joins($chan) joins in $chan
n177=    }
n178=    else {
n179=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n180=    }
n181=  }
n182=}
n183=on *:TEXT:!joins*:#: {
n184=  if ($me == %bot1 && $1 == !joins) {
n185=    if (!$2) {
n186=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !joins <channel>
n187=    }
n188=    elseif ($chan_log($2)) {
n189=      scon $bot_say($chan) msg $chan I counted $chan_joins($2) joins in $chan($2)
n190=    }
n191=    else {
n192=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n193=    }
n194=  }
n195=}
n196=on *:TEXT:!leaves:#: {
n197=  if ($me == %bot1) {
n198=    if ($chan_log($chan)) {
n199=      scon $bot_say($chan) msg $chan I counted $chan_leaves($chan) leaves in $chan (quits not counted)
n200=    }
n201=    else {
n202=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n203=    }
n204=  }
n205=}
n206=on *:TEXT:!leaves*:#: {
n207=  if ($me == %bot1 && $1 == !leaves) {
n208=    if (!$2) {
n209=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !leaves <channel>
n210=    }
n211=    elseif ($chan_log($2)) {
n212=      scon $bot_say($chan) msg $chan I counted $chan_leaves($2) leaves in $chan($2) (quits not counted)
n213=    }
n214=    else {
n215=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n216=    }
n217=  }
n218=}
n219=
n220=on *:TEXT:!bans:#: {
n221=  if ($me == %bot1) {
n222=    if ($chan_log($chan)) {
n223=      scon $bot_say($chan) msg $chan I counted $chan_bans($chan) bans in $chan
n224=    }
n225=    else {
n226=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n227=    }
n228=  }
n229=}
n230=on *:TEXT:!bans*:#: {
n231=  if ($me == %bot1 && $1 == !bans) {
n232=    if (!$2) {
n233=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !bans <channel>
n234=    }
n235=    elseif ($chan_log($2)) {
n236=      scon $bot_say($chan) msg $chan I counted $chan_bans($2) bans in $chan($2)
n237=    }
n238=    else {
n239=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n240=    }
n241=  }
n242=}
n243=on *:TEXT:!kicks:#: {
n244=  if ($me == %bot1) {
n245=    if ($chan_log($chan)) {
n246=      scon $bot_say($chan) msg $chan I counted $chan_kicks($chan) kicks in $chan
n247=    }
n248=    else {
n249=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n250=    }
n251=  }
n252=}
n253=on *:TEXT:!kicks*:#: {
n254=  if ($me == %bot1 && $1 == !kicks) {
n255=    if (!$2) {
n256=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !kicks <channel>
n257=    }
n258=    elseif ($chan_log($2)) {
n259=      scon $bot_say($chan) msg $chan I counted $chan_kicks($2) kicks in $chan($2)
n260=    }
n261=    else {
n262=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n263=    }
n264=  }
n265=}
n266=
n267=on *:TEXT:!msgs:#: {
n268=  if ($me == %bot1) {
n269=    if ($chan_log($chan)) {
n270=      scon $bot_say($chan) msg $chan I counted $chan_msgs($chan) messages in $chan
n271=    }
n272=    else {
n273=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n274=    }
n275=  }
n276=}
n277=on *:TEXT:!msgs*:#: {
n278=  if ($me == %bot1 && $1 == !msgs) {
n279=    if (!$2) {
n280=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !msgs <channel>
n281=    }
n282=    elseif ($chan_log($2)) {
n283=      scon $bot_say($chan) msg $chan I counted $chan_msgs($2) messages in $chan($2)
n284=    }
n285=    else {
n286=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n287=    }
n288=  }
n289=}
n290=on *:TEXT:!messages:#: {
n291=  if ($me == %bot1) {
n292=    if ($chan_log($chan)) {
n293=      scon $bot_say($chan) msg $chan I counted $chan_msgs($chan) messages in $chan
n294=    }
n295=    else {
n296=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n297=    }
n298=  }
n299=}
n300=on *:TEXT:!messages*:#: {
n301=  if ($me == %bot1 && $1 == !messages) {
n302=    if (!$2) {
n303=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !messages <channel>
n304=    }
n305=    elseif ($chan_log($2)) {
n306=      scon $bot_say($chan) msg $chan I counted $chan_msgs($2) messages in $chan($2)
n307=    }
n308=    else {
n309=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n310=    }
n311=  }
n312=}
n313=
n314=on *:TEXT:!lastcmd:#: {
n315=  if ($me == %bot1) {
n316=    if ($chan_log($chan)) {
n317=      scon $bot_say($chan) msg $chan Last command used in $chan was at: $asctime($chan_lastcmd($chan),dddd dd mmmm) at $asctime($chan_lastcmd($chan),HH:nn:ss)  GMT
n318=    }
n319=    else {
n320=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n321=    }
n322=  }
n323=}
n324=on *:TEXT:!lastcmd*:#: {
n325=  if ($me == %bot1 && $1 == !lastcmd) {
n326=    if (!$2) {
n327=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !lastcmd <channel>
n328=    }
n329=    elseif ($chan_log($2)) {
n330=      scon $bot_say($chan) msg $chan Last command used in $chan($2) was at: $asctime($chan_lastcmd($2),dddd dd mmmm) at $asctime($chan_lastcmd($2),HH:nn:ss) GMT
n331=    }
n332=    else {
n333=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n334=    }
n335=  }
n336=}
n337=
n338=on *:TEXT:!lastcommand:#: {
n339=  if ($me == %bot1) {
n340=    if ($chan_log($chan)) {
n341=      scon $bot_say($chan) msg $chan Last command used in $chan was at: $asctime($chan_lastcmd($chan),dddd dd mmmm) at $asctime($chan_lastcmd($chan),HH:nn:ss)  GMT
n342=    }
n343=    else {
n344=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n345=    }
n346=  }
n347=}
n348=on *:TEXT:!lastcommand*:#: {
n349=  if ($me == %bot1 && $1 == !lastcommand) {
n350=    if (!$2) {
n351=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !lastcommand <channel>
n352=    }
n353=    elseif ($chan_log($2)) {
n354=      scon $bot_say($chan) msg $chan Last command used in $chan($2) was at: $asctime($chan_lastcmd($2),dddd dd mmmm) at $asctime($chan_lastcmd($2),HH:nn:ss) GMT
n355=    }
n356=    else {
n357=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n358=    }
n359=  }
n360=}
n361=
n362=on *:TEXT:!topic:#: {
n363=  if ($me == %bot1) {
n364=    if ($chan_log($chan)) {
n365=      scon $bot_say($chan) msg $chan Topic of $chan $+ : $eval($chan_topic($chan),0)
n366=    }
n367=    else {
n368=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n369=    }
n370=  }
n371=}
n372=on *:TEXT:!topic*:#: {
n373=  if ($me == %bot1 && $1 == !topic) {
n374=    if (!$2) {
n375=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !topic <channel>
n376=    }
n377=    elseif ($chan_log($2)) {
n378=      scon $bot_say($chan) msg $chan Topic of $chan($2) $+ : $chan_topic($2)
n379=    }
n380=    else {
n381=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n382=    }
n383=  }
n384=}
n385=on *:TEXT:!oldtopic:#: {
n386=  if ($me == %bot1) {
n387=    if (!$chan_log($chan)) {
n388=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n389=    }
n390=    elseif ($chan_oldtopic($chan) == null) {
n391=      scon $bot_say($chan) msg $chan 4ERROR:1 Topic of $chan did not change since the start of logging
n392=    }
n393=    else {
n394=      scon $bot_say($chan) msg $chan Last topic of $chan $+ : $eval($chan_oldtopic($chan),0)
n395=    }
n396=
n397=  }
n398=}
n399=on *:TEXT:!oldtopic*:#: {
n400=  if ($me == %bot1 && $1 == !oldtopic) {
n401=    if (!$2) {
n402=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !oldtopic <channel>
n403=    }
n404=    elseif (!$chan_log($2)) {
n405=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n406=    }
n407=    elseif ($chan_oldtopic($2) == null) {
n408=      scon $bot_say($chan) msg $chan 4ERROR:1 Topic of $chan($2) did not change since the start of logging
n409=    }
n410=    else {
n411=      scon $bot_say($chan) msg $chan Last topic of $chan($2) $+ : $chan_oldtopic($2)
n412=    }
n413=  }
n414=}
n415=on *:TEXT:!warns:#: {
n416=  if ($me == %bot1) {
n417=    if ($chan_log($chan)) {
n418=      scon $bot_say($chan) msg $chan $chan has a total of $chan_warns($chan) $+ $chr(47) $+ 5 warnings
n419=    }
n420=    else {
n421=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n422=    }
n423=  }
n424=}
n425=on *:TEXT:!warns*:#: {
n426=  if ($me == %bot1 && $1 == !warns) {
n427=    if (!$2) {
n428=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !warns <channel>
n429=    }
n430=    elseif ($chan_log($2)) {
n431=      scon $bot_say($chan) msg $chan $chan($2) has a total of $chan_warns($2) $+ $chr(47) $+ 5 warnings
n432=    }
n433=    else {
n434=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n435=    }
n436=  }
n437=}
n438=on *:TEXT:!quotes:#: {
n439=  if ($me == %bot1) {
n440=    if ($chan_log($chan)) {
n441=      scon $bot_say($chan) msg $chan Quotes are $iif($chan_quotes($chan),9enabled,4disabled) 1at $chan
n442=    }
n443=    else {
n444=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n445=    }
n446=  }
n447=}
n448=on *:TEXT:!quotes*:#: {
n449=  if ($me == %bot1 && $1 == !quotes) {
n450=    if (!$2) {
n451=      scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !quotes <channel>
n452=    }
n453=    elseif ($chan_log($2)) {
n454=      scon $bot_say($chan) msg $chan Quotes are $iif($chan_quotes($2),9enabled,4disabled) 1at $2
n455=    }
n456=    else {
n457=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n458=    }
n459=  }
n460=}
n461=
n462=on *:TEXT:!botfullstats*:#: {
n463=  if ($me == %owner && $1 == !botfullstats) {
n464=    window -m @BotStats
n465=    aline @BotStats Botstats requested by $nick at $time in $chan
n466=  }
n467=  if ($me == $2 && $1 == !botfullstats) {
n468=    set %iminchan Channels:
n469=    set %imownerinchan 0
n470=    set %improtectinchan 0
n471=    set %imopinchan 0
n472=    set %imhopinchan 0
n473=    set %imvoiceinchan 0
n474=    set %imregularinchan 0
n475=    var %i = 1
n476=    while (%i < $chan(0)) {
n477=      set %iminchan %iminchan $chan(%i) $+ ,
n478=      {
n479=        if ($chr(126) isin $nick($chan(%i) , $me).pnick) { inc %imownerinchan }
n480=        elseif ($chr(38) isin $nick($chan(%i) , $me).pnick) { inc %improtectinchan }
n481=        elseif ($chr(64) isin $nick($chan(%i) , $me).pnick) { inc %imopinchan }
n482=        elseif ($chr(37) isin $nick($chan(%i) , $me).pnick) { inc %imhopinchan }
n483=        elseif ($chr(43) isin $nick($chan(%i) , $me).pnick) { inc %imvoiceinchan }
n484=        else { inc %imregularinchan }
n485=      }
n486=      inc %i
n487=    }
n488=    set %iminchan %iminchan $chan(%i)
n489=    {
n490=      if ($chr(126) isin $nick($chan(%i) , $me).pnick) { inc %imownerinchan }
n491=      elseif ($chr(38) isin $nick($chan(%i) , $me).pnick) { inc %improtectinchan }
n492=      elseif ($chr(64) isin $nick($chan(%i) , $me).pnick) { inc %imopinchan }
n493=      elseif ($chr(37) isin $nick($chan(%i) , $me).pnick) { inc %imhopinchan }
n494=      elseif ($chr(43) isin $nick($chan(%i) , $me).pnick) { inc %imvoiceinchan }
n495=      else { inc %imregularinchan }
n496=    }
n497=    msg $chan I'm currently in $chan(0) channels
n498=    msg $chan %iminchan
n499=    msg $chan I'm 9owner (~) in9 %imownerinchan channels, 7protect (&) in7 %improtectinchan channels, 4op (@) in4 %imopinchan channels, 2halfop (%) in2 %imhopinchan channels, 6voice (+) in6 %imvoiceinchan channels and 14regular () in14 %imregularinchan channels.
n500=    unset %iminchan
n501=    unset %imvoiceinchan
n502=    unset %imhopinchan
n503=    unset %imopinchan
n504=    unset %imregularinchan
n505=    unset %improtectinchan
n506=    unset %imownerinchan
n507=  }
n508=  elseif ($2 == $null && $me == %bot1 && $1 == !botfullstats) { scon $bot_say($chan) msg $chan 4ERROR: Usage: !botfullstats <botnick> }
n509=  elseif (!$mybots($2) && $me == %bot1 && $1 == !botfullstats) { scon $bot_say($chan) msg $chan 4ERROR: $2 is not a bot }
n510=}
n511=on *:TEXT:!allbotsfullstats:#: {
n512=  if ($me == %owner) {
n513=    window -m @BotStats
n514=    aline @BotStats Botstats requested by $nick at $time in $chan
n515=  }
n516=  set %iminchan Channels:
n517=  set %imownerinchan 0
n518=  set %improtectinchan 0
n519=  set %imopinchan 0
n520=  set %imhopinchan 0
n521=  set %imvoiceinchan 0
n522=  set %imregularinchan 0
n523=  var %i = 1
n524=  while (%i < $chan(0)) {
n525=    set %iminchan %iminchan $chan(%i) $+ ,
n526=    {
n527=      if ($chr(126) isin $nick($chan(%i) , $me).pnick) { inc %imownerinchan }
n528=      elseif ($chr(38) isin $nick($chan(%i) , $me).pnick) { inc %improtectinchan }
n529=      elseif ($chr(64) isin $nick($chan(%i) , $me).pnick) { inc %imopinchan }
n530=      elseif ($chr(37) isin $nick($chan(%i) , $me).pnick) { inc %imhopinchan }
n531=      elseif ($chr(43) isin $nick($chan(%i) , $me).pnick) { inc %imvoiceinchan }
n532=      else { inc %imregularinchan }
n533=    }
n534=    inc %i
n535=  }
n536=  set %iminchan %iminchan $chan(%i)
n537=  {
n538=    if ($chr(126) isin $nick($chan(%i) , $me).pnick) { inc %imownerinchan }
n539=    elseif ($chr(38) isin $nick($chan(%i) , $me).pnick) { inc %improtectinchan }
n540=    elseif ($chr(64) isin $nick($chan(%i) , $me).pnick) { inc %imopinchan }
n541=    elseif ($chr(37) isin $nick($chan(%i) , $me).pnick) { inc %imhopinchan }
n542=    elseif ($chr(43) isin $nick($chan(%i) , $me).pnick) { inc %imvoiceinchan }
n543=    else { inc %imregularinchan }
n544=  }
n545=  {
n546=    if ($me == %bot1) {
n547=      msg $chan I'm currently in $chan(0) channels
n548=      msg $chan %iminchan
n549=      msg $chan I'm 9owner (~) in9 %imownerinchan channels, 7protect (&) in7 %improtectinchan channels, 4op (@) in4 %imopinchan channels, 2halfop (%) in2 %imhopinchan channels, 6voice (+) in6 %imvoiceinchan channels and 14regular () in14 %imregularinchan channels.
n550=    }
n551=    elseif ($me == %bot2) {
n552=      .timer 1 3 msg $chan I'm currently in $chan(0) channels
n553=      .timer 1 3 msg $chan %iminchan
n554=      .timer 1 3 msg $chan I'm 9owner (~) in9 %imownerinchan channels, 7protect (&) in7 %improtectinchan channels, 4op (@) in4 %imopinchan channels, 2halfop (%) in2 %imhopinchan channels, 6voice (+) in6 %imvoiceinchan channels and 14regular () in14 %imregularinchan channels.
n555=    }
n556=
n557=    /*
n558=    elseif ($me == %bot3) {
n559=      .timer 1 6 msg $chan I'm currently in $chan(0) channels
n560=      .timer 1 6 msg $chan %iminchan
n561=      .timer 1 6 msg $chan I'm 9owner (~) in9 %imownerinchan channels, 7protect (&) in7 %improtectinchan channels, 4op (@) in4 %imopinchan channels, 2halfop (%) in2 %imhopinchan channels, 6voice (+) in6 %imvoiceinchan channels and 14regular () in14 %imregularinchan channels.
n562=    }
n563=    elseif ($me == %bot4) {
n564=      .timer 1 9 msg $chan I'm currently in $chan(0) channels
n565=      .timer 1 9 msg $chan %iminchan
n566=      .timer 1 9 msg $chan I'm 9owner (~) in9 %imownerinchan channels, 7protect (&) in7 %improtectinchan channels, 4op (@) in4 %imopinchan channels, 2halfop (%) in2 %imhopinchan channels, 6voice (+) in6 %imvoiceinchan channels and 14regular () in14 %imregularinchan channels.
n567=    }
n568=    */
n569=
n570=    elseif ($me == %owner) {
n571=      .timer 1 12 msg $chan I'm currently in $chan(0) channels
n572=      .timer 1 12 msg $chan %iminchan
n573=      .timer 1 12 msg $chan I'm 9owner (~) in9 %imownerinchan channels, 7protect (&) in7 %improtectinchan channels, 4op (@) in4 %imopinchan channels, 2halfop (%) in2 %imhopinchan channels, 6voice (+) in6 %imvoiceinchan channels and 14regular () in14 %imregularinchan channels.
n574=    }
n575=  }
n576=  unset %iminchan
n577=  unset %imvoiceinchan
n578=  unset %imhopinchan
n579=  unset %imopinchan
n580=  unset %imregularinchan
n581=  unset %improtectinchan
n582=  unset %imownerinchan
n583=}
n584=on *:TEXT:!botstats*:#: {
n585=  if ($me == %owner && $1 == !botstats) {
n586=    window -m @BotStats
n587=    aline @BotStats Botstats requested by $nick at $time in $chan
n588=  }
n589=  if ($me == $2 && $1 == !botstats) {
n590=    set %iminchan Channels:
n591=    var %i = 1
n592=    while (%i < $chan(0)) {
n593=      set %iminchan %iminchan $chan(%i) $+ ,
n594=      inc %i
n595=    }
n596=    set %iminchan %iminchan $chan(%i)
n597=    msg $chan I'm currently in $chan(0) channels
n598=    msg $chan %iminchan
n599=    unset %iminchan
n600=  }
n601=  elseif ($2 == $null && $me == %bot1 && $1 == !botstats) { scon $bot_say($chan) scon $bot_say($chan) msg $chan 4ERROR: Usage: !botstats <botnick> }
n602=  elseif (!$mybots($2) && $me == %bot1 && $1 == !botstats) { scon $bot_say($chan) scon $bot_say($chan) msg $chan 4ERROR: $2 is not a bot }
n603=}
n604=on *:TEXT:!allbotsstats:#: {
n605=  if ($me == %owner) {
n606=    window -m @BotStats
n607=    aline @BotStats Botstats requested by $nick at $time in $chan
n608=  }
n609=  set %iminchan Channels:
n610=  var %i = 1
n611=  while (%i < $chan(0)) {
n612=    set %iminchan %iminchan $chan(%i) $+ ,
n613=    inc %i
n614=  }
n615=  set %iminchan %iminchan $chan(%i)
n616=  if ($me == %bot1) {
n617=    msg $chan I'm currently in $chan(0) channels
n618=    .timer 1 1 msg $chan %iminchan
n619=  }
n620=  elseif ($me == %bot2) {
n621=    .timer 1 3 msg $chan I'm currently in $chan(0) channels
n622=    .timer 1 4 msg $chan %iminchan
n623=  }
n624=
n625=  /*
n626=  elseif ($me == %bot3) {
n627=    .timer 1 6 msg $chan I'm currently in $chan(0) channels
n628=    .timer 1 7 msg $chan %iminchan
n629=  }
n630=  elseif ($me == %bot4) {
n631=    .timer 1 9 msg $chan I'm currently in $chan(0) channels
n632=    .timer 1 10 msg $chan %iminchan
n633=  }
n634=  */
n635=
n636=  elseif ($me == %owner) {
n637=    .timer 1 12 msg $chan I'm currently in $chan(0) channels
n638=    .timer 1 13 msg $chan %iminchan
n639=  }
n640=  unset %iminchan
n641=}
n642=on *:TEXT:!chanstats:#: {
n643=  if (%gettingstats == 0 && $me == %bot1) {
n644=    if ($nick != %owner) {
n645=      scon %owner_s window -m @ChanStats
n646=      scon %owner_s aline @Chanstats Chanstats requested by $nick at $time in $chan
n647=    }
n648=
n649=    var %bot_say.tmp $bot_say($chan,10)
n650=    scon $bot_say($chan) msg $chan Loading stats for $chan $+ ...
n651=    scon $bot_say($chan) getchanstats $chan $chan $nick
n652=  }
n653=  elseif ($me == %bot1) {
n654=    scon $bot_say($chan) msg $chan Loading stats for $chan $+ ...
n655=    scon $bot_say($chan) msg $chan 4ERROR: Loading interrupted, already loading stats for2 %gettingstatsnick in4 %gettingstatschan
n656=  }
n657=}
n658=on *:TEXT:!chanstats*:#: {
n659=  if ($1 == !chanstats && !$2 && $me == %bot1) {
n660=    scon $bot_say($chan) msg $chan 4ERROR: Usage: !chanstats <channel>
n661=  }
n662=  elseif ($1 == !chanstats && %gettingstats == 0 && $me == %bot1) {
n663=    if ($nick != %owner) {
n664=      scon %owner_s window -m @ChanStats
n665=      scon %owner_s aline @Chanstats Chanstats requested by $nick at $time in $chan
n666=    }
n667=
n668=    var %bot_say.tmp $bot_say($chan,10)
n669=    if ($me ison $2) {
n670=      scon %bot_say.tmp msg $chan Loading stats for $chan($2) $+ ...
n671=      scon %bot_say.tmp getchanstats $chan($2) $chan $nick
n672=      scon %bot_say.tmp msg $2 Channel stats of this channel have been requested by2 $nick in4 $chan
n673=    }
n674=    elseif ($me ison $chr(35) $+ $2) {
n675=      scon %bot_say.tmp msg $chan Loading stats for $chan( $chr(35) $+ $2 ) $+ ...
n676=      scon %bot_say.tmp getchanstats $chan( $chr(35) $+ $2 ) $chan $nick
n677=      scon %bot_say.tmp msg $chr(35) $+ $2 Channel stats of this channel have been requested by2 $nick in4 $chan
n678=    }
n679=    elseif ($left($2,1) != $chr(35)) {
n680=      scon %bot_say.tmp msg $chan Loading stats for $chr(35) $+ $2 $+ ...
n681=      scon %bot_say.tmp join -n $chr(35) $+ $2
n682=      scon %bot_say.tmp .timer 1 2 getchanstats $chr(35) $+ $2 $chan $nick
n683=      scon %bot_say.tmp .timer 1 7 .leave $chr(35) $+ $2 Channel stats requested by 2 $nick at4 $chan
n684=    }
n685=    else {
n686=      scon %bot_say.tmp msg $chan Loading stats for $2 $+ ...
n687=      scon %bot_say.tmp join -n $2
n688=      scon %bot_say.tmp .timer 1 2 getchanstats $2 $chan $nick
n689=      scon %bot_say.tmp .timer 1 7 .leave $2 Channel stats requested by2 $nick at4 $chan
n690=    }
n691=  }
n692=  elseif ($1 == !chanstats && $me == %bot1) {
n693=    scon $bot_say($chan) msg $chan Loading stats for $2 $+ ...
n694=    scon $bot_say($chan) msg $chan 4ERROR: Loading interrupted, already loading stats for2 %gettingstatsnick in4 %gettingstatschan
n695=  }
n696=}
n697=on *:TEXT:!chanfullstats:#: {
n698=  if (%gettingstats == 0 && $me == %bot1) {
n699=    if ($nick != %owner) {
n700=      scon %owner_s window -m @ChanStats
n701=      scon %owner_s aline @Chanstats Chanstats requested by $nick at $time in $chan
n702=    }
n703=
n704=    var %bot_say.tmp $bot_say($chan,10)
n705=    scon %bot_say.tmp msg $chan Loading stats for $chan $+ ...
n706=    scon %bot_say.tmp getchanstats $chan $chan $nick
n707=    scon %bot_say.tmp getchanusers $chan $chan $nick fullstats
n708=  }
n709=  elseif ($me == %bot1) {
n710=    scon $bot_say($chan) msg $chan Loading stats for $chan $+ ...
n711=    scon $bot_say($chan) msg $chan 4ERROR: Loading interrupted, already loading stats for2 %gettingstatsnick in4 %gettingstatschan
n712=  }
n713=}
n714=on *:TEXT:!chanfullstats*:#: {
n715=  if ($1 == !chanfullstats && !$2 && $me == %bot1) {
n716=    scon $bot_say($chan) msg $chan 4ERROR: Usage: !chanfullstats <channel>
n717=  }
n718=  elseif ($1 == !chanfullstats && %gettingstats == 0 && $me == %bot1) {
n719=    if ($nick != %owner) {
n720=      scon %owner_s window -m @ChanStats
n721=      scon %owner_s aline @Chanstats Chanstats requested by $nick at $time in $chan
n722=    }
n723=
n724=    var %bot_say.tmp $bot_say($chan,10)
n725=    if ($me ison $2) {
n726=      scon %bot_say.tmp msg $chan Loading stats for $chan($2) $+ ...
n727=      scon %bot_say.tmp getchanstats $chan($2) $chan $nick
n728=      scon %bot_say.tmp getchanusers $chan($2) $chan $nick fullstats
n729=      scon %bot_say.tmp msg $2 Channel stats of this channel have been requested by2 $nick in4 $chan
n730=    }
n731=    elseif ($me ison $chr(35) $+ $2 ) {
n732=      scon %bot_say.tmp msg $chan Loading stats for $chan( $chr(35) $+ $2 ) $+ ...
n733=      scon %bot_say.tmp getchanstats $chan( $chr(35) $+ $2 ) $chan $nick
n734=      scon %bot_say.tmp getchanusers $chan( $chr(35) $+ $2 ) $chan $nick fullstats
n735=      scon %bot_say.tmp msg $chr(35) $+ $2 Channel stats of this channel have been requested by2 $nick in4 $chan
n736=    }
n737=    elseif ($left($2,1) != $chr(35)) {
n738=      scon %bot_say.tmp msg $chan Loading stats for $chr(35) $+ $2 $+ ...
n739=      scon %bot_say.tmp join -n $chr(35) $+ $2
n740=      scon %bot_say.tmp .timer 1 2 getchanstats $chr(35) $+ $2 $chan $nick
n741=      scon %bot_say.tmp .timer 1 2 getchanusers $chr(35) $+ $2 $chan $nick fullstats
n742=      scon %bot_say.tmp .timer 1 7 .leave $chr(35) $+ $2 Channel stats requested by 2 $nick at4 $chan
n743=    }
n744=    else {
n745=      scon %bot_say.tmp msg $chan Loading stats for $2 $+ ...
n746=      scon %bot_say.tmp join -n $2
n747=      scon %bot_say.tmp .timer 1 2 getchanstats $2 $chan $nick
n748=      scon %bot_say.tmp .timer 1 2 getchanusers $2 $chan $nick fullstats
n749=      scon %bot_say.tmp .timer 1 7 .leave $2 Channel stats requested by2 $nick at4 $chan
n750=    }
n751=  }
n752=  elseif ($1 == !chanfullstats && $me == %bot1) {
n753=    scon $bot_say($chan) msg $chan Loading stats for $2 $+ ...
n754=    scon $bot_say($chan) msg $chan 4ERROR: Loading interrupted, already loading stats for2 %gettingstatsnick in4 %gettingstatschan
n755=  }
n756=}
n757=on *:TEXT:!chanusers:#: {
n758=  if (%gettingstats == 0 && $me == %bot1) {
n759=    if ($nick != %owner) {
n760=      scon %owner_s window -m @ChanStats
n761=      scon %owner_s aline @Chanstats Chanstats requested by $nick at $time in $chan
n762=    }
n763=
n764=    var %bot_say.tmp $bot_say($chan,10)
n765=    scon %bot_say.tmp msg $chan Loading stats for $chan $+ ...
n766=    scon %bot_say.tmp getchanusers $chan $chan $nick users
n767=  }
n768=  elseif ($me == %bot1) {
n769=    scon $bot_say($chan) msg $chan Loading stats for $chan $+ ...
n770=    scon $bot_say($chan) msg $chan 4ERROR: Loading interrupted, already loading stats for2 %gettingstatsnick in4 %gettingstatschan
n771=  }
n772=
n773=}
n774=on *:TEXT:!chanusers*:#: {
n775=  if ($1 == !chanusers && !$2 && $me == %bot1) {
n776=    scon $bot_say($chan) msg $chan 4ERROR: Usage: !chanusers <channel>
n777=  }
n778=  elseif ($1 == !chanusers && %gettingstats == 0 && $me == %bot1) {
n779=    if ($nick != %owner) {
n780=      scon %owner_s window -m @ChanStats
n781=      scon %owner_s aline @Chanstats Chanstats requested by $nick at $time in $chan
n782=    }
n783=
n784=    var %bot_say.tmp $bot_say($chan,10)
n785=    if ($me ison $2) {
n786=      scon %bot_say.tmp msg $chan Loading stats for $chan($2) $+ ...
n787=      scon %bot_say.tmp getchanusers $chan($2) $chan $nick users
n788=      scon %bot_say.tmp msg $2 Channel stats of this channel have been requested by2 $nick in4 $chan
n789=    }
n790=    elseif ($me ison $chr(35) $+ $2) {
n791=      scon %bot_say.tmp msg $chan Loading stats for $chan($chr(35) $+ $2 ) $+ ...
n792=      scon %bot_say.tmp getchanusers $chan($chr(35) $+ $2 ) $chan $nick users
n793=      scon %bot_say.tmp msg $chr(35) $+ $2 Channel stats of this channel have been requested by2 $nick in4 $chan
n794=    }
n795=    elseif ($left($2,1) != $chr(35)) {
n796=      scon %bot_say.tmp msg $chan Loading stats for $chr(35) $+ $2 $+ ...
n797=      scon %bot_say.tmp join -n $chr(35) $+ $2
n798=      scon %bot_say.tmp .timer 1 2 getchanusers $chr(35) $+ $2 $chan $nick users
n799=      scon %bot_say.tmp .timer 1 7 .leave $chr(35) $+ $2 Channel stats requested by 2 $nick at4 $chan
n800=    }
n801=    else {
n802=      scon %bot_say.tmp msg $chan Loading stats for $2 $+ ...
n803=      scon %bot_say.tmp join -n $2
n804=      scon %bot_say.tmp .timer 1 2 getchanusers $2 $chan $nick users
n805=      scon %bot_say.tmp .timer 1 7 .leave $2 Channel stats requested by2 $nick at4 $chan
n806=    }
n807=  }
n808=  elseif ($1 == !chanusers && $me == %bot1) {
n809=    scon $bot_say($chan) msg $chan Loading stats for $2 $+ ...
n810=    scon $bot_say($chan) msg $chan 4ERROR: Loading interrupted, already loading stats for2 %gettingstatsnick in4 %gettingstatschan
n811=  }
n812=}
n813=on *:TEXT:!chanfile*:#: {
n814=  if ($me == %bot1 && $1 == !chanfile) {
n815=    if ($chan_log($2)) {
n816=      var %bot_say.tmp $bot_say($chan,5)
n817=      scon $bot_say($chan) msg $chan $iif($chan_ignore($2),4IGNORED 1 $+ $chr(124),$null) Owner:2 $chan_owner($2) 1 $+ $chr(124) Quotes: $iif($chan_quotes($2),9enabled,4disabled) $iif($chan_warns($2),1 $+ $chr(124) Warnings:2 $chan_warns($2) 1( $+ $asctime($chan_warnt($2),dddd dd mmmm) at $asctime($chan_warnt($2),HH:nn:ss) GMT $+ ),$null)
n818=      .timer 1 1 scon $bot_say($chan) msg $chan $iif($chan_ignore($2),4IGNORED 1 $+ $chr(124),$null) Average users:2 $round($chan_avg($2),0) 1(counted $chan_avgc($2) times) 1 $+ $chr(124) Peak:2 $chan_peak($2) 1 $+ $chr(124) Joins:2 $chan_joins($2) 1 $+ $chr(124) Leaves:2 $chan_leaves($2) 1 $+ $chr(124) Bans:2 $chan_bans($2) 1 $+ $chr(124) Kicks:2 $chan_kicks($2)
n819=      .timer 1 2 scon $bot_say($chan) msg $chan $iif($chan_ignore($2),4IGNORED 1 $+ $chr(124),$null) Messages counted:2 $chan_msgs($2) 1 $+ $chr(124) Last message:2 $asctime($chan_lastmsg($2),dddd dd mmmm) at $asctime($chan_lastmsg($2),HH:nn:ss) GMT 1 $+ $chr(124) Last command:2 $asctime($chan_lastcmd($2),dddd dd mmmm) at $asctime($chan_lastcmd($2),HH:nn:ss) GMT
n820=    }
n821=    elseif ($me ison $2) {
n822=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n823=    }
n824=    elseif ($2) {
n825=      scon $bot_say($chan) msg $chan 4ERROR: Usage: !chanfile <opt:channel>
n826=    }
n827=    elseif ($chan_log($chan)) {
n828=      var %bot_say.tmp $bot_say($chan,5)
n829=      scon $bot_say($chan) msg $chan $iif($chan_ignore($chan),4IGNORED 1 $+ $chr(124),$null) Owner:2 $chan_owner($chan) 1 $+ $chr(124) Quotes: $iif($chan_quotes($chan),9enabled,4disabled) $iif($chan_warns($chan),1 $+ $chr(124) Warnings:2 $chan_warns($chan) 1( $+ $asctime($chan_warnt($chan),dddd dd mmmm) at $asctime($chan_warnt($chan),HH:nn:ss) GMT $+ ),$null)
n830=      .timer 1 1 scon $bot_say($chan) msg $chan $iif($chan_ignore($chan),4IGNORED 1 $+ $chr(124),$null) Average users:2 $round($chan_avg($chan),0) 1(counted $chan_avgc($chan) times) 1 $+ $chr(124) Peak:2 $chan_peak($chan) 1 $+ $chr(124) Joins:2 $chan_joins($chan) 1 $+ $chr(124) Leaves:2 $chan_leaves($chan) 1 $+ $chr(124) Bans:2 $chan_bans($chan) 1 $+ $chr(124) Kicks:2 $chan_kicks($chan)
n831=      .timer 1 2 scon $bot_say($chan) msg $chan $iif($chan_ignore($chan),4IGNORED 1 $+ $chr(124),$null) Messages counted:2 $chan_msgs($chan) 1 $+ $chr(124) Last message:2 $asctime($chan_lastmsg($chan),dddd dd mmmm) at $asctime($chan_lastmsg($chan),HH:nn:ss) GMT 1 $+ $chr(124) Last command:2 $asctime($chan_lastcmd($chan),dddd dd mmmm) at $asctime($chan_lastcmd($chan),HH:nn:ss) GMT
n832=
n833=    }
n834=    else {
n835=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n836=    }
n837=  }
n838=}
n839=
n840=alias -l getchanstats {
n841=  ;Syntax: <stats channel> <echo channel> <nick>
n842=  ;Usage: Loads the stats for the <stats channel> and returns it to the <echo channel>. Returns how much people have got which status.
n843=  if ($nick($1,0) != $null) {
n844=    if (%gettingstats == 0) {
n845=      set %gettingstats 1
n846=      set -e %gettingstatschan $2
n847=      set -e %gettingstatsnick $3
n848=      set %ownerinchan 0
n849=      set %protectinchan 0
n850=      set %opinchan 0
n851=      set %hopinchan 0
n852=      set %voiceinchan 0
n853=      set %regularinchan 0
n854=      var %i = 1
n855=      while (%i <= $nick($1,0)) {
n856=        if ($chr(126) isin $nick($1 , %i).pnick) { inc %ownerinchan }
n857=        elseif ($chr(38) isin $nick($1 , %i).pnick) { inc %protectinchan }
n858=        elseif ($chr(64) isin $nick($1 , %i).pnick) { inc %opinchan }
n859=        elseif ($chr(37) isin $nick($1 , %i).pnick) { inc %hopinchan }
n860=        elseif ($chr(43) isin $nick($1 , %i).pnick) { inc %voiceinchan }
n861=        else { inc %regularinchan }
n862=        inc %i
n863=      }
n864=      .timer 1 3 msg $2 Stats loaded!
n865=      {
n866=        if ($nick($1,0) < 10) { .timer 1 4 msg $2 Users0,0........1,0 in channel:0,0...1,0 $nick($1,0) 0,0...1,0 ( $+ $round($calc(100 * $nick($1,0) / $nick($1,0)),2) $+ $chr(37) $+ ) }
n867=        elseif ($nick($1,0) < 100) { .timer 1 4 msg $2 Users0,0........1,0 in channel:0,0...1,0 $nick($1,0) 0,0..1,0 ( $+ $round($calc(100 * $nick($1,0) / $nick($1,0)),2) $+ $chr(37) $+ ) }
n868=        else { .timer 1 4 msg $2 Users0,0........1,0 in channel:0,0...1,0 $nick($1,0) 0,0.1,0 ( $+ $round($calc(100 * $nick($1,0) / $nick($1,0)),2) $+ $chr(37) $+ ) }
n869=      }
n870=      {
n871=        if (%ownerinchan < 10) { .timer 1 5 msg $2 9Owners (~)0,0...1,0 in channel:0,0...9,0 %ownerinchan 0,0...1,0 ( $+ $round($calc(100 * %ownerinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n872=        elseif (%ownerinchan < 100) { .timer 1 5 msg $2 9Owners (~)0,0...1,0 in channel:0,0...9,0 %ownerinchan 0,0..1,0 ( $+ $round($calc(100 * %ownerinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n873=        else { .timer 1 5 msg $2 9Owners (~)0,0...1,0 in channel:0,0...9,0 %ownerinchan 0,0.1,0 ( $+ $round($calc(100 * %ownerinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n874=      }
n875=      {
n876=        if (%protectinchan < 10) { .timer 1 6 msg $2 7Protects (&)0,0.1,0 in channel:0,0...7,0 %protectinchan 0,0...1,0 ( $+ $round($calc(100 * %protectinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n877=        elseif (%protectinchan < 100) { .timer 1 6 msg $2 7Protects (&)0,0.1,0 in channel:0,0...7,0 %protectinchan 0,0..1,0 ( $+ $round($calc(100 * %protectinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n878=        else { .timer 1 6 msg $2 7Protects (&)0,0.1,0 in channel:0,0...7,0 %protectinchan 0,0.1,0 ( $+ $round($calc(100 * %protectinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n879=      }
n880=      {
n881=        if (%opinchan < 10) { .timer 1 7 msg $2 4Ops (@)0,0......1,0 in channel:0,0...4,0 %opinchan 0,0...1,0 ( $+ $round($calc(100 * %opinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n882=        elseif (%opinchan < 100) { .timer 1 7 msg $2 4Ops (@)0,0......1,0 in channel:0,0...4,0 %opinchan 0,0..1,0 ( $+ $round($calc(100 * %opinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n883=        else { .timer 1 7 msg $2 4Ops (@)0,0......1,0 in channel:0,0...4,0 %opinchan 0,0.1,0 ( $+ $round($calc(100 * %opinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n884=      }
n885=      {
n886=        if (%hopinchan < 10) { .timer 1 8 msg $2 2Halfops (%)0,0..1,0 in channel:0,0...2,0 %hopinchan 0,0...1,0 ( $+ $round($calc(100 * %hopinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n887=        elseif (%hopinchan < 100) { .timer 1 8 msg $2 2Halfops (%)0,0..1,0 in channel:0,0...2,0 %hopinchan 0,0..1,0 ( $+ $round($calc(100 * %hopinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n888=        else { .timer 1 8 msg $2 2Halfops (%)0,0..1,0 in channel:0,0...2,0 %hopinchan 0,0.1,0 ( $+ $round($calc(100 * %hopinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n889=      }
n890=      {
n891=        if (%voiceinchan < 10) { .timer 1 9 msg $2 6Voices (+)0,0...1,0 in channel:0,0...6,0 %voiceinchan 0,0...1,0 ( $+ $round($calc(100 * %voiceinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n892=        elseif (%voiceinchan < 100) { .timer 1 9 msg $2 6Voices (+)0,0...1,0 in channel:0,0...6,0 %voiceinchan 0,0..1,0 ( $+ $round($calc(100 * %voiceinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n893=        else { .timer 1 9 msg $2 6Voices (+)0,0...1,0 in channel:0,0...6,0 %voiceinchan 0,0.1,0 ( $+ $round($calc(100 * %voiceinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n894=      }
n895=      {
n896=        if (%regularinchan < 10) { .timer 1 10 msg $2 14Regulars ()0,0..1,0 in channel:0,0...14,0 %regularinchan 0,0...1,0 ( $+ $round($calc(100 * %regularinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n897=        elseif (%regularinchan < 100) { .timer 1 10 msg $2 14Regulars ()0,0..1,0 in channel:0,0...14,0 %regularinchan 0,0..1,0 ( $+ $round($calc(100 * %regularinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n898=        else { .timer 1 10 msg $2 14Regulars ()0,0..1,0 in channel:0,0...14,0 %regularinchan 0,0.1,0 ( $+ $round($calc(100 * %regularinchan / $nick($1,0)),2) $+ $chr(37) $+ ) }
n899=      }
n900=      .timer 1 13 set %gettingstats 0
n901=      .timer 1 13 unset %gettingstatschan
n902=      .timer 1 13 unset %gettingstatsnick
n903=      .timer 1 13 unset %ownerinchan
n904=      .timer 1 13 unset %protectinchan
n905=      .timer 1 13 unset %opinchan
n906=      .timer 1 13 unset %hopinchan
n907=      .timer 1 13 unset %voiceinchan
n908=      .timer 1 13 unset %regularinchan
n909=    }
n910=    else { msg $2 4ERROR: Loading interrupted, already loading stats for2 %gettingstatsnick in4 %gettingstatschan }
n911=  }
n912=  else { msg $2 4ERROR: $1 does not exist }
n913=}
n914=alias -l getchanusers {
n915=  ;Syntax: <stats channel> <echo channel> <nick> <fullstats>
n916=  ;Usage: Loads the stats for the <stats channel> and returns it to the <echo channel>. Returns a list of the channel users without nickalerting.
n917=  ;       Sends a different message when $4 == fullstats: this means channel stats are also loaded - echoes another message
n918=
n919=  set %chanusers Users ( $+ $nick($1,0) $+ ):
n920=  var %i = 1
n921=  while (%i < $nick($1,0)) {
n922=    if ($left($nick($1,%i),1) != [) { set %chanusers %chanusers $left($nick($1,%i),1) $+ $chr(32) $+ $right($nick($1,%i),$calc($len($nick($1,%i))-1)) $+ , }
n923=    elseif ($left($nick($1,%i),1) == [ && $right($nick($1,%i),4) != $chr(124) $+ BNC && $right($nick($1,%i),4) != $chr(124) $+ AFK) { set %chanusers %chanusers $left($nick($1,%i),$calc($len($nick($1,%i))-1)) $+ $chr(32) $+ $right($nick($1,%i),1) $+ , }
n924=    elseif ($right($nick($1,%i),4) == $chr(124) $+ BNC || $right($nick($1,%i),4) == $chr(124) $+ AFK) { set %chanusers %chanusers $left($nick($1,%i),$calc($len($nick($1,%i))-5)) $+ $chr(32) $+ $right($nick($1,%i),5) $+ , }
n925=    inc %i
n926=  }
n927=
n928=  ;added this for dot at end
n929=
n930=  if ($left($nick($1,%i),1) != [) { set %chanusers %chanusers $left($nick($1,%i),1) $+ $chr(32) $+ $right($nick($1,%i),$calc($len($nick($1,%i))-1)) $+ . }
n931=  elseif ($left($nick($1,%i),1) == [ && $right($nick($1,%i),4) != $chr(124) $+ BNC && $right($nick($1,%i),4) != $chr(124) $+ AFK) { set %chanusers %chanusers $left($nick($1,%i),$calc($len($nick($1,%i))-1)) $+ $chr(32) $+ $right($nick($1,%i),1) $+ . }
n932=  elseif ($right($nick($1,%i),4) == $chr(124) $+ BNC || $right($nick($1,%i),4) == $chr(124) $+ AFK) { set %chanusers %chanusers $left($nick($1,%i),$calc($len($nick($1,%i))-5)) $+ $chr(32) $+ $right($nick($1,%i),5) $+ . }
n933=
n934=  if ($4 == fullstats) {
n935=    .timer 1 12 msg $2 $strip( %chanusers )
n936=    .timer 1 14 unset %chanusers
n937=  }
n938=  elseif ($nick($1,0) != $null) {
n939=    if (%gettingstats == 0) {
n940=      set %gettingstats 1
n941=      set -e %gettingstatschan $2
n942=      set -e %gettingstatsnick $3
n943=
n944=      .timer 1 4 msg $2 Stats loaded!
n945=      .timer 1 5 msg $2 $strip( %chanusers )
n946=
n947=      .timer 1 6 set %gettingstats 0
n948=      .timer 1 6 unset %gettingstatschan
n949=      .timer 1 6 unset %gettingstatsnick
n950=
n951=      .timer 1 6 unset %chanusers
n952=    }
n953=    else { msg $2 4ERROR: Loading interrupted, already loading stats for2 %gettingstatsnick in4 %gettingstatschan }
n954=  }
n955=  else { msg $2 4ERROR: $1 does not exist }
n956=}