Event script Automessage and Lookup

[chain]

 

 

;;;;;;****************************;;;;;;

;;;;; Event script by Bielie 2010© ;;;;;

;;;;;;............................;;;;;;

 

 

on $*:text:/^[!.@]event/Si:#:{

  if (%floody [ $+ [ $nick ] ]) { halt }

  set -u3 %floody [ $+ [ $nick ] ] $true

 

  if ($me != Snuffy) && ($chan == #Snuffy) { return }

 

  if ($acc.num($chan,$nick) >= 1) {

    if ($2 == $null) {

      if (!%event [ $+ [ $chan ] ]) { notice $nick There is no event set for $chan $+ . | halt }

      notice $nick The current event for $chan is set to: %event [ $+ [ $chan ] ]

      halt 

    }

    if ($2 == help) {

    notice $nick Event Help: !event set/clear  -> Sets or clears an event. -- !event spam on/off  -> Will spam the event info every  or will turn it off. | halt }

  }

 

  if ($nick !isop $chan) { halt }

 

  if ($2-3 == spam off) { 

    if (!%eventspam [ $+ [ $nick ] ]) { /notice $nick The eventspam option is already off! | halt }  

  notice $nick The eventspam option is now turned OFF. | $+(timer,$chan) off | unset %eventspam [ $+ [ $chan ] ] | halt }

 

  if ($2-3 == spam on) { 

    if (!$4) { notice $nick Please provide the delay in seconds. Syntax: !event spam on  | halt }

    else { 

      if (%eventspam [ $+ [ $nick ] ]) { The eventspam option is already on! | halt }  	

      if (!%event [ $+ [ $chan ] ]) { notice $nick There is no event set for $chan $+ . | halt }

      if ($4 !isnum) { notice $nick Please use only numbers. The delay you entered was $4 $+ . Wich isnt correct. | halt }

      if ($4