Ametista (cor)