Don't understand -_-

metroid · Post by **metroid** » Mon Jul 12, 2004 9:48 am

set users {
[screw]mjuertah
dot2|Zekk
jykh330
lgur641
}

bind pub - !moo pub:moo

proc pub:moo {nick uhost hand chan text} { 
                global users
	putquick "NOTICE $text :Blah blah $users"
	putquick "NOTICE $text :mooo"
	}

What i want this code to do is pm the person said in text (yes its a crappy code but i made it fast) but the thing is it won't say users while i think i did it right? I should do one of those randomly?

greenbear · Post by **greenbear** » Mon Jul 12, 2004 9:58 am

You have to read the users one by one using foreach, and you mixed up $text and $user in the notice..

Try this

Code: Select all

set users {
[screw]mjuertah
dot2|Zekk
jykh330
lgur641
}

bind pub - !moo pub:moo

proc pub:moo {nick uhost hand chan text} {
global users
 foreach user $users {
   putquick "NOTICE $user :blah blah $text"
   putquick "NOTICE $user :mooo"
 }
}

metroid · Post by **metroid** » Mon Jul 12, 2004 10:29 am

nono, i didnt mix it up, i wanted the bot to pm $text not the user :>

metroid · Post by **metroid** » Mon Jul 12, 2004 10:35 am

hmm, the script doesn't work as i planned it to do so,

I wanted the script to pick a random name from the set users part and use it once, what the script does now is use all nicks

so now im getting:

Code: Select all

<bot> blah blah <name>
<bot> mooo

<bot> blah blah <name2>
<bot> mooo

<bot> blah blah <name3>
<bot> mooo

<bot> blah blah <name4>
<bot> mooo

when i want it to do:

Code: Select all

<bot> blah blah <random name from list>
<bot> mooo

Only 1 name, not all of them :>

greenbear · Post by **greenbear** » Mon Jul 12, 2004 10:56 am

ok, instead of the foreach, pick a random user with something like this

Code: Select all

set user [lindex $users [rand [llength $users]]]

metroid · Post by **metroid** » Mon Jul 12, 2004 11:09 am

Ah, It works like a charm now

awyeah · Post by **awyeah** » Mon Jul 12, 2004 9:13 pm

Yeah, I think he wanted them to be displayed as a list. Rather than using foreach and displaying each defined nick seperately.

By the way, for this specific nick in your nicklist:

Code: Select all

[screw]mjuertah

You might want to try and escape it with the "\" character, so it doesn't make the procedure choke on special characters, which would be:

Code: Select all

\[screw\]mjuertah

greenbear · Post by **greenbear** » Mon Jul 12, 2004 9:20 pm

And what was the meaning with that post awyeah.

The problem was already solved and everyone is happy, so there is no need for you to be stating the obvious like you've been doing on most threads on this forum lately.

It's unnecessary and kinda annoying.

Papillon · Post by **Papillon** » Tue Jul 13, 2004 3:09 am

There is alot of newcomers to tcl reading these forums aswell as the more experienced, so there is nothing unnessesary in stating the obvious from time to time.
Yes. They could and should use the search button before posting to see if their question has already been answered.. but by reading other posts you get the kind of information you might not need at the present, but most likely will need in the future.
Hell.. I've learned ALOT that way

If there is one thing people should learn, it is to be careful with the "special characters" in tcl.

awyeah · Post by **awyeah** » Tue Jul 13, 2004 3:38 am

dollar, here sometimes just gets too frustrated, heh

Maybe dollar helped him, but he might have a problem with those ] and [ chars, so I tried to help him, by letting him know... that they might cause a problem. Not at the first time, because the random one selected might not be the one with the ]'s or ['s but once its selected, it will choke and an error will occur.

This doesn't mean we only need to correct the thing the person asked for, we can correct the things, also which we can see.. can cause trouble later onwards.

Ofloo · Post by **Ofloo** » Tue Jul 13, 2004 9:17 am

metroid · Post by **metroid** » Thu Jul 15, 2004 5:18 am

Naw, the script works fine and doesnt seem to choke on the brackets