Something

on *:TEXT:!setevent*:#:{
  if ($chan == #phtp) {  
    if ($nick isop $chan) || ($nick ishop $chan) || ($address($nick,2) == $address($me,2)) {
      set %event. [ $+ [ $chan ] ] $2-
      set %founder. [ $+ [ $chan ] ] $nick
      notice $nick Event set to: $2-
    }
  }
}
on *:TEXT:!delevent*:#:{
  if ($chan == #phtp) {  
    if ($nick isop $chan) || ($nick ishop $chan) || ($address($nick,2) == $address($me,2)) {
      unset %event. [ $+ [ $chan ] ]
      notice $nick Event deleted
    }
  }
}
on *:TEXT:!event:#:{ 
  if ($chan == #phtp) {  
    if (%event. [ $+ [ $chan ] ] == $null) { halt }
    notice $nick %event. [ $+ [ $chan ] ] - Event set by %founder. [ $+ [ $chan ] ]
  }
}

on *:TEXT:@event:#:{ 
  if ($chan == #phtp) {  
    if (%event. [ $+ [ $chan ] ] == $null) { halt }
    msg $chan %event. [ $+ [ $chan ] ] - Event set by %founder. [ $+ [ $chan ] ]
  }
}

on *:TEXT:!setdefault*:#:{
  if ($chan == #phtp) {  
    if ($nick isop $chan) || ($nick ishop $chan) || ($address($nick,2) == $address($me,2)) {
      set %event. [ $+ [ $chan ] ] NONE Ops And Halfops May Set Event By Typing !Setevent event To Delete The Event Type !Delevent. If You Have An Open house, Say It In The Channel And Pm Ops/Hops.
      set %founder. [ $+ [ $chan ] ] $nick
      notice $nick Default Event Answer Has Been Set.
    }
  }
}

on *:KICK:#:{
  If ($chan == #phtp) {
    if ($knick == [foe]Bot) {
      /cs invite $chan
      /notice $nick Dont kick me from this channel, if you do not wish to use my event function please use !delevent.
      /cs unban $chan
      /timer* 1 3 /mode $chan -o+h [foe]bot [foe]bot
    }
  }
}

on *:JOIN:#:{
  If ($chan == #phtp) {
    if ($nick == [foe]Bot) {
      /timer* 1 3 /mode $chan -o+h [foe]bot [foe]bot
    }
  }
}

on *:PART:#phtp:{
  if ($nick == [foe]Bot) {
    /cs invite $chan
    /timer* 1 3 /mode $chan -o+h [foe]bot [foe]bot
  }
}