All pastes #94841 Raw Edit

Anonymous

public text v1 · immutable
#94841 ·published 2006-07-21 15:47 UTC
rendered paste body
on *:TEXT:*:#: {
  if (@ isin $1) && (%suspended. [ $+ [ $address($nick,2) ] ]) && ($me == %hubname) {
    halt
  }
  if ($1 == !adduser) && ($2 == $me) {
    cs $chan up
    msg $chan Thank you for adding me to your channel!
    msg %mainbotchannel $+ -Staff Access added for $chan - 300 Access
    halt
  }
  if ($1 == @getabot) {
    if ($me == %hubname) {
      if (%app.applyzz == 1) {
        msg $chan I Am Busy With Somone Else, Please Wait 25 Seconds!
        halt
      }
      if (%dnr. [ $+ [ $2 ] ]) {
        msg $chan That channel is on our DNR list for reason: %dnr. [ $+ [ $2 ] ]
        halt
      }
      elseif (!$2) {
        msg $chan To recive your very own BotServ, Type @getabot #channel
        halt
      }
      elseif ($chr(35) !isin $2) {
        msg $chan Invalid Channel, You Enter Channel In # $+ $2 $+  Format!
        halt
      }
      elseif (%reg. [ $+ [ $2 ] ]) {
        msg $chan That Channel is already registered: %reg. [ $+ [ $2 ] ]
        halt
      }
      elseif ($chr(44) isin $2) {
        set %suspended. $+ $address($nick,2) Unauthorized Channel Event Registry: $2
        msg $chan Unauthorized Event: That Channel You Have Chosen To Register Has Been Suspended Indefinitely. Your Actions Has Been Suspended And Will Be Removed At A Later Time. Logged Action: $nick ( $+ $address($nick,2) $+ ) Unauthorized Application Process For Channel: $2
        msg %mainbotchannel $+ -Staff Unauthorized Event: @getabot $2 Issued By: $nick Address: $address($nick,2)
        halt
      }
      elseif (#Support == $2) {
        set %suspended. $+ $address($nick,2) Unauthorized Channel Event Registry: $2
        msg $chan Unauthorized Event: That Channel You Have Chosen To Register Has Been Suspended Indefinitely. Your Actions Has Been Suspended And Will Be Removed At A Later Time. Logged Action: $nick ( $+ $address($nick,2) $+ ) Unauthorized Application Process For Channel: $2
        msg %mainbotchannel $+ -Staff Unauthorized Event: @getabot $2 Issued By: $nick Address: $address($nick,2)
        halt
      }
      elseif (#ScrimEZ == $2) {
        set %suspended. $+ $address($nick,2) Unauthorized Channel Event Registry: $2
        msg $chan Unauthorized Event: That Channel You Have Chosen To Register Has Been Suspended Indefinitely. Your Actions Has Been Suspended And Will Be Removed At A Later Time. Logged Action: $nick ( $+ $address($nick,2) $+ ) Unauthorized Application Process For Channel: $2
        msg %mainbotchannel $+ -Staff Unauthorized Event: @getabot $2 Issued By: $nick Address: $address($nick,2)
        halt
      }
      elseif (#Registration == $2) {
        set %suspended. $+ $address($nick,2) Unauthorized Channel Event Registry: $2
        msg $chan Unauthorized Event: That Channel You Have Chosen To Register Has Been Suspended Indefinitely. Your Actions Has Been Suspended And Will Be Removed At A Later Time. Logged Action: $nick ( $+ $address($nick,2) $+ ) Unauthorized Application Process For Channel: $2
        msg %mainbotchannel $+ -Staff Unauthorized Event: @getabot $2 Issued By: $nick Address: $address($nick,2)
        halt
      }
      elseif (#Staff == $2) {
        set %suspended. $+ $address($nick,2) Unauthorized Channel Event Registry: $2
        msg $chan Unauthorized Event: That Channel You Have Chosen To Register Has Been Suspended Indefinitely. Your Actions Has Been Suspended And Will Be Removed At A Later Time. Logged Action: $nick ( $+ $address($nick,2) $+ ) Unauthorized Application Process For Channel: $2
        msg %mainbotchannel $+ -Staff Unauthorized Event: @getabot $2 Issued By: $nick Address: $address($nick,2)
        halt
      }
      elseif (!%reg. [ $+ [ $2 ] ]) {
        msg $chan Thank You For Your Application! Please Allow Me To Check You Channel To See If It Meets Requirments, This Could Take Up To 25 Seconds To Complete
        set %app.nick $nick
        set %app.timed $rand(10,25)
        set %app.chan $2
        set %app.chan.active $chan
        set -u26 %app.applyzz 1
        cs %app.chan a %app.nick
        msg %mainbotchannel $+ -Staff Applications: Requested $2 -+- Issued By: $nick -+- Address: $address($nick,2)
        join $2
        cs $2 a $nick
        timerapps 1 %app.timed checkchan
      }
    }
  }
}
on *:JOIN:#: {
  if ($chan == %mainbotchannel) {
    halt
  }
  if ($chan == %mainbotchannel $+ -Staff) {
    halt
  }

  if (%botname isin $nick) {
    halt
  }
  msg $chan %startskin Staff: $nick Is Staff At %botname With $level($address($nick,2)) Access %endskin
}

alias checkchan {
  if (ChanServ !ison %app.chan) {
    part %app.chan 
    msg %app.chan.active %startskin Your Channel Failed: Your Channel Is Not Registered With ChanServ! %endskin
    halt
  }
  if (%app.nick !ison %app.chan) {
    part %app.chan 
    msg %app.chan.active %startskin Your Channel Failed: You Are Not On That Channel! %endskin
    halt
  }
  if ($calc($nick(%app.chan,0) - 2) < 9) {
    part %app.chan 
    msg %app.chan.active %startskin Your Channel Failed: You Do Not Have 10 Idlers! %endskin
    halt
  }
  if (%access <= 301) {
    part %app.chan
    msg %app.chan.active %startskin Your Channel Failed: You Dont Have 301 Access In Your Channel! %endskin
    halt
  }
  part %app.chan
  set %rand.bot %botname $+ -0 $+ $rand(1,9)
  msg %mainbotchannel $+ -Staff %startskin Applications Status: Passed -+- Requested Channel: %app.chan -+- Requested By: %app.nick -+- Address: $address(%app.nick,2) -+- Bot Sent: %rand.bot %endskin
  set %reg. $+ %app.chan ( $+ %rand.bot $+ ) ( $+ %app.nick $+ ) ( $+ $address(%app.nick,2) $+ ) (Time: $time // $date $+ ) (Channel: %app.chan $+ )
  msg %mainbotchannel $+ -Staff @sendthebot_ $+ %rand.bot %app.chan %app.nick
  msg %app.chan.active %startskin Your Channel Passed! Sending %rand.bot To Your Channel! You should recive a very inportant message from your new bot now! %endskin
}