include, plotscr.hsd

script, swap whole party, id0=-1, id1=-1, id2=-1, id3=-1, begin
  swap in helper(0, id0)
  swap in helper(1, id1)
  swap in helper(2, id2)
  swap in helper(3, id3)
  swap out helper(0, id0)
  swap out helper(1, id1)
  swap out helper(2, id2)
  swap out helper(3, id3)
end

script, swap in helper, slot, id, begin
  if(id >= 0) then(
    swap by position(slot, find hero(id))
  )
end

script, swap out helper, slot, id, begin
  if(id == -1) then(
    swap out hero(hero by slot(slot))
  )
end