IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- Eggdrop, NeoStats, BNC (https://www.ircforumlari.net/eggdrop-neostats-bnc/)

- - eggdrop botuna version çektirme (https://www.ircforumlari.net/eggdrop-neostats-bnc/163532-eggdrop-botuna-version-cektirme.html)

eggdrop botuna version çektirme

eggdrop botuna en basit version nasıl çektiririz?

proc join_greet {nick uhost handle channel} {
putserv "privmsg ctcp $nick VERSION"
}
bind join - * join_greet

şöyle bişey denedim ama olmadı :)

yardımcı olursanız sevinirim.

Cevap: eggdrop botuna version çektirme

Kod:

proc join_greet {nick uhost handle channel} {

putserv "PRIVMSG $nick :\001VERSION\001";

     }

bind join - * join_greet

Cevap: eggdrop botuna version çektirme

Selam ve dua ile,

Alınan version cevabına göre Eggdrop bota nasıl işlem uygulatabilirim?
Alınan cevap mIRC ise bu cevaba nasıl ban attırılabilir?

Eğer mümkünse cevaplar mısınız?

Kolay gelsin...

Cevap: eggdrop botuna version çektirme

Gelen version cevaplarına görede işlem yaptırmak için bunu kullanabilirsiniz..

Kod:

bind ctcr - "*VERSION*" version_cevabi
 

proc version_cevabi {nick uhost handle {dest ""} keyword text} {

if {$text == "mIRC"} {putquick "gline $nick . . ."}

}

Cevap: eggdrop botuna version çektirme

Alıntı:

BuCaLI Nickli Üyeden Alıntı (Mesaj 885157)

Gelen version cevaplarına görede işlem yaptırmak için bunu kullanabilirsiniz..

Kod:

bind ctcr - "*VERSION*" version_cevabi
 

proc version_cevabi {nick uhost handle {dest ""} keyword text} {

if {$text == "mIRC"} {putquick "gline $nick . . ."}

}

Çok teşekkürler. Az önce denedim ve kod çalışıyor.

Eğer mümkünse bir ricam daha olacak. Eggdrop botumda kullandığım kod şu :

Kod:

proc join_greet {nick uhost handle channel} {

     if {$nick == "Koruma"} {return 0}

     if {$channel == "#Sohbet"} {

     putquick "PRIVMSG $nick :\001VERSION\001"

     putquick "PRIVMSG $nick :\001FINGER\001"

     putquick "PRIVMSG #Opers :4Version Cekilen Nick: 1(12  $nick 1)"

     putquick "PRIVMSG #Opers :4Version Cevabi: 1(12 Bilinmiyor 1)"

     putquick "PRIVMSG #Opers :4Finger Cekilen Nick: 1(12  $nick 1)"

     putquick "PRIVMSG #Opers :4Finger Cevabi: 1(12 Bilinmiyor 1)"

  }

     return 1

   }

Verilen version ve finger kodlarını kanala nasıl yansıtabileceğimi bulamadıüğım için "Bilinmiyor" seklinde yansıttım. Bu verilen version ve finger cevaplarını kanala nasıl yansıtabilirim? Yansıtmayı başardım diyelim. Az önce verdiğiniz kod ile ikisini bir proc içerisinde birleştirerek verilen cevaba göre nasıl işlem uygulatabilirim?

Kolay gelsin.

Cevap: eggdrop botuna version çektirme

Kafan karışmış sanırım biraz. ilk kod versionu çektirmek için, ikincisi ise gelen cevaba göre işlem.. Yani Gelen cevapları ikinci kod ile alıp kanalına yansıtabilirsin şu şekilde;

Kod:



bind join - * join_greet
 

proc join_greet {nick uhost handle channel} {

if {$nick == "Koruma"} {return 0}

     if {$channel == "#Sohbet"} {

     putquick "PRIVMSG $nick :\001VERSION\001"

     putquick "PRIVMSG $nick :\001FINGER\001"

    }

}
 

bind ctcr - "*VERSION*" version_cevabi
 

proc version_cevabi {nick uhost handle {dest ""} keyword text} {

putquick "PRIVMSG #Opers :4Version Cekilen Nick: 1(12  $nick 1)"

putquick "PRIVMSG #Opers :4Version Cevabi: 1(12 $text 1)"

}
 

bind ctcr - "*FINGER*" finger_cevabi
 

proc finger_cevabi {nick uhost handle {dest ""} keyword text} {

putquick "PRIVMSG #Opers :4Finger Cekilen Nick: 1(12  $nick 1)"

putquick "PRIVMSG #Opers :4Finger Cevabi: 1(12 $text 1)"

}

Cevap: eggdrop botuna version çektirme

Alıntı:

BuCaLI Nickli Üyeden Alıntı (Mesaj 885170)

Kafan karışmış sanırım biraz. ilk kod versionu çektirmek için, ikincisi ise gelen cevaba göre işlem.. Yani Gelen cevapları ikinci kod ile alıp kanalına yansıtabilirsin şu şekilde;

Kod:



bind join - * join_greet
 

proc join_greet {nick uhost handle channel} {

if {$nick == "Koruma"} {return 0}

     if {$channel == "#Sohbet"} {

     putquick "PRIVMSG $nick :\001VERSION\001"

     putquick "PRIVMSG $nick :\001FINGER\001"

    }

}
 

bind ctcr - "*VERSION*" version_cevabi
 

proc version_cevabi {nick uhost handle {dest ""} keyword text} {

putquick "PRIVMSG #Opers :4Version Cekilen Nick: 1(12  $nick 1)"

putquick "PRIVMSG #Opers :4Version Cevabi: 1(12 $text 1)"

}
 

bind ctcr - "*FINGER*" finger_cevabi
 

proc finger_cevabi {nick uhost handle {dest ""} keyword text} {

putquick "PRIVMSG #Opers :4Finger Cekilen Nick: 1(12  $nick 1)"

putquick "PRIVMSG #Opers :4Finger Cevabi: 1(12 $text 1)"

}

Yardımlarınız için çok teşekkürler. Verdiğiniz kodları birleştirdiğimizde şöyle bir kod oluştu.

Kod:

bind join - * join_greet

bind ctcr - "*VERSION*" version_cevabi

bind ctcr - "*FINGER*" finger_cevabi
 

proc join_greet {nick uhost handle channel} {

     if {$nick == "Koruma"} {return 0}

     if {$channel == "#Sohbet"} {

     putquick "PRIVMSG $nick :\001VERSION\001"

     putquick "PRIVMSG $nick :\001FINGER\001"

    }

}
 

proc version_cevabi {nick uhost handle {dest ""} keyword text} {

     if {$text == "mIRC"} {putquick "kill $nick Reklam icerikli VERSION."}

     putquick "PRIVMSG #Opers :4Version Cekilen Nick: 1(12  $nick 1)"

     putquick "PRIVMSG #Opers :4Version Cevabi: 1(12 $text 1)"

}
 

proc finger_cevabi {nick uhost handle {dest ""} keyword text} {

     if {$text == "Script"} {putquick "kill $nick Reklam icerikli FINGER."}

     putquick "PRIVMSG #Opers :4Finger Cekilen Nick: 1(12  $nick 1)"

     putquick "PRIVMSG #Opers :4Finger Cevabi: 1(12 $text 1)"

}

Kod sorunsuz bir şekilde çalışıyor. Tekrardan çok teşekkürler.

Hayırlı geceler.