home *** CD-ROM | disk | FTP | other *** search
/ Phoenix CD 2.0 / Phoenix_CD.cdr / 01e / let12.zip / WORDS.LET < prev    next >
Text File  |  1987-09-17  |  87b  |  4 lines

  1. Word=(trim (substr Str 1 (- P 1)))
  2. Str=(trim (substr Str (+ P 1)))
  3. P=(pos Str " ")
  4.