moveForMon.applescript, from darwin11