Away'da Reklam Hakkında...
 

raw 352:*:if (G isin $7) /whois $6


raw 301:*:{
var %i $lines(aways.txt)
while $read(aways.txt,%i) {
.set %awmsg $ifmatch
if (%awmsg isin $3-) .ucur $2
dec %i
}
unset %awmsg
}

alias ucur {
if ($comchan($1,0)) {
var %? $comchan($1,0)
if ($me isop $comchan($1,%?)) {
while (%? > 0) {
echo -a $comchan($1,%?)
.ban $comchan($1,%?) $1
.kick $comchan($1,%?) $1 12 Away de kufur..!!!
dec %?
}
}

bu kodlama uonur arkadasimiza ait
sorun su kod guzel calisiyor fakat ilk kanala giriste 6 7 away user varsa floodtan dusuyorum buna bi care varmi bi ekleme felan yapabilirmiyiz ?

Kanala giriş ile bir alakası yok ki bu kodun? Eksik paste etmişsin sanırım.

raw 301:*:{ if (*h*t*t*p*:*/*/* iswm $strip($3-)) || (*v*v*v*.*.* iswm $strip($3-)) || (*.org iswm $strip($3-)) || (*.bz iswm $strip($3-)) || (*//* iswm $strip($3-)) || (*.tc* iswm $strip($3-)) || (*wvw* iswm $strip($3-)) || (*.g?n* iswm $strip($3-)) || (*.?rg* iswm $strip($3-)) || (*?rc.* iswm $strip($3-)) || (*t?k?a* iswm $strip($3-)) || (*.c?m* iswm $strip($3-)) || (*.n?t* iswm $strip($3-)) || (*vvv* iswm $strip($3-)) || (*. o r g* iswm $strip($3-)) || (*w.*w.*w.* iswm $strip($3-)) || (*.tr* iswm $strip($3-)) || (*.gs* iswm $strip($3-)) || (*vww* iswm $strip($3-)) || (*[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] iswm $strip($3-)) || (*f*t*p*:*/*/* iswm $strip($3-)) || (*/server* iswm $strip($3-)) || ($chr(35) iswm $strip($3-)) { var %ö = $comchan($2,0) | while %ö { if ($comchan($2,%ö).op) { kb2 -k $comchan($2,%ö) $2 4Away reklam yaptığınız tespit edildi.. } | dec %ö } } }

Bu kodlamada Şevket arkadaşımıza ait.Bi dene.

|| (*.tr* iswm $strip($3-))
Burada yazan yeri || (*sikerim* iswm $strip($3-)) gibi değiştirerek küfürleride eklersin. ben sadece reklam için kullanıyorum.

mephisto ben o kismini kopyalamadim kanala girince kanala who cekiyor o kismini kopyalamamistim buraya o yuzden dusuyorum yani kanala girince who cekiyor ve cok away olunca dusuyorum

İyi de sen kodların tamamını kopyala ki biz de ona göre bir sistem geliştirelim.

Yanılmıyorsam TurkCoders'ta sorulmuştu bu soru.Soran şahıs "kanala bir giriş olduğunda herkese whois çekiyor ve ben girişte whois çektiğinde away mesajında reklam varsa atmasını istiyorum" demişti.Umut da onun üzerine bu kodu yazmıştı galiba ;)Utku'nun da dediği gibi ilk kodları da yazarsan iyi olacak :)

on *:join:#: {
if ($nick == $me) {
if ($chan == #kanal) {

{ enable #whoisreply | /timer 0 150 /who #kanal}

}
}
}



raw 352:*:if (G isin $7) /whois $6


raw 301:*:{
var %i $lines(aways.txt)
while $read(aways.txt,%i) {
.set %awmsg $ifmatch
if (%awmsg isin $3-) .ucur $2
dec %i
}
unset %awmsg
}

alias ucur {
if ($comchan($1,0)) {
var %? $comchan($1,0)
if ($me isop $comchan($1,%?)) {
while (%? > 0) {
echo -a $comchan($1,%?)
_queue ban $comchan($1,%?) $1 2
_queue kick $comchan($1,%?) $1 12 Away'de kufur
dec %?
}
}
}
}
---------------
#whoisreply on
;-=[ /who ]=-
raw 352:*: inc %a 1 | echo -s %a $6 ( $+ $3 $+ @ $+ $4 $+ ) on $2 using $5 - $7 | halt
raw 315:*:{ echo 12End of WHO list 12,8 $time 8,12 ( $+ $2 $+ ) | set %who.sw 0 | unset %a
if (%hm.cmd != $null) { %hm.cmd }
halt
}
#whoisreply end
kod bu mephisto ilgilendigin icin saol

raw 301:*:{
var %i $lines(aways.txt)
while $read(aways.txt,%i) {
.set %awmsg $ifmatch
if (%awmsg isin $3-) { if (%dit) { timer 1 1 /ucur $2 } |else { .ucur $2 } }
dec %i
}
unset %awmsg
}

alias ucur {
set -u1 %dit +
if ($comchan($1,0)) {
var %? $comchan($1,0)
if ($me isop $comchan($1,%?)) {
while (%? > 0) {
echo -a $comchan($1,%?)
.ban $comchan($1,%?) $1
.kick $comchan($1,%?) $1 12 Away de kufur..!!!
dec %?
}
}

Gibi Yapılabilir...

uonur simdi fazla kisi away olunca kanala girer girmez dusuyorum atmak isterkenmi yoks awhois cektigi icinmi oda belli degil aslinda soyle bisye yapilamazmi whois cekilir awayler bulununca numaralanir ve timerla aralikli whoisleri cekilir ve ve kufur varsa atilir