crane

print("Crane starting up")

while true do
    local message = read()
    local args = { ... }
    local dist = tonumber(args[1])

        if message == "upp" then
        for i=1,dist,1 do
            redstone.setBundledOutput("right", colors.blue)
            sleep(1)
            redstone.setBundledOutput("right", 0)
    end
        if message == "ner" then
        for i=1,dist,1 do
            redstone.setBundledOutput("right", colors.red)
            sleep(1)
            redstone.setBundledOutput("right", 0)
    end
        if message == "in_a" then
        for i=1,dist,1 do
            redstone.setBundledOutput("right", colors.blue)
            sleep(1)
            redstone.setBundledOutput("right", 0)
    end
        if message == "ut_a" then
        for i=1,dist,1 do
            redstone.setBundledOutput("right", colors.blue)
            sleep(1)
            redstone.setBundledOutput("right", 0)
    end
end