Mine

on *:TEXT:*:*: {
  if ($me isin $1-) && (%highlight == On) {
    Write Highlightdialog.txt $nick Highlighted you with: $1-
  }
}
dialog Highlight {
  title "Highlight Dialog by Hoi153"
  size -1 -1 237 267
  option dbu
  list 1, 4 30 230 228, size
  button "Load Highlights", 2, 5 3 44 23
  button "Delete All highlights", 3, 51 3 54 23
  button "Activate", 4, 195 2 37 12
  button "DeActivate", 5, 195 15 37 12
  button "OK", 6, 156 2 37 12, ok
  button "Cancel", 7, 156 15 37 12, cancel
}
Menu * {
  Hoi153's Highlight dialog: /dialog -m Highlight Highlight
}
on *:DIALOG:Highlight:sclick:2: {
  /did -r Highlight 1
  var %x = 1
  while ($read(Highlightdialog.txt,%x)) {
    did -a highlight 1 $read(Highlightdialog.txt,$readn)
    inc %x
  }
}
on *:dialog:highlight:sclick:4: {
  set %Highlight On
}
on *:dialog:highlight:sclick:4: {
  unset %Highlight
}