drill.lua

local rs_output = {}
rs_output.__index = rs_output
local other_id = 1
rednet.open("back")

function rs_output:new(side)
    local object_table = {side = side}
    setmetatable(object_table, self)
    return object_table
end



function rs_output:enable()
print(self.side, "enable")
    rs.setOutput(self.side ,true)
end



function rs_output:disable()
print(self.side, "disable")
    rs.setOutput(self.side ,false)
end



function rs_output:get_input()
    return rs.getInput(self.side)
end




local gearshift = rs_output:new("right")
local sticker = rs_output:new("top")

rednet.send(other_id)
repeat
until rednet.receive() == other_id
sleep(1)
sticker:enable()
sleep(0.2)
sticker:disable()
gearshift:enable()
repeat
until rednet.receive() == other_id
gearshift:disable()
sleep(0.1)
rednet.send(other_id)