egghelp/eggheads community

!stop command when bot it outputting text file.

2012-05-07T13:19:11-04:00

tempest:

See nml375's post here:

http://forum.egghelp.org/viewtopic.php?p=99358#99358

Statistics: Posted by willyw — Mon May 07, 2012 1:19 pm

!stop command when bot it outputting text file.

2012-04-28T08:22:38-04:00

Sorry I have not been able to reply sooner. Life threw me a few curly ones this week, so have not had much of a chance to do more on this. But I'm back to it now!

Just wanted to say thank you for all the help that you guys have posted! it's been really great! I will let you all know how I go!

tempest.

Statistics: Posted by tempest — Sat Apr 28, 2012 8:22 am

!stop command when bot it outputting text file.

2012-04-25T10:37:37-04:00

well read up on utimer. It's a little confusing, just adding the utime line with the output still lets the bot output but still no actual pause in time for each line. hmmmm

I wasn't sure about it.
I suspect that all the timers are set and run down and the whole mess is in the queue, waiting, same as before.

I am now actually reading of a tcl manual LOL so i might get there in the end.

Excellent!
I have no doubt that you will.

Still more pointers welcome!

Do this little course:
http://suninet.the-demon.de/
I think it is a good place to begin. And you can use it for reference too, later.

Keep this open for reading, whenever scripting:
http://www.tcl.tk/man/tcl8.5/TclCmd/contents.htm

Keep this open too, whenever scripting:
http://www.eggheads.org/support/egghtml ... mands.html

With those three, you can do a LOT.

I have also read the utimer post that is here

http://forum.egghelp.org/viewtopic.php?p=88230

but still a little unclear how it fits in... having a bit of a play..

apparently a lot of people have a similar issue with utimer? It's just not clear cut! LOL

Not really.
In that thread, arfer and nml375 are commenting. What they are talking about is the same thing that is covered by that link I gave you earlier:
http://www.peterre.info/characters.html
On that page, it tells how to use list with the timer (and utimer) command.
Perhaps their explanation was easier to follow.

Tip: In my experience reading here, anything to do with TCL that either arfer or nml375 responds with, is solid.
Actually, that's what we need here now... for one of them to jump in here.

*gets her thinking cap on*

Me too, and normally I would not have replied yet. But a solution is not coming to me, ( I have tried something else, and got similar results again) and I don't want you to have to wait. Others that may know how to do this in the proper manner, may be reading along and being polite and not jumping in. I'm inviting them, now.

Statistics: Posted by willyw — Wed Apr 25, 2012 10:37 am

!stop command when bot it outputting text file.

2012-04-25T04:03:05-04:00

well read up on utimer. It's a little confusing, just adding the utime line with the output still lets the bot output but still no actual pause in time for each line. hmmmm

I am now actually reading of a tcl manual LOL so i might get there in the end. Still more pointers welcome!

I have also read the utimer post that is here

http://forum.egghelp.org/viewtopic.php?p=88230

but still a little unclear how it fits in... having a bit of a play..

apparently a lot of people have a similar issue with utimer? It's just not clear cut! LOL
*gets her thinking cap on*

Statistics: Posted by tempest — Wed Apr 25, 2012 4:03 am

!stop command when bot it outputting text file.

2012-04-24T09:53:49-04:00

...
so trying to get it to wait for 3 seconds as the normal cue is a bit fast for what im after i have found.. however it seems to pause the whole script rather than just the text output. I have done a little searching around and i have only found examples of this in non loops... this last part and it will be perfect! LOL

Off the top of my head (meaning - - untested) :

Experiment with this -

Code:

utimer 3 [list puthelp "PRIVMSG $chan :$trance_line" ]

Reference:
http://www.eggheads.org/support/egghtml ... mands.html
and
http://www.peterre.info/characters.html

Statistics: Posted by willyw — Tue Apr 24, 2012 9:53 am

!stop command when bot it outputting text file.

2012-04-24T09:39:23-04:00

yes well found that it cues up rather quickly! so the "clearqueue" is working wonders! don't want to pest too much just one more bit of advice. i want to slow down the output a little to the chan so in the loop i tried this...

Code:

    foreach trance_line $data {       puthelp "PRIVMSG $chan :$trance_line"        update       after 3000    }

so trying to get it to wait for 3 seconds as the normal cue is a bit fast for what im after i have found.. however it seems to pause the whole script rather than just the text output. I have done a little searching around and i have only found examples of this in non loops... this last part and it will be perfect! LOL

Statistics: Posted by tempest — Tue Apr 24, 2012 9:39 am

!stop command when bot it outputting text file.

2012-04-24T08:58:41-04:00

Something almost exactly like this was my first thought too.
When it didn't work, I did a quick experiment.

Try this:
Trigger the reader proc, then -
In the partyline, do: .tcl queuesize
to get the current number of entries in the queue.
Keep repeating the command, and see it count down.
(Be sure the file had something like 20 lines or more, so you have time)

I came to the conclusion that the foreach loop quickly does its job, and everything is in the queue, waiting. Thus, when the user comes along with the break, it doesn't matter... the loop is long done.

If you have time, experiment with it, and see what you come up with.

Statistics: Posted by willyw — Tue Apr 24, 2012 8:58 am

!stop command when bot it outputting text file.

2012-04-24T02:22:34-04:00

thank you so much caesar!

im not able to apply your suggestions just yet, as im out and about! but i will let you know how i go with it when i get back in!

You guys are so helpfull!!

thank you!

Statistics: Posted by tempest — Tue Apr 24, 2012 2:22 am

!stop command when bot it outputting text file.

2012-04-24T01:13:12-04:00

First, it's better and wise to use puthelp instead of putquick.

Code:

bind pub - "!hypno_stop" hypno_stopproc hypno_stop {nick uhost handle chan text} {global hypno_statusset hypno_status 0}

add before "set tracks [open $filename]":

Code:

global hypno_statusset hypno_status 1

and then alter your loop like this:

Code:

    foreach trance_line $data {        if {!$hypno_status} break        puthelp "PRIVMSG #TheGridTestingArea :$trance_line"    }

Statistics: Posted by caesar — Tue Apr 24, 2012 1:13 am

!stop command when bot it outputting text file.

2012-04-23T18:01:58-04:00

thank you for the quick reply!

Well i put the proc in and it still does the same.. if you run the stop command while the bot is outputting the text file to the chan, it will not pick up the fact that you have done it untill it finishes outputting the file.

One the files has finished being output it then runs the stop proc. hmmm im still trying..

tempest.

Edit:
I'm sorry i must of put it in wrong. it n ow seems to be working! thank you so so much for your help!!!

You just made my day!!!!!!!!

Statistics: Posted by tempest — Mon Apr 23, 2012 6:01 pm

Re: !stop command when bot it outputting text file.

2012-04-23T14:34:39-04:00

i have a small script that reads a text file to a channel. some times the files are long and would like to have a !stop command... however just adding a proc and binding !stop does not work as the loop that is reading the file is queuing up the output command... i don't know if its a hard thing or not, but im not that good with tcl... any pointers would be good.

...

Try this:

Code:

bind pub - "!hypno_stop" hypno_stopproc hypno_stop {nick uhost handle chan text} {clearqueue mode}

Reference:
http://www.eggheads.org/support/egghtml ... mands.html
and find:

clearqueue

Description: removes all messages from a queue. Valid arguments are: mode, server, help, or all.

I hope this helps.

Statistics: Posted by willyw — Mon Apr 23, 2012 2:34 pm

!stop command when bot it outputting text file.

2012-04-23T08:11:10-04:00

i have a small script that reads a text file to a channel. some times the files are long and would like to have a !stop command... however just adding a proc and binding !stop does not work as the loop that is reading the file is queuing up the output command... i don't know if its a hard thing or not, but im not that good with tcl... any pointers would be good.

here is the code.

Code:

proc Hypno_Reader {nick uhost hand chan text} {     set number [lindex [split $text] 0]     set filename ${::trance_file}/${number}.txt     if {![file exists $filename]} {         putquick "NOTICE $chan :Trance file not found."         return     }     set tracks [open $filename]     set data [split [read -nonewline $tracks] \n]     close $tracks     putquick "PRIVMSG #TheGridTestingArea : Loading your file ..."    putquick "PRIVMSG ##TheGridTestingArea : We hope you enjoy..."    foreach trance_line $data {         putquick "PRIVMSG #TheGridTestingArea :$trance_line"     }  }

thanks in advance!

Tempest.

Statistics: Posted by tempest — Mon Apr 23, 2012 8:11 am