diskList = {
  "superDisk",
  "makerimages",
  "boringDisk",
  "disk with spaces",
  "virus",
  "goCart"
}

function table.contains(table, element)
  for _, value in pairs(table) do
    if value == element then
      return true
    end
  end
  return false
end

-- Main program

local diskSide = "bottom"

if not fs.exists("loadedDisks/") then
  shell.setDir("/loadedDisks/")
end

while true do
  sleep(.3)
  if fs.exists("disk") then
    if table.contains(diskList, disk.getLabel(diskSide)) then
      if fs.exists("/loadedDisks/"..disk.getLabel(diskSide)) then
        fs.delete("/loadedDisks/"..disk.getLabel(diskSide)) else
        shell.setDir("loadedDisks/"..disk.getLabel(diskSide)) end
      fs.copy("/disk/program/", "/loadedDisks/"..disk.getLabel(diskSide))
      disk.eject(diskSide)
      shell.run("loadedDisks/"..disk.getLabel(diskSide).."/startprog")
    end
  end
end