User:Technical 13/SandBox/mIRC scripts/Kobold Fart

<css> div#contentSub2 span {

   display: inline;
   float: right;

</css>

⇑   ⇑   Back to top   ⇑   ⇑

General

Journal

Sand Box

To Do List

Characters

Quest List

Crafting

Talk

SandBox	mIRC scripts	Notepad++ UDLs	AutoHotKey

;--- Kobold Fart --
on *:TEXT:!Fart:* {
  if (%quote.flood == $null) {
    if ($chan == #DDOwiki) {
      inc %DDOfart
      /ame lets loose his $ord(%DDOfart) fart.  $me thinks it is funny and giggles.
      /set -u60 %DeadlyFart $rand(1,16)
      /onotice $chan %DeadlyFart / 16 
      if (%DeadlyFart == 1) {
        /set %DeadlyFart_Loop $nick($chan,0)
        /set %DeadlyFart_Nick $nick($chan,%DeadlyFart_Loop)
        /set %DeadlyFart_Kicked 0
        while (%DeadlyFart_Loop > 0) {
          if ((%DeadlyFart_Nick !isprotect $chan) && (%DeadlyFart_Nick !isop $chan) && (%DeadlyFart_Nick !ishop $chan) && (%DeadlyFart_Nick != $nick)) {
            /kick $chan %DeadlyFart_Nick Boom! That was one nasty fart!
            /inc %DeadlyFart_Kicked
          }
          /dec %DeadlyFart_Loop
          /set %DeadlyFart_Nick $nick($chan,%DeadlyFart_Loop)
        }
        if (%DeadlyFart_Kicked > 1) { /set %DeadlyFart_Person people }
        else { /set %DeadlyFart_Person person }
        if ((%DeadlyFart_Nick !isprotect $chan) && ($nick !isop $chan) && ($nick !ishop $chan)) { /kick $chan $nick Boom! You took out %DeadlyFart_Kicked other %DeadlyFart_Person by making $me fart! :0 }
        else { /msg $chan Boom! $nick took out %DeadlyFart_Kicked %DeadlyFart_Person by making $me fart! :0 }
        if (Kobold_Jester ison $chan) { /notice Kobold_Jester Deadly fart. }
        /unset %DeadlyFart*
      }
    }
    if ($chan == #TORwiki) { /notice $nick You may have more luck trying to be one with the �!Force� ;-) }
  }
  set -u2 %quote.flood on
}