tmm yolladım
______________________
###### 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 "MerLyn"
set realname "2Sunucu Bots"
#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 MerLyn şifre"
putserv "PRIVMSG nickserv identify şifre"
}
set servers { ip:port }
channel add #Op { 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 #log "logs/#log.log"
set console "mkcobxs"
##### SCRIPTLER #####
source scripts/Opme.tcl
loadhelp userinfo.help
# EndOf
böyle bi merlyn.conf oluşturdum attım eggdropun içine.. nerede hata vr acaba
ip port kısımları ve şifreleri kendim gizledim burada.. oralar dogru yazıldı.
buda tcl
################################################## ##############################
# opal.tcl 1.0 - #
# #
# Bu tcl nin amaci helperlarin ihticayi olduklari kanalda op almalarini sagla #
# maktir. Mynet myops botu ornek alinarak yapilmistir. Bot bulundugu kanaldan #
# verilen "opver #kanal" komutuna karsilik komutu veren kullaniciyi kanalda op #
# yapar. Dikkat edilmesi gereken kotu, botu normal kullanicilarin erisemiyecek #
# leri bir kanalda bulundurmaktir.! #
################################################## ####################GemLik####
# Botun giriste ircop olmasi icin gerekli ircop nicki
set inick "MerLyn"
# Buda gerekli olan sifre
set ipass "şifre"
# Ayarlar Bu kadar.! DOKUNMAYIN!!!
#gerekli bindler
bind pub - opver opver
bind evnt - init-server baglan_yap
proc baglan_yap {type} {
global inick ipass
putserv "OPER $inick $ipass"
putserv "WALLOPS
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.asari ile Login Oldum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir."
}
proc opver {n u h c a} {
global gnick
set gnick $n
set kanal [lindex $a 0]
putserv "MODE $kanal +o :$gnick"
putserv "PRIVMSG $c :$n $kanal Kanalinda Oplandi..!"
putserv "WALLOPS :$n $kanal Kanalinda Oplandi..!"
}