mobcontrol2

-- Computer ID = Turtle
--the ID of the control computer
local spawner = peripheral.wrap("top")
local controller = 2
local currMob = ""
local replyChannel = 1
local listenChannel = 3
local wlmSide= "right"
local wirelessModem = peripheral.wrap(wlmSide)

local function respond(myMes)
  mySerMes=textutils.serialize(myMes)
  wirelessModem.transmit(replyChannel, listenChannel, mySerMes)
end

local function removeMob()
  for i = 1,16 do
    local itemCount = turtle.getItemCount(i)
    if itemCount == 0 then
      slot2Fill = i
      break
    end
  end
  turtle.select(slot2Fill)
  turtle.suckUp()
end

local function setMob2Spawn(mobSlotID)
  removeMob()
  slot = mobSlotID
  emSlot = slot
  turtle.select(slot)
  turtle.dropUp()
  respond("ok")
end


local function cleanSpawner()
  local slot2Fill=1
  for i = 1,16 do
    local itemCount = turtle.getItemCount(i)
    if itemCount == 0 then
      slot2Fill = i
      break
    end
  end
  turtle.select(slot2Fill)
  turtle.suckUp()
end

print ("Cleaning Spawner")
cleanSpawner()
print ("Turtle Ready!")
print ("Starting listening loop")
while true do
  wirelessModem.open(listenChannel)--Open channel 3 so that we can listen on it
  event, modemSide, senderChannel, replyChannel, mySerMes, senderDistance = os.pullEvent("modem_message")
  myCopy=textutils.unserialize(mySerMes)
  if myCopy.message == "setMob2Spawn" then
    print("setMob2Spawn")
    setMob2Spawn(myCopy.argument)
  end
  if myCopy.message == "removeMob" then
    print("removeMob")
    removeMob()
  end
  print("-")
end