48 lines
1.6 KiB
AppleScript
Executable File
48 lines
1.6 KiB
AppleScript
Executable File
-- launcher.applescript
|
|
-- launcher
|
|
|
|
-- Created by kts on 2014-11-21.
|
|
-- Copyright 2014 __MyCompanyName__. All rights reserved.
|
|
|
|
on idle
|
|
-- get this script's path - should always be proclib/
|
|
tell application "Finder"
|
|
set script_path to container of (path to me) as alias
|
|
end tell
|
|
-- get visualizer
|
|
set program to the button returned of (display dialog "visualizer program: " buttons {"SDL", "ASCII", "cancel"} default button 1)
|
|
-- get the structures definition file
|
|
set file_path to (choose file default location script_path with prompt "Select a structures file:")
|
|
-- run!
|
|
runProg(program, file_path)
|
|
quit
|
|
end idle
|
|
|
|
on runProg(program, file_path)
|
|
tell application "Finder"
|
|
set script_path to container of (path to me) as alias
|
|
end tell
|
|
set file_path to POSIX path of file_path
|
|
|
|
display dialog "Name of structure to create:" default answer "start"
|
|
set structure_name to text returned of result
|
|
if program = "SDL" then
|
|
do shell script (POSIX path of (path to me)) & "Contents/Resources/proclib.app/Contents/MacOS/proclib" & " " & file_path & " " & structure_name
|
|
else if program = "ASCII" then
|
|
tell application "Terminal"
|
|
do script (POSIX path of (path to me)) & "Contents/Resources/main" & " " & file_path & " " & structure_name & "; exit"
|
|
end tell
|
|
end if
|
|
end runProg
|
|
|
|
on open finderObjects
|
|
-- get visualizer
|
|
set program to the button returned of (display dialog "visualizer program: " buttons {"SDL", "ASCII", "cancel"} default button 1)
|
|
-- run!
|
|
repeat with current_file in finderObjects
|
|
runProg(program, current_file)
|
|
end repeat
|
|
quit
|
|
end open
|
|
|