egghelp/eggheads community

Just a little modification

2007-10-11T21:48:07-04:00

that was quick! thanks nml375

Statistics: Posted by JohnJohnJohn — Thu Oct 11, 2007 9:48 pm

Just a little modification

2007-10-11T08:57:44-04:00

Ahh, overlooked this line:

Code:

  utimer $greetime [list putserv "PRIVMSG $chan :[lindex $join1 [rand [llength $join1]]]]"

Brackets and quotes are not in proper order, should be like this:

Code:

  utimer $greetime [list putserv "PRIVMSG $chan :[lindex $join1 [rand [llength $join1]]]"]

Statistics: Posted by nml375 — Thu Oct 11, 2007 8:57 am

Just a little modification

2007-10-11T08:48:51-04:00

nml375 i changed it in that way as u've said but unfortunately i still encounter the same problem..

Statistics: Posted by JohnJohnJohn — Thu Oct 11, 2007 8:48 am

Just a little modification

2007-10-11T07:11:55-04:00

Enclose your \n with "" and I believe the problem should go away. Ie:

Code:

set join1 [split [read $file5] "\n"]

Statistics: Posted by nml375 — Thu Oct 11, 2007 7:11 am

Just a little modification

2007-10-10T23:43:42-04:00

oh sorry for that rosc2112.. anyway here's the code that i've edited.

Code:

set patch "/usr/space/frozen/eggdrop"set greetime "15"bind join - * showgreetproc showgreet {nick uhost hand chan} {global patch greetimeif {[file exist /$patch/$nick.txt]} {set file5 [open /$patch/$nick.txt r+]set join1 [split [read $file5] \n]close $file5utimer $greetime [list putserv "PRIVMSG $chan :[lindex $join1 [rand [llength $join1]]]]"}}

And the error that i've encountered is

Tcl error [showgreet]: missing close-bracket

--hope ya can fix that for me

Statistics: Posted by JohnJohnJohn — Wed Oct 10, 2007 11:43 pm

Just a little modification

2007-10-10T23:13:43-04:00

If you edited the script, and it then causes an error, it would be helpful to post your edited code..

Statistics: Posted by rosc2112 — Wed Oct 10, 2007 11:13 pm

Just a little modification

2007-10-10T21:10:44-04:00

i tried to edit this code to pick random line in txt.file to greet specific nicks who joins the channel but it says that tcl error showgreet missing close bracket. Here is the untouched code.

--Not all users who join the channel are been greeted. Only those specified nick which are saved in tha patch.

Code:

set patch "/usr/space/frozen/eggdrop"set greetime "15"bind join - * showgreetproc showgreet {nick uhost hand chan} {global patch greetimeif {[file exist /$patch/$nick.txt]} {set file5 [open /$patch/$nick.txt r+]gets $file5 textclose $file5utimer $greetime [list putserv "PRIVMSG $chan :$text"]}}

Statistics: Posted by JohnJohnJohn — Wed Oct 10, 2007 9:10 pm