Forum parser

texto = [[
Graças a Cocooouuuaaa, recuperamos 0 queijos!
Zapti é seu shaman, siga-o !
[Zapti] nem tem como
[Julioweeeest] morre %#!@
Julioweeeest Desbloqueou o título «Rato Sindicalista»
Sem queijo para você ! ^_^
[Julioweeeest] poha
[Zapti] quem ?
[Julioweeeest] nasa a mae
[Amooura] Clb garoto, ja era meu.
[Julioweeeest] seu $%
[Amooura] Me poupe.
[Amooura] Lixaria, fica de mimimi essas horas.
< [Ninguem] Ola none
> [br] [Ninguem] iae esh
< [Ninguem] eu fiz um script q adiciona tags de cor do chat no forum
]]
texto = texto:gsub('\n','¤')
text = ''

for textline in string.gmatch(texto,'[^¤]+') do

    if textline:sub(0,1) == '[' then
        user = textline:match('(.*)]'):sub(2)
        msg = textline:match('] (.*)')
        textline = string.format('[url=http://br.cheese.formice.com/mouse/%s][color=#009D9D][%s][/color][/url][color=#C2C2DA] %s[/color]\n',user,user,msg)

    elseif textline:find('é seu shaman') then
        textline = textline:gsub('^','[color=#98E2EB]'):gsub('é','[/color][color=#6C77C1] é'):gsub('$','[/color]\n')

    elseif textline:sub(0,3) == '> [' then
        server = textline:match('> (.*)'):sub(2,textline:find(' ')+1)
        user = textline:match('] (.*)]'):sub(2)
        msg = textline:match('] (.*)',2):sub(user:len()+4,msg:len())
        textline = string.format('[color=#F0A78E]> [%s] [/color][url=http://br.cheese.formice.com/mouse/%s][color=#E88F4F][%s][/color][/url] [color=#F0A78E]%s[/color]\n',server,user,user,msg)

    elseif textline:sub(0,3) == '< [' then
        textline = textline:gsub('^','[color=#EFCE8F]'):gsub('$','[/color]\n')

    elseif textline:find('Você entrou na sala') then
        textline = textline:gsub('^','[color=#6C77C1]'):gsub('/sala NomeDaSala','[/color][color=#009D9D]/sala NomeDaSala[/color][color=#6C77C1]'):gsub('$','[/color]\n')

    elseif textline:sub(0,3):match('• [') then
        user = textline:match('(.*)]'):sub(3)
        msg = textline:match('] (.*)')
        textline = string.format('[color=#2EBA7E]• %s][/color][color=#A4CF9E] %s[/color]\n',user,msg)

    elseif textline:sub(0,2) == '• ' then
        textline = textline:gsub('^','[color=#5BA783]'):gsub('$','[/color]\n')

    elseif textline:sub(0,6) == 'Graças' then
        textline = textline:gsub('^','[color=#6C77C1]'):gsub('a ','a [/color][color=#009D9D]'):gsub(',','[/color][color=#6C77C1],'):gsub('$','[/color]\n')

    elseif textline:find('Sem queijo') then
        textline = textline:gsub('^','[color=#6C77C1]'):gsub('$','[/color]\n')

    elseif textline:find('Você é o shaman') then
        textline = textline:gsub('^','[color=#BABD2F]'):gsub('$','[/color]\n')

    elseif textline:find('• [Server]') then
        textline = textline:gsub('^','[color=#ED67EA][b]'):gsub('] ','][/b] '):gsub('$','[/color]\n')

    elseif textline:find('Desbloqueou o título «') then
        textline = textline:gsub('^','[color=#BABD2F]'):gsub('$','[/color]\n')
    end
    text = text..textline
end
print(text)