Simple Highlight Script (Notice and Counter)

By illhawkthat on Jan 17, 2013

Screenshots

;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.

  1. Find my comments and read them so you can edit out /nick1/ for whatever else you want it to highlight for besides your current nick. The lines are line 6 and 21 below. Uncomment 30 if you want the highlight shown in active window.
  2. Type !hls <nick/chan/number> Nick will say how many times they have highlighted you. Chan will say how many times highlighted in chan. Number will say how many people have hilghighted you over that many times. Without a parameter you will get total highlights.
    3.Post feedback: comments, questions, concerns, suggestions, etc.
;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
  }
}

Comments

Sign in to comment.
dma   -  Apr 15, 2016

how do i get rid of that highlight in the main window????

dma  -  May 06, 2016

I'm still wondering!? ;(

illhawkthat  -  May 06, 2016

Sorry for the late reply, not sure what you mean? Can you send a screenshot.

Sign in to comment

dma   -  Feb 16, 2016

this is great

illhawkthat  -  Feb 16, 2016

Haha glad you like it!

dma  -  Feb 16, 2016

i had it for a long time just forgot that it has those little extras
irc.axon.pw #irc dma is me

Sign in to comment

Jordyk19   -  Jan 17, 2013

Looks nice but don't save the the highlights in variables, Try saving them in highlights.ini like this:

[Jordy]
Count: 4
Last: <Jordy> Hey there nick1

If you need any help feel free to PM me.

illhawkthat  -  Jan 17, 2013

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.

Sign in to comment

illhawkthat   -  Jan 17, 2013

wow man this is the stupidest

dma  -  May 06, 2016

huh?? stupidest? ;(

illhawkthat  -  May 06, 2016

Just a joke lol

Sign in to comment

Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.