egghelp/eggheads community

Script request

2006-04-17T20:56:36-04:00

4.7 CPRIVMSG

CPRIVMSG

The CPRIVMSG parameter indicates that the server supports the
"CPRIVMSG" command. An extension for the PRIVMSG command, as defined
in RFC 1459 [2] section 4.4.1, it allows users with a specific status
in a channel to issue a PRIVMSG command to a user within that
channel, free of certain restrictions a server MAY apply to PRIVMSG.

The CPRIVMSG parameter MUST NOT be specified with a value.

Statistics: Posted by Alchera — Mon Apr 17, 2006 8:56 pm

Script request

2006-04-17T12:00:33-04:00

CPRIVMSG? What is that? Must be a server side feature, right?

Statistics: Posted by caesar — Mon Apr 17, 2006 12:00 pm

Script request

2006-04-17T11:12:53-04:00

if the bot is at least voice then change

privmsg with CPRIVMSG

to prevent msg "target change too fast wait for xxx sec"

Statistics: Posted by CrazyEgg — Mon Apr 17, 2006 11:12 am

Script request

2006-04-17T04:27:34-04:00

Code:

bind ctcr - VERSION version:replybind join - * check:versionproc check:version {nick uhost hand chan} { global cversion set cversion([string tolower $nick]) $chan putserv "privmsg $nick :\001VERSION\001"}proc version:reply {nick uhost hand dest kw arg} { global cversion if {[isbotnick $dest] && [info exists cversion([set nick [string tolower $nick]])]} {  if {[string match -nocase "*mirc*" $arg]} {   pushmode $cversion($nick) +v $$nick  }  unset cversion($nick) }}

this will work on all chans.

Statistics: Posted by Sir_Fz — Mon Apr 17, 2006 4:27 am

Sorry

2006-04-16T21:11:07-04:00

I didnt know how to set the $vchan variable so i did this.

Code:

bind ctcr - VERSION version:replybind join - * check:versionproc check:version {nick uhost hand chan} { global cversion set cversion([string tolower $nick]) 1 putserv "privmsg $nick :\001VERSION\001"}proc version:reply {nick uhost hand dest kw arg} { global cversion if {[isbotnick $dest] && [info exists cversion([string tolower $nick])]} {  if {[string match -nocase "*mirc*" $arg]} {   pushmode #mychannel +v $nick   unset cversion([string tolower $nick])  } }}

Probably lame by your standards but it does the job.

Thanks again for the help.

Statistics: Posted by martpen69 — Sun Apr 16, 2006 9:11 pm

Script request

2006-04-16T20:36:44-04:00

You're supposed to test it, not ask us if it works. Anyways

Code:

{ pushmode $vchan +v $user }

should be just

Code:

pushmode $vchan +v $user

Statistics: Posted by Sir_Fz — Sun Apr 16, 2006 8:36 pm

Script request

2006-04-16T20:23:42-04:00

Oper bot to ctcp version people when they join my channel and to +v them if they reply with a certain version.

I found some scripts which ive taken bits from and tried to put them together.

Not sure if this is correct.

Code:

bind ctcr - VERSION version:reply bind join - * check:version proc check:version {nick uhost hand chan} {  global cversion  set cversion([string tolower $nick]) 1  putserv "privmsg $nick :\001VERSION\001" } proc version:reply {nick uhost hand dest kw arg} {  global cversion  if {[isbotnick $dest] && [info exists cversion([string tolower $nick])]} {   if {[string match -nocase "*version here*" $arg]} {   { pushmode $vchan +v $user }    unset cversion([string tolower $nick])   }  } }

Statistics: Posted by martpen69 — Sun Apr 16, 2006 8:23 pm