chancontrol.ini

[script]
n0=on 500,543:TEXT:*:#: { halt }
n1=on *:TEXT:!chanset*:#: {
n2=  if ($me == %bot1 && $1 == !chanset) {
n3=    if ($nick == %owner) {
n4=      if ($chan_log($2)) {
n5=        if ($readini(channels\ $+ $2 $+ .ini,n,stats,$3) != $null) {
n6=          if ($4 != $null) {
n7=            msg $chan Successfully changed2 $3 1from4 $readini(channels\ $+ $2 $+ .ini,n,stats,$3) 1to4 $4 1(7 $+ $2 $+ 1)
n8=            writeini channels\ $+ $2 $+ .ini Stats $3 $4
n9=          }
n10=          else {
n11=            scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !chanset <channel> <mode> <setting>
n12=          }
n13=        }
n14=        elseif ($readini(channels\ $+ $2 $+ .ini,n,settings,$3) != $null) {
n15=          if ($4 != $null) {
n16=            msg $chan Successfully changed2 $3 1from4 $readini(channels\ $+ $2 $+ .ini,n,settings,$3) 1to4 $4 1(7 $+ $2 $+ 1)
n17=            writeini channels\ $+ $2 $+ .ini Settings $3 $4
n18=          }
n19=          else {
n20=            scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !chanset <channel> <mode> <setting>
n21=          }
n22=        }
n23=        elseif ($readini(channels\ $+ $2 $+ .ini,n,disabled,$3) != $null) {
n24=          if ($4 != $null) {
n25=            msg $chan Successfully changed2 $3 1from4 $readini(channels\ $+ $2 $+ .ini,n,disabled,$3) 1to4 $4 1(7 $+ $2 $+ 1)
n26=            writeini channels\ $+ $2 $+ .ini Disabled $3 $4
n27=          }
n28=          else {
n29=            scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !chanset <channel> <mode> <setting>
n30=          }
n31=        }
n32=        elseif ($readini(channels\ $+ $2 $+ .ini,n,control,$3) != $null) {
n33=          if ($4 != $null) {
n34=            msg $chan Successfully changed2 $3 1from4 $readini(channels\ $+ $2 $+ .ini,n,control,$3) 1to4 $4 1(7 $+ $2 $+ 1)
n35=            writeini channels\ $+ $2 $+ .ini Control $3 $4
n36=          }
n37=          else {
n38=            scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !chanset <channel> <mode> <setting>
n39=          }
n40=        }
n41=        elseif ($3) {
n42=          scon $bot_say($chan) msg $chan 4ERROR:1 $3 is not a valid setting
n43=        }
n44=        else {
n45=          scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !chanset <channel> <mode> <setting>
n46=        }
n47=      }
n48=      elseif ($me ison $2) {
n49=        scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n50=      }
n51=      elseif ($2) {
n52=        scon $bot_say($chan) msg $chan 4ERROR:1 $2 is not a valid channel
n53=      }
n54=      else {
n55=        scon $bot_say($chan) msg $chan 4ERROR:1 Usage: !chanset <channel> <mode> <setting>
n56=      }
n57=    }
n58=    else {
n59=      scon $bot_say($chan) msg $chan 4ERROR:1 You are not authorised to use this command
n60=    }
n61=  }
n62=}
n63=on *:TEXT:!enable*:#: {
n64=  if ($me == %bot1 && $1 == !enable) {
n65=    if ($chan_log($chan)) {
n66=      if ($2) {
n67=        if ($2 == quotes) {
n68=          if ($nick == $chan_owner($chan) || $nick == %owner) {
n69=            if (!$chan_quotes($chan)) {
n70=              writeini channels\ $+ $chan $+ .ini Settings quotes 1
n71=              scon $bot_say($chan) msg $chan Successfully 9enabled1 quotes on $chan
n72=            }
n73=            else {
n74=              scon $bot_say($chan) msg $chan 4ERROR:1 Quotes are already enabled on this channel
n75=            }
n76=          }
n77=          else {
n78=            scon $bot_say($chan) msg $chan 4ERROR:1 You are not authorised to use that command here
n79=          }
n80=        }
n81=        else {
n82=          scon $bot_say($chan) msg $chan 4ERROR:1 $2 isn't a known mode
n83=        }
n84=      }
n85=      else {
n86=        scon $bot_say($chan) msg $chan 4ERROR:1 !enable <mode>. Modes are: quotes
n87=      }
n88=    }
n89=    else {
n90=      scon $bot_say($chan) msg $chan 4ERROR:1 We aren't currently logging any data for this channel. Contact %owner to activate this feature.
n91=    }
n92=  }
n93=}
n94=on *:TEXT:!disable*:#: {
n95=  if ($me == %bot1 && $1 == !disable) {
n96=    if ($chan_log($chan)) {
n97=      if ($2) {
n98=        if ($2 == quotes) {
n99=          if ($nick == $chan_owner($chan) || $nick == %owner) {
n100=            if ($chan_quotes($chan)) {
n101=              writeini channels\ $+ $chan $+ .ini Settings quotes 0
n102=              scon $bot_say($chan) msg $chan Successfully 4disabled1 quotes on $chan
n103=            }
n104=            else {
n105=              scon $bot_say($chan) msg $chan 4ERROR:1 Quotes are already disabled on this channel
n106=            }
n107=          }
n108=          else {
n109=            scon $bot_say($chan) msg $chan 4ERROR:1 You are not authorised to use that command here
n110=          }
n111=        }
n112=        else {
n113=          scon $bot_say($chan) msg $chan 4ERROR:1 $2 isn't a known mode
n114=        }
n115=      }
n116=      else {
n117=        scon $bot_say($chan) msg $chan 4ERROR:1 !disable <mode>. Modes are: quotes
n118=      }
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=}