Apple script written to make a "custom" time machine more convient: