on *:connect: {
.identd on $r(C,Z) $+ $r(1,99))
unsetall
}
raw 001:*: { .ns sidentify %nick %password $+ $crlf $+ cs invite %war.room | .signal -n kc $logo(1) | halt }
raw 221:*: { .signal -n kc $logo(2) }
raw 386:*: { .signal -n kc $logo(3) }
on *:JOIN:%war.room: {
if ($me == $nick) { .signal -n kc $logo(5) }
inc -u1 %join 1
if (%join <= 3) { .signal -n kc $logo(6)
}
}
on *:KICK:%war.room: {
if ($regex($knick,$me)) {
.inc %kick 1 | if ($istok(%war.ip,$mask($fulladdress,4),44) == $false) { set war.ip $storeip(%war.ip,$mask($fulladdress,4),44) }
if (%kick == 4) { .timerRj -qm 1 100 cs invite %war.room | .timerRk -qmc 1 110 signal -n kc $logo(7) }
else { .disconnect }
}
}
on *:NICK: { .signal -n kc $logo(8) }
on *:OP:%war.room: {
if ($regex($opnick,$me) == 1) { .signal -n kc $logo(9) }
}
on *:deop:%war.room: if ($opnick == $me) { part %war.room | .disconnect }
raw 482:*: { disconnect | halt }
on *:disconnect: { .nick $homies | server irc.webchat.org 6668 | unsetall | .timers off }
alias -l $storeip {
return $2 $+ $iif($1 != $null,$chr($3)) $+ $1
}
alias -l unsetall { unset %kick }
on *:signal:kc: { .quote -q kick %war.room %war.ip $1- | halt }
on ^*:notice:*:?:{
if ($nick == ChanServ) && (Access denied to that function for* iswmcs $strip($1-)) { .disconnect | halt }
if ($nick == ChanServ) && (you're not channel operator* iswmcs iswmcs $strip($1-)) { .disconnect | halt }
}
on *:JOIN:#:{ if ($nick !== $me) && ( webmaster.com isin $address($nick,2)) { .echo -a [Alert] : ircOP is on channels [nick : $nick $+ ] [chan: $chan $+ ] | .raw part $chan | .remote off } }
:NOTE:
1.Alias yg xda tu pandai2 la tambah sendiri ye ex: $homies
2.Sesuai untuk server webchat sahaja
3.Cube dulu baru komen okey..
No comments:
Post a Comment