![]() |
![]() |
![]() | #11 |
Çevrimdışı ![]() IF Ticaret Sayısı: (0) | Cevap: trivia sorubotu sorunu 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 } |
| ![]() |
Etiketler |
sorubotu, sorunu, trivia |
Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
| |
![]() | ||||
Konu | Konuyu Başlatan | Forum | Cevaplar | Son Mesaj |
Trivia Oyun botu Sorunu | AyazGeceLer | TCL Scriptler | 3 | 12 Aralık 2016 22:57 |
Trivia ve English Oyun botu sorunu. | SeYH_SaMiL | Eggdrop, NeoStats, BNC | 18 | 30 Ekim 2014 14:47 |
Trivia 5 Sorubotu elinde olan varmi | pesimistyoung | Eggdrop, NeoStats, BNC | 6 | 07 Ekim 2014 02:40 |
Trivia Botların düşme sorunu | SeYH_SaMiL | Eggdrop, NeoStats, BNC | 5 | 03 Şubat 2010 02:40 |
TRivia botun bazi serverlerde calismamasi sorunu | vasarelli | mIRC Scripting Sorunları | 2 | 16 Şubat 2009 05:12 |