on *:TEXT:!setevent*:#:{ if ($nick !isop $chan) { notice $nick You need op for this command! | halt }
writeini events.ini event $chan $2-
writeini events.ini setter $chan $nick
set %eventtime $ctime $chan
msg $chan New event for $chan $+ : $readini(events.ini,event,$chan)
}
on $*:TEXT:/^[!@]event/Si:#:{
set %event $+ $chan $iif($left($1,1) = @, msg $chan, notice $nick)
if (!$readini(events.ini,event,$chan)) { %event [ $+ [ $chan ] ] There is no event for $chan $+ ! | halt }
%event [ $+ [ $chan ] ] The event for $chan is $readini(events.ini,event,$chan) set $duration($calc($ctime - %eventtime [ $+ [ $chan ] ]))
unset %event [ $+ [ $chan ] ]
}
on *:TEXT:!endevent*:#:{ if ($nick !isop $chan) { 1,4notice $nick You need to be op to use this command! | halt }
remini events.ini event $chan
unset %eventtime $chan
msg $Chan The event has been delted by $nick
}
on *:JOIN:#:{ if ($readini(events.ini,event,$chan)) { notice $nick Event for $chan is $readini(events.ini,event,$chan) set $duration($calc($ctime - %eventtime $chan)) $+ . } }