Highlight Script

Please Register to submit score.

Average Score	0.0
Scores Submitted	0
Date Added	May 09, 2008
Last Updated	May 09, 2008
Tags	beep dialog flash highlight highlightdialog tip

Introduction

Hello, this is my first snippet upload here.

I primarily uploaded this script because i had a little problem with the script. I have been looking for a way to add more words to respond to, but it didn't work out.

The reason me and my friend made this script was that we got sick from highlights by some people, but didnt think it was necesarry to ignore them, because then you don't get any messages.

I would already like to thank you guys for the ideas you guys/girls will bring

Grab the Code

on *:TEXT:*Sjefke*:#: {
  set %chan $chan
  set %nrm 0
  :num
  inc %nrm
  if $chan == $read(chans.txt, %nrm)) { halt }
  $iif(%nrm >= 100, goto ver, goto num)
  :ver
  set %nmr 0
  if (%highlight == 0) { halt }
  :numm
  inc %nmr
  if ($nick == $read(nicks.txt, %nmr)) { halt } 
  $iif(%nmr >= 100, goto verd, goto numm)
  :verd
  //echo -a 4 $nick  $+ said   $+ :' 12 $1-  $+ ' on 7 $chan 2 at 4 $time $+ !
  if (%flash == 0) goto beep 
  /flash -bN $nick Highlighted $me on %chan
  :beep  
  if (%beep == 0) goto tip
  /beep %beeps
  :tip
  if (%tip == 0) { halt } 
  $tip(Highlight,Active highlight,$nick Highlighted $me on %chan,30,$null,$null,$null,$null) 
}

Alias Highlight dialog -md Highlight Highlight
Menu * {
  -
  Highlight dialog V3.0:Highlight
  -
} 
dialog Highlight {
  title "Highlight dialog"
  size -1 -1 235 256
  option dbu
  text "Once clicked off it will eliminate everything that is below it.", 1, 10 10 235 10
  text "Highlight", 2, 10 20 70 10
  button "on", 21, 10 30 30 10
  button "off", 22, 50 30 30 10
  text "Flash + Afterbeep", 5, 10 50 70 10
  Button "on", 51, 10 60 30 10
  Button "off", 52, 50 60 30 10
  text "Beep", 3, 10 80 70 10
  button "on", 31, 10 90 30 10
  Button "off", 32, 50 90 30 10
  text "Number of beeps", 33, 10 110 100 10 
  edit "", 34, 10 120 40 10
  button "Confirm", 35, 60 120 30 10
  text "Tipmessage", 4, 10 140 70 10
  Button "on", 41, 10 150 30 10
  Button "off", 42, 50 150 30 10
  Box "Information", 6, 10 200 200 50
  Button "Add name", 70, 85 165 35 10
  Button "Delete name", 72, 125 165 35 10
  edit "", 71, 10 165 70 10  
  edit "", 73, 10 180 70 10  
  Button "Add chan", 74, 85 180 35 10
  Button "Delete chan", 76, 125 180 35 10
  text "Script made by: Manja and Sjefke", 61, 15 210 150 7
  text "Version: V3.0", 62, 15 217 150 7
  text "Dialog made by: Sjefke", 63, 15 224 150 7
  text "With help from: N/A", 64, 15 231 150 7
}
on *:dialog:Highlight:sclick:21:{ set %Highlight 1 }
on *:dialog:Highlight:sclick:22:{ set %Highlight 0 }
on *:dialog:Highlight:sclick:51:{ set %flash 1 }
on *:dialog:Highlight:sclick:52:{ set %flash 0 }
on *:dialog:Highlight:sclick:31:{ set %beep 1 }
on *:dialog:Highlight:sclick:32:{ set %beep 0 }
on *:dialog:Highlight:sclick:35:{ set %beeps $did(34) }
on *:dialog:Highlight:sclick:41:{ set %tip 1 }
on *:dialog:Highlight:sclick:42:{ set %tip 0 }
on *:dialog:Highlight:sclick:70:{ write nicks.txt $did(71) }
on *:dialog:Highlight:sclick:72:{ write -dw $+ $did(71) nicks.txt }
on *:dialog:Highlight:sclick:74:{ write chans.txt $did(73) }
on *:dialog:Highlight:sclick:76:{ write -dw $+ $did(73) chans.txt }

Comments

(2) RSS

Go to Bottom

[Joshh]

Comments: 7

mIRC Snippet: Highlight Script
Posted on May 9, 2008 10:15 am

on *:TEXT:*:#: {
if ($regex($1-,/(Sjefke|nick2|nick3|nick4|..|)/Si) {
set %chan $chan
set %nrm 0
:num
inc %nrm
if $chan == $read(chans.txt, %nrm)) { halt }
$iif(%nrm >= 100, goto ver, goto num)
:ver
set %nmr 0
if (%highlight == 0) { halt }
:numm
inc %nmr
if ($nick == $read(nicks.txt, %nmr)) { halt }
$iif(%nmr >= 100, goto verd, goto numm)
:verd
//echo -a 4 $nick $+ said $+ :' 12 $1- $+ ' on 7 $chan 2 at 4 $time $+ !
if (%flash == 0) goto beep
/flash -bN $nick Highlighted $me on %chan
:beep
if (%beep == 0) goto tip
/beep %beeps
:tip
if (%tip == 0) { halt }
$tip(Highlight,Active highlight,$nick Highlighted $me on %chan,30,$null,$null,$null,$null)
}
}

[Joshh]

Comments: 7

mIRC Snippet: Highlight Script
Posted on May 9, 2008 10:28 am

i forgot a bracket

in the if ($regex statement, add a ) at the end

it should look like this

if ($regex($1-,/b(Sjefke|nick2|nick3|nick4|..|)b/Si)) {

Highlight Script

Introduction

Grab the Code

Comments

sjefke

My Snippet Tags

Contact

Sponsors