(2014/5/14 updateと対になる「upload」プログラムも追記。本文の一番下です。)

fList = fs.list("/disk");
for _, file in ipairs(fList) do
  print("/disk/" .. file);
  if fs.exists(file) then
    fs.delete(file);
  end
  fs.copy("/disk/" .. file, "/" .. file);
end

フロッピーの中身を全部、コンピュータ／タートルに上書きコピーする
（フォルダ非対応、コピー先もルートのみ）



複数のタートルにプログラムを配布する場合、微妙に便利かもしれない。


反対に、タートル／コンピュータからディスクに書き込む場合に、

delete /disk/aaa
copy /aaa /disk

というようにコマンドを打つのもだんだん面倒くさくなってくるので、updateと対になる『upload』というプログラムも作ってみた。（名前が対になっていない気はしますが。）

upload

local args = { ... };
local file = args[1];

if nil == file then
  print("usage:");
  print("upload filename");

elseif not fs.exists("/" .. file) then
  print("No such file.");

elseif not fs.isDir("/disk") then
  print("Disk drive (or disk) not found.");

else
  if fs.exists("/disk/" .. file) then
    fs.delete("/disk/" .. file);
  end
  fs.copy("/" .. file, "/disk/" .. file);
end