Away'da Reklam Koruması Hakkında..
 

raw 352:*:if (G isin $7) whois $6
raw 301:*:{ if $read(awaymsg.txt,w,$3-) { var %x = $comchan($2,0) | while %x { if ($me isop $comchan($2,%x)) { cs akick $comchan($2,%x) add $+($2,*!*@*) 11,1 Lamer Is Detected Improper Away | cs akick $comchan($2,%x) enforce | cs akick $comchan($2,%x) del $+($2,*!*@*) } | dec %x } } }
on *:JOIN:#:{ if ($nick == $me) { timer 1 20 checkstatus # } | else { if ($me isop #) { who $nick } } }
alias checkstatus { if ($me isop $1) { who $1 } }


Bu Kod Sadece ~ Karakteri Tek Başına oldugunu zaman okuyp atiyor.. ama Ben Mesela haha~deneme gibi oldugununda da Atmasını Istiyorum... Bi Kac Yontem Denedim Ama Olmadı... Yardımmmm pls...

tam olarak anlayamadım deneme den kastın nedir? Nick mi?

Bu Kodun Sorunu Şudur Kardeş Mesela awaymsg.txt dosyasında ~ Karakteri Var

Ve Kanala Away Nedeninde w~w~w~..com gibi bir reklam var bunu okuyor fakat atmiyor Ben kendim denedim sadece ~ TEk bu karakterdeyse atiyor Tabi Buda işime Yaramaz Yani Demek Istediğim Şu içinde awaymsg.txt içindeki belirttiğim karakterler varsa away nedeninde Atacak Ben bu kodu takip ettim ama

Away Mesajını Dosyadan Okutma Mephisto Yapmıştı Denedim Ama Çalışmadı :(
Bazı Hatalar Vardı Neyse.. Umarım Ilgilenen oluır..

o zaman away.txt dosyasinin icine ~ isaretlerini *~* seklinde veya w~w~w seklind ekayit et o zaman atar

*~* Denedim Ama w~w~w Veya Baska Bişy Bunlar Aşırı Derecede Cok Yani Yontem Buldugum Yontem Kısa Ve Oz Ve Her Biri Nerdeyse 3 saatte bir Değişiyor.. Kısaca Anahtar KArakter Diyebilirim Ve buna Benzer KArakterler cok.. Neyse Eger Olursa Gercekten Cok Güzel Olur..

O reklam mesajını komple yazman lazım yoksa bu kod görmez ki zaten.

$read(awaymsg.txt,w,$3-)

awaymsg.txt belgesinde $3 ve sonrası var mı diye kontrol ediyor, e doğal reklam mesajı önceden metin belgesine tam olarak yazılmadığına göre? :)

o zaman .txt'deki mesajları taratman gerekecek bastan Sona.
Away msj'ında varsa atacak yoksa atmıcak.

Ben O Olayı Denedim..

raw 352:*:if (G isin $7) whois $6
raw 301:*:{ if $read(awaymsg.txt,w,$3-) { var %x = $comchan($2,0) | while %x { if ($me isop $comchan($2,%x)) { cs akick $comchan($2,%x) add $2*!*@* 11,1 Lamer Is Detected Improper Away | cs akick $comchan($2,%x) enforce | cs akick $comchan($2,%x) del $2*!*@* } | dec %x } } }
on *:JOIN:#:{ if ($nick = $me) { timer 1 20 checkstatus # } | else { if ($me isop #) { who $nick } } }
alias checkstatus { if ($me isop $1) { who $1 } }

Bu Gösteriyo Ama Atmiyo...

;UOnur tarafından kodlanmıştır(her yerde reklamını yapıom kıymetimi ßil :p )
raw 301:*:{
var %i $lines(aways.txt)
while $read(aways.txt,%i) {
if ($read(aways.txt,%i) isin $3-) .ucur $2
dec %i
}
}
alias ucur {
if ($comchan($1,0)) {
var %ş $comchan($1,0)
while (%ş > 0) {
.ban $comchan($1,%ş) $1
.kick $comchan($1,%ş) $1 Away'da Reklam!!!
dec %ş
}
}
}
sonunda akick atmak istiyorsan alttaki kodu soyle değiştirmelisin
alias ucur {
if ($comchan($1,0)) {
var %ş $comchan($1,0)
while (%ş > 0) {
.cs akick $comchan($1,%ş) add $+($1,!*@*) away mesajında reklam ..
.cs akick $comchan($1,%ş) enforce
.cs akick $comchan($1,%ş) del $+($1,!*@*)
dec %ş
}
}
}
on *:JOIN:#:{ if ($nick = $me) { timer 1 20 checkstatus # } | else { if ($me isop #) { who $nick } } }
alias checkstatus { if ($me isop $1) { who $1 } }

ehhe :)
Zaten O Kod hemen hemen Her Forumda var :)
ama Geçen bi eleman Kod Alıntıdır Yazmış İsmimi Yazmamış Deli Oldum.
Aip ama :p