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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   Eggdrop, NeoStats, BNC (https://www.ircforumlari.net/eggdrop-neostats-bnc/)
-   -   Tcl Botlar Soru Sormuyor (https://www.ircforumlari.net/eggdrop-neostats-bnc/349275-tcl-botlar-soru-sormuyor.html)

saywhat 27 Mayıs 2012 19:45

Cevap: Tcl Botlar Soru Sormuyor
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

botun.conf dosyasında şu iki satırı göreceksiniz.
Kod:

unbind dcc n tcl *dcc:tcl
unbind dcc n set *dcc:set

eğerki bu satırlar varsa unbind yazan yerleri bind olarak değişin bu iki satır için yok ise bu satırlar
Kod:

bind dcc n tcl *dcc:tcl
bind dcc n set *dcc:set

şeklinde ekleyebilirsiniz.bu iki satır dcc/telnet bağlantısında bota .set ve .tcl komutlarına yanıt vermesini sağlayacak.

botu .restart edin bu .conf üzerindeki değişiklikten sonra kanalda bu trivia oyunu için !basla komutu verin scripti yükleyip.hemen ardında bota telnet /dcc üzerinden
.set ::errorInfo
.tcl set ::errorCode
yada

.tcl set ::errorInfo

komutlarını yazın bu komutlar botun size telnet/dcc üzerinde son uygulanan işlemde oluşmuş olası hataları göstermesini sağlayacaktır.bu komutlardan sonra bottan aldığınız mesajları buraya postalayın.

botla alakalı genel bilgi almak için telnet/dcc bağlantısında .status komutunu

botun bağlı bulunduğu kanal üzerindeki ayar bilgileri için .chaninfo #kanalınız komutunu uygulayabilirsiniz.

botun komutları hakkında bilgiler için .help ve .help all tüm komut listesini verecektir. bir komut hakkında bilgi için .help komut şeklinde dcc/telnet bağlantısı üzerinde komutları uygulayabilirsiniz.


not. yada botu killeyin kill -9 botun PID nosu PID görmek içi ps aux trivia ayarları yapıp soru dosyasıyla beraber içe atın bot.conf'ta belirtin-ekleyin botu ./eggdrop -mn botun.conf ortaya -mn ekleyip çalıştırın ortadaki -n putty üzerinden botun statusunu aldığı mesajları vs görmenizi sağlayacaktır putty kapamadan bot kanala girdiğinde !basla komutuyla başlatmayı deneyin ve putty'deki botun verdiği aldığı mesajlara bakın herhangi bir hata mesajı olup olmadığına bakın !basla komutundan sonra bir hata gözüküyormu putty'de orda varsa onuda buraya atın..

Heri 27 Mayıs 2012 21:45

Cevap: Tcl Botlar Soru Sormuyor
 
servis odasina yönlendirdim botu herseyi o odaya ayarladim.
telnetteki cikan mesaj bunlar.

[20:40] %#servis (+ptrn) : [m/5 o/1 h/3 v/0 n/1 b/0 e/0 I/0]
[20:40] planet ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) left #servis.
[20:42] Tcl error [tgstart]: can't read "tgmaxhintcurrent": no such variable
[20:42] <admin> !basLa

Heri 27 Mayıs 2012 22:44

Cevap: Tcl Botlar Soru Sormuyor
 
servis odasina yönlendirdim botu herseyi o odaya ayarladim.
telnetteki cikan mesaj bunlar.

[20:40] %#servis (+ptrn) : [m/5 o/1 h/3 v/0 n/1 b/0 e/0 I/0]
[20:40] planet ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) left #servis.
[20:42] Tcl error [tgstart]: can't read "tgmaxhintcurrent": no such variable
[20:42] <admin> !basLa

Hayalet 27 Mayıs 2012 23:02

Cevap: Tcl Botlar Soru Sormuyor
 
tcl hatası diyor tcl error bunu düzeltmen gerekli öncelikle

Heri 27 Mayıs 2012 23:02

Cevap: Tcl Botlar Soru Sormuyor
 
[21:57] oyuncukiz joined #servis.
[21:57] Tcl error [tgstart]: can't read "tgmaxhintcurrent": no such variable
[21:57] <Entrance> !basla
[21:57] <Entrance> !baslat
[21:59] Introduced to Entrance (*!*ikanlim@*.234.Ks612=)
[21:59] Bot installation complete, first master is Entrance
[21:59] ERROR writing user file.
[21:59] Notefile unreachable!

Heri 27 Mayıs 2012 23:03

Cevap: Tcl Botlar Soru Sormuyor
 
"tgmaxhintcurrent": burda hata var forumda biryerde arkadaslar vermisdi kopyaladim o zamanda hic olmadi

Hayalet 27 Mayıs 2012 23:05

Cevap: Tcl Botlar Soru Sormuyor
 
dosya okunamıyor diyor Tcl bilgilerini eksiksiz olarak girip denemen gerekli bir virgül dahi okunamaması için yeterli. Dikkatli bir şekilde tekrar kontrol edip öyle dene

Heri 28 Mayıs 2012 00:54

Cevap: Tcl Botlar Soru Sormuyor
 
Olay cözüldü arkadaslar cok sükür. Forumda böyle sey görmüsdüm ama ben demekki yanlis yapmis olabilirim. Olay bu kodlari degistinizmi botunuzda calisiyor.
Herkeze tsk ederim.

#TCL FIX
#satir 493
if {[catch {incr tghintnum}]!=0} {
set tghintnum 0
regsub -all {ð} $tgcurrentanswer "g" tgcurrentanswer
regsub -all {Ð} $tgcurrentanswer "G" tgcurrentanswer
regsub -all {ü} $tgcurrentanswer "u" tgcurrentanswer
regsub -all {Ü} $tgcurrentanswer "U" tgcurrentanswer
regsub -all {þ} $tgcurrentanswer "s" tgcurrentanswer
regsub -all {Þ} $tgcurrentanswer "S" tgcurrentanswer
regsub -all {ý} $tgcurrentanswer "i" tgcurrentanswer
regsub -all {Ý} $tgcurrentanswer "I" tgcurrentanswer
regsub -all {ö} $tgcurrentanswer "o" tgcurrentanswer
regsub -all {Ö} $tgcurrentanswer "O" tgcurrentanswer
regsub -all {ç} $tgcurrentanswer "c" tgcurrentanswer
regsub -all {Ç} $tgcurrentanswer "C" tgcurrentanswer
regsub -all -- "\[^A-Za-z0-9\]" $tgcurrentanswer "" _hintchars
set tgmaxhintcurrent [expr [strlen $_hintchars]<=$tgmaxhint?[expr [strlen $_hintchars]-1]:$tgmaxhint]
catch {tgunbindhintcmd}
if {$tgmaxhintcurrent>0} {
set tgrebindhinttimer [utimer $tgtempnohint tgbindhintcmd]
}
}

#Asagidaki kirmizi satirlari yukardaki satirlarla degisiniz botunuz calisacaktir!!!!!!!
if {![info exists tghintnum]} {
set tghintnum 0
regsub -all {ð} $tgcurrentanswer "g" tgcurrentanswer
regsub -all {Ð} $tgcurrentanswer "G" tgcurrentanswer
regsub -all {ü} $tgcurrentanswer "u" tgcurrentanswer
regsub -all {Ü} $tgcurrentanswer "U" tgcurrentanswer
regsub -all {þ} $tgcurrentanswer "s" tgcurrentanswer
regsub -all {Þ} $tgcurrentanswer "S" tgcurrentanswer
regsub -all {ý} $tgcurrentanswer "i" tgcurrentanswer
regsub -all {Ý} $tgcurrentanswer "I" tgcurrentanswer
regsub -all {ö} $tgcurrentanswer "o" tgcurrentanswer
regsub -all {Ö} $tgcurrentanswer "O" tgcurrentanswer
regsub -all {ç} $tgcurrentanswer "c" tgcurrentanswer
regsub -all {Ç} $tgcurrentanswer "C" tgcurrentanswer
regsub -all -- "\[^A-Za-z0-9\]" $tgcurrentanswer "" _hintchars
set tgmaxhintcurrent [expr [strlen $_hintchars]<=$tgmaxhint?[expr [strlen $_hintchars]-1]:$tgmaxhint]
catch {tgunbindhintcmd}
if {$tgmaxhintcurrent>0} {
set tgrebindhinttimer [utimer $tgtempnohint tgbindhintcmd]
}
} else { incr tghintnum }


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 06:27.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk