on *:TEXT:!setevent*:#:{
  if (%event. [ $+ [ $chan ] ]) {
    notice $nick there is a event currently set for this channel. Please remove the event to Create another one. 
  }
  else {
    set %event. [ $+ [ $chan ] ] $2-
    notice $nick The Current event is: %event. [ $+ [ $chan ] ] 
  }
}
on *:TEXT:!delevent:#:{
  if (%event. [ $+ [ $chan ] ]) {
    unset %event. [ $+ [ $chan ] ]
    notice $nick deleted event.
  }
  else {
    notice $nick This channel has not no events running. Please type !setevent to make a new event.
  }
}
on *:TEXT:!event*:#:{
  if (%event. [ $+ [ $chan ] ]) {
    notice $nick %event. [ $+ [ $chan ] ]
  }
  else {
    notice $nick This channel has not no events running. Please type !setevent to make a new event.
  }
}