SoulShardTurtle

modem = peripheral.wrap("right")
modem.open(500)

local function CheckSlots()
  if turtle.getItemCount(3) == 0 then
    return 3
  elseif turtle.getItemCount(4) == 0 then
    return 4
  elseif turtle.getItemCount(5) == 0 then
    return 5
  elseif turtle.getItemCount(6) == 0 then
    return 6
  elseif turtle.getItemCount(7) == 0 then
    return 7
  end
  return 0
end

local function PlaceShard(slot)
  turtle.select(2)
  if free > 0 then
    turtle.dig()
  end
  turtle.place()
  turtle.select(slot)
  turtle.place()
end

local function GoSpawner()
  modem.transmit(501,500,"1")
  turtle.select(1)
  turtle.dig()
  for i = 1, 4 do
    turtle.forward()
  end
end

local function GoBack()
  for i = 1, 4 do
    turtle.back()
  end
  turtle.select(1)
  turtle.place()
  modem.transmit(501,500,"0")
  if free > 0 then
    turtle.turnRight()
    os.sleep(10)
    turtle.select(free)
    turtle.suck()
    turtle.turnLeft()
  end
end

local function reFuel()
  turtle.select(16)
  turtle.suckDown()
  turtle.refuel()
end

while true do
  if turtle.getFuelLevel() < 5000 then reFuel() end
  local event, modemside, senderChannel, replyChannel, message, senderDistance = os.pullEvent("modem_message")
  getal = tonumber(message)
  free = CheckSlots()
  if getal == 0 then
    GoSpawner()
    turtle.select(2)
    turtle.dig()
    GoBack()
  end
  if (getal > 2 ) and (getal < 8) and not (getal == free) then
    GoSpawner()
    PlaceShard(getal)
    GoBack()
  end
  if getal == 1 then
    modem.transmit(502,500,free)
  end
end