:::::::::::::::::::::::::::::::::::::::::::::
::                                         ::
:: Credits:                                ::
::                                         ::
:: Punk0wns You, Slotter In for scripting. ::
:: Slotter In, Rockfoil for the idea.      ::
::                                         ::
:: This is Version 2.6                     ::
::                                         ::
:::::::::::::::::::::::::::::::::::::::::::::

alias set {
  if ($1 == status) && ($2 == online) {
    set %setstatus online
    echo -ta Status is now set to 03ONLINE. Your event scripts are now 03active.
  }
  if ($1 == status) && ($2 == offline) {
    set %setstatus offline
    echo -ta Status is now set to 04OFFLINE. Your event scripts are now 04inactive.
  }
  elseif ($1 == event) && ($2 == friday) {
    set %event.fri $3-
    echo -ta The event for Friday is set to: $3-
  }
  elseif ($1 == event) && ($2 == saturday) {
    set %event.sat $3-
    echo -ta The event for Saturday is set to: $3-
  }
  elseif ($1 == event) && ($2 == sunday) {
    set %event.sun $3-
    echo -ta The event for Sunday is set to: $3-
  }
  elseif ($1 == unoevent) && ($2 == monday) {
    set %event.unomon $3-
  }
  elseif ($1 == unoevent) && ($2 == tuesday) {
    set %event.unotue $3-
  }
  elseif ($1 == unoevent) && ($2 == wednesday) {
    set %event.unowed $3-
  }
  elseif ($1 == unoevent) && ($2 == thursday) {
    set %event.unothu $3-
  }
  elseif ($1 == unoevent) && ($2 == friday) {
    set %event.unofri $3-
  }
  elseif ($1 == unoevent) && ($2 == saturday) {
    set %event.unosat $3-
  }
  elseif ($1 == unoevent) && ($2 == sunday) {
    set %event.unosun $3-
  }
}

on $*:TEXT:*:#demonicempire:{
  if ($1 == .event) && ($2- == $null) && (%setstatus == online) {
    notice $nick The event for Friday is: %event.fri
    notice $nick The event for Saturday is: %event.sat
    notice $nick The event for Sunday is: %event.sun
  }
  if ($1 == *event) && ($2- == $null) {
    notice $nick The unofficial event for Monday is: %event.unomon
    notice $nick The unofficial event for Tuesday is: %event.unotue
    notice $nick The unofficial event for Wednesday is: %event.unowed
    notice $nick The unofficial event for Thursday is: %event.unothu
    notice $nick The unofficial event for Friday is: %event.unofri
    notice $nick The unofficial event for Saturday is: %event.unosat
    notice $nick The unofficial event for Sunday is: %event.unosun
  }
  if ($1 == .event) && ($2- == friday) {
    notice $nick The event for Friday is: %event.fri
  }
  if ($1 == *event) && ($2- == friday) {
    notice $nick The unofficial event for Friday is: %event.unofri
  }
  if ($1 == *event) && ($2- == monday) {
    notice $nick The unofficial event for Monday is: %event.unomon
  }
  if ($1 == *event) && ($2- == tuesday) {
    notice $nick The unofficial event for Tuesday is: %event.unoteu
  }
  if ($1 == *event) && ($2- == wednesday) {
    notice $nick The unofficial event for Wednesday is: %event.unowed
  }
  if ($1 == *event) && ($2- == thursday) {
    notice $nick The unofficial event for Thursday is: %event.unothur
  }
  if ($1 == .event) && ($2- == saturday) {
    notice $nick The event for Saturday is: %event.sat
  }
  if ($1 == *event) && ($2- == saturday) {
    notice $nick The unofficial event for Saturday is: %event.unosat
  }
  if ($1 == .event) && ($2- == sunday) {
    notice $nick The event for Sunday is: %event.sun
  }
  if ($1 == *event) && ($2- == sunday) {
    notice $nick The unofficial event for Sunday is: %event.unosun
  }
  if ($1 == *status) && ($nick !ishop $chan) || ($1 == *status) && ($nick !isop $chan) {
    if ($nick ishop $chan) && ($nick !isop $chan) { halt }
    if ($nick isop $chan) && ($nick !ishop $chan) { halt }
    notice $nick Sorry but you will need 07%halfop/04@operator status to use the message channel commands. This is to reduce any spam.
  }
  if ($1 == .event) && (%setstatus == offline) || ($1 == *event) && (%setstatus == offline) { 
    notice $nick Sorry, my EventScript status is currently 04OFFLINE. So my EventScript is inactive. To set the script 03ONLINE please type: .set online.
  }
  if ($1 == .status) && ($2- == $null) && (%setstatus == online) {
    notice $nick My EventScript status currently is 03ONLINE. To set the EventScript 04OFFLINE please type: .set offline.
  }
  if ($1 == .status) && ($2- == $null) && (%setstatus == offline) {
    notice $nick My EventScript status currently is 04OFFLINE. To set the EventScript 03ONLINE please type: .set online.
  }
  if ($nick isop $chan) && ($1 == .set) && ($2 == event) && ($3 == friday) {
    set event friday $4-
    notice $nick The event for Friday is set to: $4-
    msg $chan The event for Friday is changed! Type .event friday to view, or .event to view all the events this week. .event cmd for my event commands.
  }
  if ($nick isop $chan) && ($1 == .set) && ($2 == event) && ($3 == saturday) {
    set event saturday $4-
    notice $nick The event for Saturday is set to: $4-
    msg $chan The event for Saturday is changed! Type .event saturday to view, or .event to view all the events this week. .event cmd for my event commands.
  }
  if ($nick isop $chan) && ($1 == *set) && ($2 == unoevent) && ($3 == saturday) {
    set unoevent saturday $4-
    notice $nick The unofficial event for Saturday is set to: $4-
    msg $chan The unofficial event for Saturday is changed! Type *event saturday to view, or *event to view all the events this week. .event cmd for my event commands.
  }
  if ($nick isop $chan) && ($1 == *set) && ($2 == unoevent) && ($3 == sunday) {
    set unoevent sunday $4-
    notice $nick The unofficial event for Sunday is set to: $4-
    msg $chan The unofficial event for Sunday is changed! Type *event sunday to view, or *event to view all the events this week. .event cmd for my event commands.
  }
  if ($nick isop $chan) && ($1 == *set) && ($2 == unoevent) && ($3 == monday) {
    set unoevent monday $4-
    notice $nick The unofficial event for Monday is set to: $4-
    msg $chan The unofficial event for Monday is changed! Type *event monday to view, or *event to view all the events this week. .event cmd for my event commands.
  }
  if ($nick isop $chan) && ($1 == *set) && ($2 == unoevent) && ($3 == tuesday) {
    set unoevent tuesday $4-
    notice $nick The unofficial event for Tuesday is set to: $4-
    msg $chan The unofficial event for Tuesday is changed! Type *event tuesday to view, or *event to view all the events this week. .event cmd for my event commands.
  }
  if ($nick isop $chan) && ($1 == *set) && ($2 == unoevent) && ($3 == wednesday) {
    set unoevent wednesday $4-
    notice $nick The unofficial event for Wednesday is set to: $4-
    msg $chan The unofficial event for Wednesday is changed! Type *event wednesday to view, or *event to view all the events this week. .event cmd for my event commands.
  }
  if ($nick isop $chan) && ($1 == *set) && ($2 == unoevent) && ($3 == thursday) {
    set unoevent thursday $4-
    notice $nick The unofficial event for Thursday is set to: $4-
    msg $chan The unofficial event for Thursday is changed! Type *event thursday to view, or *event to view all the events this week. .event cmd for my event commands.
  }
  if ($nick isop $chan) && ($1 == *set) && ($2 == unoevent) && ($3 == friday) {
    set unoevent friday $4-
    notice $nick The unofficial event for Friday is set to: $4-
    msg $chan The unofficial event for Friday is changed! Type *event friday to view, or *event to view all the events this week. .event cmd for my event commands.
  }
  if ($nick isop $chan) && ($1 == .set) && ($2 == event) && ($3 == sunday) {
    set event sunday $4-
    notice $nick The event for Sunday is set to: $4-
    msg $chan The event for Sunday is changed! Type .event sunday to view, or .event to view all the events this week.
  }
  if ($nick !isop $chan) && ($1 == .set) {
    notice $nick Sorry, you will need 04@operator status to use the .set commands.
  }
  if ($nick !isop $chan) && ($1 == *set) {
    notice $nick Sorry, you will need 04@operator status to use the *set commands.
  }
  if ($1 == .link) && ($2 == forums) {
    notice $nick The link for Demonic Empire forums is: http://z6.invisionfree.com/Demonic_Empire/index.php
    notice $nick If you cannot see the link and only *'s, please type: /mode yourname -f, and then try again.
  }
  if ($1 == .link) && ($2 == memberlist) || ($2 == ml) {
    notice $nick The link for Demonic Empire's memberlist is: http://www.runehead.com/clans/ml.php?clan=rsde
    notice $nick If you cannot see the link and only *'s, please type: /mode yourname -f, and then try again.
  }
  if ($1 == .link) && ($2 == website) || ($2 == web) {
    notice $nick The link for Demonic Empire's website is: http://members.shaw.ca/demonic_empire/main.htm
    notice $nick If you cannot see the link and only *'s, please type: /mode yourname -f, and then try again.
  }
  if ($1 == .link) && ($2 == ts) || ($2 == teamspeak) {
    notice $nick The link for Demonic Empire's teamspeak is: 74.58.251.237:8767 (4Backup: 24.159.111.195:8767)
  }
  if ($1 == .link) && ($2 == chatrules) || ($2 == rules) {
    notice $nick The link for Demonic Empire's Chatrules is: http://z6.invisionfree.com/Demonic_Empire/index.php?showtopic=18025
    notice $nick If you cannot see the link and only *'s, please type: /mode yourname -f, and then try again.
  }
  if ($nick isop $chan) && ($1 == .set) && ($2 == online) {
    notice $nick EventScript: 03ONLINE. My event script is now active, for info: .event cmd.
    msg $chan My EventScript is now 03ONLINE. For info type: .event cmd.
    set status online
  }
  if ($nick isop $chan) && ($1 == .set) && ($2 == offline) {
    notice $nick EventScript: 04OFFLINE. My scripts are now inactive.
    msg $chan My EventScript is now 04OFFLINE. My scripts are now inactive.
    set status offline
  }
}

on *:INPUT:*:{ 
  if ($1 == .event) && ($2- == $null) {
    echo -ta The event for Friday is: %event.fri
    echo -ta The event for Saturday is: %event.sat
    echo -ta The event for Sunday is: %event.sun
  }
  if ($1 == *event) && ($me isop $chan) && ($2- == $null) {
    msg $chan The event for Friday is: %event.fri
    msg $chan The event for Saturday is: %event.sat
    msg $chan The event for Sunday is: %event.sun
  }
  if ($1 == *event) && ($2- == $null) {
    echo -ta The unofficial event for Monday is: %event.unomon
    echo -ta The unofficial event for Tuesday is: %event.unotue
    echo -ta The unofficial event for Wednesday is: %event.unowed
    echo -ta The unofficial event for Thursday is: %event.unothu
    echo -ta The unofficial event for Friday is: %event.unofri
    echo -ta The unofficial event for Saturday is: %event.unosat
    echo -ta The unofficial event for Sunday is: %event.unosun
  }
  if ($1 == .event) && ($2- == friday) {
    echo -ta The event for Friday is: %event.fri
  }
  if ($1 == *event) && ($2- == friday) {
    echo -ta The unofficial event for Friday is: %event.unofri
  }
  if ($1 == *event) && ($2- == monday) {
    echo -ta The unofficial event for Monday is: %event.unomon
  }
  if ($1 == *event) && ($2- == tuesday) {
    echo -ta The unofficial event for Monday is: %event.unoteu
  }
  if ($1 == *event) && ($2- == wednesday) {
    echo -ta The unofficial event for Monday is: %event.unowed
  }
  if ($1 == *event) && ($2- == thursday) {
    echo -ta The unofficial event for Monday is: %event.unothur
  }
  if ($1 == .event) && ($2- == saturday) {
    echo -ta The event for Saturday is: %event.sat
  }
  if ($1 == *event) && ($2- == saturday) {
    echo -ta The unofficial event for Saturday is: %event.unosat
  }
  if ($1 == .event) && ($2- == sunday) {
    echo -ta The event for Sunday is: %event.sun
  }
  if ($1 == *event) && ($2- == sunday) {
    echo -ta The unofficial event for Sunday is: %event.unosun
  }
  if ($1 == .link) && ($2 == forums) {
    echo -ta The link for Demonic Empire forums is: http://z6.invisionfree.com/Demonic_Empire/index.php
    echo -ta If you cannot see the link and only *'s, please type: /mode yourname -f, and then try again.
  }
  if ($1 == .link) && ($2 == memberlist) || ($2 == ml) {
    echo -ta The link for Demonic Empire's memberlist is: http://www.runehead.com/clans/ml.php?clan=rsde
    echo -ta If you cannot see the link and only *'s, please type: /mode yourname -f, and then try again.
  }
  if ($1 == .link) && ($2 == website) || ($2 == web) {
    echo -ta The link for Demonic Empire's website is: http://members.shaw.ca/demonic_empire/main.htm
    echo -ta If you cannot see the link and only *'s, please type: /mode yourname -f, and then try again.
  }
  if ($1 == .link) && ($2 == ts) || ($2 == teamspeak) {
    echo -ta The link for Demonic Empire's teamspeak is: 74.58.251.237:8767 (4Backup: 69.148.132.132)
  }
  if ($1 == .link) && ($2 == chatrules) || ($2 == rules) {
    echo -ta The link for Demonic Empire's Chatrules is: http://z6.invisionfree.com/Demonic_Empire/index.php?showtopic=18025
  }
}