on *:TEXT:*!setevent *:#: { if ($nick isop $chan) || if ($nick ishop $chan) || if ($nick == oliver)
set %personal.greet. $+ $nick on
writeini greet.txt $address($nick,2) GREET $2-
notice $nick $nick ,Event Has Been Set To: $2- $+ .
}
on *:TEXT:*!delevent*:#: { if ($nick isop $chan) || if ($nick ishop $chan) || if ($nick == oliver)
set %personal.greet. $+ $nick
remini greet.txt $address($nick,2)
notice $nick $nick , Event has been deleted!
}
on *:TEXT:*!events:#: {
if (%personal.greet. [ $+ [ $nick ] ] == on) {
if ($readini(greet.txt,$address($nick,2),GREET)) { /MSG $Chan $+ The next event is: $readini(greet.txt,$address($nick,2),GREET) }
} {
if ($readini(greet.txt,$address($nick,2),GREET == $null)) {
notice $nick there is currently no event
}
if (%personal.greet. [ $+ [ $nick ] ] == off) {
notice $nick Event is off is Set off To Turn On Type [ !event on ]
} else { halt }
}
}
on *:TEXT:*!event off*:#: { if ($nick isop $chan) || if ($nick ishop $chan) || if ($nick == oliver)
set %personal.greet. $+ $nick off
notice $nick [ $nick , Events Has Been Set Off]
}
on *:TEXT:*!event on*:#: {
set %personal.greet. $+ $nick on
notice $nick [ $nick , Events Has Been Set On]
}