| |
| |
| |
|
Page: 1 2 3 4 5 6
Comments:
<0> ;rename NewNum {}
<1> Gotisch: #297 (535 clicks) Tcl:
<0> :>
<2> ; set y [list]; foreach x [info command *] { if {[string is digit $x] {lappend y $} }; return $y
<3> *cough* BL4DE, you know the drill
<2> oh missing an x
<4> Gotisch restart safetcl
<4> :)
<2> he is a hard killer ;)
<0> then my amazing game is lost :/
<0> i should publish it somewhere
<4> hehe
<2> write a proper script and sell it :)
<0> or i just keep it here next to my "how to save humantiy" tutorial
<4> well it'd clean up my mess :>
<5> BL4DE whattap f00!
<4> ich bin ein tr :)
<5> ein toll?
<4> yeah, this is around where my german ends
<5> ;)
<2> you are a door?
<2> and its spells: ich bin eine tr :)
<5> and I said, "a idiot?"
<4> what else would i be :)
<5> ;)
<4> a female door, u bet i wont be that
<3> *cough* BL4DE, you know the drill
<5> well aslong as you keep the backdoor open ;P
<3> *cough cough cough*
<4> i still got no idea what the heck u talk about :)
<3> cos of the bots being broken
<0> voice
<2> yeah, i lost my voice, since my random ident ;)
<3> ok op :P
<3> only voice in here tho
<6> ;return foo
<1> Pixelz: #328 (199 clicks) Tcl: foo
<6> hm?
<3> =)
<3> =)(=
<4> (=)
<3> \o\ lol \o/ lol /o/
<6> ;set ::result
<1> Pixelz: #334 (198 clicks) Tcl: 17
<6> 17
<1> Pixelz: #335 (stdout) 4 + ? = 10
<6> 6
<1> Pixelz: #336 (stdout) 50 + ?? = 74
<6> ;rename 24 {}
<1> Pixelz: #337 (507 clicks) Tcl:
<6> ;unset ::result
<1> Pixelz: #338 (207 clicks) Tcl:
<6> ;= [unixtime]
<1> Pixelz: #339 (stdout) 633920371 + ????????? = 1136579466
<6> yeah
<2> omg
<6> now we're talkin
<6> ;set ::result
<1> Pixelz: #343 (224 clicks) Tcl: 502659095
<6> 502659095
<1> Pixelz: #344 (stdout) 0 + ? = 0
<6> :(
<2> 0
<1> CyBex_: #346 (stdout) 7 + ? = 8
<2> i'm math pro :>
<6> yeah me too
<6> 1
<1> Pixelz: #349 (stdout) 0 + ?? = 54
<0> proc omg {} { puts unknown "Oh My God!" }
<0> omg
<1> Gotisch: Oh My God!
<6> ;info body =
<1> Pixelz: #352 (460 clicks) Tcl:
<1> Pixelz: #352 (460 clicks) Tcl: if {[info exists ::result]} {return [$num]};if {![string is integer $num]} { return };set rand [expr {int(rand()*$num)}]
<1> Pixelz: #352 (460 clicks) Tcl: set res [expr {$num-$rand}];set ::result $res
<1> Pixelz: There's 4 more lines, but I'm not gonna show you them! =P
<2> i hate u
<6> ;foreach x [split [info body =] \n] {lappend y $x};join $y ;
<1> Pixelz: #354 (1051 clicks) Tcl: if {[info exists ::result]} {return [$num]};if {![string is integer $num]} { return };set rand [expr {int(rand()*$num)}] set res [expr {$num-$rand}];set ::result $res proc $res { args } {if {[info exists ::result]} { unset ::result; rename [lindex [info level [expr {[info level]-1}]] 0] {} };= [expr {int(rand()*100)}];} set h [string repeat "?" [string length $res]] puts "$rand + $h = $num"
<0> proc i { args } { puts unknown "And i [join $args]" }
<0> i like fish
<1> Gotisch: And i like fish
<6> ;lrange $y 0 1
<1> Pixelz: #357 (235 clicks) Tcl: {} {if {[info exists ::result]} {return [$num]};if {![string is integer $num]} { return };set rand [expr {int(rand()*$num)}]}
<0> proc i { args } { puts unknown "And i [join $args] too!" }
<6> ;lrange $y 2 end
<1> Pixelz: #359 (250 clicks) Tcl: {set res [expr {$num-$rand}];set ::result $res} {proc $res { args } {if {[info exists ::result]} { unset ::result; rename [lindex [info level [expr {[info level]-1}]] 0] {} };= [expr {int(rand()*100)}];}} {set h [string repeat "?" [string length $res]]} {puts "$rand + $h = $num"} {}
<0> i fart on CyBex_
<1> Gotisch: And i fart on CyBex_ too!
<0> ok lets not get childish here!
<0> ;lrange $y 3 end
<1> Gotisch: #362 (245 clicks) Tcl: {proc $res { args } {if {[info exists ::result]} { unset ::result; rename [lindex [info level [expr {[info level]-1}]] 0] {} };= [expr {int(rand()*100)}];}} {set h [string repeat "?" [string length $res]]} {puts "$rand + $h = $num"} {}
<6> ;proc = num {if {[info exists ::result]} {return [$num]};if {![string is integer $num]} {return};set rand [expr {int(rand()*$num)}];set res [expr {$num-$rand}];set ::result $res;proc $res { args } {if {[info exists ::result]} { unset ::result; rename [lindex [info level [expr {[info level]-1}]] 0] {} };= [expr {int(rand()*100)}]};set h [string repeat "?" [string length $res]];puts unknown "$rand + $h = $num"}
<1> Pixelz: #363 (703 clicks) Tcl:
<6> ;set ::unknown
<1> Pixelz: #364 (446 clicks) Tcl error: can't read "::unknown": no such variable
<6> meh
<6> ;set ::result
<1> Pixelz: #366 (191 clicks) Tcl: 54
<6> ;unset 54
<1> Pixelz: #367 (425 clicks) Tcl error: can't unset "54": no such variable
<6> ;rename 54 {}
<1> Pixelz: #368 (505 clicks) Tcl:
<6> ;= 10
<1> Pixelz: #369 (3773 clicks) Tcl error: invalid command name "10"
<6> um
<0> proc = { num } { if {[info exists ::result]} {return [$num]};if {![string is integer $num]} { return }; if {[info exists ::max]} { set ::max 100}
<0> set rand [expr {int(rand()*$num)}];set res [expr {$num-$rand}];set ::result $res
<0> proc $res { args } { if {[info exists ::result]} { unset ::result; rename [lindex [info level [expr {[info level]-1}]] 0] {} }; = [expr {int(rand()*$::max)}]}
<0> set h [string repeat "?" [string length $res]];puts "$rand + $h = $num"}
<0> :unset ::result
<0> ;unset ::result
<1> Gotisch: #373 (237 clicks) Tcl:
<0> ;set ::max 10000
<1> Gotisch: #374 (241 clicks) Tcl: 10000
<0> ;= 5000
<1> Gotisch: #375 (stdout) 4631 + ??? = 5000
<6> anyway
<0> 369
<6> use puts unknown
<1> Gotisch: #377 (stdout) 47 + ?? = 80
<6> ;puts unknown foo
<1> Pixelz: foo
<6> >_>
<2> puts known foo
<1> CyBex_: #381 (known) foo
<6> :D
<2> hmm. why is this special? :>
<0> there
<6> look harder
<0> proc = { num } { if {[info exists ::result]} {return [$num]};if {![string is integer $num]} { return }; if {![info exists ::max]} { set ::max 100}
<0> set rand [expr {int(rand()*$num)}];set res [expr {$num-$rand}];set ::result $res
<0> proc $res { args } { if {[info exists ::result]} { unset ::result; rename [lindex [info level [expr {[info level]-1}]] 0] {} }; = [expr {int(rand()*$::max)}]}
<0> set h [string repeat "?" [string length $res]];puts unknown "$rand + $h = $num"}
<6> ;puts unknown "<-- what do we (not) have here?"
<1> Pixelz: <-- what do we (not) have here?
<0> ;unset ::result; set max 9999
<1> Gotisch: #388 (266 clicks) Tcl: 9999
<0> ;= 347345
<1> Gotisch: 122849 + ?????? = 347345
<0> go for it Pixelz
<6> lol
<0> ;set max 345354745
<6> I'd need a calculator for that
<1> Gotisch: #392 (214 clicks) Tcl: 345354745
<0> ;set ::max
<1> Gotisch: #394 (196 clicks) Tcl: 345354745
<0> ;set ::result
<1> Gotisch: #395 (196 clicks) Tcl: 224496
<0> 224496
<1> Gotisch: 65318567 + ???????? = 117383142
Return to
#tcl
or
Go to some related
logs:
#gentoo
winxp vlm key
#cisco
#flash
#aix
#windows
#delphi
#computers
#politics
#beginner
|
|