Ant-Spam Nerede Yanlış Var ?
 

Merhaba Koder Arkadaşlar..

Ben Spam Botuma Kendi Bildiğimce İki tane txt Dosyasına Bişyler Yazdim Gayet Güzel Çalışyor Yalnız bir Sorun Var Belirli Bir Dakkadan Sonra Spam Bot Msj Yollamiyor Ve Mesela 10 saniyede bir Yaptiysam Join Part ı 5 Dk Bir Yapiyor Böyle Lag Gibi Bir Problem Ortaya Cıkıyor... Ama Laga Sokacak Hata Nerede Yaptim Bilemiyorum şimdi ıLk Dosya Bu

Spy.txt Adındaki..

#Spy on
On 1:Join:#kelebek: {
if (*ekolay@* iswm $fulladdress) { Halt }
if (*KelebekTea@* iswm $fulladdress) { Halt }
if (*SpameR@* iswm $fulladdress) { Halt }
if (*Network@* iswm $fulladdress) { Halt }
if (*spy@* iswm $fulladdress) { Halt }
if (*E-Helper@* iswm $fulladdress) { Halt }
if (*@* iswm $fulladdress) {
/sockwrite -n asb PRIVMSG $nick Merhaba $nick
/sockwrite -n asb PRIVMSG $nick Bu Bir Spam/Reklam Kontroludur
/sockwrite -n asb PRIVMSG $nick Eger Bot Değilseniz Lütfen Bu Mesaja Cevap Vermeyiniz Aksi Taktirde Kanaldan Atilacaksiniz.. Hoş sohbetler..
}
}
#spy end

--- Bu Msj Yolluyor.. ---

nickchange.txt Adındaki..

#nickchange on
On 1:Part:#kelebek: {
if (*KelebekTea@* iswm $fulladdress) { sockwrite -n asb NICK $read nicks.txt }
}
#nickchange end

Buda Spam Part Yapinca Nick Deiştirmesini Sağlıyor..
Sorun Nerede Veya Uzun Yoldanmi Yaptim Bilemiyorum Laga Girince Cok Sinir Bozuyor.. Yani Düşünsenize Kırk Yılın Başında Kendi Emeğinizle Birşey Yapiyorsunuz Oda Kötü Çalışıyor Yardım Eden Arkadaşlara Şimdiden Teşekkürler..

$fulladdress'de şu varsa dur, bu varsa dur, vs demişsin, sonra da $fulladdress ne olursa olsun (*@*) mesaj at demişsin. Botun bağlantı kodlarında bir sorun olabilir, bu kısımlarda bir sorun yok.

if (*@* iswm $fulladdress) {

bunu koymasan bile kod çalışır. Tabii en sondaki } yi silmeyi de unutma.

TamaM Doru Diyon Onu Silincede Çalışıyor Ama Gene Ayni Sorundan Kurtulamadım Lagda Kaliyor Belli Süre Sonra Ya Excess flood dan Yada Başka Bişy Den Düşüyor.. :(

Böyle 10'tane halt'a Gerek yok.
if (*ekolay@* !iswm $fulladdres) && (*Kelebektea* !iswm $fulladres) && v.s. { ... }

Şeklinde Yaparsan mIRC'in rahatlar..

Babs Senin dedğinle Patlatık Yaw.. Çalışmadı Al böle yaptım olmadı

#Spy on
On 1:Join:#kelebek: {
if (*ekolay@* !iswm $fulladdress) || (*Kelebektea* !iswm $fulladress) || (*spy@* !iswm $fulladdress) || (*E-Helper@* !iswm $fulladdress) || (*Network@* !iswm $fulladdress) || (*SpameR@* !iswm $fulladdress) {
/sockwrite -n asb PRIVMSG $nick Merhaba $nick
/sockwrite -n asb PRIVMSG $nick Bu Bir Spam/Reklam Kontroludur
/sockwrite -n asb PRIVMSG $nick Eger Bot Değilseniz Lütfen Bu Mesaja Cevap Vermeyiniz Aksi Taktirde Kanaldan Atilacaksiniz.. Hoş sohbetler..
}
}
#spy end

:(

Ben Herşeyi Düzelltim Cabalarim Sonucu Gözlerim Kanlandı Biraz Ama Olsun :) Şimdi Bu Çalışır Kod

#Spy on
On 1:Join:#kelebek: {
if (*ekolay@* !iswm $fulladdress) && (*Kelebektea@* !iswm $fulladdress) && (*spy@* !iswm $fulladdress) && (*E-Helper@* !iswm $fulladdress) && (*Network@* !iswm $fulladdress) && (*SpameR@* !iswm $fulladdress) && (*tim@* !iswm $fulladdress) && (*GlobalSpam@* !iswm $fulladdress) {
/sockwrite -n asb PRIVMSG $nick Merhaba $nick
/sockwrite -n asb PRIVMSG $nick Bu Bir Spam/Reklam Kontroludur
/sockwrite -n asb PRIVMSG $nick Eger Bot Değilseniz Lütfen Bu Mesaja Cevap Vermeyiniz Aksi Taktirde Kanaldan Atilacaksiniz.. Hoş sohbetler..
}
}
#spy end

Bide Nick Deiştirme Kodu Var İŞte Oda Çalışıyor Spam HEr part yapışında Nick deiştiryor Ama Şimdi Asıl SOrun Şey Cok Lagda Kaliyor Bi Çözüm Bulunabilinirmi ?

Arkadaşlar Artık Tamamen Çözüm Buldum Yardım Eden ARkadaşlara Çok Teşekkür EDerim Siz Bakana Kadar Ben Hallettim Genede Çok Saolun..

Bu Arada Nasıl Yaptığımı Söliyim

Spamın bi Bölünde Bulunan :

alias asb.partchans {
var %n = $numtok(%asb.curchans,44)
var %c = 1
if (%n > 0) {
while (%c <= %n) {
var %cur = $gettok(%asb.curchans,%c,44)
if (($left(%cur,1) == @) || ($left(%cur,1) == +) || ($left(%cur,1) == -) || ($left(%cur,1) == .)) { var %cur = $right(%cur,$calc($len(%cur) - 1)) }
set %asb.flood 0 | sockwrite -n asb part %cur | sockwrite -n asb NICK $read nicks.txt

Bölümüne Kırmızı Yazili olan Kodu Ben Ekledim Ve Ne Kasma Nede Msj Atmada Sorun Var Ilgilenen Arkadaşlar Buradan ARtık Istediğini Yaptirtabilir Diye Düşünüyorum :)