Anonymous

on *:text:!setevent*:#: {
  if ($nick isop $chan) {
    if 
    inc %event.inc
    set %event [ $+ [ $chan [ $+ [ %event.inc ] ] ] ] $replace($2,-,$chr(32))
    set %enoticer [ $+ [ $chan [ $+ [ %event.inc ] ] ] ] $nick
    msg $chan 14An event has been updated! Type 12!event14 to see it!
    if (-t isin $3-) {
      if (-w isin $3) {
        set %etime [ $+ [ $chan [ $+ [ %event.inc ] ] ] ] $remove($4-,-t)
        set %eworld [ $+ [ $chan [ $+ [ %event.inc ] ] ] ] $remove($3,-w)
      }
      else set %etime [ $+ [ $chan [ $+ [ %event.inc ] ] ] ] $remove($3-,-t)
    }
    else set %etime [ $+ [ $chan [ $+ [ %event.inc ] ] ] ] $time
  }
  elseif ($nick !isop $chan) {
    Notice $nick 14You can't use this command with your 12status.
  }
}