pkt = [[with almost no wind and medium cloud cover.[4z<BR>[3z[4z<Green>There are three obvious exits: [4z<Exit>west[4z</Exit>, [4z<Exit>northeast[4z</Exit> and [4z<Exit>southeast[4z</Exit>.[3z[4z<BR>A depressed sailor is swaggering around, [4z<C #ff8700>Player 1[3z, [4z<C #ff8700>Player 2[3z, [4z<C #ff00d7>[4z<C #ff8700>Player 3[3z and [4z<C #ff00d7>[4z<C #ff8700>Player 4[3z are standing here and a black cloud is floating in the air here.[3z[4z<BR>]]

<muclient>
<plugin
   name="Plugin_1"
   author="Yurt"
   id="b8231bdc89af8f0bb0a62b23"
   language="Lua"
   purpose="testing how priority effect colour runs 1"
   date_written="2020-03-24 01:45:00"
   requires="1.00"
   version="1"
   sequence="-1000">
</plugin>
<script>
<![CDATA[
require "tprint"
function on_trigger_word_line(name, line, wildcards, styles)
    print("plugin 1")
    tprint(styles)
end
]]>
</script>
<triggers>
  <trigger
   enabled="y"
   ignore_case="y"
   keep_evaluating="y"
   match="^.*word.*$"
   regexp="y"
   sequence="100"
   name="word_line"
   script="on_trigger_word_line"
  >
  </trigger>
</triggers>
</muclient>

<muclient>
<plugin
   name="Plugin_2"
   author="Yurt"
   id="b8241bdc89bf8f0bb0a62b33"
   language="Lua"
   purpose="testing how priority effect colour runs 2"
   date_written="2020-03-24 01:45:00"
   requires="1.00"
   version="1">
</plugin>
<script>
<![CDATA[
function on_trigger_colour_word(name, line, wildcards, styles)
    print("plugin 2")
end
]]>
</script>
<triggers>
  <trigger
   custom_colour="17"
   enabled="y"
   ignore_case="y"
   keep_evaluating="y"
   match="word"
   regexp="y"
   repeat="y"
   sequence="100"
   other_text_colour="red"
   name="colour_word"
   script="on_trigger_colour_word">
  </trigger>
</triggers>
</muclient>

plugin 1
1:
  "textcolour"=12632256
  "backcolour"=0
  "length"=2
  "style"=0
  "text"="a "
2:
  "textcolour"=255
  "backcolour"=0
  "length"=4
  "style"=0
  "text"="word"
plugin 2

plugin 1
1:
  "textcolour"=12632256
  "backcolour"=0
  "length"=6
  "style"=0
  "text"="a word"
plugin 2

<triggers>
  <trigger
   enabled="y"
   ignore_case="y"
   keep_evaluating="y"
   match="^.*word.*$"
   regexp="y"
   sequence="100"
   name="word_line"
   send_to="12"
  >
<send>

t = GetStyleInfo (GetLinesInBufferCount ())     -- get all styles, all types for the last line

print("plugin 1")  -- print this now or IT will be the last line

for k, v in pairs (t) do 
  Note ("style run = ", k)  -- this is one style
  for a, b in pairs (v) do  -- display all info types for style
    Note (" item = ", a, " value = ", b)
  end  
end

</send>
  </trigger>
</triggers>

plugin 1
style run = 1
 item = textcolour value = 12632256
 item = action value = 
 item = backcolour value = 0
 item = starttag value = false
 item = text value = a word
 item = changed value = false
 item = variable value = 
 item = actiontype value = 0
 item = blink value = false
 item = inverse value = false
 item = bold value = false
 item = column value = 1
 item = length value = 6
 item = ul value = false
 item = hint value = 
plugin 2

Line A
Line B
Line C
Line D <newline>
Line E
Line F
Line G
Line H <newline>

local n = GetLinesInBufferCount()
local styles = GetStyleInfo (n)
n = n - 1
while not GetLineInfo(n, 3) do	
  local t = GetStyleInfo (n)
  if type(t) == 'table' then
    for i, v in ipairs(t) do
      if i == #t and styles[i].textcolour == v.textcolour then
        styles[i].text = v.text..styles[i].text
        styles[i].length = styles[i].length + v.length
      else
        table.insert(styles, i, v)
      end
    end
  end
  n = n - 1
  if n == -1000 then break end
end