Remote Control v2 (CC Turtle)

-- Interpret rednet signals as movement commands

local id, message;
local currActKey = 0; -- This marks the last key pressed for an action
local actionUsed = false;

function selectAndSendSlot()
    turtle.select(turtle.getSelectedSlot()%16+1)
    local block = turtle.getItemDetail();
    if block then return block.name; else return "Empty slot"; end
end

function deselectAndSendSlot()
    turtle.select(turtle.getSelectedSlot()%16+1)
    local block = turtle.getItemDetail();
    if block then return block.name; else return "Empty slot"; end
end

function observe()
    local isBlock, blockData = turtle.inspect();
    local str = "";
    if not isBlock then str = str.."Not a block\n"; end
    if blockData.name then str = str..blockData.name.."\n"; end
    if blockData.state then str = str..textutils.serializeJSON(blockData.state, true).."\n"; end
    return str;
end

function observeUp()
    local isBlock, blockData = turtle.inspectUp();
    local str = "";
    if not isBlock then str = str.."Not a block\n"; end
    if blockData.name then str = str..blockData.name.."\n"; end
    if blockData.state then str = str..textutils.serializeJSON(blockData.state, true).."\n"; end
    return str;
end

function observeDown()
    local isBlock, blockData = turtle.inspectDown();
    local str = "";
    if not isBlock then str = str.."Not a block\n"; end
    if blockData.name then str = str..blockData.name.."\n"; end
    if blockData.state then str = str..textutils.serializeJSON(blockData.state, true).."\n"; end
    return str;
end

local directionKeys = {
[87] = 1, --forward
[32] = 2, --up
[340] = 3, --down
[83] = 4, --back
[65] = 5, --left
[68] = 6, --right
};

local actions = {
[0] = {"Move", turtle.forward, turtle.up, turtle.down, turtle.back, turtle.turnLeft, turtle.turnRight},
[85] = {"Dig (forward/up/down)", turtle.dig, turtle.digUp, turtle.digDown}, -- U
[73] = {"Place block (forward/up/down)", turtle.place, turtle.placeUp, turtle.placeDown}, -- I
[82] = {"Refuel (Non-directional)", turtle.refuel}, -- R
[57] = {"Change selected slot (forward/back)", selectAndSendSlot, deselectAndSendSlot}, -- 9
[80] = {"Get block details (forward/up/down)", observe, observeUp, observeDown}, -- P
[79] = {"Pick up item (forward/up/down)", turtle.suck, turtle.suckUp, turtle.suckDown}, -- O
[75] = {"Drop selected item (forward/up/down)", turtle.drop, turtle.dropUp, turtle.dropDown}, -- K
[56] = {"Equip selected item (left/right)",turtle.equipRight, turtle.equipLeft}, -- 8
[74] = {"Attack (forward/up/down)", turtle.attack, turtle.attackUp, turtle.attackDown}, -- J
}

function runAction(n, dir)
    if actions[n] then
        if #actions[n] == 2 then return actions[n][2](); end
        if #actions[n] == 3 then return actions[n][({2, 2, 3, 3, 3, 2})[dir]](); end
        if #actions[n] == 4 then return actions[n][({2, 3, 4, 4, 3, 2})[dir]](); end
        if #actions[n] == 7 then return actions[n][dir+1](); end
    else
        return "Key not mapped to an action (redundancy check)";
    end
end

peripheral.find("modem", rednet.open);
print("Reciever started - Connect to ID", os.computerID());
while true do
    id, message = rednet.receive();
    cmdKey = tonumber(message);
    if directionKeys[cmdKey] ~= nil then -- Do the current action
        local msg = tostring(runAction(currActKey, directionKeys[cmdKey]));
        actionUsed = true;
        if msg ~= "true" then
            rednet.send(id, msg);
        else
            rednet.send(id, "");
        end
    else
        if cmdKey == 0 then -- Reset the selected action
            if not actionUsed and currActKey ~= 0 then
                rednet.send(id, ("%s is mapped to %s"):format((keys.getName(currActKey)):upper(), actions[currActKey][1]));
            else
                rednet.send(id, "");
            end
            currActKey = 0;
            actionUsed = false;
        else -- Select an action
            if actions[cmdKey] then
                currActKey = cmdKey;
                actionUsed = false;
                rednet.send(id, "");
            else
                currActKey = 0;
                rednet.send(id, "Key not mapped to an action");
            end
        end
    end
end