egghelp/eggheads community

need help: advertising revenge

2003-06-10T06:29:54-04:00

yep, thanks for the info.

I don't want to use that.. a friend of mine wants to.. I told him your remark...

thanks anyway! now it works fine!

Statistics: Posted by eiSi — Tue Jun 10, 2003 6:29 am

need help: advertising revenge

2003-06-09T15:23:25-04:00

Code:

proc blocked:words {nick uhost handle chan text} {  set revchan ""  regexp {(#\S+)} $text match revchan  puthelp "PRIVMSG #bot-hub :$revchan"}

Just a note, though: I've seen many times that people will spam for a particular channel in order to get people angry at that channel. For instance, if #sheep bans baduser, then baduser might set up a spambot to join every channels and say "join #sheep now!!" because it annoys everybody, and some people take revenge on #sheep, when they didn't really even do it.

So the moral is, you should be careful with this, because you might be doing more harm than good.

Statistics: Posted by stdragon — Mon Jun 09, 2003 3:23 pm

need help: advertising revenge

2003-06-09T14:58:53-04:00

thanks!

but for me it's the same error.

if I type: #asd
it says: #
if I type: #asd now
it says: #asd

hm, I don't know the error, but I'll have a closer look at it tomorrow.

thanks for your help!

Statistics: Posted by eiSi — Mon Jun 09, 2003 2:58 pm

need help: advertising revenge

2003-06-10T02:51:02-04:00

hmz well, did your the chan in your message end with a space? if you would say something like "join #chan" it will not work, if you say "join #chan now" it will work ... there is a space after the (.*) in the regexp to make sure he only takes the first word after the # ... perhaps a better way to do this is, is to take everything and split it into a list:

Code:

proc blocked:words {nick uhost handle chan text} { set revchan "" regexp -line -- {#(.*)} $text -> revchan set revchan "#[lindex [split $revchan] 0]" puthelp "PRIVMSG #bot-hub : $revchan" }

allthough you can probably do all this in one regexp, this works for me

Statistics: Posted by mortician — Mon Jun 09, 2003 2:30 pm

need help: advertising revenge

2003-06-09T14:22:21-04:00

thx, but it won't work:
that's my proc:

proc blocked:words {nick uhost handle chan text} {
set revchan ""
regexp -line -- {#(.*) } $text -> revchan
set revchan "#$revchan"
puthelp "PRIVMSG #bot-hub : $revchan"
}

but it says: "#"

thanks again!!! and sorry for me posting again

Statistics: Posted by eiSi — Mon Jun 09, 2003 2:22 pm

need help: advertising revenge

2003-06-09T14:16:19-04:00

Use the regexp just like it was in my post. (more information about regexp: http://www.tcl.tk/man/tcl8.4/TclCmd/regexp.htm
And for the String manipulation, just put a # in front of $chan would do the job (e.g. set chan "#$chan")

Code:

proc blocked:words {nick uhost handle chan text} { regexp -line -- {#(.*) } $text -> chanset chan "#$chan"puthelp "PRIVMSG #bot-hub : $chan" }

Statistics: Posted by mortician — Mon Jun 09, 2003 2:16 pm

need help: advertising revenge

2003-06-09T14:09:10-04:00

thx!

than 2 other questions (sorry...):

what about string manipulation? how to add the # to the front?
that regexp doesn't work, i tried it that way:

proc blocked:words {nick uhost handle chan text} {
set chan [regexp -line -- {#(.*) } $text]
puthelp "PRIVMSG #bot-hub : $chan"
}

but it says: "0".

whats that? can you help me again please? thanks!!

Statistics: Posted by eiSi — Mon Jun 09, 2003 2:09 pm

need help: advertising revenge

2003-06-09T13:56:12-04:00

by using a regexp probably ...

e.g. if what he says is stored in the var $rest it would be something like this:

Code:

regexp -line -- {#(.*) } $rest -> chan

$chan will be the channame without the # ...

Statistics: Posted by mortician — Mon Jun 09, 2003 1:56 pm

need help: advertising revenge

2003-06-09T12:52:39-04:00

hi there!

I want to code a little script.

For example someone says: Hello there! Join #thischannel now!!!

I want the bot to kick the user (that's no problem), join #thischannel and says a specific line.

My problem: How to get #thischannel saved in a var?

Thanks for any help!

Statistics: Posted by eiSi — Mon Jun 09, 2003 12:52 pm