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

- TCL Scriptler (https://www.ircforumlari.net/tcl-scriptler/)

- - Hosgeldin TCL (https://www.ircforumlari.net/tcl-scriptler/27265-hosgeldin-tcl.html)

Cevap: Hosgeldin TCL

TeŞekkÜrLEr Emeginize SağLık...

Cevap: Hosgeldin TCL

Oneri: Daha estedik olmasi acisindan, surekli olarak TCL yi editlemek zorunda kalmak yerine, karsilama yapilacak kisilere botun var olan userlistesine ekllenerek bir flag(bayrak,seviye) kazandirmak ve kodlar arasinda bu seviyelere ait kisilere atilacak mesajlari belirtmek cok daha duzenli 1 sistem olmasini saglar.

Cevap: Hosgeldin TCL

s.a paylaism cok guzel yanliz bişi soracam mesela bot 4 kanalda var ama ben bu karsilama mesajini sadece 1 kanalda yazmasini istiyorum bu mumkunmudur ?

Cevap: Hosgeldin TCL

Alıntı:

Support Nickli Üyeden Alıntı (Mesaj 261974)

s.a paylaism cok guzel yanliz bişi soracam mesela bot 4 kanalda var ama ben bu karsilama mesajini sadece 1 kanalda yazmasini istiyorum bu mumkunmudur ?

Kod:

set opnick { 

 "By_BuRN" 

"nick2"

"nick3"

"nick4"

}

 

bind join - * baglanti2

proc baglanti2 {nick uhost hand chan } { 

global opnick botnick 
 if {$chan != "#kanal"} {return 0}

if {(![matchattr $hand b]) && ($nick != $botnick)} { 

  foreach opchange [string tolower $opnick] { 

   if {[string match *$opchange* [string tolower $nick]]} { 

    putserv "PRIVMSG $chan : Ownerım $nick şu anda $chan kanalına giriş yaptı.Hoş Geldin" 

    return 0 

    }  

  } 

 } 

}

maviyle gösterdiğim satırı ekler ve #kanal yazan yere istediğin kanalı yazarsan mümkündür ;)