| |
| |
| |
|
Page: 1 2
Comments:
<0> ;regexp -all -inline -nocase -- {(.+)\1} "testtestisthere"
<1> Gotisch: #16 (5197 clicks) Tcl: testtest test
<0> ;regexp -all -inline -nocase -- {(.+)\1{0,1}} "testtestisthere"
<1> Gotisch: #17 (1100 clicks) Tcl: testtestisthere testtestisthere
<0> ;regexp -all -inline -nocase -- {(.+)\1*} "testtestisthere"
<1> Gotisch: #18 (1180 clicks) Tcl: testtestisthere testtestisthere
<0> ;regexp -all -inline -nocase -- {(.+)\1*} "testtestisthere abc"
<1> Gotisch: #19 (387 clicks) Tcl: {testtestisthere abc} {testtestisthere abc}
<0> ;regexp -all -inline -nocase -- {(.+)\1} "testtestisthere abc"
<1> Gotisch: #20 (12187 clicks) Tcl: testtest test
<0> ;regexp -all -inline -nocase -- {(.+)\1} "testtestisthere abcabc hello pulp"
<1> Gotisch: #21 (92131 clicks) Tcl: testtest test abcabc abc ll l
<0> ;regexp -all -inline -nocase -- {(?:.+)\1} "testtestisthere abcabc hello pulp"
<1> Gotisch: #22 (552 clicks) Tcl error: couldn't compile regular expression pattern: invalid backreference number
<0> ;regexp -all -inline -nocase -- {(:?.+)\1} "testtestisthere abcabc hello pulp"
<1> Gotisch: #23 (100619 clicks) Tcl: testtest test abcabc abc ll l
<2> st0rm?
<3> what is the easiest way to replace all ' with \'
<3> i keep attempting regsub to no avail
<4> i have a radio button...
<4> and i'd like to modify the gui when i modify that radio button
<4> is there in the radiobutton the possibility to run a command? is this the way i must look for?
<5> ;set test 2
<1> anc: #47 (169 clicks) Tcl: 2
<5> set test2($test) hej
<1> anc: #48 (194 clicks) Tcl: hej
<5> puts $test2($test)
<1> anc: #49 (stdout) hej
<5> ;set list "1 2"
<1> anc: #50 (172 clicks) Tcl: 1 2
<5> ;foreach $i [split $list] { set test($i) ok }
<1> anc: #51 (347 clicks) Tcl error: can't read "i": no such variable
<5> ;foreach i [split $list] { set test($i) ok }
<1> anc: #52 (476 clicks) Tcl error: can't set "test(1)": variable isn't array
<6> ;string map {. " "} "t.e.s.t"
<1> th3dge: #60 (344 clicks) Tcl: t e s t
<7> split {t.e.s.t} "."
<1> yoe: #61 (154 clicks) Tcl: t e s t
<8> split {t.e.s.t}
<1> badaas: #62 (139 clicks) Tcl: t.e.s.t
<8> split {t.e.s.t} {}
<1> badaas: #63 (186 clicks) Tcl: t . e . s . t
<7> ;join [split "t.e.s.t" "."] {}
<1> yoe: #64 (190 clicks) Tcl: test
<7> got to go buy me a cheeseburger.. bbl
<6> enjoy
<9> set x "t.e.s.t"; while {[string first . $x] != -1} { set x [string replace $x [string first . $x] [string first . $x] ""] }; set x
<1> Pixelz: #72 (2794 clicks) Tcl: test
<10> lol
<9> ;rand
<1> Pixelz: #74 (359 clicks) Tcl error: wrong # args: should be "rand maxint"
<9> ;rand 1
<1> Pixelz: #75 (173 clicks) Tcl: 0
<9> ;return \0035foo
<1> Pixelz: #76 (131 clicks) Tcl: foo
<9> right
<9> set x ".t.e.s.t"; while {[string first . $x] != -1} { set x [string replace $x [string first . $x] [string first . $x] "\003[rand 15]"] }; set x
<1> Pixelz: #78 (3567 clicks) Tcl: test
<9> set x ".t.h.e .a.m.a.z.i.n.g .c.o.l.o.r.i.z.e.r"; while {[string first . $x] != -1} { set x [string replace $x [string first . $x] [string first . $x] "\003[rand 15]"] }; set x
<1> Pixelz: #79 (14408 clicks) Tcl: the amazing colorizer
<6> yuck
<9> set x ".t.h.e .a.m.a.z.i.n.g .c.o.l.o.r.i.z.e.r"; while {[string first . $x] != -1} { set x [string replace $x [string first . $x] [string first . $x] "\003[rand 15]"] }; set x
<1> Pixelz: #81 (14495 clicks) Tcl: the amazing colorizer
<9> :)
<9> ;randcolors
<1> Pixelz: #83 (2305 clicks) Tcl error: invalid command name "randcolors"
<9> ;proc colorizer args {foreach c [split [join $args] {}] {append r \003[rand 15]$c}; return $r}
<1> Pixelz: #84 (566 clicks) Tcl:
<9> ;colorizer "this is a colorized test"
<1> Pixelz: #85 (1081 clicks) Tcl: this is a colorized test
<9> now all we need is for it to use that proc for all it's output
<9> ;colorizer #tcl - presented in technicolor where availible
<1> Pixelz: #87 (1469 clicks) Tcl: #tcl - presented in technicolor where availible
<6> http://www.geocities.jp/ntbls_kyoto_city/themirrorshapedofknowledge.mp3
<6> :)]
<11> .tcl puthelp
<1> poci: #90 (2319 clicks) Tcl error: invalid command name "puthelp"
<11> .tcl putquick
<1> poci: #91 (2334 clicks) Tcl error: invalid command name "putquick"
<10> ;proc name {} {puts hello}
<1> [GRiMMY]: #98 (387 clicks) Tcl:
<10> ;delete name
<1> [GRiMMY]: #99 (2335 clicks) Tcl error: invalid command name "delete"
<10> ;rename name {}
<1> [GRiMMY]: #100 (415 clicks) Tcl:
<7> thought more about the botnet?
<9> not really :D
<7> meh
<9> except that we definately need to colorize all output
<7> lol
<9> at this point, we should just figure out a name and create a channel
<7> true..
<9> then wait a week or something for more devs :D
<7> i don't remember the good names =)
<9> yeah me neither
<7> yeah.. BL4DE seems interested a bit
<7> Robb?
<7> aaah.. botnet-sama =)
<9> lol
<10> delete?
<12> if robb is in we need something like muhammeds botnet
<10> hmmm ==P
<10> does "rename proc {}" delete the proc?
<9> yes
<10> ok
<7> [02:26:04] <+Pixelz> lol
<7> [02:26:08] <+Pixelz> that's it! :)
<7> [02:26:21] <+Pixelz> botnet-san
<9> I was being sarcastic though
<9> sort of
<7> haha, yeah, i know.. was just reading the logs.. alot of word vomiting =)
<7> uh 'word vomiting' = 'word spewing
<7> or something
<10> NABS
<10> Not Another Botnet Script
<10> or YABS
<10> Yet Another Botnet Script
<7> yoes another botnet script =)
<10> =P
<7> j.a.b.s. was pretty good tho
<7> just another botnet script
<10> yeah
<10> can i compile the tcl libs into an executable along with my script?
<9> makes me think of sweaty men in black and white
<9> there are some wrappers that kinda does that
<9> but the executable becomes huge
<9> like 1-2mb or something
<9> you could create a starkit..
<7> i never got any wrapper working correctly.. makes me feel like a noob.
<10> i'm thinking for windows
<10> and 1-2mb isnt that big an executable in win
<9> starkit is probably the best idea
<9> imo
<9> if people don't have it they can just go get it
<10> hmmm
<9> like everyone has to download java to runt java programs
<9> they can download starkit
<9> http://www.equi4.com/starkit.html
<9> http://www.equi4.com/pub/tk/downloads.html
<9> executables
<9> easy as pie
<7> Pixelz: why not just call it 'botnet' or 'bnet'?
<9> botnet sounds good to me
<9> bnet is kinda short for battle.net though
<9> shortname could be botnet and we could have a longer name to make it easier to google for
<9> heh #botnet is prolly taken though :D
<7> altho, i could be kinda confusing with 'botnet', i mean, it IS the name of a eggdrop network... it should be a name that you could ask a person, a unique name, so it doesn't get confusing.
Return to
#tcl
or
Go to some related
logs:
#gentoo
#beginner
#goal
#nhl
#gentoo
#goal
#beginner
cmweiss charlie
monyeen
#sex
|
|