Module:ColorParse

From Caves of Qud Wiki
Revision as of 15:00, 14 November 2019 by Teamtoto (talk | contribs) (newline charas are turned into actual newlines regardless of parse type)
Jump to navigation Jump to search
Documentation

This module parses the game's color codes in strings and formats them for the wiki. This shouldn't be directly called anymore. Use Template:Qud text instead. If the text in question has pronouns in syntax =pronouns.(pronountype)= or a similar style, use Template:Grammar.

Usage

{{#invoke: ColorParse | parse |(your text here)}}

Code:

{{#invoke: ColorParse | parse |&RS&rt&Ko&yp&Ys&Rv&ra&Kl&yi&Yn&Rn&y}}

Result:

Stopsvalinn


local p = {}

local luatable = require'Module:Color'
local process_args = require'Module:ProcessArgs'

--[Utility stuff]--

function normalize(string, type)
  type = type or 'xml'
  local b = string.gsub(string,"(~J211)", "")
  b = b:gsub("(%*)", "*")
  if type == 'xml' then
    b = string.gsub(b,"([{}])", "")
  end
  b = string.gsub(b,"(\\n)","\n")
  return b
end


function p.linebreaks(frame)
  local b = string.gsub(frame,"(~)","\n\n")
  return b
end

--[ The main function. Takes the first argument and snips out stuff we don't need
--[ depending on regextype.

function p.parse(frame, regextype)
  args = frame.args or mw.getCurrentFrame().args
  regextype = regextype
  if regextype == nil then
    if args[1]:match('&') ~= nil then
      regextype = 'xml'
    else
      regextype = 'notxml'
    end
  end
  --[Determine regex type]
  local regex = "&(%w)([^&\n]*)"
  if regextype == 'notxml' then
  	regex = "&(%w)([^&\n]*)"
  end

  local b = normalize(args[1],regextype)
  local a = string.gsub(b, regex, function(color,text)
       if text ~= nil and text ~= "" then
          local hexcolor = luatable.parse(color)
          if hexcolor == nil then
            error ("There was no specified color for color code: " .. color)
          end
          text = text or ""
          return "<span style=\"color: " .. hexcolor .. ";\">"  .. text .. "</span>"
       else
          return ""
       end
  end)
return a
end

function p.main(frame)

	local parsetype = 'xml'
  	local unbolded = false
  	local tildes = false
  	local text = ''
 	local args = process_args.merge(true)
 	for _, arg in ipairs(args) do
    	if arg == 'notxml' then
        	parsetype = 'notxml'
      	elseif arg == 'unbolded' then
        	unbolded = true
      	elseif arg == 'tildes are new lines' then
        	tildes = true
        elseif text == '' then
        	text = arg
      	end
  	end
    
  	local returntext = p.parse(text, parsetype)
  	if tildes  == true then 
    	returntext = p.linebreaks(returntext)
  	end
  	if unbolded == true then
    	return returntext
  	else
  		return '<b>' .. (returntext or '') .. '</b>'
  	end
end

return p