control.lua

io.write("Set recording name: ")
a = read()
file = fs.open(tostring(a), "w")

function control()
    while true do
        local event, key, isHeld = os.pullEvent("key")

        if key == keys.w then
            turtle.forward()
            file.writeLine("turtle.forward()")
        elseif key == keys.s then
            turtle.back()
            file.writeLine("turtle.back()")
        elseif key == keys.a then
            turtle.turnLeft()
            file.writeLine("turtle.turnLeft()")
        elseif key == keys.d then
            turtle.turnRight()
            file.writeLine("turtle.turnRight()")
        elseif key == keys.q then
            turtle.up()
            file.writeLine("turtle.up()")
        elseif key == keys.e then
            turtle.down()
            file.writeLine("turtle.down()")
        elseif key == keys.numPad5 then
            turtle.dig()
            file.writeLine("turtle.dig()")
        elseif key == keys.numPad8 then
            turtle.digUp()
            file.writeLine("turtle.digUp()")
        elseif key == keys.numPad2 then
            turtle.digDown()
            file.writeLine("turtle.digDown()")
        elseif key == keys.insert then
            turtle.place()
            file.writeLine("turtle.select("..turtle.getSelectedSlot()..")")
            file.writeLine("turtle.place()")
        elseif key == keys.up then
            turtle.placeUp()
            file.writeLine("turtle.select("..turtle.getSelectedSlot()..")")
            file.writeLine("turtle.placeUp()")
        elseif key == keys.down then
            turtle.placeDown()
            file.writeLine("turtle.select("..turtle.getSelectedSlot()..")")
            file.writeLine("turtle.placeDown()")
        elseif key == keys.home then
            print("User has terminated connection")
            file.close()
        end
    end
end

function cycleSlot()
    while true do
        x = {turtle.getSelectedSlot()}
        for i, v in ipairs(x) do
            local event, key, isHeld = os.pullEvent("key")

            if key == keys.right then
                turtle.select(v+1)
            elseif key == keys.left then
                turtle.select(v-1)
            end
        end
    end
end

while true do
    parallel.waitForAny(control,cycleSlot)
end