Hey Jay,
Any special reason you're not doing this job all in AppleScript?
set homeFolderAlias to path to home folder
tell application "Finder"
set newAliasTarget to insertion location as alias
make new alias file at homeFolderAlias to newAliasTarget
end tell
-Chris