Anonymous

on $*:TEXT:/[!@.](Event)off/Si:#:{ 
  if ($readini(EVENT.ini,$chan,Status) == OFF) {
    notice $nick 12You cant turn soemthing off that is not on.
    halt
  }
  if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    remini EVENT.ini $chan
    writeini EVENT.ini $chan Status OFF
    msg $chan 12The Event services have been halted by4 $nick 
    halt
  }
  else {
    notice $nick 12You must be Halfop Plus to use this command.
  }
}
on $*:TEXT:/[!@.](Event)On/Si:#:{ 
  if (($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) && ($readini(PCW.ini,$chan,Status) == OFF)) {
    remini PCW.ini $chan
    msg $chan 12The Event services have been continued by4 $nick 
    halt
  }
  if ($readini(PCW.ini,$chan,Status) != OFF) {
    notice $nick 12You cant turn ON whats not off.
    halt
  }
  else {
    notice $nick 12You must be 4Halfop12 Plus to use this command.
  }
}
on $*:TEXT:/[!@.](Eventset)/Si:#:{
  if ($readini(PCW.ini,$chan,Status) == OFF) { halt }
  if ($3 != $null) { halt }
  if (!$2) {
    notice $nick 4Error:12 $1 <Event> 
    halt
  }
  if (($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) && ($2 isnum 2-138)) {
    writeini EVENT.ini $chan Event $2
    writeini EVENT.ini $chan Nick $nick
    writeini EVENT.ini $chan Time $CTime
    msg $chan 12The Event has been changed by4 $nick 
    halt
  }
  if ($nick isvoice $chan || $nick isreg $chan) {
    notice $nick 12You must be Halfop Plus to use this command.
    halt
  }
}
}
on $*:TEXT:/[!@.](Event)/Si:#:{ 
if (OFF isin $1 || ON isin $1) { halt }
if ($readini(EVENT.ini,$chan,Status) == OFF) { halt }
if ($readini(EVENT.ini,$chan,World) == $null) { 
  notice $nick 12There is no set event.
  halt
}
if ($nick !isreg $chan) {
  writeini EVENT.ini $chan Users $calc($readini(PCW.ini,$chan,Users) + 1)
  notice $nick 13The Current Event Is4 $readini(EVENT.ini,$chan,Event) 13Set by4 $readini(Event.ini,$chan,Nick) 13 $+ $duration($calc($CTime - $readini(EVENT.ini,$chan,Time))) ago. 4 $+ $chr(187) $+ 13 $+ $readini(EVENT.ini,$chan,Users) $+ 4 $+ $chr(171) 
  halt
}
else {
  notice $nick 12I only allow voices to view the 4Event
}
}
On $*:TEXT:/[!@.]Stop(Event)/Si:#:{ 
if ($readini(PCW.ini,$chan,Status) == OFF) { halt }
if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
  remini PCW.ini $chan
  msg $chan 12All Event files for4 $chan 12 have been deleted.
  halt
}
if ($readini(EVENT.ini,$chan,EVENT) == $null) { 
  notice $nick 12You cant turn Stop whats not there.
  halt
}
else {
  notice $nick 12You must be Halfop Plus to use this command.
}
}