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

11Beğeni(ler)
  • 10 Post By CLubber
  • 1 Post By house

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 17 Şubat 2012, 16:20   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Eggdrop Botunuz Nickinizi Kaydetsin..




PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#######################################
# Botumuzun kendi nickini yazıyoruz   #
#######################################
 
set mybotnick "Eggdrop"
 
#######################################
# Botumuzun kendi şifresini yazıyoruz #
#######################################
 
set mybotpass "123456"
 
#######################################
#Nick Kayıt TCL - Written By CLubber  #
#######################################
 
bind msg - !kaydet msg_register
proc msg_register 
{nick uhand host text} {
  global 
botnick mybotnick mybotpass
  set regnick 
[lindex $text 0]
  
set password [lindex $text 1]
  
set mail [lindex $text 2]
  if {
$regnick == ""} {putquick "PRIVMSG $nick :Nickinizi kaydedebilmem için lütfen bir nick belirleyiniz. Kullanım: <!kaydet nick şifreniz e-postanız>";return}
  if {
$password == ""} {putquick "PRIVMSG $nick :Nickinizi kaydedebilmem için lütfen bir şifre belirleyiniz. Kullanım: <!kaydet nick şifreniz e-postanız>";return}
  if {
$mail == ""} {putquick "PRIVMSG $nick :Nickinizi kaydedebilmem için lütfen bir e-posta belirleyiniz. Kullanım: <!kaydet nick şifreniz e-postanız>";return}  
  
putserv "OperServ RAW SVSNICK $regnick Misafir1234 :1"
  
utimer 5[list set nick $regnick]
  
utimer 20[list putquick "NickServ REGISTER $password $mail"]
  
utimer 25[list putquick "NOTICE Misafir1234 $regnick, isimli nickiniz $password şifresi ile kaydedilmiştir."]
  
utimer 26[list putquick "OperServ RAW :NickServ PRIVMSG #Opers :\[Nick Kaydı\] $regnick ($mail) nicki REGISTER komutunu kullanmıştır."
  
utimer 30[list set nick $mybotnick]
  
utimer 31[list putquick "NickServ Identify $mybotpass"]
}
 
putlog "Nick Register TCL v1.0 - Written By CLubber" 

* Botunuzun özelinde <!kaydet nick şifre e-posta> komutunu uygulamanız yeterlidir.

* utimer 30[ bu kısımda 30 ile [ arasında bir boşluk olması gerekiyor. utimerlerin hepsini düzeltmeniz gereklidir, forum nedeni ile birleşik çıkıyor.

* Botunuzun kendi nickini ve şifresini yazmayı unutmayınız, aksi taktirde bot çalışmaz.

* TCL Yapımcısı: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 14 Nisan 2012, 10:34   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Eggdrop Botunuz Nickinizi Kaydetsin..




!kaydet aLoNe 2435 felan gibi yapsam, direkt o kişinin nickini değiştirip şifrelemeye çalışacak. Bunun yerine direkt o kişiyi alsa ( $nick olarak ) ve $text 0 kısmını şifre yapsa daha iyi olabilir.

 
Alıntı ile Cevapla

Alt 14 Nisan 2012, 13:41   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Eggdrop Botunuz Nickinizi Kaydetsin..




Komut bilgisi olmayan kullanicilar icin guzel bir sistem aslinda, basarilar,) Bu sekilde daha da gelistirebilir..

__________________
IRC ve Sanal bitmiştir.
 
Alıntı ile Cevapla

Alt 14 Nisan 2012, 21:17   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Eggdrop Botunuz Nickinizi Kaydetsin..




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
bind msg - !kaydet msg_register proc msg_register {nick uhand host text} { global botnick mybotnick mybotpass set regnick $nick set password [lindex $text 0] set mail $nick@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]iniz.com if {$password == ""} {putquick "PRIVMSG $nick :Nickinizi kaydedebilmem için lütfen bir şifre belirleyiniz. Kullanım: <!kaydet şifreniz>";return} putserv "OperServ RAW SVSNICK $regnick Misafir1234 :1" utimer 5 [list set nick $regnick] utimer 20 [list putquick "NickServ REGISTER $password $mail"] utimer 25 [list putquick "NOTICE Misafir1234 $regnick, isimli nickiniz $password şifresi ile kaydedilmiştir."] utimer 26 [list putquick "OperServ RAW :NickServ PRIVMSG #Opers :\[Nick Kaydı\] $regnick ($mail) nicki REGISTER komutunu kullanmıştır."] utimer 30 [list set nick $mybotnick] utimer 31 [list putquick "NickServ Identify $mybotpass"] }

vs gibi. bu sayede hem site adıyla kaydedilir nick, mail adresi böyle olur otomatikmen, hem de o an o nickte olduğu için zaten başkasını kaydetme riski olmaz.

 
Alıntı ile Cevapla

Cevapla

Etiketler
botunuz, eggdrop, kaydetsin, nickinizi


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Kanala Girenleri Otomatik Txt Dosyasina Kaydetsin. IRCConnect mIRC Scripting Sorunları 9 14 Temmuz 2010 20:15
TcL Yardım. Botunuz kanal'da Reklamınızı yapsın KuRaLsIz TCL Scriptler 8 09 Mayıs 2009 16:08
Reklam botum attığı nickleri kaydetsin aRiF mIRC Scripting Sorunları 5 12 Kasım 2007 23:02