Sendraw nick randomiser.

By SHAGGSTaRR on Jul 10, 2008

This snippet allows an IRCop with sufficient priveleges on an IRCd with the sendraw module in use or something similar available to speak through random nicks in a given channel, highly useful if a group of opers don't want something attributable to them yet understand idlers may be logging.

alias puppet { sendraw $active :: $+ $1 PRIVMSG $active $2- }

on 1:start:{ set %random_chan #no_logging }

on 1:input:#:{
  if ($network == insert_network_here) {
    if (($active == %random_chan) && ($left($1,1) != /)) { 
      puppet $nick($chan, $r(1,$nick($chan,0))) $1-
      halt
    }
    ;else breakdance
  }
}

Like Page Follow Author

Comments

DJA14 - Sep 29, 2008

No, SHAGGSTaRR, Fan is right. Your version would only send $2. The colon was missing. His will send $2-.

Respond

SHAGGSTaRR - Sep 22, 2008

Fan_Of_Ur_Mom: Both will work, my version doesn't alert Anope services so admins sat in the network LOGCHAN are none the wiser.

Respond

Spanky - Aug 20, 2008

.>

Respond

Fan_Of_Ur_Mom - Aug 20, 2008

alias puppet { sendraw $active :: $+ $1 PRIVMSG $active $2- }

^^^^ Would not work...

alias puppet { sendraw $active :: $+ $1 PRIVMSG $active : $+ $2- }

^^^^ Would work. ;)

Respond

SHAGGSTaRR - Jul 18, 2008

/*
Sendraw nick randomiser by SHAGGSTaRR

Usage:
/set %sendrand_network network-you\'re-an-oper-on
/set %sendrand_channel #logged-channel
/set %sendrand_status 1
*/

on 1:load:{
:begin
var %tmp $?!=\" $network $active - Run initial setup?\"
if (%tmp == $true) {
set %sendrand_network $network
set %sendrand_channel $active
set %sendrand_status 0
}
elseif (%tmp == $false) {
echo -a //set $chr(37) $+ sendrand_network $network
echo -a //set $chr(37) $+ sendrand_channel $active
echo -a //set $chr(37) $+ sendrand_status 0
}
else goto begin
}

alias puppet { sendraw $active :: $+ $1 PRIVMSG $active $2- }

on 1:input:#:{
if (($network == %sendrand_network) && (%sendrand_status > 0)) {
if (($active == %sendrand_channel) && ($left($1,1) != /)) {
puppet $nick($chan, $r(1,$nick($chan,0))) $1-
;Measure how many lines have been spoken with the script:
;inc %sendrand_status
halt
}
;else breakdance
}
}

Respond