SelectSameExt.scpt