open in WriteRoom from commandline

wr

#!/bin/sh
# open in writeroom

if [ "$#" -eq 0 ]; then
  echo "Open in WriteRoom"
  echo "Usage: $0 <file>"
  exit -1
fi

echo "opening $1 in WriteRoom..."

if [ ! -f "$1" ]; then
  touch $1
fi

fp=$(echo $(cd $(dirname $1); pwd)/$(basename $1))
osascript - <<EOF
set p to "${fp}"
set a to POSIX file p
tell application "WriteRoom"
  activate
  open a
end tell

tell application "System Events"
  tell process "WriteRoom"
    click (menu item "Enter Full Screen Single" of menu 1 of menu bar item "Window" of menu bar 1)
  end tell
end tell
return
EOF