KeepIfSimilar

Takes 3 parameters, FieldBase, pOne, pTwo

Usage:

FieldBase, pOne, pTwo
[WorkWith], pOne, pTwo

Description:

This is effectively the same as:

NewFields "SimilarVal"
Text "SimilarVal", "Similar", pOne, pTwo
KeepIf "SimilarVal", ==>>, 50
Sort "-#SimilarVal"
DeleteFields "SimilarVal"