IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Delay Join TCL v1.0

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

- - Delay Join TCL v1.0 - Eggdrop TCL (https://www.ircforumlari.net/eggdrop-neostats-bnc/389836-delay-join-tcl-v10-eggdrop-tcl.html)

Delay Join TCL v1.0 - Eggdrop TCL

Merhabalar.

Forumda dolaşırken, bir çok arkadaşımızı sunucuya bağlantıda süreli giriş kodunu aradığını farkettim.

Bunu Eggdrop ile kolayca halledebiliriz.

Bu TCL'yi botunuza eklediğinizde kullanıcı bağlandığında ayarladığınız süre kadar bekler, süre sonunda kullanıcıyı kanala çeker.

Kullanıcı bağlandığında ayrılmaması için bilgilendirme mesajı yapar.

Kod:

#######################################################

#                                                     #

#             Delay Join TCL v1.0 CLubber             #

#       Bu TCL ile Bağlanan Kullanıcıları Süreli      #

#            Kanallara Aktarabilirsiniz..             #

#                                                     #

#######################################################

# Kanallarımız.

set kanallar "#Sohbet,#Muhabbet,#Oyun,#Radyo"

# Kullanıcı Bağlantısında Saniye Cinsinden Bekleme Süresi.

set time "10"

#Editlemeler Bu Kadar Lütfen Bundan Sonrasını Ellemeyin.

bind raw * notice connection

proc connection {from keyword text} {

  global botnick kanallar time

  if {[string match -nocase "*Client connecting on port*" $text]} {

    set nick [lindex $text 9]

    putquick "notice $nick :Merhaba $nick"

    putquick "notice $nick :Bağlantınız kuruldu, $time saniye sonunda kanallara aktarılacaksınız."

    putquick "notice $nick :Hoş sohbetler dileriz."

    utimer $time[list putquick "sajoin $nick $kanallar"]

  }

}

 

putlog "Delay Join TCL v1.0 - Eggdrop CLubber"

Sorunsuz çalışıyor, Unrealde Editleme Yapmakta Zorlananlar Bu TCL'yi Kullanabilir..

Keyifli Forumlar :)

Not: Forumdan Dolayı utimer $time ile [ arasındaki boşluk görünmüyor. Orada boşluk var dikkat edin.

Cevap: Delay Join TCL v1.0 - Eggdrop TCL

delayjoin tcl daha öncede paylasılmıstı gerek namesis olsun gerekse raw olsun ginede tekardan kendine göre editleyip yayınlamakta güzel basarılar..

Cevap: Delay Join TCL v1.0 - Eggdrop TCL

Güzel paylaşım, emegine saglık

Cevap: Delay Join TCL v1.0 - Eggdrop TCL

Alıntı:

CLubber Nickli Üyeden Alıntı (Mesaj 1040723512)

Bunun neresi edit ?

Yorum Yazıyor Olmak İçin Yorum Yazmayın.

Kendi Yazdığım Bir TCL, Başkasının Yaptığı Değil.

Kod:

set cekmethod "SAJOIN"
 bind raw * notice snotice:connect
 proc snotice:connect {from keyword text} {
 global cekmethod zaman_araligi
 if {[string match -nocase "*client connecting*" $text]} {
 set nick [lindex $text 9]
 utimer 10[list puthelp "$cekmethod $nick #Oyun,#Kelime,#Yarisma,#OXM,#Radyo,#AlemTR,#GeyikTR"] 
 }
 }
 # Ident ve realname'de degistirelecek olan reklam icerikli kelimeler.
 set delayj(reid) {
 "*mynet*"
 "*zurna*"
 "*kelebek*"
 "*ayna*"
 "*klavye*"
 "*canavar*"
 "*admin*"
 "*oper*"
 "*ircop*"
 "*serv"
 "*service*"
 "*servis*"
 "*http*"
 "*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Sunucunuzun ident'ini belirtiniz.
 set delayj(ident) "GeyikTR"
 # Sunucunuzun realname'sini belirtiniz.
 set delayj(realn) "GeyikTR Sohbet Kullanıcısı"
 # Giris'te gosterilecek olan mesaj'i belirtiniz.
 set delayj(cnmsg) "*** Guvenlik taramalarindan geciyorsunuz. 7 saniye icinde kanallara aktarilacaksiniz, lutfen sabirli olunuz."
 # Giris'te ki uyari mesaj'i nasil iletilsin ?
 # "PRIVMSG" veya "NOTICE"
 set delayj(cmetd) "NOTICE"
 # Ident ve Realname'de reklam tespit edildiginde uyari olarak gosterilecek mesajlari belirtiniz.
 set delayj(idmsg) "*** \002IDENT\002'inizde reklam icerikli kelime(ler) tespit edildigi icin degistirilmistir."
 set delayj(rnmsg) "*** \002REALNAME\002'nizde reklam icerikli kelime(ler) tespit edildigi icin degistirilmistir."
 # Ident ve Realname reklam uyari mesaj'i nasil iletilsin ?
 # "PRIVMSG" veya "NOTICE"
 set delayj(irmtd) "NOTICE"

ne farkı var senin verdigin sajoin işlemiyle diger tcl sajoin islemlerinin acıklayabilirmisin ? encodelerle ufaktan bi oynama yapmıssın, farklı bisey var mı ? dedim mi calmıssın; güzel edit dedim. altını cizim buda benim editim desem.. neyse kolay gelsin... tbk etsende ne fayda irdelesende hersey ortada, kolay gelsin

Cevap: Delay Join TCL v1.0 - Eggdrop TCL

Verdiğin Kodla, Benim Yazdığım TCL'nin uzaktan yakından alakası yok.

Delay Join Diyoruz. Fullname Ban Değil.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Burda Yardım İstemiş Ona Göre Yardım Ediyoruz.

Bi Yerden Alma Söz Konusu Değil.

Cevap: Delay Join TCL v1.0 - Eggdrop TCL

Alıntı:

CLubber Nickli Üyeden Alıntı (Mesaj 1040723730)

Verdiğin Kodla, Benim Yazdığım TCL'nin uzaktan yakından alakası yok.

Alıntı:

CLubber Nickli Üyeden Alıntı (Mesaj 1040723730)

Delay Join Diyoruz. Fullname Ban Değil.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Burda Yardım İstemiş Ona Göre Yardım Ediyoruz.

Bi Yerden Alma Söz Konusu Değil.

biz de biliyoruz yardım oldugunu bisey dedim mi iyi tcl yap paylas bisey dedik mi ? fulname diyorsun onuda ortadan kaldırabilirsin banlama olayınıda onu bizde biliyoruz tcl yazmak buysa yaz kardesim nediyim kolay gelsin

Cevap: Delay Join TCL v1.0 - Eggdrop TCL

Konuyla alakasız, "Şu kişi yazmış ordan editlemişsin" gibi saçma yorumlar yapmazsak sevinirim.

Cevap: Delay Join TCL v1.0 - Eggdrop TCL

öyle bisey dedim mi iyi oku derim onlar gerekse paylasmıs dedim ( namesis / raw ) dedim mi almıssın onlardan ?

Cevap: Delay Join TCL v1.0 - Eggdrop TCL

Dustugumuz duruma bakin.. biri edit bu edit dior otekide alakasi olmadigini savunuyor. Kardesler sizlere bisey sorucam. Siz birbirinize bu kadar ters sozler sarf etceginize aklinizi kullanip kendi tarafinizi savunacaginiza neden el el'e veripte fikir yurutupte ise yariyacak kodlar yazmiyorsunuz? Birazcik nefislerimizi tutmayi ogrenebilsek keske.. benim yorumum clubber'in yazdigi code edit deil cunku ona bakarsak ustune yazdigimiz kagitta edit o zaman nasil olsa agac biri cizgili oteki cizgisiz bu edit denir mi sence Yarguci kardesim? Lakin clubber kardes, Yarguci kardesimizde kotu bisey dememis, ellerine saglik demis. Hadi sonlansin burda bu is kirmayin birbirinizi.

Not: Birini istemeyerek kirdiysam ozur dilerim Hakkinizi helal edin.

Cevap: Delay Join TCL v1.0 - Eggdrop TCL

edit veya , değil sizlere paylaşım sunan arkadaşlarınıza saygılı olun.. alakasız post atmayın siz daha iyisi yapabiliyorsanız sizler yapın yapan adamıda yaptıklarından soğutmayın.. iyi forumlar.