on $*:TEXT:/^[!@]group/Si:#:{
if ($2 !== Barrows) && ($2 !== KBD) && ($2 !== GWD) {
Notice $nick $s2(Please specify the group. Groups avaliable, Barrows - KBD - GWD) }
elseif ($2 == Barrows) {
if ($3 == Event) || ($3 == @event) || ($3 == !event) {
Set %msgstyle.barrowgroup $iif($left($3,1) = @,msg $chan,notice $nick)
if (%bge == off) {
%msgstyle.barrowgroup $s2(Currently there is no ") $+ $s1(Barrows Group Event) $+ $s2(" set!) }
elseif (%bge !== off) {
%msgstyle.barrowgroup $s2(The current "Barrows Group Event" is) $s1(%bge $+ !) } }
elseif ($3 == news) || ($3 == @news) || ($3 == !news) {
Set %msgstyle.barrowgroup $iif($left($3,1) = @,msg $chan,notice $nick)
if (%bgn == off) {
%msgstyle.barrowgroup $s2(Currently there is no ") $+ $s1(Barrows Group News) $+ $s2(" set!) }
elseif (%bgn !== off) {
%msgstyle.barrowgroup $s2(The current "Barrows Group News" is) $s1(%bgn $+ !) } }
elseif ($3 == set) {
if ($4 == event) {
if (%bge == off) {
if ($nick isop $chan) || ($nick ishop $chan) {
set %bge $5-
notice $nick $s2(Barrows Group Event set to: %bge)
msg #dkthunder $s2(The "Barrows Group" have got a new event set -) $s1(To veiw this event type "!group barrows !event") } }
elseif ($nick isreg $chan) || ($nick isvoice $chan) {
notice $nick $s1(Sorry $nick - You do not have the power to use that command) } }
elseif (%bge !== off) {
Notice $nick $s1(There is already a "Barrows group event" set) }
elseif ($4 == news) {
if (%bgn == off) {
if ($nick isop $chan) || ($nick ishop $chan) {
set %bgn $5-
notice $nick $s2(Barrows Group News set to: %bge)
msg #dkthunder $s2(The "Barrows Group" have got some new news set -) $s1(To veiw this event type "!group barrows !news") } }
elseif ($nick isreg $chan) || ($nick isvoice $chan) {
notice $nick $s1(Sorry $nick - You do not have the power to use that command) } }
elseif (%bgn !== off) {
Notice $nick $s1(There is already some "Barrows group news" set) }
elseif ($4 !== news) && ($4 !== event) {
notice $nick $s1(You must either set this groups news or event ....) } }
elseif ($3 == del) {
if ($4 == event) {
if (%bge !== off) {
if ($nick isop $chan) || ($nick ishop $chan) {
set %bge off
notice $nick $s1(Barrows group event removed successfully) }
elseif ($nick isreg $chan) || ($nick isvoice $chan) {
notice $nick $s1(Sorry $nick - You do not have the power to use that command) } }
elseif (%bge == off) {
Notice $nick $s1(Sorry this action could not be carried out, as there is no Event for the Barrows Group $+ ....) } }
elseif ($4 == news) {
if (%bgn !== off) {
if ($nick isop $chan) || ($nick ishop $chan) {
set %bgn off
notice $nick $s1(Barrows group's news has been removed successfully) }
elseif ($nick isreg $chan) || ($nick isvoice $chan) {
notice $nick $s1(Sorry $nick - You do not have the power to use that command) } }
elseif (%bgn == off) {
Notice $nick $s1(Sorry this action could not be carried out, as there is no News for the Barrows Group $+ ....) } }
}
}
}