I couldnt find any other hilight scripts with dialogs :\ i took some of the ideas for people who logged hilights etc, completely remade it tho, put in a anti hilight list for bots etc, doesnt support address/wildcards tho :<.
To use, Right click channel background and hit Hilight Settings button, Check off enable antihilight to turn it on, click add button after filling in the blank spot to add a nick and select a nick then click delete to remove them from the list, when on the list and they hilight you it wont go threw
The anti flood option makes it so only 1 hilight per 30 seconds per each nick can go threw.
Log hilights puts the hilights in a text file and shows them in a window when they happen, the view logs button will open a text file with all your logs.
[size=20]Possible future updates to come if it gets good feedback, Positive comments only please :D.[/size]
dialog hilight {
option dbu
title "Hilight Settings"
size -l -l 150 100
list 1, 5 50 135 50
check "Anti Flood on",2, 80 15 40 10
check "Enable Antihilight",3, 80 25 50 10
box "Settings",4, 75 5 60 45
check "Log Hilights",5, 80 35 50 10
edit "",6, 5 15 60 10,
button "Add"7, 5 5 30 10
button "Del"8, 35 5 30 10
button "View Logs" 10, 5 30 60 10
text "Anti Hilight List",9, 15 40 40 10
}
menu c* {
Hilight Settings:hlset
}
on *:TEXT:*:#: if ($me isin $1-) hilight $nick $chan $network $strip($1-)
on *:action:*:#: if ($me isin $1-) hilight $nick $chan $network $strip($1-)
alias hilight {
if (%ahl) && (!$hget(antihl,$1)) {
if (%hl.aflood) && (!%hl [ $+ [ $1 ] ]) {
set -u30 %hl [ $+ [ $1 ] ] Hilighted
:hl
noop $tip(H,Hilight,12 $+ $1 14Has hilighted you on7 $3 14in channel2 $2 14saying:01 $4-,9)
if ($2 == $active) echo $chan $+(7,$chr(186),$chr(171)) 12Hilight7 $+($chr(187),$chr(186))
beep 2 3
if (%hl) {
write hl.txt $chr(40) $+ $time $+ $chr(41) $network - $nick ** $chan - $1- $crlf
if (!$window(@hilights)) window -a @Hilights
echo @Hilights 12 $+ $1 14Has hilighted you on7 $3 14in channel2 $2 14saying:01 $4-
}
}
elseif (!%hl.aflood) goto hl
}
}
on *:dialog:hilight:*:*: {
if ($devent == init) {
var %x $hget(Antihl,0).item
if (%hl.aflood) did -c $dname 2
if (%ahl) did -c $dname 3
if (%hl) did -c $dname 5
while (%x) {
did -a $dname 1 $hget(antihl,%x).item
dec %x
}
}
if ($did == 5) {
if ($did(5).state) {
set %hl on
}
else unset %hl
}
if ($devent == sclick) {
if ($did == 10) {
if (!$read(hl.txt)) write hl.txt Hilights
run hl.txt
}
if ($did == 3) {
if ($did(3).state) {
set %ahl On
}
else unset %ahl
}
if ($did == 2) {
if ($did(2).state) {
set %hl.aflood On
}
else unset %hl.aflood
}
if ($did == 7) {
if ($did(6).text) {
hadd antihl $did(6).text Dont Hilight
var %x $hget(Antihl,0).item
while (%x) {
did $iif(%x == $hget(antihl,0).item,-ra,-a) $dname 1 $hget(antihl,%x).item
dec %x
}
}
else error You have not input a name to add!
}
if ($did == 8) {
if ($did(1).seltext) {
hdel antihl $did(1).seltext *
var %x $hget(Antihl,0).item
while (%x) {
did $iif(%x == $hget(antihl,0).item,-ra,-a) $dname 1 $hget(antihl,%x).item
dec %x
}
}
else error You have not selected a nick to be deleted!
}
}
}
alias -l error noop $input($1-,o,Error!)
alias hlset dialog -mo hilight hilight
Pretty useful, i like the hilight ignore list feature and its more clear to see your list than mircs default, for stuff like
if ($did == 2) {
if ($did(2).state) {
set %hl.aflood On
}
else unset %hl.aflood
}
You could do an $iif statement and make it 1 line, sort of like
if ($did == 2) $iif($did(2).state,unset,set) %hl.aflood on
Heh, i made one of theses, except i called it "ping list with dialog"...
Nice work though :) Rated
BugBoy it makes it so you can add words to "highlight", basically if i added "[Plornt]" and someone said [Plornt] then it would show it on the active channel that they said it.
However, there is a default highlight dialog in mirc (Alt + B) >> Highlight