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

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

- - Tcl sorun (https://www.ircforumlari.net/eggdrop-neostats-bnc/315505-tcl-sorun.html)

İyi çalışmalar kolay gelsin. Forumda oldukça fazla bi şekilde aradım hatta genel tcl sitelerindede aradım. Ortalama 15 tane kadar oyun tcl sini denedim sonuç olarak aldığım hata hep aynı ;

Tcl error [tgstart]: can't read "tgmaxhintcurrent": no such variable

hatta forumda bi arkadaş daha aynı hatayı almış onun konusunda farklı oyun tcl leri verilmiş onlarıda aldım denedim onlarda aynı hatayı verdi..

Bu sorun neden dolayı kaynaklanıyor. 15 tane tcl nin hepsi mi hatalı yoksa bende mi bi sorun var..

arkadaşlar lütfen yardımcı olursanız çok sevinirim. Kolay gelsin.

----------

Yardımcı olucak olan yok mu arkadaşlar..

Cevap: Tcl sorun

"tgmaxhintcurrent": degişkeni okuyamıyor.Sen oyun.conf dosyasına incele ordaki ayarlarında vardır eksiklikler.istersen oyun.conf dosyasını gönder bakalım.

Cevap: Tcl sorun

Alıntı:

SeYH_SaMiL Nickli Üyeden Alıntı (Mesaj 1040305496)

Bir arkadaşım bu soruna şöyle bir çözüm buldu:
Eggdrop1.6.18 ve 19 sürümlerinde kurulum için makinada root da şu işlemi yapmak gerekiyor;

Kod:

ln -s /usr/local/lib/libtcl8.5.so /usr/lib/libtcl8.5.so

Bu işlem sorası kurulum sorunsuz olacakdır, sonra gelelim oyun botlarının tcl den kaynaklı verdikleri hataya onun içinde şöyle bir çözüm buldu;

Tc lerdeki bu kodu:

Kod:

if {[catch {incr tghintnum}]!=0} {

set tghintnum 0

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]

}

}

Şununla değiştir:

Kod:

if {![info exists tghintnum]} {

set tghintnum 0

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 }

Botlar sorunsuz çalışacakdır, en azından bende öyleydi şimdiye kadar.

sanırım burası sana yardımcı olur..

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