I didn't know "empire name" may be multiple words (the regular expression checked for a single word before "secor name"). I set it this way to prevent as many "false positive"-matches as possible.

Here's a modified and condensed version:
Code:
on *:text:*:#: {
  if ($nick isop $chan) {
    if ($regex($1-,/ \(\d:\d\) ([\d\54]*\d+) ([\d\54]*\d+) [\d\54]+?\54\d{3}(?: \[.+\])?$/)) {
      var %r = $remove($regml(1),$chr(44)), %l = $remove($regml(2),$chr(44)), %r.hits = 0, %l.hits = 0
      while (%r > 0) { dec %r $iif((%r > 100),$calc(%r * 0.1),10) | inc %r.hits }
      while (%l > 0) { dec %l $iif((%l > 200),$calc(%l * 0.1),20) | inc %l.hits }
      
      msg $chan %r.hits hits to Roid kill; %l.hits hits to Land kill
    }
  }
}