
--# ReadMe

--[[
First, don't be put off by all this text. This utility is extremely simple to use.

It creates code that reproduces images so you don't need to include them separately with your projects. It uses RLE, a well known compression technique. Essentially, it runs through all the pixels, and every time the color changes, it stores the last color and the number of pixels it applied to.

FUNCTIONALITY
It can turn any image(with reason) into code strings, and reassemble the image from them.

It can take images from the libraries, or Spritely code, and convert to compressed code.

The practical limits on image size and complexity are processing speed and storage, because the greater the number of colors and pixels, the more space we have to allow for each item. Currently, it can allow for up to 4,096 unique r,g,b,a combinations, and up to 4,096 characters of the same color in an unbroken sequence. Increasing storage from 3 to 4 chars per item would increase capacity by a factor of 16, but would blow out the data by 1/3.

FUNCTIONS
The Coder:Encode function takes the image as input and prints the code to recreate it, in the Output screen. You copy this code to your project. The Test tab shows how it looks. Note, you will also need to copy the Decoder tab to your project.

Usage: Coder:Encode(img)  --then copy and paste the printed code

NB As well as printing the code, the Coder function also returns the two strings required to decode the image. This is only for testing purposes, so the Main tab can show how it works - in practice, you will just copy the printed code and not worry about the return values.

The Decoder:Decode function takes two strings as input and returns an image. Normally, you don't have to worry about this because the printed code calls thefunction correctly for you, returning the image.

The Main function carries out several tests
It reads in an image from the standard library, codes and then decodes it back to an image
It takes an image created by Spritely code (in the IconImages tab), and encodes/decodes it back to an image
The code strings created for the Spritely code are used in the Test tab to demonstrate how to use them to decode an image

All three images above are drawn on screen. The first two images have their originals drawn above them for comparison purposes.

USING IT
Only the ImageCoder tab is needed to encode images

Only the Decoder tab needs to be included in any project where you want to decode RLE images.

COMPRESSION
The level of compression depends on many factors, and there are all sorts of ways to tweak for speed, but this may be good enough. I will tweak if there is demand for it.

Dermot (user:Ignatz)
--]]

--# Main
-- Compress

function setup()
    --Read image from library
    --You can pick any image you like, but don't make it too big or complex
    img1 = readImage("Space Art:Part Red Hull 1")

    --Normally, you only need to run the single line of code below, which prints the code you need
    --The function does return two strings, but you can ignore them (they are just for testing),
    --just copy what is printed out in the Output screen, and and paste it into your own project
    --So normally, you'll just run Coder:Encode(img1)
    --The Test tab shows how it looks when pasted in, and that is the third example below
    strCol,str=Coder:Encode(img1)

    --The rest of the code below is just to prove it works

    --check we can reproduce the original image we loaded above, using the compressed code
    img_new1=Decoder:Decode(img1.height,img1.width,strCol,str)

    --Second test is to convert code produced by Spritely
    img2=IconImages:getFlagCell()
    strCol,str=Coder:Encode(img2)
    img_new2=Decoder:Decode(img2.height,img2.width,strCol,str)

    --Finally, to show how you actually use the code produced by this utility....
    img_new3=Test:Decode()
end

-- This function gets called once every frame
function draw()
    -- This sets a dark background color
    background(208, 208, 214, 255)

    -- This sets the line thickness
    strokeWidth(5)

    -- Do your drawing here
    text( "This utility converts images to code you can embed in your project", 290, 400 )
    text( "Library original", 100, 350 )
    sprite(img1,100,300)
    text( "Library copy", 100, 200 )
    sprite(img_new1,100,150)
    text( "Spritely original", 300, 350 )
    sprite(img2,300,300)
    text( "Spritely copy", 300, 200 )
    sprite(img_new2,300,150)
    text( "Image from code", 500, 200 )
    sprite(img_new3,500,150)
end


--# Coder
Coder = class()

--This function encodes an image in two strings
--the first string makes a list of unique color settings (r,g,b,a), encoded as an 8 char hex string
--the second string runs through the image, through rows then columns, and every time the color changes,
--it records the color setting and number of cells that had that color
--NB it doesn't store the color setting as an 8 char hex string, imstead it stores the position of
--this color in the first string. This saves a lot of storage where colors are used over and over again

function Coder:Encode(img)
    rows=img.height
    cols=img.width
    colors={} --hash table of unique colors, gives us their sequence in the unique list
    strCol="" --unique list of color settings, each one is 8 chars hex, for r,g,b,a
    str=""  -- each item consists of a color setting (or rather, the position in strCol), and the number of
            --cells to be colored
    --for example, if the image starts with 56 cells with r=1,g=2,b=5,a=6, we will add the hex value of this,
    --which is 001002005006, to strCol, and set colors[001002005006]=1, (1 because this is the first color)
    --to str, we add the hex values of the string position, ie 1, and the number of cells, ie 56, so we will
    --add 001038 to str

    prevColor=-1 --to tell us when the color changes
    count=0 --number of cells with current color
    colorCount=0 --number of colors used so far
    dataCount=0 --number of data units stored
    maxColors=256^3
    maxData=256^3
    --loop through image
    for i=1,cols do
        for j=1,rows do
            r,g,b,a=img:get(i,j)
            x=string.format("%02X%02X%02X%02X",r,g,b,a) --format color pattern as hex
            if x==prevColor then
                count=count+1
            else --color has changed, store details of last color
                if count>0 then --this will only be zero for the very first cell
                    y=colors[prevColor] --this looks up the position of the color, in the color list
                    if y==nil then --add the color to the list if no there
                        colorCount = colorCount + 1
                        if colorCount>maxColors then
                            errMessage="Number of distinct color settings exceeds maximum of "..maxColors
                            break
                        end
                        colors[prevColor]=colorCount
                        strCol=strCol..prevColor
                        y=colorCount
                    end
                    str=str..string.format("%03X",y)..string.format("%03X",count) --store the data
                    dataCount = dataCount + 1
                    if dataCount>maxData then
                        errMessage="Image is too big/complex"
                        break
                    end
                end
                prevColor=x
                count=1
            end
            if errMessage~=nil then break end
        end
        if errMessage~=nil then break end
    end
    --we've finished, but we may have some left over chars that need to be stored
    if count>0 then
        y=colors[prevColor]
        if y==nil then
            colorCount = colorCount + 1
            colors[prevColor]=colorCount
            strCol=strCol..prevColor
            y=colorCount
            if colorCount>maxColors then
                errMessage="Number of distinct color settings exceeds maximum of "..maxColors
            end
        end
        str=str..string.format("%03X",y)..string.format("%03X",count)
        dataCount = dataCount + 1
        if dataCount>maxData then
            errMessage="Image is too big/complex"
        end
    end
    --create code for user
    if errMessage~=nil then
        print(errMessage)
        return errMessage,errMessage
    else
        print("img=Decoder:Decode("..rows..","..cols..",'"..strCol.."','"..str.."')")
        return strCol,str
    end


end


--# Decoder
Decoder = class()

function Decoder:Decode(rows,cols,strCol,strDat)
    local img=image(cols,rows)
    local n=0
    local m=0
    local arrR={}
    local arrG={}
    local arrB={}
    local arra={}
    --unpack color descriptions
    while n<string.len(strCol) do
        x=string.sub(strCol,n+1,n+8)
        m = m + 1
        arrR[m],arrG[m],arrB[m],arra[m]=Hex2RGB(x)
        n = n + 8
    end
    --unpack RLE content
    col=1
    row=0
    n=0
    while n<string.len(str) do
        colIndex=Hex2Dec(string.sub(str,n+1,n+3))
        colCount=Hex2Dec(string.sub(str,n+4,n+6))
        for u=1,colCount do
            row = row + 1
            if row>rows then col=col+1 row=1 end
            img:set(col,row,color(arrR[colIndex],arrG[colIndex],arrB[colIndex],arra[colIndex]))
        end
        n=n+6
    end
    return img
end

function Hex2RGB(hex)
    local r=Hex2Dec(string.sub(hex,1,2))
    local g=Hex2Dec(string.sub(hex,3,4))
    local b=Hex2Dec(string.sub(hex,5,6))
    local a=Hex2Dec(string.sub(hex,7,8))
    --print (hex,r,g,b,a)
    return r,g,b,a
end

function Hex2Dec(hex)
    return tonumber("0x"..hex,10)
end
--# IconImages
--# IconImages
IconImages = class()

-- Icon Images contains one of the sprite images used in MineSweeper.
--
-- It was drawn using Spritely, the pixel image editor
-- included with Codea.
--
-- Version 1.1

function IconImages:getFlagCell()
local img = image(32, 32)
img:set(1,0,255,255,255,255)
img:set(1,2,255,255,255,255)
img:set(1,3,255,255,255,255)
img:set(1,4,255,255,255,255)
img:set(1,5,255,255,255,255)
img:set(1,6,255,255,255,255)
img:set(1,7,255,255,255,255)
img:set(1,8,255,255,255,255)
img:set(1,9,255,255,255,255)
img:set(1,10,255,255,255,255)
img:set(1,11,255,255,255,254)
img:set(1,12,255,255,255,255)
img:set(1,13,255,255,255,255)
img:set(1,14,255,255,255,255)
img:set(1,15,255,255,255,255)
img:set(1,16,255,255,255,255)
img:set(1,17,255,255,255,255)
img:set(1,18,255,255,255,255)
img:set(1,19,255,255,255,255)
img:set(1,20,255,255,255,255)
img:set(1,21,255,255,255,255)
img:set(1,22,255,255,255,255)
img:set(1,23,255,255,255,255)
img:set(1,24,255,255,255,255)
img:set(1,25,255,255,255,255)
img:set(1,26,255,255,255,255)
img:set(1,27,255,255,255,255)
img:set(1,28,255,255,255,255)
img:set(1,29,255,255,255,255)
img:set(1,30,255,255,255,255)
img:set(1,31,255,255,255,255)
img:set(1,32,255,255,255,255)
img:set(2,1,127,127,127,255)
img:set(2,2,0,128,255,255)
img:set(2,3,0,128,255,255)
img:set(2,4,0,128,255,255)
img:set(2,5,0,128,255,255)
img:set(2,6,0,128,255,255)
img:set(2,7,0,128,255,255)
img:set(2,8,0,128,255,255)
img:set(2,9,0,128,255,255)
img:set(2,10,0,128,255,255)
img:set(2,11,0,128,255,255)
img:set(2,12,0,128,255,255)
img:set(2,13,0,128,255,255)
img:set(2,14,0,128,255,255)
img:set(2,15,0,128,255,255)
img:set(2,16,0,128,255,255)
img:set(2,17,0,128,255,255)
img:set(2,18,0,128,255,255)
img:set(2,19,0,128,255,255)
img:set(2,20,0,128,255,255)
img:set(2,21,0,128,255,255)
img:set(2,22,0,128,255,255)
img:set(2,23,0,128,255,255)
img:set(2,24,0,128,255,255)
img:set(2,25,0,128,255,255)
img:set(2,26,0,128,255,255)
img:set(2,27,0,128,255,255)
img:set(2,28,0,128,255,255)
img:set(2,29,0,128,255,255)
img:set(2,30,0,128,255,255)
img:set(2,31,0,128,255,255)
img:set(2,32,255,255,255,255)
img:set(3,1,127,127,127,255)
img:set(3,2,0,128,255,255)
img:set(3,3,0,128,255,255)
img:set(3,4,0,128,255,255)
img:set(3,5,0,128,255,255)
img:set(3,6,0,128,255,255)
img:set(3,7,0,128,255,255)
img:set(3,8,0,128,255,255)
img:set(3,9,0,128,255,255)
img:set(3,10,0,128,255,255)
img:set(3,11,0,128,255,255)
img:set(3,12,0,128,255,255)
img:set(3,13,0,128,255,255)
img:set(3,14,0,128,255,255)
img:set(3,15,0,128,255,255)
img:set(3,16,0,128,255,255)
img:set(3,17,0,128,255,255)
img:set(3,18,0,128,255,255)
img:set(3,19,0,128,255,255)
img:set(3,20,0,128,255,255)
img:set(3,21,0,128,255,255)
img:set(3,22,0,128,255,255)
img:set(3,23,0,128,255,255)
img:set(3,24,0,128,255,255)
img:set(3,25,0,128,255,255)
img:set(3,26,0,128,255,255)
img:set(3,27,0,128,255,255)
img:set(3,28,0,128,255,255)
img:set(3,29,0,128,255,255)
img:set(3,30,0,128,255,255)
img:set(3,31,0,128,255,255)
img:set(3,32,255,255,255,255)
img:set(4,1,127,127,127,255)
img:set(4,2,0,128,255,255)
img:set(4,3,0,128,255,255)
img:set(4,4,0,128,255,255)
img:set(4,5,0,128,255,255)
img:set(4,6,0,128,255,255)
img:set(4,7,0,128,255,255)
img:set(4,8,0,128,255,255)
img:set(4,9,0,128,255,255)
img:set(4,10,0,128,255,255)
img:set(4,11,0,128,255,255)
img:set(4,12,0,128,255,255)
img:set(4,13,0,128,255,255)
img:set(4,14,0,128,255,255)
img:set(4,15,0,128,255,255)
img:set(4,16,0,128,255,255)
img:set(4,17,0,128,255,255)
img:set(4,18,0,128,255,255)
img:set(4,19,0,128,255,255)
img:set(4,20,0,128,255,255)
img:set(4,21,0,128,255,255)
img:set(4,22,0,128,255,255)
img:set(4,23,0,128,255,255)
img:set(4,24,0,128,255,255)
img:set(4,25,0,128,255,255)
img:set(4,26,0,128,255,255)
img:set(4,27,0,128,255,255)
img:set(4,28,0,128,255,255)
img:set(4,29,0,128,255,255)
img:set(4,30,0,128,255,255)
img:set(4,31,0,128,255,255)
img:set(4,32,255,255,255,255)
img:set(5,1,127,127,127,255)
img:set(5,2,0,128,255,255)
img:set(5,3,0,128,255,255)
img:set(5,4,0,128,255,255)
img:set(5,5,0,128,255,255)
img:set(5,6,0,128,255,255)
img:set(5,7,0,128,255,255)
img:set(5,8,0,128,255,255)
img:set(5,9,0,128,255,255)
img:set(5,10,0,128,255,255)
img:set(5,11,0,128,255,255)
img:set(5,12,0,128,255,255)
img:set(5,13,0,128,255,255)
img:set(5,14,0,128,255,255)
img:set(5,15,0,128,255,255)
img:set(5,16,0,128,255,255)
img:set(5,17,0,128,255,255)
img:set(5,18,0,128,255,255)
img:set(5,19,0,128,255,255)
img:set(5,20,0,128,255,255)
img:set(5,21,0,128,255,255)
img:set(5,22,0,128,255,255)
img:set(5,23,0,128,255,255)
img:set(5,24,0,128,255,255)
img:set(5,25,0,128,255,255)
img:set(5,26,0,128,255,255)
img:set(5,27,0,128,255,255)
img:set(5,28,0,128,255,255)
img:set(5,29,0,128,255,255)
img:set(5,30,0,128,255,255)
img:set(5,31,0,128,255,255)
img:set(5,32,255,255,255,255)
img:set(6,1,127,127,127,255)
img:set(6,2,0,128,255,255)
img:set(6,3,0,128,255,255)
img:set(6,4,0,128,255,255)
img:set(6,5,0,128,255,255)
img:set(6,6,0,128,255,255)
img:set(6,7,0,128,255,255)
img:set(6,8,0,128,255,255)
img:set(6,9,0,128,255,255)
img:set(6,10,0,128,255,255)
img:set(6,11,0,128,255,255)
img:set(6,12,0,128,255,255)
img:set(6,13,0,128,255,255)
img:set(6,14,0,128,255,255)
img:set(6,15,0,128,255,255)
img:set(6,16,0,128,255,255)
img:set(6,17,0,128,255,255)
img:set(6,18,0,128,255,255)
img:set(6,19,0,128,255,255)
img:set(6,20,0,128,255,255)
img:set(6,21,0,128,255,255)
img:set(6,22,0,128,255,255)
img:set(6,23,0,128,255,255)
img:set(6,24,0,128,255,255)
img:set(6,25,0,128,255,255)
img:set(6,26,0,128,255,255)
img:set(6,27,0,128,255,255)
img:set(6,28,0,128,255,255)
img:set(6,29,0,128,255,255)
img:set(6,30,0,128,255,255)
img:set(6,31,0,128,255,255)
img:set(6,32,255,255,255,255)
img:set(7,1,127,127,127,255)
img:set(7,2,0,128,255,255)
img:set(7,3,0,128,255,255)
img:set(7,4,0,128,255,255)
img:set(7,5,0,128,255,255)
img:set(7,6,0,128,255,255)
img:set(7,7,0,128,255,255)
img:set(7,8,0,128,255,255)
img:set(7,9,0,128,255,255)
img:set(7,10,0,128,255,255)
img:set(7,11,0,128,255,255)
img:set(7,12,0,128,255,255)
img:set(7,13,0,128,255,255)
img:set(7,14,0,128,255,255)
img:set(7,15,0,128,255,255)
img:set(7,16,0,128,255,255)
img:set(7,17,0,128,255,255)
img:set(7,18,0,128,255,255)
img:set(7,19,0,128,255,255)
img:set(7,20,0,128,255,255)
img:set(7,21,0,128,255,255)
img:set(7,22,0,128,255,255)
img:set(7,23,0,128,255,255)
img:set(7,24,0,128,255,255)
img:set(7,25,0,128,255,255)
img:set(7,26,0,128,255,255)
img:set(7,27,0,128,255,255)
img:set(7,28,0,128,255,255)
img:set(7,29,0,128,255,255)
img:set(7,30,0,128,255,255)
img:set(7,31,0,128,255,255)
img:set(7,32,255,255,255,255)
img:set(8,1,127,127,127,255)
img:set(8,2,0,128,255,255)
img:set(8,3,0,128,255,255)
img:set(8,4,0,128,255,255)
img:set(8,5,0,128,255,255)
img:set(8,6,0,0,0,255)
img:set(8,7,0,0,0,255)
img:set(8,8,0,0,0,255)
img:set(8,9,0,128,255,255)
img:set(8,10,0,128,255,255)
img:set(8,11,0,128,255,255)
img:set(8,12,0,128,255,255)
img:set(8,13,0,128,255,255)
img:set(8,14,0,128,255,255)
img:set(8,15,0,128,255,255)
img:set(8,16,0,128,255,255)
img:set(8,17,0,128,255,255)
img:set(8,18,0,128,255,255)
img:set(8,19,0,128,255,255)
img:set(8,20,255,0,0,255)
img:set(8,21,255,0,0,255)
img:set(8,22,0,128,255,255)
img:set(8,23,0,128,255,255)
img:set(8,24,0,128,255,255)
img:set(8,25,0,128,255,255)
img:set(8,26,0,128,255,255)
img:set(8,27,0,128,255,255)
img:set(8,28,0,128,255,255)
img:set(8,29,0,128,255,255)
img:set(8,30,0,128,255,255)
img:set(8,31,0,128,255,255)
img:set(8,32,255,255,255,255)
img:set(9,1,127,127,127,255)
img:set(9,2,0,128,255,255)
img:set(9,3,0,128,255,255)
img:set(9,4,0,128,255,255)
img:set(9,5,0,128,255,255)
img:set(9,6,0,0,0,255)
img:set(9,7,0,0,0,255)
img:set(9,8,0,0,0,255)
img:set(9,9,0,128,255,255)
img:set(9,10,0,128,255,255)
img:set(9,11,0,128,255,255)
img:set(9,12,0,128,255,255)
img:set(9,13,0,128,255,255)
img:set(9,14,0,128,255,255)
img:set(9,15,0,128,255,255)
img:set(9,16,0,128,255,255)
img:set(9,17,0,128,255,255)
img:set(9,18,0,128,255,255)
img:set(9,19,0,128,255,255)
img:set(9,20,255,0,0,255)
img:set(9,21,255,0,0,255)
img:set(9,22,0,128,255,255)
img:set(9,23,0,128,255,255)
img:set(9,24,0,128,255,255)
img:set(9,25,0,128,255,255)
img:set(9,26,0,128,255,255)
img:set(9,27,0,128,255,255)
img:set(9,28,0,128,255,255)
img:set(9,29,0,128,255,255)
img:set(9,30,0,128,255,255)
img:set(9,31,0,128,255,255)
img:set(9,32,255,255,255,255)
img:set(10,1,127,127,127,255)
img:set(10,2,0,128,255,255)
img:set(10,3,0,128,255,255)
img:set(10,4,0,128,255,255)
img:set(10,5,0,128,255,255)
img:set(10,6,0,0,0,255)
img:set(10,7,0,0,0,255)
img:set(10,8,0,0,0,255)
img:set(10,9,0,128,255,255)
img:set(10,10,0,128,255,255)
img:set(10,11,0,128,255,255)
img:set(10,12,0,128,255,255)
img:set(10,13,0,128,255,255)
img:set(10,14,0,128,255,255)
img:set(10,15,0,128,255,255)
img:set(10,16,0,128,255,255)
img:set(10,17,0,128,255,255)
img:set(10,18,0,128,255,255)
img:set(10,19,0,128,255,255)
img:set(10,20,255,0,0,255)
img:set(10,21,255,0,0,255)
img:set(10,22,0,128,255,255)
img:set(10,23,0,128,255,255)
img:set(10,24,0,128,255,255)
img:set(10,25,0,128,255,255)
img:set(10,26,0,128,255,255)
img:set(10,27,0,128,255,255)
img:set(10,28,0,128,255,255)
img:set(10,29,0,128,255,255)
img:set(10,30,0,128,255,255)
img:set(10,31,0,128,255,255)
img:set(10,32,255,255,255,255)
img:set(11,1,127,127,127,255)
img:set(11,2,0,128,255,255)
img:set(11,3,0,128,255,255)
img:set(11,4,0,128,255,255)
img:set(11,5,0,128,255,255)
img:set(11,6,0,0,0,255)
img:set(11,7,0,0,0,255)
img:set(11,8,0,0,0,255)
img:set(11,9,0,128,255,255)
img:set(11,10,0,128,255,255)
img:set(11,11,0,128,255,255)
img:set(11,12,0,128,255,255)
img:set(11,13,0,128,255,255)
img:set(11,14,0,128,255,255)
img:set(11,15,0,128,255,255)
img:set(11,16,0,128,255,255)
img:set(11,17,0,128,255,255)
img:set(11,18,255,0,0,255)
img:set(11,19,255,0,0,255)
img:set(11,20,255,0,0,255)
img:set(11,21,255,0,0,255)
img:set(11,22,255,0,0,255)
img:set(11,23,255,0,0,255)
img:set(11,24,0,128,255,255)
img:set(11,25,0,128,255,255)
img:set(11,26,0,128,255,255)
img:set(11,27,0,128,255,255)
img:set(11,28,0,128,255,255)
img:set(11,29,0,128,255,255)
img:set(11,30,0,128,255,255)
img:set(11,31,0,128,255,255)
img:set(11,32,255,255,255,255)
img:set(12,1,127,127,127,255)
img:set(12,2,0,128,255,255)
img:set(12,3,0,128,255,255)
img:set(12,4,0,128,255,255)
img:set(12,5,0,128,255,255)
img:set(12,6,0,0,0,255)
img:set(12,7,0,0,0,255)
img:set(12,8,0,0,0,255)
img:set(12,9,0,128,255,255)
img:set(12,10,0,128,255,255)
img:set(12,11,0,128,255,255)
img:set(12,12,0,128,255,255)
img:set(12,13,0,128,255,255)
img:set(12,14,0,128,255,255)
img:set(12,15,0,128,255,255)
img:set(12,16,0,128,255,255)
img:set(12,17,0,128,255,255)
img:set(12,18,255,0,0,255)
img:set(12,19,255,0,0,255)
img:set(12,20,255,0,0,255)
img:set(12,21,255,0,0,255)
img:set(12,22,255,0,0,255)
img:set(12,23,255,0,0,255)
img:set(12,24,0,128,255,255)
img:set(12,25,0,128,255,255)
img:set(12,26,0,128,255,255)
img:set(12,27,0,128,255,255)
img:set(12,28,0,128,255,255)
img:set(12,29,0,128,255,255)
img:set(12,30,0,128,255,255)
img:set(12,31,0,128,255,255)
img:set(12,32,255,255,255,255)
img:set(13,1,127,127,127,255)
img:set(13,2,0,128,255,255)
img:set(13,3,0,128,255,255)
img:set(13,4,0,128,255,255)
img:set(13,5,0,128,255,255)
img:set(13,6,0,0,0,255)
img:set(13,7,0,0,0,255)
img:set(13,8,0,0,0,255)
img:set(13,9,0,0,0,255)
img:set(13,10,0,128,255,255)
img:set(13,11,0,128,255,255)
img:set(13,12,0,128,255,255)
img:set(13,13,0,128,255,255)
img:set(13,14,0,128,255,255)
img:set(13,15,0,128,255,255)
img:set(13,16,0,128,255,255)
img:set(13,17,0,128,255,255)
img:set(13,18,255,0,0,255)
img:set(13,19,255,0,0,255)
img:set(13,20,255,0,0,255)
img:set(13,21,255,0,0,255)
img:set(13,22,255,0,0,255)
img:set(13,23,255,0,0,255)
img:set(13,24,0,128,255,255)
img:set(13,25,0,128,255,255)
img:set(13,26,0,128,255,255)
img:set(13,27,0,128,255,255)
img:set(13,28,0,128,255,255)
img:set(13,29,0,128,255,255)
img:set(13,30,0,128,255,255)
img:set(13,31,0,128,255,255)
img:set(13,32,255,255,255,255)
img:set(14,1,127,127,127,255)
img:set(14,2,0,128,255,255)
img:set(14,3,0,128,255,255)
img:set(14,4,0,128,255,255)
img:set(14,5,0,128,255,255)
img:set(14,6,0,0,0,255)
img:set(14,7,0,0,0,255)
img:set(14,8,0,0,0,255)
img:set(14,9,0,0,0,255)
img:set(14,10,0,128,255,255)
img:set(14,11,0,128,255,255)
img:set(14,12,0,128,255,255)
img:set(14,13,0,128,255,255)
img:set(14,14,0,128,255,255)
img:set(14,15,0,128,255,255)
img:set(14,16,255,0,0,255)
img:set(14,17,255,0,0,255)
img:set(14,18,255,0,0,255)
img:set(14,19,255,0,0,255)
img:set(14,20,255,0,0,255)
img:set(14,21,255,0,0,255)
img:set(14,22,255,0,0,255)
img:set(14,23,255,0,0,255)
img:set(14,24,255,0,0,255)
img:set(14,25,255,0,0,255)
img:set(14,26,0,128,255,255)
img:set(14,27,0,128,255,255)
img:set(14,28,0,128,255,255)
img:set(14,29,0,128,255,255)
img:set(14,30,0,128,255,255)
img:set(14,31,0,128,255,255)
img:set(14,32,255,255,255,255)
img:set(15,1,127,127,127,255)
img:set(15,2,0,128,255,255)
img:set(15,3,0,128,255,255)
img:set(15,4,0,128,255,255)
img:set(15,5,0,128,255,255)
img:set(15,6,0,0,0,255)
img:set(15,7,0,0,0,255)
img:set(15,8,0,0,0,255)
img:set(15,9,0,0,0,255)
img:set(15,10,0,128,255,255)
img:set(15,11,0,128,255,255)
img:set(15,12,0,128,255,255)
img:set(15,13,0,128,255,255)
img:set(15,14,0,128,255,255)
img:set(15,15,0,128,255,255)
img:set(15,16,255,0,0,255)
img:set(15,17,255,0,0,255)
img:set(15,18,255,0,0,255)
img:set(15,19,255,0,0,255)
img:set(15,20,255,0,0,255)
img:set(15,21,255,0,0,255)
img:set(15,22,255,0,0,255)
img:set(15,23,255,0,0,255)
img:set(15,24,255,0,0,255)
img:set(15,25,255,0,0,255)
img:set(15,26,0,128,255,255)
img:set(15,27,0,128,255,255)
img:set(15,28,0,128,255,255)
img:set(15,29,0,128,255,255)
img:set(15,30,0,128,255,255)
img:set(15,31,0,128,255,255)
img:set(15,32,255,255,255,255)
img:set(16,1,127,127,127,255)
img:set(16,2,0,128,255,255)
img:set(16,3,0,128,255,255)
img:set(16,4,0,128,255,255)
img:set(16,5,0,128,255,255)
img:set(16,6,0,0,0,255)
img:set(16,7,0,0,0,255)
img:set(16,8,0,0,0,255)
img:set(16,9,0,0,0,255)
img:set(16,10,0,128,255,255)
img:set(16,11,0,128,255,255)
img:set(16,12,0,128,255,255)
img:set(16,13,0,128,255,255)
img:set(16,14,0,128,255,255)
img:set(16,15,0,128,255,255)
img:set(16,16,255,0,0,255)
img:set(16,17,255,0,0,255)
img:set(16,18,255,0,0,255)
img:set(16,19,255,0,0,255)
img:set(16,20,255,0,0,255)
img:set(16,21,255,0,0,255)
img:set(16,22,255,0,0,255)
img:set(16,23,255,0,0,255)
img:set(16,24,255,0,0,255)
img:set(16,25,255,0,0,255)
img:set(16,26,0,128,255,255)
img:set(16,27,0,128,255,255)
img:set(16,28,0,128,255,255)
img:set(16,29,0,128,255,255)
img:set(16,30,0,128,255,255)
img:set(16,31,0,128,255,255)
img:set(16,32,255,255,255,255)
img:set(17,1,127,127,127,255)
img:set(17,2,0,128,255,255)
img:set(17,3,0,128,255,255)
img:set(17,4,0,128,255,255)
img:set(17,5,0,128,255,255)
img:set(17,6,0,0,0,255)
img:set(17,7,0,0,0,255)
img:set(17,8,0,0,0,255)
img:set(17,9,0,0,0,255)
img:set(17,10,0,0,0,255)
img:set(17,11,0,0,0,255)
img:set(17,12,0,0,0,255)
img:set(17,13,0,0,0,255)
img:set(17,14,255,0,0,255)
img:set(17,15,255,0,0,255)
img:set(17,16,255,0,0,255)
img:set(17,17,255,0,0,255)
img:set(17,18,255,0,0,255)
img:set(17,19,255,0,0,255)
img:set(17,20,255,0,0,255)
img:set(17,21,255,0,0,255)
img:set(17,22,255,0,0,255)
img:set(17,23,255,0,0,255)
img:set(17,24,255,0,0,255)
img:set(17,25,255,0,0,255)
img:set(17,26,255,0,0,255)
img:set(17,27,255,0,0,255)
img:set(17,28,0,128,255,255)
img:set(17,29,0,128,255,255)
img:set(17,30,0,128,255,255)
img:set(17,31,0,128,255,255)
img:set(17,32,255,255,255,255)
img:set(18,1,127,127,127,255)
img:set(18,2,0,128,255,255)
img:set(18,3,0,128,255,255)
img:set(18,4,0,128,255,255)
img:set(18,5,0,128,255,255)
img:set(18,6,0,0,0,255)
img:set(18,7,0,0,0,255)
img:set(18,8,0,0,0,255)
img:set(18,9,0,0,0,255)
img:set(18,10,0,0,0,255)
img:set(18,11,0,0,0,255)
img:set(18,12,0,0,0,255)
img:set(18,13,0,0,0,255)
img:set(18,14,255,0,0,255)
img:set(18,15,255,0,0,255)
img:set(18,16,255,0,0,255)
img:set(18,17,255,0,0,255)
img:set(18,18,255,0,0,255)
img:set(18,19,255,0,0,255)
img:set(18,20,255,0,0,255)
img:set(18,21,255,0,0,255)
img:set(18,22,255,0,0,255)
img:set(18,23,255,0,0,255)
img:set(18,24,255,0,0,255)
img:set(18,25,255,0,0,255)
img:set(18,26,255,0,0,255)
img:set(18,27,255,0,0,255)
img:set(18,28,0,128,255,255)
img:set(18,29,0,128,255,255)
img:set(18,30,0,128,255,255)
img:set(18,31,0,128,255,255)
img:set(18,32,255,255,255,255)
img:set(19,1,127,127,127,255)
img:set(19,2,0,128,255,255)
img:set(19,3,0,128,255,255)
img:set(19,4,0,128,255,255)
img:set(19,5,0,128,255,255)
img:set(19,6,0,0,0,255)
img:set(19,7,0,0,0,255)
img:set(19,8,0,0,0,255)
img:set(19,9,0,0,0,255)
img:set(19,10,0,128,255,255)
img:set(19,11,0,128,255,255)
img:set(19,12,0,128,255,255)
img:set(19,13,0,128,255,255)
img:set(19,14,0,128,255,255)
img:set(19,15,0,128,255,255)
img:set(19,16,0,128,255,255)
img:set(19,17,0,128,255,255)
img:set(19,18,0,128,255,255)
img:set(19,19,0,128,255,255)
img:set(19,20,0,128,255,255)
img:set(19,21,0,128,255,255)
img:set(19,22,0,128,255,255)
img:set(19,23,0,128,255,255)
img:set(19,24,0,128,255,255)
img:set(19,25,0,128,255,255)
img:set(19,26,0,128,255,255)
img:set(19,27,0,128,255,255)
img:set(19,28,0,128,255,255)
img:set(19,29,0,128,255,255)
img:set(19,30,0,128,255,255)
img:set(19,31,0,128,255,255)
img:set(19,32,255,255,255,255)
img:set(20,1,127,127,127,255)
img:set(20,2,0,128,255,255)
img:set(20,3,0,128,255,255)
img:set(20,4,0,128,255,255)
img:set(20,5,0,128,255,255)
img:set(20,6,0,0,0,255)
img:set(20,7,0,0,0,255)
img:set(20,8,0,0,0,255)
img:set(20,9,0,0,0,255)
img:set(20,10,0,128,255,255)
img:set(20,11,0,128,255,255)
img:set(20,12,0,128,255,255)
img:set(20,13,0,128,255,255)
img:set(20,14,0,128,255,255)
img:set(20,15,0,128,255,255)
img:set(20,16,0,128,255,255)
img:set(20,17,0,128,255,255)
img:set(20,18,0,128,255,255)
img:set(20,19,0,128,255,255)
img:set(20,20,0,128,255,255)
img:set(20,21,0,128,255,255)
img:set(20,22,0,128,255,255)
img:set(20,23,0,128,255,255)
img:set(20,24,0,128,255,255)
img:set(20,25,0,128,255,255)
img:set(20,26,0,128,255,255)
img:set(20,27,0,128,255,255)
img:set(20,28,0,128,255,255)
img:set(20,29,0,128,255,255)
img:set(20,30,0,128,255,255)
img:set(20,31,0,128,255,255)
img:set(20,32,255,255,255,255)
img:set(21,1,127,127,127,255)
img:set(21,2,0,128,255,255)
img:set(21,3,0,128,255,255)
img:set(21,4,0,128,255,255)
img:set(21,5,0,128,255,255)
img:set(21,6,0,0,0,255)
img:set(21,7,0,0,0,255)
img:set(21,8,0,0,0,255)
img:set(21,9,0,128,255,255)
img:set(21,10,0,128,255,255)
img:set(21,11,0,128,255,255)
img:set(21,12,0,128,255,255)
img:set(21,13,0,128,255,255)
img:set(21,14,0,128,255,255)
img:set(21,15,0,128,255,255)
img:set(21,16,0,128,255,255)
img:set(21,17,0,128,255,255)
img:set(21,18,0,128,255,255)
img:set(21,19,0,128,255,255)
img:set(21,20,0,128,255,255)
img:set(21,21,0,128,255,255)
img:set(21,22,0,128,255,255)
img:set(21,23,0,128,255,255)
img:set(21,24,0,128,255,255)
img:set(21,25,0,128,255,255)
img:set(21,26,0,128,255,255)
img:set(21,27,0,128,255,255)
img:set(21,28,0,128,255,255)
img:set(21,29,0,128,255,255)
img:set(21,30,0,128,255,255)
img:set(21,31,0,128,255,255)
img:set(21,32,255,255,255,255)
img:set(22,1,127,127,127,255)
img:set(22,2,0,128,255,255)
img:set(22,3,0,128,255,255)
img:set(22,4,0,128,255,255)
img:set(22,5,0,128,255,255)
img:set(22,6,0,0,0,255)
img:set(22,7,0,0,0,255)
img:set(22,8,0,0,0,255)
img:set(22,9,0,128,255,255)
img:set(22,10,0,128,255,255)
img:set(22,11,0,128,255,255)
img:set(22,12,0,128,255,255)
img:set(22,13,0,128,255,255)
img:set(22,14,0,128,255,255)
img:set(22,15,0,128,255,255)
img:set(22,16,0,128,255,255)
img:set(22,17,0,128,255,255)
img:set(22,18,0,128,255,255)
img:set(22,19,0,128,255,255)
img:set(22,20,0,128,255,255)
img:set(22,21,0,128,255,255)
img:set(22,22,0,128,255,255)
img:set(22,23,0,128,255,255)
img:set(22,24,0,128,255,255)
img:set(22,25,0,128,255,255)
img:set(22,26,0,128,255,255)
img:set(22,27,0,128,255,255)
img:set(22,28,0,128,255,255)
img:set(22,29,0,128,255,255)
img:set(22,30,0,128,255,255)
img:set(22,31,0,128,255,255)
img:set(22,32,255,255,255,255)
img:set(23,1,127,127,127,255)
img:set(23,2,0,128,255,255)
img:set(23,3,0,128,255,255)
img:set(23,4,0,128,255,255)
img:set(23,5,0,128,255,255)
img:set(23,6,0,0,0,255)
img:set(23,7,0,0,0,255)
img:set(23,8,0,0,0,255)
img:set(23,9,0,128,255,255)
img:set(23,10,0,128,255,255)
img:set(23,11,0,128,255,255)
img:set(23,12,0,128,255,255)
img:set(23,13,0,128,255,255)
img:set(23,14,0,128,255,255)
img:set(23,15,0,128,255,255)
img:set(23,16,0,128,255,255)
img:set(23,17,0,128,255,255)
img:set(23,18,0,128,255,255)
img:set(23,19,0,128,255,255)
img:set(23,20,0,128,255,255)
img:set(23,21,0,128,255,255)
img:set(23,22,0,128,255,255)
img:set(23,23,0,128,255,255)
img:set(23,24,0,128,255,255)
img:set(23,25,0,128,255,255)
img:set(23,26,0,128,255,255)
img:set(23,27,0,128,255,255)
img:set(23,28,0,128,255,255)
img:set(23,29,0,128,255,255)
img:set(23,30,0,128,255,255)
img:set(23,31,0,128,255,255)
img:set(23,32,255,255,255,255)
img:set(24,1,127,127,127,255)
img:set(24,2,0,128,255,255)
img:set(24,3,0,128,255,255)
img:set(24,4,0,128,255,255)
img:set(24,5,0,128,255,255)
img:set(24,6,0,0,0,255)
img:set(24,7,0,0,0,255)
img:set(24,8,0,0,0,255)
img:set(24,9,0,128,255,255)
img:set(24,10,0,128,255,255)
img:set(24,11,0,128,255,255)
img:set(24,12,0,128,255,255)
img:set(24,13,0,128,255,255)
img:set(24,14,0,128,255,255)
img:set(24,15,0,128,255,255)
img:set(24,16,0,128,255,255)
img:set(24,17,0,128,255,255)
img:set(24,18,0,128,255,255)
img:set(24,19,0,128,255,255)
img:set(24,20,0,128,255,255)
img:set(24,21,0,128,255,255)
img:set(24,22,0,128,255,255)
img:set(24,23,0,128,255,255)
img:set(24,24,0,128,255,255)
img:set(24,25,0,128,255,255)
img:set(24,26,0,128,255,255)
img:set(24,27,0,128,255,255)
img:set(24,28,0,128,255,255)
img:set(24,29,0,128,255,255)
img:set(24,30,0,128,255,255)
img:set(24,31,0,128,255,255)
img:set(24,32,255,255,255,255)
img:set(25,1,127,127,127,255)
img:set(25,2,0,128,255,255)
img:set(25,3,0,128,255,255)
img:set(25,4,0,128,255,255)
img:set(25,5,0,128,255,255)
img:set(25,6,0,0,0,255)
img:set(25,7,0,0,0,255)
img:set(25,8,0,0,0,255)
img:set(25,9,0,128,255,255)
img:set(25,10,0,128,255,255)
img:set(25,11,0,128,255,255)
img:set(25,12,0,128,255,255)
img:set(25,13,0,128,255,255)
img:set(25,14,0,128,255,255)
img:set(25,15,0,128,255,255)
img:set(25,16,0,128,255,255)
img:set(25,17,0,128,255,255)
img:set(25,18,0,128,255,255)
img:set(25,19,0,128,255,255)
img:set(25,20,0,128,255,255)
img:set(25,21,0,128,255,255)
img:set(25,22,0,128,255,255)
img:set(25,23,0,128,255,255)
img:set(25,24,0,128,255,255)
img:set(25,25,0,128,255,255)
img:set(25,26,0,128,255,255)
img:set(25,27,0,128,255,255)
img:set(25,28,0,128,255,255)
img:set(25,29,0,128,255,255)
img:set(25,30,0,128,255,255)
img:set(25,31,0,128,255,255)
img:set(25,32,255,255,255,255)
img:set(26,1,127,127,127,255)
img:set(26,2,0,128,255,255)
img:set(26,3,0,128,255,255)
img:set(26,4,0,128,255,255)
img:set(26,5,0,128,255,255)
img:set(26,6,0,128,255,255)
img:set(26,7,0,128,255,255)
img:set(26,8,0,128,255,255)
img:set(26,9,0,128,255,255)
img:set(26,10,0,128,255,255)
img:set(26,11,0,128,255,255)
img:set(26,12,0,128,255,255)
img:set(26,13,0,128,255,255)
img:set(26,14,0,128,255,255)
img:set(26,15,0,128,255,255)
img:set(26,16,0,128,255,255)
img:set(26,17,0,128,255,255)
img:set(26,18,0,128,255,255)
img:set(26,19,0,128,255,255)
img:set(26,20,0,128,255,255)
img:set(26,21,0,128,255,255)
img:set(26,22,0,128,255,255)
img:set(26,23,0,128,255,255)
img:set(26,24,0,128,255,255)
img:set(26,25,0,128,255,255)
img:set(26,26,0,128,255,255)
img:set(26,27,0,128,255,255)
img:set(26,28,0,128,255,255)
img:set(26,29,0,128,255,255)
img:set(26,30,0,128,255,255)
img:set(26,31,0,128,255,255)
img:set(26,32,255,255,255,255)
img:set(27,1,127,127,127,255)
img:set(27,2,0,128,255,255)
img:set(27,3,0,128,255,255)
img:set(27,4,0,128,255,255)
img:set(27,5,0,128,255,255)
img:set(27,6,0,128,255,255)
img:set(27,7,0,128,255,255)
img:set(27,8,0,128,255,255)
img:set(27,9,0,128,255,255)
img:set(27,10,0,128,255,255)
img:set(27,11,0,128,255,255)
img:set(27,12,0,128,255,255)
img:set(27,13,0,128,255,255)
img:set(27,14,0,128,255,255)
img:set(27,15,0,128,255,255)
img:set(27,16,0,128,255,255)
img:set(27,17,0,128,255,255)
img:set(27,18,0,128,255,255)
img:set(27,19,0,128,255,255)
img:set(27,20,0,128,255,255)
img:set(27,21,0,128,255,255)
img:set(27,22,0,128,255,255)
img:set(27,23,0,128,255,255)
img:set(27,24,0,128,255,255)
img:set(27,25,0,128,255,255)
img:set(27,26,0,128,255,255)
img:set(27,27,0,128,255,255)
img:set(27,28,0,128,255,255)
img:set(27,29,0,128,255,255)
img:set(27,30,0,128,255,255)
img:set(27,31,0,128,255,255)
img:set(27,32,255,255,255,255)
img:set(28,1,127,127,127,255)
img:set(28,2,0,128,255,255)
img:set(28,3,0,128,255,255)
img:set(28,4,0,128,255,255)
img:set(28,5,0,128,255,255)
img:set(28,6,0,128,255,255)
img:set(28,7,0,128,255,255)
img:set(28,8,0,128,255,255)
img:set(28,9,0,128,255,255)
img:set(28,10,0,128,255,255)
img:set(28,11,0,128,255,255)
img:set(28,12,0,128,255,255)
img:set(28,13,0,128,255,255)
img:set(28,14,0,128,255,255)
img:set(28,15,0,128,255,255)
img:set(28,16,0,128,255,255)
img:set(28,17,0,128,255,255)
img:set(28,18,0,128,255,255)
img:set(28,19,0,128,255,255)
img:set(28,20,0,128,255,255)
img:set(28,21,0,128,255,255)
img:set(28,22,0,128,255,255)
img:set(28,23,0,128,255,255)
img:set(28,24,0,128,255,255)
img:set(28,25,0,128,255,255)
img:set(28,26,0,128,255,255)
img:set(28,27,0,128,255,255)
img:set(28,28,0,128,255,255)
img:set(28,29,0,128,255,255)
img:set(28,30,0,128,255,255)
img:set(28,31,0,128,255,255)
img:set(28,32,255,255,255,255)
img:set(29,1,127,127,127,255)
img:set(29,2,0,128,255,255)
img:set(29,3,0,128,255,255)
img:set(29,4,0,128,255,255)
img:set(29,5,0,128,255,255)
img:set(29,6,0,128,255,255)
img:set(29,7,0,128,255,255)
img:set(29,8,0,128,255,255)
img:set(29,9,0,128,255,255)
img:set(29,10,0,128,255,255)
img:set(29,11,0,128,255,255)
img:set(29,12,0,128,255,255)
img:set(29,13,0,128,255,255)
img:set(29,14,0,128,255,255)
img:set(29,15,0,128,255,255)
img:set(29,16,0,128,255,255)
img:set(29,17,0,128,255,255)
img:set(29,18,0,128,255,255)
img:set(29,19,0,128,255,255)
img:set(29,20,0,128,255,255)
img:set(29,21,0,128,255,255)
img:set(29,22,0,128,255,255)
img:set(29,23,0,128,255,255)
img:set(29,24,0,128,255,255)
img:set(29,25,0,128,255,255)
img:set(29,26,0,128,255,255)
img:set(29,27,0,128,255,255)
img:set(29,28,0,128,255,255)
img:set(29,29,0,128,255,255)
img:set(29,30,0,128,255,255)
img:set(29,31,0,128,255,255)
img:set(29,32,255,255,255,255)
img:set(30,1,127,127,127,255)
img:set(30,2,0,128,255,255)
img:set(30,3,0,128,255,255)
img:set(30,4,0,128,255,255)
img:set(30,5,0,128,255,255)
img:set(30,6,0,128,255,255)
img:set(30,7,0,128,255,255)
img:set(30,8,0,128,255,255)
img:set(30,9,0,128,255,255)
img:set(30,10,0,128,255,255)
img:set(30,11,0,128,255,255)
img:set(30,12,0,128,255,255)
img:set(30,13,0,128,255,255)
img:set(30,14,0,128,255,255)
img:set(30,15,0,128,255,255)
img:set(30,16,0,128,255,255)
img:set(30,17,0,128,255,255)
img:set(30,18,0,128,255,255)
img:set(30,19,0,128,255,255)
img:set(30,20,0,128,255,255)
img:set(30,21,0,128,255,255)
img:set(30,22,0,128,255,255)
img:set(30,23,0,128,255,255)
img:set(30,24,0,128,255,255)
img:set(30,25,0,128,255,255)
img:set(30,26,0,128,255,255)
img:set(30,27,0,128,255,255)
img:set(30,28,0,128,255,255)
img:set(30,29,0,128,255,255)
img:set(30,30,0,128,255,255)
img:set(30,31,0,128,255,255)
img:set(30,32,255,255,255,255)
img:set(31,1,127,127,127,255)
img:set(31,2,0,128,255,255)
img:set(31,3,0,128,255,255)
img:set(31,4,0,128,255,255)
img:set(31,5,0,128,255,255)
img:set(31,6,0,128,255,255)
img:set(31,7,0,128,255,255)
img:set(31,8,0,128,255,255)
img:set(31,9,0,128,255,255)
img:set(31,10,0,128,255,255)
img:set(31,11,0,128,255,255)
img:set(31,12,0,128,255,255)
img:set(31,13,0,128,255,255)
img:set(31,14,0,128,255,255)
img:set(31,15,0,128,255,255)
img:set(31,16,0,128,255,255)
img:set(31,17,0,128,255,255)
img:set(31,18,0,128,255,255)
img:set(31,19,0,128,255,255)
img:set(31,20,0,128,255,255)
img:set(31,21,0,128,255,255)
img:set(31,22,0,128,255,255)
img:set(31,23,0,128,255,255)
img:set(31,24,0,128,255,255)
img:set(31,25,0,128,255,255)
img:set(31,26,0,128,255,255)
img:set(31,27,0,128,255,255)
img:set(31,28,0,128,255,255)
img:set(31,29,0,128,255,255)
img:set(31,30,0,128,255,255)
img:set(31,31,0,128,255,255)
img:set(31,32,255,255,255,255)
img:set(32,1,127,127,127,255)
img:set(32,2,127,127,127,255)
img:set(32,3,127,127,127,255)
img:set(32,4,127,127,127,255)
img:set(32,5,127,127,127,255)
img:set(32,6,127,127,127,255)
img:set(32,7,127,127,127,255)
img:set(32,8,127,127,127,255)
img:set(32,9,127,127,127,255)
img:set(32,10,127,127,127,255)
img:set(32,11,127,127,127,255)
img:set(32,12,127,127,127,255)
img:set(32,13,127,127,127,255)
img:set(32,14,127,127,127,255)
img:set(32,15,127,127,127,255)
img:set(32,16,127,127,127,255)
img:set(32,17,127,127,127,255)
img:set(32,18,127,127,127,255)
img:set(32,19,127,127,127,255)
img:set(32,20,127,127,127,255)
img:set(32,21,127,127,127,255)
img:set(32,22,127,127,127,255)
img:set(32,23,127,127,127,255)
img:set(32,24,127,127,127,255)
img:set(32,25,127,127,127,255)
img:set(32,26,127,127,127,255)
img:set(32,27,127,127,127,255)
img:set(32,28,127,127,127,255)
img:set(32,29,127,127,127,255)
img:set(32,30,127,127,127,255)
img:set(32,31,127,127,127,255)
img:set(32,32,255,255,255,255)
return img
end

--# Test
Test=class()

function Test:Decode()

--code produced by RLE Coder
img=Decoder:Decode(32,32,'00000000FFFFFFFFFFFFFFFE7F7F7FFF0080FFFF000000FFFF0000FF','00100100200900300100201500400100501E00200100400100501E00200100400100501E00200100400100501E00200100400100501E00200100400100501E00200100400100500400600300500B00700200500A00200100400100500400600300500B00700200500A00200100400100500400600300500B00700200500A00200100400100500400600300500900700600500800200100400100500400600300500900700600500800200100400100500400600400500800700600500800200100400100500400600400500600700A00500600200100400100500400600400500600700A00500600200100400100500400600400500600700A00500600200100400100500400600800700E00500400200100400100500400600800700E00500400200100400100500400600400501600200100400100500400600400501600200100400100500400600300501700200100400100500400600300501700200100400100500400600300501700200100400100500400600300501700200100400100500400600300501700200100400100501E00200100400100501E00200100400100501E00200100400100501E00200100400100501E00200100400100501E00200100401F002001')
--end of code

return img

end