Problem with variables ($nick , $arg)

Mentolboy · Post by **Mentolboy** » Thu Jan 10, 2002 11:04 am

Hi!
I made a little script (see below) where you kan !kiss somebody in the channel. The only problem is, that the "$nick" and "$arg" variables are not be converted to the nickname and the arguments. For example:
<testbot> $arg gets a kiss from $nick
that should be:
<testbot> personB gets a kiss from personA (in which "personA" is the person who gave the command and "personB" is the argument given)
How can I do that??

btw: i replaced the "[" and "]" by "(" and ")" to prevent forum error

Code: Select all

set rankiss {
"$nick blows $arg a kiss! :smile:"
"$arg gets a kiss from $nick"
"After some hugging, $nick kisses $arg"
}
proc pub_kiss {nick uhost hand chan $rankiss} {
  global rankiss
set lengthstr { rand (length $rankiss) }
    putchan $chan "[lindex $rankiss (rand (llength $rankiss)))"
    return 1
}
bind pub - !kiss pub_kiss

<font size=-1>[ This Message was edited by: Mentolboy on 2002-01-10 08:05 ]</font>

Petersen · Post by **Petersen** » Thu Jan 10, 2002 4:19 pm

putchan $chan "[subst [lindex [blah.... ]]]"

Mentolboy · Post by **Mentolboy** » Thu Jan 10, 2002 6:20 pm

It still doesn't work

now I get the following error:

TCL error (pub_mast): invalid command name "substAfter some hugging, $nick kisses $arg"

ppslim · Post by **ppslim** » Thu Jan 10, 2002 7:12 pm

You are failing to place a space between "[subst" and the "[lindex" command.

EG

subst[lindex

when it should be

[subst [lindex

Mentolboy · Post by **Mentolboy** » Fri Jan 11, 2002 5:38 pm

didn't know a space would make that difference!
thanx!

ppslim · Post by **ppslim** » Fri Jan 11, 2002 11:04 pm

Yes it does.

doing

[subst[lindex

whatever lindex returns, gets appended to "subst", thus making it think the command doesn't exist.