Create symlink for file selected in Finder

create_symlink.scpt

on run
	open {choose file with prompt "Choose a file to create a symbolic link:" without invisibles}
end run

on open the_files
	repeat with i from 1 to (count the_files)
		try
			set posix_path to POSIX path of (item i of the_files)
			if posix_path ends with "/" then set posix_path to text 1 thru -2 of posix_path
			do shell script "ln -s " & quoted form of posix_path & " " & quoted form of (posix_path & ".sym")
		end try
	end repeat
end open