| |
| |
| |
|
Page: 1 2
Comments:
<0> i hate events :>
<0> aeh threads
<0> ha
<0> i crashed my tclsh :]
<1> =)
<0> % thread::send $thread { tpool::post tpool0 {after 100000; puts "300 Seconds p***ed"} }
<0> 4
<0> % thread::send $thread { tpool::release tpool0 }
<0> k
<0> 300 Seconds p***ed
<0> called Tcl_FindHashEntry on deleted table
<0> % Aborted
<0> bots@debian:~/tcl$
<2> hello , any one can help me with this bind [ bind time - "% % % % %" proc ] ?
<3> f.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.k
<3> f.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.k
<4> f.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.k
<4> f.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.k
<5> f.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.k
<5> f.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.k
<6> f.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.k
<6> f.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.k
<4> f.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.k
<5> f.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.k
<6> f.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.k
<7> f.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.k
<8> f.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.kf.u.c.k
<9> Anyone available that can help me with the TCL script my friend made for the eggdrop to do oper commands, i can't seem to make it gline properly. :\
<0> lol
<9> Can you?
<10> hehe
<9> Or can you?
<10> if i could ive have no time
<9> er
<9> can you just look at it
<9> see if theres anything obvious?
<10> no
<9> I know about as much about TCL as a 3rd grade graduate knows about Algebra
<9> rofl
<10> lol
<11> Douglas: first of all, read the topic (#eggtcl for eggdrop questions), second, read the topic in #eggtcl - there's ya answer. ;)
<9> your such a nice guy
<9> you ***
<11> heh
<10> lol
<0> wow he showed you :)
<12> if you're an *** he'll have a hard time surviving rest of his life :)
<0> mhpf
<0> ;expr set zeng 8; set tage 10; set rhac 1; set visv 0; expr ($zeng * 1.21 * $tage + 1.8 * $tage + $visv * 0.96 * $tage) * ($rhac + 1)
<13> Gotisch: #1017 (14649 clicks) Tcl error: syntax error in expression "set zeng 8": variable references require preceding $
<0> ;set zeng 8; set tage 10; set rhac 1; set visv 0; expr ($zeng * 1.21 * $tage + 1.8 * $tage + $visv * 0.96 * $tage) * ($rhac + 1)
<13> Gotisch: #1018 (570 clicks) Tcl: 229.6
<0> ;set zeng 8; set tage 10; set rhac 1; set visv 0; expr {($zeng * 1.21 * $tage + 1.8 * $tage + $visv * 0.96 * $tage) * ($rhac + 1)}
<13> Gotisch: #1019 (442 clicks) Tcl: 229.6
<11> hehe, check this out..
<11> haha
<11> it really works..
<0> what?
<11> ipv6 sockets in tcl
<0> i dont get it
<0> why do you need to make 10 connections to show that they work?
<11> made a loop to see if it could switch hostnames and come online
<0> set zeng 8; set tage 10; set rhac 1; set visv 0; expr ($zeng * 1.21 * $tage + $visv * 1.8 * $tage + $visv * 0.96 * $tage) * ($rhac + 1)
<13> Gotisch: #1028 (541 clicks) Tcl: 193.6
<0> ah
<0> i want to have so many hosts too :/
<0> and working ipv6
<11> then get it? it's free you know.. ;)
<0> can you elaborate?
<0> im pretty sure at least hosts aren't free :>
<11> yeah they are.. www.afraid.org got ~27500 free hosts
<11> www.hexago.com for ipv6
<0> mh
<0> but i can only have 1 ipv6 adress can't i?
<11> zanpaktou lindex [split [checkIps] \n] 0
<11> hm
<11> anyway, nah
<11> you can have a bunch..
<11> i've 46 now, but i can have more i guess.. :]
<14> <1.0ms> invalid command name "checkIps"
<0> i still dont get how it can be free
<11> :]
<0> mpfh
<0> my kernel doesnt have ipv6 support
<11> Gotisch: what are ya running?
<0> 2.4.27
<11> same here.. did you try modprobe it?
<0> ye
<0> i dont have the module
<11> then recompile ;)
<15> hello
<11> hey
<0> ye i dont want to recompile :(
<15> c,perl,python,tcl
<15> what are some other portable languages
<16> java?
<15> ok
<0> ; if { 1 == 2 ** 1 } { puts whatever }
<13> Gotisch: #1462 (283 clicks) Tcl error: syntax error in expression " 1 == 2 ** 1 ": unexpected operator *
<10> i need help with an regexp if somone want to help
<0> tell me
<10> http://warpdrive.se/rss/warp_senaste.xml
<10> want to output the text only
<0> and what do you need?
<10> not all <bla>
<0> i cant open that page
<10> huh
<10> i can
<10> i sont want to paste it =)
<10> dont*
<10> not in the chan..
<17> N86ers there is a rss script on eggheads
<10> ok
<10> know the name?
<17> just search rss
<0> ;regexp {$(.+) "(.+)" line ([0-9]+)} { (procedure "mysql::connect" line 3)}
<13> Gotisch: #1485 (115138 clicks) Tcl: 0
<0> ;regexp {$(.+) "(.+)" line ([0-9]+)} {(procedure "mysql::connect" line 3)}
<13> Gotisch: #1486 (201 clicks) Tcl: 0
<0> ;regexp {(.+) "(.+)" line ([0-9]+)} {(procedure "mysql::connect" line 3)}
<13> Gotisch: #1487 (45521 clicks) Tcl: 1
<0> ;regexp {^(.+) "(.+)" line ([0-9]+)$} {(procedure "mysql::connect" line 3)}
<13> Gotisch: #1488 (32072 clicks) Tcl: 0
<0> ;regexp --inline {(.+) "(.+)" line ([0-9]+)} {(procedure "mysql::connect" line 3)}
<13> Gotisch: #1489 (272 clicks) Tcl error: bad switch "--inline": must be -all, -about, -indices, -inline, -expanded, -line, -linestop, -lineanchor, -nocase, -start, or --
<0> ;regexp -inline {(.+) "(.+)" line ([0-9]+)} {(procedure "mysql::connect" line 3)}
<13> Gotisch: #1490 (777 clicks) Tcl: {(procedure "mysql::connect" line 3} (procedure mysql::connect 3
<18> erm
<0> mh?
<18> whys that work?
<18> {(.+) "
<0> why not?
<18> () () )
<18> thats why
<0> ;regexp -inline {\((.+) "(.+)" line ([0-9]+)\)} {(procedure "mysql::connect" line 3)}
<13> Gotisch: #1497 (16061 clicks) Tcl: {(procedure "mysql::connect" line 3)} procedure mysql::connect 3
<0> what are you talking about?
Return to
#tcl
or
Go to some related
logs:
godenuk NHL
#computers
last bots alt til nordicmafia
#beginner
kermit yost
jelly fish manawars
#beginner
#computers
#freebsd
3214you
|
|