on *:TEXT:!event*:?:{
  if (!$2) { notice $nick You have to fill in an event nub. }
  elseif ($nick ishop #biebabeloeba) || ($nick isop #biebabeloeba) { write event.txt 6[2 Event 6]:2 $date(dd/mm/yyyy)6 $2- | notice $nick Thanks for the event. 
  /msg #biebabeloeba 2There has been added an event by4 $nick .2To view event typ 4!event }  
  else msg $nick You aren't a Hop/Op on #biebabeloeba.
}


-----------------------------

on *:TEXT:!event:#biebabeloeba:{ 
  if (%vardata < $date) { msg $chan test baby 
  else msg $chan $read(event.txt,$lines(event.txt))
}