Say New_string
' New_string from Trim >&< String STR_RIGHT,
                  Replace >%< % ':' ';',
                  Split >%< % "\n",
                  Sort >%< % ( 'Order_by', S : 
                                               Order_by = Tokens.1 
                                               Where Tokens : Array <- S, ';'
                             ),
                  Join >New_string< % "\n"

