All pastes #899449 Raw Edit

dab

public text v1 · immutable
·published 2008-02-11 03:18 UTC
rendered paste body

on *:CONNECT:{
  msg NickServ IDENTIFY *SNIP*

  if ($me == dab2) {
    /msg nickserv ghost dab *SNIP*
    /timer 0 1 /nick dab
    /timer 0 2 /msg NickServ IDENTIFY *SNIP*


  }

}

on *:JOIN:#:{

  if (%users. [ $+ [ $nick ] ] == true) && ((# == #dab) || (# == #dab.echo) || (# == #dab.admin))  {
    mode # %users.priv. [ $+ [ $nick ] ] $nick
  }


  if ($nick == DaBot) && ((# == #dab) || (# == #dab.echo )) {
    mode # +o $nick
  }

}
on *:PART:#:{

}

on *:TEXT:!identify:#:{
  if ($nick == dab) || ($nick ==  DaBot) || ($nick == dabbers) {
    msg NickServ IDENTIFY *SNIP*
  }
}
on *:TEXT:!mode *:#:{
  if ($nick == dab) || ($nick ==  DaBot)  || ($nick ==  dabbers) {
    mode $chan $2-
  }
}

on *:TEXT:!hl *:#:{
  notice $2 $nick is wanting to talk with you in the channel: $chan !
  msg $chan Success!
}

on *:TEXT:!date:#:{
  if (dab isin $nick) {
    msg # Date: $replace($date, /, -)
  }
}

on *:TEXT:*:#dab.beta:{
  if ($nick == dabMTAEcho) {
    if ($2 == talk) {
      msg #dab.beta !say Hmmz..
    }
  }
}
on *:TEXT:!ip:#:{
  msg # My IP is: $ip
}
On *:TEXT:!uptime*:#: { if ($nick isop #) { /msg $chan Uptime: $replace($duration($calc($ticks / 1024)),week,wks,days,days,day,day,hours,hrs,hour,hr,mins,ms,min,m)) } } 

on *:TEXR:!duptime:#: {
  msg # $uptime(system,1)
}


on *:TEXT:!echo *:#:{
  if ($nick == dab) || ($nick == DaBot) || ($nick == dabbers) {
    msg # $2-
  }
}
on *:TEXT:!djoin *:#:{
  if ($nick == dab) || ($nick == DaBot) || ($nick == dabbers) {
    join $2-
  }
}
on *:TEXT:!decho *:#:{
  if ($nick == dab) || ($nick == DaBot) || ($nick == dabbers) {
    /set %addecho $2
    if ($2 == on) {
      mode #dab.beta +pi
    }
    if ($2 == off) {
      mode #dab.beta -pi
    }
  }
}
on *:TEXT:!dleave *:#:{
  if ($nick == dab) || ($nick == DaBot) || ($nick == dabbers) {
    leave $2-
  }
}

on *:TEXT:!*_sucks:#:{
  if (dab isin $1) { halt }
  if (DaBot isin $1) { halt }  
  msg # 4 $remove($1, _sucks, !) sure does </3

}

on *:TEXT:!dnick *:#:{
  if ($nick == dab) || ($nick == DaBot) || ($nick == dabbers) {
    nick $2-
  }
}

on *:TEXT:!dinvite *:#:{
  if ($nick == dab) || ($nick == DaBot) || ($nick == dabbers) {
    invite $2- #
  }
}
on *:TEXT:!cecho *:#:{
  if ($nick == dab) || ($nick == DaBot) || ($nick == dabbers) {
    msg $2 $3-
  }
}



on *:TEXT:Echo filterscript created by tommy4 unloaded...:#dab.echo:{
  /fopen -o clear %dir $+ echo.txt
  /fclose clear
  fopen -o clear %dir $+ admin.txt
  /fclose clear
  /fopen -o clear %dir $+ irc.txt
  /fclose clear
}


on *:TEXT:!topic *:#:{
  if ($nick isop #) && ($me isop #) {
    /cs TOPIC # $2-
  }
}


on *:TEXT:!calc *:#:{
  msg # The answer is: $calc($replace($2-, dab, 100))
}
on *:TEXT:!addop *:#:{
  if ($nick isop #) {
    /cs OP #dab $2
    /cs OP #dab.echo $2     
    /set $+(%,users,.,$2) true
    /set $+(%,users,.,priv,.,$2) o
    msg # $2 has been added    
  }
}
on *:TEXT:!subop *:#:{
  if ($nick isop #) {
    /cs DEOP #dab $2
    /cs DEOP #dab.echo $2 
    /set $+(%,users,.,$2) true
    /set $+(%,users,.,priv,.,$2)  
  }
}
on *:TEXT:!addv *:#:{
  if ($nick isop #) {
    /cs VOICE #dab $2
    /cs VOICE #dab.echo $2 
    /set $+(%,users,.,$2) true
    /set $+(%,users,.,priv,.,$2) v
    msg # User has been added
  }
}
on *:TEXT:!subv *:#:{
  if ($nick isop #) {
    /cs DEVOICE #dab $2
    /cs DEVOICE #dab.echo $2 
    /set $+(%,users,.,$2) true
    /set $+(%,users,.,priv,.,$2) 
  }
}