stone_inserter.lua

local sides = {
  down = 0,
  forward = 3
}

local function primary(name)
    return component.proxy(component.list(name)())
end

local robot=primary("robot")
local inv=primary("inventory_controller")
local modem=primary("modem")

modem.open(111)

do
    local start=false
    while not start do
        local eventName = computer.pullSignal()
        start = eventName=="modem_message"
    end
end

while true do
    robot.suck(sides.down,64)
    inv.dropIntoSlot(sides.forward,1,64)
end