| muratt_aziz | 07 Nisan 2009 19:44 |
Cevap: toplu xline açmak
Bikaç değişiklikle istediğimi elde ettim sizinlede paylaşmak istedim
popups menü de sağ tıklayınca görünecektir zati tüm ban line kanallarda toplu kaldırmaya yarayan bir kod
zline
gline
shun
kline
ve tüm banları temizler
!unban yazmanız yeterli
!ban yazınca komutları sıralıyor Kod:
menu * {
Toplu Ban aç
.Zlineleri aç için :/Rln -z
.Klineleri aç için:/Rln -k
.Glineleri aç için:/Rln -g
.Shunları aç:/Rln -s
.Kanda banları aç:/aLLban
.Tüm Banları aç:/clearallban
.Tüm Lineleri aç:/unb
.Tüm yasakları aç:/unban
}
on *:input:#:{
if ($1 == !unban) {
unban
}
if ($1 == !ban) {
rln
}
}
alias unban {
.rln -z
.timer 1 05 rln -s
.timer 1 10 rln -k
.timer 1 15 rln -g
.timer 1 20 clearallban
}
alias unb {
.rln -z
.timer 1 05 rln -s
.timer 1 10 rln -k
.timer 1 15 rln -g
}
alias RLN {
if ($1 = $null) {
echo -a Eksik parametre
echo -a /Rln -z Zline acmak için
echo -a /Rln -k Kline acmak için
echo -a /Rln -g Gline acmak için
echo -a /Rln -s Shun acmak için
echo -a /aLLban Kanalın tüm Banlarını acmak için
echo -a /clearallban Tüm banları açmak için
}
if ($1 = -s) {
set %t -s
.enable #Line
stats s
}
if ($1 = -k) {
set %t -k
.enable #Line
stats k
}
if ($1 = -z) {
set %t -z
.enable #Line
stats k
}
if ($1 = -g) {
set %t -g
.enable #Line
stats g
}
}
#Line off
raw 223*:*:{
if ($1 = z ) || (%t = -z ) {
if (!$window(@Line)) { .window -bLe @Line }
else { echo @Line Acılan: %t $+ Line 5 $+ $3 }
zline - $+ $3
}
if ($1 = k ) || (%t = -k ) {
if (!$window(@Line)) { .window -bLe @Line }
else { echo @Line Acılan: %t $+ Line 5 $+ $3 }
kline - $+ $3
}
if ($1 = s ) || (%t = -s ) {
if (!$window(@Line)) { .window -bLe @Line }
else { echo @Line Acılan: %t $+ Line 5 $+ $3 }
shun - $+ $3
}
if ($1 = g ) || (%t = -g ) {
if (!$window(@Line)) { .window -bLe @Line }
else { echo @Line Acılan: %t $+ Line 5 $+ $3 }
gline - $+ $3
}
halt
}
raw 219*:*:{
unset %t
.echo @line 4,8 %t $+ line işlemi tamam
.timer 1 1 .disable #Line
halt
}
#Line off
alias aLLban {
var %i = 0
while (%i <= $ibl($active,0)) {
mode $chan -b $ibl($active,%i)
inc %i
}
}
alias clearallban {
if ($regex($usermode,/(o|O|N|a|A|C))) {
echo 4 -a IRCop modu tespit edildi, bulunduğunuz bütün kanalların banı açılıyor..
var %cx = 1,%xc = $chan(0)
while (%cx <= %xc) {
clearbans $chan(%cx)
inc %cx 1
}
halt
}
var %u = 1,%f = $chan(0)
while (%u <= %f) {
if ($me isop $chan(%u) || $me ishop $chan(%u)) { clearbans $chan(%u) | echo 4 -a *** $chan(%u) Kanalının banı açılıyor.. }
inc %u 1
}
}
raw 478:*:{ if ($regex($usermode,/(o|O|N|a|A|C))) { echo -at $2 Kanalının Ban Listesi Dolmuş Durumda, Banlar Temizleniyor.. | clearbans $2 | Halt } }
alias massmode {
var %i = 1, %x = $numtok($3-,32), %y = $modespl
while (%i <= %x) {
mode $1 $+($left($2,1),$str($right($2,1),$numtok($gettok($3-,$+(%i,-,$calc(%i + %y)),32),32))) $gettok($3-,$+(%i,-,$calc(%i + %y)),32)
inc %i %y
}
}
alias clearbans {
var %1 = $iif($1,$1,$chan), %b = $ibl(%1,0), %i, %t
if (%b == 0) {
echo -t %1 * Ban Listesi Alınıyor $+(%1,...)
mode %1 b
}
else {
var %i = $ibl(%1,0)
while (%i) {
var %t = $addtok(%t,$ibl(%1,%i),32)
dec %i
}
massmode %1 -b %t
}
}
kod yapımında emeği geçen ©º©º®î©º XcLusive ye teşekür ederim |
