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
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 }
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)
}
}