Açılan kanal giriş çıkışlarını gösteren pencerelerde sonda (Ban) seçeneği var. Çift tıkladığında mode #kanal +b Nick uygular. Buna göre yeni özellikler ekleyebilir ve geliştirebilirsiniz.
Kod: Tümünü Seç
alias joinpart { window $+(@,$1) | echo -ct $2 $+(@,$1) * $+($3,

$4 $+($chr(40), $token($address($4,5),2,33), $chr(41)) $5 (Ban) }
on ^*:join:#:{ joinpart # join Giriş $nick }
on ^*:part:#:{ joinpart # part Part $nick (Part) }
on ^*:quit:{
tokenize 32 $regsubex(z,$str(.,$comchan($nick,0)),/./g,$comchan($nick,\n) $chr(32))
joinpart $* quit Çıkış $nick (Quit)
}
on $^*:hotlink:/\x28Ban\x29$/S

:return
on $*:hotlink:/\x28Ban\x29$/S

:mode $token($active,1,64) +b $token($hotline,4,32)
Kod: Tümünü Seç
alias oflags {
if $1 === O return IRC Operatör
if $1 === o return Local Operatör
if $1 == C return Technical Administrator
if $1 === A return Server Administrator
if $1 === a return Services Administrator
if $1 == N return Network Administrator
}
on ^1:SNOTICE:*:{
if (whois isin $1-) {
if ($window(@Whois) == $null) { window -ne @Whois }
echo 12 -t @Whois $1- | halt
}
if (his/her isin $1-) || (Failed isin $1-) || (Denied isin $1-) || (tkl isin $1-) || (Q: isin $1-) || (used isin $1-) || (OperOverride isin $1-) || (Mismatch: isin $1-) || (GECOS isin $1-) || (warning isin $1-) {
if ($window(@OperS) == $null) { window -ne @OperS }
echo 12 -t @OperS $1- | halt
}
if (Locops isin $1-) || (activated isin $1-) {
if ($window(@UyarI) == $null) { window -ne @UyarI }
echo 12 -t @UyarI $1- | halt
}
if (added isin $1-) || (Received isin $1-) {
if ($window(@xLine) == $null) { window -ne @xLine }
echo 12 -t @xLine $1- | halt
}
if (removed isin $1-) {
if ($window(@xLine) == $null) { window -ne @xLine }
echo 4 -t @xLine $1- | halt
}
if (banned isin $1-) {
if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }
echo 12 -t @Giris/Cikis $1- | halt
}
if (Connecting isin $1-) {
if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }
echo 12 -t @Giris/Cikis $1- | halt
}
if (exiting isin $1-) || (recvQ isin $1-) {
if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }
echo 4 -t @Giris/Cikis $1- | halt
}
if (Forbidding isin $1-) || (Q:lined isin $1-) {
if ($window(@Q-Lined) == $null) { window -ne @Q-Lined }
echo 12 -t @Q-Lined $1- | halt
}
if (Expiring isin $1-) {
if ($window(@xLine) == $null) { window -ne @xLine }
echo 12 -t @xLine $1- | halt
}
if ([Spamfilter] isin $1-) {
if ($window(@Spam) == $null) { window -ne @Spam }
echo 12 -t @Spam $1-
halt
}
if (is now isin $1-) {
if ($window(@OperS) == $null) { window -ne @OperS }
echo -t @OperS $+(4,$1) $+(12,$3) 5ID'ini Kullanarak Oper Oldu :12 $oflags($remove($right($1-,3),$chr(40),$chr(41))))
halt
}
}
pencere isimlerini değiştirebilirsiniz...