on *:TEXT:!setevent*:#*: { 
  if (($nick isop $chan || $nick ishop $chan) { 
    set %event $2- 
    set %pcnick $nick 
    msg $chan 2The comming Event is 4[- %event -]. 
  } 
}
on *:text:!event*:#*: { 
  msg $chan 2The comming Event is 4[- %event -]. 
} 
on *:text:!pcw*:#*: { 
  msg $chan 2The comming Event is 4[- %event -].
}