egghelp/eggheads community

Any there can help me a bit ?

2004-12-10T04:21:55-04:00

Ok, all right

Statistics: Posted by CrazyCat — Fri Dec 10, 2004 4:21 am

Any there can help me a bit ?

2004-12-09T15:14:41-04:00

Didn't notice you had made a edit of your previous post !

Thanx alot for the quick and good help

Statistics: Posted by Psx|Dk — Thu Dec 09, 2004 3:14 pm

Any there can help me a bit ?

2004-12-09T12:57:42-04:00

Tested in my egg:

Code:

[17:55:14]  .tcl set stats "\[E\] 30 \[G\] 11 \[H\] 8 \[S\] 1"[17:56:25]  .tcl foreach {key val} $stats { putlog "$key is $val" }[17:56:26]  [17:55] tcl: evaluate (.tcl): foreach {key val} $stats { putlog "$key is $val" }[17:56:26]  [17:55] [E] is 30[17:56:26]  [17:55] [G] is 11[17:56:26]  [17:55] [H] is 8[17:56:26]  [17:55] [S] is 1

It works, so I can't help you more...

Statistics: Posted by CrazyCat — Thu Dec 09, 2004 12:57 pm

Any there can help me a bit ?

2004-12-09T12:04:54-04:00

CrazyCat that are almost there

looks like this now

is [A]
is 19
is [H]
is 4
is
is 1

acutaly need it like

[A] 19
[H] 4
1

Statistics: Posted by Psx|Dk — Thu Dec 09, 2004 12:04 pm

Any there can help me a bit ?

2004-12-09T11:35:14-04:00

Code:

foreach {key value} $stats {   putserv "PRIVMSG $chan :$key is $value"}

Edited: I'm too tired 2day

Statistics: Posted by CrazyCat — Thu Dec 09, 2004 11:35 am

Any there can help me a bit ?

2004-12-09T11:07:16-04:00

what's there to be lost into?

you simply lappend your data pairs to a list and then:

Code:

foreach {element1 element2} $thelist {# do something with these elements# ...}

Statistics: Posted by demond — Thu Dec 09, 2004 11:07 am

Any there can help me a bit ?

2004-12-09T10:55:27-04:00

Ohhh

you lost me there

not alle the time there are the same values in stats !

[*] there can be one or many more

and info inside [] can be difrent to

1.
$stats = [A] 15 [C] 9

or

2.
$stats = [E] 30 [G] 11 [H] 8 [S] 1

hope you follow what im trying to tell

ohhh yeah it will always set the biggest numbre first

Statistics: Posted by Psx|Dk — Thu Dec 09, 2004 10:55 am

Any there can help me a bit ?

2004-12-09T11:08:48-04:00

Code:

set x {[A] 12 [B] 11 [C] 10 [D] 9 [E] 8 [F] 7}foreach {a b} $x {puthelp "privmsg $chan :$a $b"}

Statistics: Posted by demond — Thu Dec 09, 2004 10:43 am

Any there can help me a bit ?

2004-12-09T10:42:14-04:00

Well how do i get it to out put if i split em to there are no more ?

i can use a [lindex *

db output stored in $stats

set split [split $stats "\["]

if { [lindex $split 0] == "" } {
set msg ""
} else {
set msg "[lindex $split 0]"
}

but how do i get it to cuntinure to all data are used ?

Statistics: Posted by Psx|Dk — Thu Dec 09, 2004 10:42 am

Any there can help me a bit ?

2004-12-09T10:20:32-04:00

split on a particular character, as "[" and then you have the couple:
A] 10
B] 4
C] 1

Now, you can split each on "]" and then you have each separates values

Statistics: Posted by CrazyCat — Thu Dec 09, 2004 10:20 am

Any there can help me a bit ?

2004-12-09T09:00:56-04:00

ì extract this from a database !
[A] 10 4 [C] 1

how do i make code so it shows up like that in chan ?

[A] 10
4
[C] 1

i know i can make
putserv "PRIVMSG $chan : [lindex $var 0] [lindex $var 1]
putserv "PRIVMSG $chan : [lindex $var 2] [lindex $var 3]
putserv "PRIVMSG $chan : [lindex $var 4] [lindex $var 5]

but the amount of [*] in the info can be from 1 to 15 mabye more
etc. [A] 12 11 [C] 10 [D] 9 [E] 8 [F] 7

and then oupput

[A] 12
11
[C] 10
[D] 9
[E] 8
[F] 7

Any there can help me make this code ?

Statistics: Posted by Psx|Dk — Thu Dec 09, 2004 9:00 am