alias smsg {
var %x = $comchan($me,0),%y = 1
while %y <= %x {
if $comchan($me,%y) != $1 {
.msg $comchan($me,%y) $2-
}
inc %y
}
}
alias relay {
return $+($chr(40),$1,$chr(41)) $+($chr(40),$2,@,$network,$chr(41))
}
on *:text:*:#:{
.scon -at1 smsg $chan $relay($nick,$chan) $1-
}
on *:action:*:#:{
.scon -at1 smsg $chan $relay($nick,$chan) $1-
}
on *:join:#:{
.scon -at1 smsg $chan $relay($nick,$chan) joined
}
on *:part:#:{
.scon -at1 smsg $chan $relay($nick,$chan) parted
}
on *:kick:#:{
.scon -at1 smsg $chan $relay($knick,$chan) kicked by $nick
}
on *:quit:{
.scon -at1 smsg $comchan($me,1) $relay($nick,$comchan($me,1)) quit
}
on *:mode:#:{
.scon -at1 smsg $chan $relay($nick,$chan) set modes $1-
}
on *:ban:#:{
if $bnick {
.scon -at1 smsg $chan $relay($bnick,$chan) banned by $nick
}
}
