function eventNewGame()
    local rawXml = tfm.get.room.xmlMapInfo.xml;
    local xml = rawXml;
    if (rawXml:find("<")~=nil) then
        xml=xml:gsub("<", "&lt;");
    elseif (rawXml:find(">")~=nil) then
        xml=xml:gsub(">", "&gt;");
    end
    ui.addTextArea (1, xml:sub(0, 1999), nil, 100, 100, 600, 200, 0x000001, 0x000001, 0.5, true) --Text length can't be superior to 2000 chars.
end

--http://prntscr.com/asx992