--[[ ガベージ情報取得 version 1.0 (2006/07/03) documentation by silica as 冬物語の人 http://winter.sgv417.jp/ --]] function WriteGCInfo(filename) local mem, gc local fp = io.open(filename, "w") if(fp == nil) then return end -- 書き込めないとき mem, gc = gcinfo() fp:write(string.gsub("home = $HOME, user = $USER", "%$(%w+)", os.getenv), "\n") fp:write("Luaが使用中:\n") fp:write("動的メモリ: ", mem, "(KB)\n") fp:write("ガベージコレクタ閾値: ", gc, "(KB)\n") fp:close() end WriteGCInfo("AI/getgcinfo.txt") function AI(myid) end