TunnelBore

local s = "back"
function up()
    rs.setBundledOutput(s, colors.white)
    sleep(.5)
    rs.setBundledOutput(s, 0)
    sleep(.5)
end
function down()
    rs.setBundledOutput(s, colors.orange)
    sleep(.5)
    rs.setBundledOutput(s, 0)
    sleep(.5)
end
function right()
    rs.setBundledOutput(s, colors.lime)
    sleep(.1)
    rs.setBundledOutput(s, 0)
    sleep(13.0)
end
function left()
    rs.setBundledOutput(s, colors.yellow)
    sleep(.1)
    rs.setBundledOutput(s, 0)
    sleep(13.0)
end
function forward()
    rs.setBundledOutput(s, colors.magenta)
    sleep(.1)
    rs.setBundledOutput(s, 0)
    sleep(13.0)
end
function back()
    rs.setBundledOutput(s, colors.lightBlue)
    sleep(.1)
    rs.setBundledOutput(s, 0)
    sleep(13.0)
end
while true do
    if rs.getInput("left") then
        forward()
    end
    else
        print("Not recieving a redstone signal. Fix you derp")
    end
end