56.3
43.2
63.3
48.6
72.3
on open droplist
set theFile to first item of droplist
tell application "Finder"
set name_file to name of theFile
set path_folder to (folder of theFile) as string
end tell
set kgscript to "name(\"weight (kgf)\", c0);
c1 = c0 * 9.80665;
name(\"weight (N)\", c1);"
tell application "KaleidaGraph"
SetRefDirectory path_folder
OpenDatafile "file=\"" & name_file & "\" delimiter=tab skip=0 read_titles=no"
RunTextScript kgscript
-- KaleidaGraphは豊富な操作法が用意されていて、上の3文の代わりに以下のように書くこともできます
-- set kgscript2 to "#SET_DIRECTORY
-- directory = \"" & path_folder & "\"
-- #END
-- #DATAFILE
-- file = \"" & name_file & "\"
-- delimiter = tab
-- skip = 0
-- read_titles = FALSE
-- #END
-- #FORMULA
-- name(\"weight (kgf)\", c0);
-- c1 = c0 * 9.80665;
-- name(\"weight (N)\", c1);
-- #END"
-- RunTextScript kgscript2
-- 他にもデータファイルの中にデータの処理手順を書いたり、Gnuplot的、MacPerl的な操作ができます
end tell
end open