Ikut panduan dibawah....
Buka mIRC dan tengah pada baris yang ada tanda a/. Klick.
Ada tiga ruangan , aliases, remote, variables, ambil bahagian remote
Copy dan Paste code di bawah kedalam ruangan Remote
#selfpro on
ON *:TEXT:*:?: {
if ($nick isop $comchan($nick,1)) || ($nick isvo $comchan($nick,1)) || (Serv isin $nick) || ($nick == $me) { goto end }
if ($chr(35) isin $1-) || (/j isin $1-) || (www. isin $1-) || (http:/ isin $1-) || (/server isin $1-) || (.xoom. isin $1-) || (# isin $1-) && ($chan !isin $1-) { .close -m $nick | .ignore -u15 $mask($fulladdress,3)
if ($me isop $comchan($nick,1)) && ($nick ison $comchan($nick,1)) {
.raw -q mode $comchan($nick,1) +b $mask($fulladdress,1)
.raw -q kick $comchan($nick,1) $nick [: R eason:] N o A dvertising O n P rivate M essage $irc
.timer 1 120 .ruser inviter $nick | .echo -a 14*** [ 12 $+ $mask($fulladdress,5) $+ ] 14 15sec ( s ) Ignored For Private Advertising [ 12 $+ $chan $+ ]
goto end
}
}
inc -u3 %queryflod. [ $+ [ $gettok($address,1,64) [ $+ [ $comchan($nick,1) ] ] ] ]
if (%queryflod. [ $+ [ $gettok($address,1,64) [ $+ [ $comchan($nick,1) ] ] ] ] >= 7) { close -m $nick | .ignore -u15 $mask($fulladdress,2)
goto end
}
else { goto end }
:end
}
ON *:NOTICE:*:?: {
if ($nick isop $comchan($nick,1)) || ($nick isvo $comchan($nick,1)) || (Serv isin $nick) || ($nick == $me) { goto end }
if ($chr(35) isin $1-) || (/j isin $1-) || (www. isin $1-) || (http:/ isin $1-) || (/server isin $1-) || (.xoom. isin $1-) || (# isin $1-) && ($chan !isin $1-) { .close -m $nick | .ignore -u15 $mask($fulladdress,3)
if ($me isop $comchan($nick,1)) && ($nick ison $comchan($nick,1)) {
.raw -q mode $comchan($nick,1) +b $mask($fulladdress,1)
.raw -q kick $comchan($nick,1) $nick [: R eason:] N o A dvertising O n P rivate N otice $irc
.timer 1 120 .ruser inviter $nick | .echo -a 14*** [ 12 $+ $mask($fulladdress,5) $+ ] 14 15sec ( s ) Ignored For Private Advertising [ 12 $+ $chan $+ ]
goto end
}
}
inc -u3 %noticeflod. [ $+ [ $gettok($address,1,64) [ $+ [ $comchan($nick,1) ] ] ] ]
if (%noticeflod. [ $+ [ $gettok($address,1,64) [ $+ [ $comchan($nick,1) ] ] ] ] >= 7) { .ignore -u15 $mask($fulladdress,2)
goto end
}
else { goto end }
:end
}
ON *:ACTION:*:?: {
if ($nick isop $comchan($nick,1)) || ($nick isvo $comchan($nick,1)) || (Serv isin $nick) || ($nick == $me) { goto end }
if ($chr(35) isin $1-) || (/j isin $1-) || (www. isin $1-) || (http:/ isin $1-) || (/server isin $1-) || (.xoom. isin $1-) || (# isin $1-) && ($chan !isin $1-) { .close -m $nick | .ignore -u15 $mask($fulladdress,3)
if ($me isop $comchan($nick,1)) && ($nick ison $comchan($nick,1)) {
.raw -q mode $comchan($nick,1) +b $mask($fulladdress,1)
.raw -q kick $comchan($nick,1) $nick [: R eason:] N o A dvertising O n P rivate A ction $irc
.timer 1 120 .ruser inviter $nick | .echo -a 14*** [ 12 $+ $mask($fulladdress,5) $+ ] 14 15sec ( s ) Ignored For Private Advertising [ 12 $+ $chan $+ ]
goto end
}
}
inc -u3 %actionflod. [ $+ [ $gettok($address,1,64) [ $+ [ $comchan($nick,1) ] ] ] ]
if (%actionflod. [ $+ [ $gettok($address,1,64) [ $+ [ $comchan($nick,1) ] ] ] ] >= 7) { .ignore -u15 $mask($fulladdress,2)
goto end
}
else { goto end }
:end
}
on *:invite:*: {
if ($nick == ChanServ) && ( %massinvite == ON ) {
.raw -q join $chan
goto end
}
if (( $me isop $comchan($nick,1)) && ( $nick !isop $comchan($nick,1))) { .ignore -u15 $mask($fulladdress,3)
.raw -q kick $comchan($nick,1) $nick [: R eason:] N o M ass I nviting $irc
.raw -q mode $comchan($nick,1) +b $mask($fulladdress,1)
.timer 1 120 .ruser inviter $nick | .echo -a 14*** [ 12 $+ $mask($fulladdress,5) $+ ] 14 15sec ( s ) Ignored For Mass Invite [ 12 $+ $chan $+ ]
}
:end
}
#selfpro end
Kemudian save as.. Selamat mencuba....
No comments:
Post a Comment