Smelt

local type, ant = ...
local t = periphial.wrap("top")
function ingot()
    for i=0, ant do
        redstone.setOutput("left", true)
        sleep(0.1)
        redstone.setOutput("left", false)
        sleep(1.5)
        t.clear()
        t.setCursorPos(1,1)
        t.write(ant-(i+1)
    end
end

function block()
    for i=0, ant do
        rs.setOutput("left", true)
        sleep(0.1)
        rs.setOutput("left", false)
        sleep(16)
        t.clear()
        t.setCursorPos(1,1)
        t.write(ant-(i+1)
    end
end

if type == ingot
    ingot()
else if type == block
    block()
else
    print("Skriv 'ingot' eller 'block' og antalll")
end
t.clear()
t.setCursorPos(1,1)
t.write("Done!")
sleep(3)
t.clear()
t.setCursorPos(1,1)