alias msgFa {
var %y = 1
while (%y <= $scid(0)) {
scon %y
if ($me ison $1) && ($1 == #factionA) { msg $1 $2- $nicktok(#factionA,a,32) }
inc %y
}
}
alias msgFb {
var %y = 1
while (%y <= $scid(0)) {
scon %y
if ($me ison $1) && ($1 == #factionB) { msg $1 $2- $nicktok(#factionB,a,32) }
if ($me ison $1) && ($1 == #id.nexus) { msg $1 $2- $nicktok(#id.nexus,a,32) }
inc %y
}
}
alias nicktok {
var %_ = $nick($1,0,$2)
while (%_ >= 1) {
set %nicks $addtok(%nicks,$nick($1,%_,$2),$3)
dec %_
}
if (%nicks == $null) {
return nonicks
}
else {
var %; = %nicks | unset %nicks
return %;
}
}
on *:TEXT:!raid*:#factionA: {
if ($nick isvoice #factionA || $nick ishop #factionA || $nick isop #factionA) {
msgFa #factionA FactionA is under attack by $2-!
msgFa #factionA Wakey wakey!
msgFb #factionB FactionA is under attack by $2-!
msgFb #factionB Wakey wakey!
}
}
on *:TEXT:!raid*:#factionB: {
if ($nick isvoice #factionB || $nick ishop #factionB || $nick isop #factionB) {
msgFa #factionA FactionB is under attack by $2-!
msgFa #factionA Wakey wakey!
msgFb #factionB FactionB is under attack by $2-!
msgFb #factionB Wakey wakey!
msgFb #id.nexus FactionB is under attack by $2-!
msgFb #id.nexus Wakey wakey!
}
}