This procedure exchanges the strings stored in S1 and S2. Since OWBasic manages strings dynamically, this procedure only exchanges the internal string pointers which is much faster than a string swap in the usual way.