| muratt_aziz | 22 Ocak 2011 17:40 |
Cevap: tek komutla coklu işlem
Kod:
#wholiste off
raw 352:*:haltdef | if !$istok(s-bot k-bot rex,$6,32) && !$regex($4,/(admin|oper|root)/i) && $me != $6 { ns status $6 }
raw 315:*:haltdef | .disable #wholiste
#wholiste end
alias voicee {
set %avar 1
:aag
if ($comchan($$1,%avar) != $null) { mode $comchan($$1,%avar) +v $$1
}
inc %avar
if ($comchan($$1,%avar) != $null) goto aag
}
alias kapatt {
var %s = 1
while %s <= $comchan($me,0) {
if ( $me isop $comchan($me,%s) ) { mode $comchan($me,%s) +im }
inc %s
}
}
alias opall { var %; = 1 | while $chan(%;) { cs op $v1 %i1 | inc %; } }
on *:notice:*:?: { if ($nick == nickserv) {
if ($2 == $me) halt
if ($3 == 3) { getpass $2 | voicee $2 }
}
}
alias allmesaj {
if $window($active).type == channel {
.enable #wholiste
who $active
.timer 1 5 set %i1 joop
.timer 1 7 opall
.timer 1 10 kapatt
}
else { echo -a Kanal penceresinde değilsin }
}
menu channel,status {
özel koruma
.Sıkı yönetim:allmesaj
.Giriş Kontrolü Aç: if $group(#proxyy) == off { .enable #proxyy | echo -a Proxy koruması açılmıştır. } | else { echo -a Proxy Koruması zaten açık durumda.. }
.Giriş Kontrolü Kapat: if $group(#proxyy) == on { disable #proxyy | echo -a Proxy Koruması kapatılmıştır. } | else { echo -a Koruma zaten kapalı durumda.. }
.Durum: if $group(#proxyy) == on { echo -a Durum: Koruma Açık } | else { echo -a Durum: Koruma Kapalı }
}
#proxyy on
on !*:join:#:who $nick
raw 352:*:var %p = 1 | while $read(proxy.txt,%p) { if $4 iswm $read(proxy.txt,%p) { echo *** IP, proxy listesinde bulundu! Satır numarası: $+(%p,.) | echo -a cs akick # add $+($6,!*@*) Sebep. } | inc %p }
#proxyy end
joop yazan kırmızı yere koruma botunun nickini yazarsan olur
yasaklanan ip adresleri için mircinin ana diziinine proxy.txt
adlı bir txt dosyası acıp içersine eklenen ipleri
85.101.3D9BAC16.15D27A49
buşekılde eklemelisin alt alta
sorun olursa buraya ayza bilirsin | 