Dessiner/écrire avec de la lave

-- Création Adsl Houba
-- Demo et explications https://youtu.be/w5BPnJxuZRw

-- Liste des cables  dans l'ordre pour la vue public
liste={
    {"back",colors.black},
    {"back",colors.red},
    {"back",colors.green},
    {"back",colors.brown},
    {"back",colors.blue},
    {"back",colors.purple},
    {"back",colors.cyan},
    {"back",colors.lightGray},
    {"back",colors.gray},
    {"back",colors.pink},
    {"back",colors.lime},
    {"back",colors.yellow},
    {"back",colors.lightBlue},
    {"back",colors.magenta},
    {"back",colors.orange},

    {"left",colors.black},
    {"left",colors.red},
    {"left",colors.green},
    {"left",colors.brown},
    {"left",colors.blue},
    {"left",colors.purple},
    {"left",colors.cyan},
    {"left",colors.lightGray},
    {"left",colors.gray},
    {"left",colors.pink},
    {"left",colors.lime},
    {"left",colors.yellow},
    {"left",colors.lightBlue},
    {"left",colors.magenta},
    {"left",colors.orange}
}

-- Redstone actif par defaut
redstone.setOutput("back",true);
redstone.setOutput("left",true);

-- Liste de tous les channels
tous={}
tous.left=0;
tous.back=0;
i=1
while i<=30 do
    tous[liste[i][1]]=tous[liste[i][1]]+liste[i][2]
    -- C'est un principe binaire 2 orange, 4 magenta, 2+4=6 orange et magenta
    -- pour tous allumer, on fait le total de tous (en différenciant pour chaque coté)
    i=i+1
end
-- On defini les couleurs lié à la redstonne
redstone.setBundledOutput('left',tous.left)
redstone.setBundledOutput('back',tous.back)

-- Le dessin : 0 pas de lave, 1 de la lave
-- Pour des lettres ne pas oublier que le bas de la lettre sort avant le haut
anim={
    '000000101000100000000000000000',
    '111000101000101110100010001110',
    '101011101110101000100010001000',
    '111010101010101100100010001100',
    '001010101010101000101010101000',
    '111010101110101110111011101110'
}

toto={}
toto.left=0;
toto.back=0;
i=1
-- on scanne tous le dessin
while(anim[i]) do
    pis=1
    toto.left=0;
    toto.back=0;
    -- on scanne les 30 couleurs utilisées
    while(pis<=30) do
        t=string.sub(anim[i],pis,pis)
        -- si 0 pas de lave on ajoute pour que le piston reste étendu
        if t=='0' then
            toto[liste[pis][1]]=toto[liste[pis][1]]+liste[pis][2]
        end
        pis=pis+1
    end
    -- on applique
    redstone.setBundledOutput('left',toto.left)
    redstone.setBundledOutput('back',toto.back)
    i=i+1
    -- on reprend dans 5 seconde
    -- la lave mais bcp de temps à couler de 2 block pour devenir visible
    os.sleep(5)
end
-- On referme tous
redstone.setBundledOutput('left',tous.left)
redstone.setBundledOutput('back',tous.back)