Wireless Turtle

-- turtleCode

local isRunning = true
local masterID = 29
local count = 0
local fLevel = 0
local randomNum = 0
local pullEvent = os.pullEvent
os.pullEvent = os.pullEventRaw

function tForward()
        turtle.forward()
        checkFuel()
end

function tTurnLeft()
        turtle.turnLeft()
end

function tTurnRight()
        turtle.turnRight()
end

function tUp()
        turtle.up()
        checkFuel()
end

function tDown()
        turtle.down()
        checkFuel()
end

function tDig()
        turtle.dig()
        checkFuel()
end

function tDigUp()
        turtle.digUp()
        checkFuel()
end

function tDigDown()
        turtle.digDown()
        checkFuel()
end

function tTunnel()
        shell.run("tunnel 5")
        rednet.send(masterID, "done")
        sleep(1)
        checkFuel()
end

function tExcavate()
        shell.run("excavate 10")
end

function tRefuel()
        shell.run("refuel all")
        fLevel = turtle.getFuelLevel()
        rednet.send(masterID, "Fuel Level: "..fLevel)
end

function tCheckInv()
        count = turtle.getItemCount(16)
        rednet.send(masterID, "Items in slot 16: "..count)
end

function screenClear()
        shell.run("clear")
                print("Turtle Client")
                print("------------------------------------")
                print("Waiting for Master_Computer . . .")
end

function checkFuel()
        fLevel = turtle.getFuelLevel()
        rednet.send(masterID, fLevel)
end

function fakeTerminate()
randomNum = math.random(1,4)
        print("Terminated")
        sleep(2)
        if randomNum == 1 then
                print("\nYou are not a good person. You know that, right?")
                                sleep(5)
                                screenClear()
        elseif randomNum == 2 then
                print("\nThis is your fault. I'm going to kill you.")
                print("And all the cake is gone. You don't even care, do you?")
                                sleep(5)
                                screenClear()
        elseif randomNum == 3 then
                print("\nDo you think I'm trying to trick you")
                print("with reverse psychology? I mean, seriously, now. ")
                                sleep(5)
                                screenClear()
        elseif randomNum == 4 then
                print("\nYour entire life has been a mathematical error...")
                print("a mathematical error I'm about to correct!")
                                sleep(5)
                                screenClear()
        end
end

if not rednet.isOpen("right") then
        rednet.open("right")
end

screenClear()

while isRunning == true do

        event, senderId, message = os.pullEvent()

        if event == "rednet_message" and senderId == masterID and message == "w" then
                tForward()
        elseif event == "rednet_message" and senderId == masterID and message == "a" then
                tTurnLeft()
                elseif event == "rednet_message" and senderId == masterID and message == "d" then
                tTurnRight()
        elseif event == "rednet_message" and senderId == masterID and message == "q" then
                tUp()
                elseif event == "rednet_message" and senderId == masterID and message == "e" then
                tDown()
                elseif event == "rednet_message" and senderId == masterID and message == "1" then
                tDig()
                elseif event == "rednet_message" and senderId == masterID and message == "3" then
                tDigUp()
                elseif event == "rednet_message" and senderId == masterID and message == "2" then
                tDigDown()
                elseif event == "rednet_message" and senderId == masterID and message == "5" then
                tTunnel()
                elseif event == "rednet_message" and senderId == masterID and message == "6" then
                tExcavate()
                elseif event == "rednet_message" and senderId == masterID and message == "r" then
                tRefuel()
                elseif event == "rednet_message" and senderId == masterID and message == "c" then
                tCheckInv()
                elseif event == "terminate" then
                                fakeTerminate()
                end


end