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

Kod:

 

bind raw - NOTICE baglanti 

proc baglanti {from keyword text} { 

if {[string match -nocase "*client connecting*" $text]} { 

set nick [lindex [split $text] 9]

utimer 1[list putserv "raw close" ]

utimer 1[list putserv "fjoin $nick #sohbet" ]

utimer 1[list putserv "fjoin $nick #oyun" ]

utimer 1[list putserv "fjoin $nick #radyo" ]

} 

}

Bu Fjoin TCL si

Buda Conf Ayarı

Kod:

###### Bilgi Satiri #####

set mod-path "modules/"

set help-path "help/"

set text-path "text/"

loadmodule dns

loadmodule channels

loadmodule server

loadmodule ctcp

loadmodule irc

loadmodule notes

loadmodule console

checkmodule blowfish

 

##### Bilgi Satiri #####

##### Bot bilgileri #####

set nick "Jakeno"

set realname "2Jakeno"

 

#Bu opsiyonel su an kapalidir. Eger botunuz herhangi bir nedenden oturu size ctcp acmiyorsa

#Bu satira botun barindirilmis oldugu host'un ip adresini yazmaniz yeterli olacaktir.

 

#set my-ip "1.2.3.4"

 

set init-server { 

putserv "oper a 11111" 

putserv "PRIVMSG nickserv identify 11111"

putserv "umode +c"

}

set servers { 72.9.145.254:6667 }

channel add #KanalAdı { chanmode "lik" idle-kick 0 stopnethack-mode 0 }

set net-type 5

set owner TimothY

 

##### Dosyalar ve Dizinler #####

##### Bilgi Satiri #####

set userfile "bots.user"

set chanfile "bots.chan"

set temp-path "/tmp"

logfile msbxco * "logs/bots.log"

logfile jpk #kanaladi "logs/#kanaladi.log"

set console "mkcobxs"

 

##### SCRIPTLER #####

source scripts/userinfo.tcl

source scripts/jakeno.tcl

loadhelp userinfo.help

 

# EndOf

Ama Bot umode +c Almıyor Sebebi Ne Olabilir