| |
| |
| |
|
Page: 1 2 3
Comments:
<0> anc-: #22 (stdout) 1).
<0> anc-: #22 (stdout) 2).
<0> anc-: There's 4 lines, but I'm not gonna show you the rest of them! =P
<1> Pixelz there are actually 4 more lines
<1> my eggdrop says the same thing
<1> lines keep going to:
<1> 3).
<1> 4).
<1> 5).
<1> 6).
<1> ???
<1> if anybody knows why then explain
<2> then your array contains that stuff
<2> ;puts a; puts b
<0> Pixelz: #33 (stdout) a
<0> Pixelz: #33 (stdout) b
<0> Pixelz: There's 4 lines, but I'm not gonna show you the rest of them! =P
<1> ;puts a
<0> anc-: #34 (stdout) a
<1> ;puts b
<0> anc-: #35 (stdout) b
<1> dont understand 8(
<2> it's some kind of bug with safetcl
<1> no its not
<1> my eggdrop does the exact same thing
<2> when you do ;puts a; puts b? :p
<1> uhm when i do that example just above
<1> it paste 6lines
<2> well that example above works fine locally
<2> just not on safetcl
<1> [19:01:11] <@xperiment> 0)
<1> [19:01:12] <@xperiment> 1)anc-
<1> [19:01:12] <@xperiment> 2)
<1> [19:01:12] <@xperiment> 3)
<1> [19:01:12] <@xperiment> 4)
<1> [19:01:14] <@xperiment> 5).
<1> makes no sense
<1> to me
<2> your array probably is that big then
<1> my arrays looks like this :
<3> why dont you print yourself the array key-name?
<1> if { $i == $mod1} { set nextgamelist $list($mod1,$chan) }
<1> if { $i == $mod2} { set nextgamelist $list($mod2,$chan) }
<1> if { $i == $mod3} { set nextgamelist $list($mod3,$chan) }
<1> $list($mod3,$chan)
<1> that one
<3> key:$index value:[lindex $list($index) 0]
<1> just up to mod5
<1> $mod1 = TDM
<1> $chan is chan
<1> uh CyBex
<1> ?? key
<4> [What-is] That term has not been defined.
<1> key ?
<1> ? array
<0> array -> http://Tcl.Tk/man/tcl8.5/TclCmd/array.htm
<3> set array(key) value
<0> CyBex: #68 (2050 clicks) Tcl: value
<1> key:$index value:[lindex $list($index) 0]
<3> do you use something like: array get/names list *,$chan
<1> nah
<1> only what we talked about in here
<3> ;set x 1;foreach index [array names list] {puts "$x) key:$index value:[lindex $list($index) 0]"; incr x}
<0> CyBex: #73 (stdout) 1) key:c,b value:.
<0> CyBex: #73 (stdout) 2) key:a,b value:.
<0> CyBex: There's 4 lines, but I'm not gonna show you the rest of them! =P
<1> ill try
<3> ;set x 1;foreach index [array names list c,*] {puts "$x) key:$index value:[lindex $list($index) 0]"; incr x}
<0> CyBex: #75 (stdout) 1) key:c,b value:.
<1> i see
Return to
#tcl
or
Go to some related
logs:
#sex
#photoshop
#red
#worldcup
joeschm0e
#ubuntu
homesless person act
#linuxhelp
#sex
#beginner
|
|