egghelp/eggheads community

TLC error

2001-10-05T11:49:00-04:00

It seems (somthing i didnt know) that TCL's if command doesn't know how to compare <> statments. Just change the <> in the script to !=

Statistics: Posted by ppslim — Fri Oct 05, 2001 11:49 am

TLC error

2001-10-05T11:43:00-04:00

no it doesnt work to
now can the foul
[15:44:37] [15:44] TCL error [ship]: syntax error in expression "[string compare -nocase $nick $admin] <> 0"

Statistics: Posted by Guest — Fri Oct 05, 2001 11:43 am

TLC error

2001-10-05T11:36:00-04:00

After looking more closely (like I should have in the first place, here is what it should look like.

Code:

bind pub - ?ship shipproc ship {nick host hand chan arg} {  global admin  if {[string compare -nocase $nick $admin] <> 0} {return 0}  set who [lindex [split $arg] 0]  puthelp "PRIVMSG $chan :$who cost 100"}

Statistics: Posted by ppslim — Fri Oct 05, 2001 11:36 am

TLC error

2001-10-05T11:28:00-04:00

On 2001-10-04 16:14, ppslim wrote:
It should look somthing more like

Code:

bind pub - ?ship shipproc ship {nick host hand chan args} {global botnick adminif {$nick != $admin} {return 0}set who [lindex [split $arg] 0]puthelp "PRIVMSG $chan :$who cost 100"}

Hmm Í have test the sribt but it doesnt work

Statistics: Posted by Guest — Fri Oct 05, 2001 11:28 am

TLC error

2001-10-04T18:14:00-04:00

It should look somthing more like

Code:

bind pub - ?ship shipproc ship {nick host hand chan args} {global botnick adminif {$nick != $admin} {return 0}set who [lindex [split $arg] 0]puthelp "PRIVMSG $chan :$who cost 100"}

Statistics: Posted by ppslim — Thu Oct 04, 2001 6:14 pm

TLC error

2001-10-04T18:03:00-04:00

Why this script:

bind pub - ?ship ship

proc ship {nick host hand chan args} {
global botnick admin
if {![$nick == $admin]} {return 0}
set who [lindex $arg 0]
puthelp "PRIVMSG $chan :$who cost 100"
}

Return this error: TCL error [ship]: invalid command name "Kultsi"

Thanks

Statistics: Posted by Guest — Thu Oct 04, 2001 6:03 pm