Highlight edit for Mr_Me v7.0

menu status,channel {
  $iif(%trollmode == on,AvoidSlap)
  .$iif(%avoidslap == on,$style(1)) ON : set %avoidslap on | echo -ag 4[ 8System 4] AvoidSlap is: ON . Let's Kick Some Ass...
  .$iif(%avoidslap == off,$style(1)) OFF : set %avoidslap off | echo -ag 4[ 8System 4] Avoid Slap is: OFF. Keep Calm...
}

ON ^*:ACTION:*:#: {
  if ($me isin $strip($1-)) {
    var %n = $nick($chan,$nick).pnick
    echo $color(action) -phtm $chan * $iif($nick isnotify,$chr(3) $+ $color(notify) $+ %n $+ ,%n) $replace($1-,$me,$+($chr(3),$color(highlight),$me,$chr(3),$color(action)))
    if (*slap* iswm $1-) && (%avoidslap == on) {
      inc %anti
      describe $chan Dodges and $read(AvoidSlap.txt) $+([ %anti, : People have been avoided and slapped back!, ])
    }
    if (*fap* iswm $strip($1-)) && (%avoidslap == on) {
      inc %anti
      describe $chan Dodges and $read(AvoidSlap.txt) $+([ %anti, : People have been avoided and fapped back!, ])
    }
    if (*xouft* iswm $strip($1-)) && (%avoidslap == on) {
      inc %anti
      describe $chan Dodges and $read(AvoidSlap.txt) $+([ %anti, : People have been avoided and xouft-ed back!, ])
    }
    if (*klot* iswm $strip($1-)) && (%avoidslap == on) {
      inc %anti
      describe $chan Dodges and $read(AvoidSlap.txt) $+([ %anti, : People have been avoided and klots-ed back!, ])
    }
    if (!%tip. [ $+ [ $nick ] ]) {
      var %tip_id = $nick $+ ~ $+ $chan $+ ~ $event
      noop $tip(%tip_id,Action on $network, $+ $nick $+  just had an action on you in $chan,5)
      noop $tip(%tip_id,Action on $network,message: $1-,5)
      var %sound = $mircdirsounds\highlight.mp3
      if ($isfile(%sound)) { .splay $qt(%sound) }
      set -eu10 %tip. [ $+ [ $nick ] ] true
    }
    write $qt($mircdirLogs\LogOnAction.txt) 14|| 9 $date 14|| || 7 $time 14|| 15:: 14|| 9ACTION 14|| || 13 $network 14|| || 8 $chan 14|| || 11 $nick 14|| || 0 $1- 14||
    write $qt($mircdirLogs\LogOnAction.txt) 14-
    haltdef

  }
}
ON ^*:TEXT:*:#: {
  if ($me isin $strip($1-)) {
    var %n = $nick($chan,$nick).pnick
    echo $color(normal) -phtm $chan < $+ $iif($nick isnotify,$chr(3) $+ $color(notify) $+ %n $+ ,%n) $+ > $replace($1-,$me,$+($chr(3),$color(highlight),$me,$chr(3),$color(normal)))
    if (!%tip. [ $+ [ $nick ] ]) {
      var %tip_id = $nick $+ ~ $+ $chan $+ ~ $event
      noop $tip(%tip_id,Message on $network, $+ $nick $+  just said your name in $chan,5)
      noop $tip(%tip_id,Message on $network,message: $1-,5)
      var %sound = $mircdirsounds\highlight.mp3
      if ($isfile(%sound)) { .splay $qt(%sound) }
      set -eu10 %tip. [ $+ [ $nick ] ] true
    }
    write $qt($mircdirLogs\LogOnAction.txt) 14|| 9 $date 14|| || 7 $time 14|| 15:: 14|| 8 TEXT 14|| || 13 $network 14|| || 8 $chan 14|| || 11 $nick 14|| || 0 $1- 14||
    write $qt($mircdirLogs\LogOnAction.txt) 14-
    haltdef
  }
}
ON ^*:NOTICE:*:#: {
  if ($me isin $strip($1-)) {
    var %n = $nick($chan,$nick).pnick
    echo $color(notice) -phtm $chan - $+ $iif($nick isnotify,$chr(3) $+ $color(notify) $+ %n $+ ,%n) $+ : $+ $chan $+ - $replace($1-,$me,$+($chr(3),$color(highlight),$me,$chr(3),$color(notice)))
    if (!%tip. [ $+ [ $nick ] ]) {
      var %tip_id = $nick $+ ~ $+ $chan $+ ~ $event
      noop $tip(%tip_id,Notice on $network, $+ $nick $+  just said your name in $chan,5)
      noop $tip(%tip_id,Notice on $network,message: $1-,5)
      var %sound = $mircdirsounds\highlight.mp3
      if ($isfile(%sound)) { .splay $qt(%sound) }
      set -eu10 %tip. [ $+ [ $nick ] ] true
    }
    write $qt($mircdirLogs\LogOnAction.txt) 14|| 9 $date 14|| || 7 $time 14|| 15:: 14|| 8 TEXT 14|| || 13 $network 14|| || 8 $chan 14|| || 11 $nick 14|| || 0 $1- 14||
    write $qt($mircdirLogs\LogOnAction.txt) 14-
    haltdef
  }
}
on *:start: {
  write -c $qt($mircdirLogs\LogOnAction.txt) 14Dark15Shadow14™ 14Based On 12m4IR8C 11Log On Action 7---  14|| 9 $date 14|| || 7 $time 14||
  write $qt($mircdirLogs\LogOnAction.txt) -
}
on *:kick:#: {
  if ($knick == $me) { write $qt($mircdirLogs\LogOnAction.txt)  14|| 9 $date 14|| || 7 $time 14|| 15:: 14|| 4 KICK 14|| || 13 $network 14|| || 8 $chan 14|| || 11 $nick 14|| 0 $1- 14|| | write $qt($mircdirLogs\LogOnAction.txt) 14- }
}
alias logonaction {
  var %f = $mircdirlogs\logonaction.txt
  if (!$isfile(%f)) { var %error = $input(There is NOT any log action file founded since now!,hodb,Error) | return }
  window -a @Log.on.Action
  clear @Log.on.Action
  var %x = 1
  while (%x <= $lines(%f)) {
    aline -pl @Log.on.Action $read(%f,%x)
    inc %x
  }
}
menu @Log.on.Action {
  Reload Log : {
    clear @Log.on.Action
    logonaction
  }
  Close:window -c @Log.on.Action
  -
  Clear Log File : {
    var %f = $mircdirlogs\logonaction.txt
    write -c $qt(%f) 14Dark15Shadow14™ 14Based On 12m4IR8C 11Logs On Action Cleared 7---  14|| 9 $date 14|| || 7 $time 14||
    write $qt(%f) -
    logonaction
  }
}

menu status,channel,query {
  Log On Action :logonaction
}

on *:LOAD: {
  echo -a 8Ultimate Highlight - Notification is 9activated8. 7Remember you should not load any other similar remote.
}

on *:UNLOAD: {
  echo -a 8Ultimate Highlight - Notification is 4deactivated8.
}