;Simple Highlight Script (Notice and Counter)
;Made by nick1
;Last edit June 18, 2014
[Pastebin: http://pastebin.com/12TcHJJG ]
This script will notify you of highlights via a popup when you are not on IRC. It will also keep track of your highlights for you (I know it uses a lot of vars).
DIRECTIONS: Copy the entire script and paste into a new remote file.
;Simple Highlight Script (Notice and Counter)
;Made by nick1
;Last edit June 18, 2014
On $*:TEXT:$(/\b( $+ $me $+ |nick1)\b/Si):*:{
;The line above will activate for your current nick or "nick1" change this or add using "nick1|nick2.."
inc %highlights
inc %highlights [ $+ [ $nick ] ]
inc %highlights [ $+ [ $chan ] ]
var %hltext 12< $+ $iif($left($nick($chan,$nick).pnick,1) isin $prefix,$v1) $+ $nick $+ > 4>>>10 $replace($1-,$regml(1),$+(04,$regml(1),10)) 4<<<
$iif(!$window(@Highlights- $+ $network),window -evn @Highlights- $+ $network,noop)
echo @Highlights- $+ $network 10 $+ $timestamp $+(12,[,4,$iif($chan,$v1,Query),12,]) %hltext
if ((($active != $chan) && ($active != $window(@Highlights- $+ $network)) && ($active != $nick)) || (!$appactive)) {
noop $tip('Tray Tip', $network » $iif($chan,$v1,Query),%hltext,10,,,,$window($iif($chan,$v1,$nick)).wid)
;echo -a $+(12,[,4,$iif($chan,$v1,Query),12,]) %hltext
}
;clipboard $+(12,[,4,$iif($chan,$v1,Query),12,]) %hltext
}
On $*:ACTION:$(/\b( $+ $me $+ |nick1)\b/Si):*:{
;The line above will activate for your current nick or "nick1" change this or add using "nick1|nick2.."
inc %highlights
inc %highlights [ $+ [ $nick ] ]
inc %highlights [ $+ [ $chan ] ]
var %hltext 12< $+ $iif($left($nick($chan,$nick).pnick,1) isin $prefix,$v1) $+ $nick $+ > 4>>>10 $replace($1-,$regml(1),$+(04,$regml(1),10)) 4<<<
$iif(!$window(@Highlights- $+ $network),window -evn @Highlights- $+ $network,noop)
echo @Highlights- $+ $network 10 $+ $timestamp $+(12,[,4,$iif($chan,$v1,Query),12,]) %hltext
if ((($active != $chan) && ($active != $window(@Highlights- $+ $network)) && ($active != $nick)) || (!$appactive)) {
noop $tip('Tray Tip', $network » $iif($chan,$v1,Query),%hltext,10,,,,$window($iif($chan,$v1,$nick)).wid)
;echo -a $+(12,[,4,$iif($chan,$v1,Query),12,]) %hltext
}
;clipboard $+(12,[,4,$iif($chan,$v1,Query),12,]) %hltext
}
on *:input:*: {
if ($1 == !hls) && ($2 == $null) {
.timer 1 1 msg $chan 10I have been highlighted a total of4 $bytes(%highlights,bd) 10times...
}
elseif ($1 == !hls) && ($2 != $null) && ($2 !isnum) {
.timer 1 1 msg $chan 10I have been highlighted4 $bytes($iif($($+(%, highlights,$2),2),$($+(%, highlights,$2),2),0),bd) 10times $iif(($left($2,1) == $chr(35)),in,by) $+ 4 $2
}
elseif ($1 == !hls) && ($2 >= 1) {
var %i = 2
while (%i <= $var(%highlights*, 0)) {
if ($var(%highlights*,%i).value >= $2) $iif(*#* iswm $($var(%highlights*,%i),0),noop,inc %x)
inc %i
}
.timer 1 1 msg $chan 10A total of4 $bytes(%x,bd) 10people have highlighted me over4 $bytes($2,bd)10 times...
unset %x
}
elseif ($1 == !highlights) && ($2 == $null) {
.timer 1 1 msg $chan 10I have been highlighted a total of4 $bytes(%highlights,bd) 10times...
}
elseif ($1 == !highlights) && ($2 != $null) && ($2 !isnum) {
.timer 1 1 msg $chan 10I have been highlighted4 $bytes($iif($($+(%, highlights,$2),2),$($+(%, highlights,$2),2),0),bd) 10times $iif(($left($2,1) == $chr(35)),in,by) $+ 4 $2
}
elseif ($1 == !highlights) && ($2 >= 1) {
var %i = 2
while (%i <= $var(%highlights*, 0)) {
if ($var(%highlights*,%i).value >= $2) $iif(*#* iswm $($var(%highlights*,%i),0),noop,inc %x)
inc %i
}
.timer 1 1 msg $chan 10A total of4 %x 10people have highlighted me over4 $bytes($2,bd)10 times...
unset %x
}
}
Thanks I appreciate the comment.
It will also keep track of your highlights for you (I know it uses a lot of vars).
I realize keeping track of it in vars is stupid, but I made it before I realized what it would do and now I don't really want to bother converting it. I made this about a year ago actually but just posting now.
I'm still wondering!? ;(