Re: is among - problem

[Rob Cozens]

I'm motivated to take it a step farther and generalize the handler 
to deal with strings of any number of unique characters (albeit of 
equal length):

[snip]



repeat for each line aPattern in it
     get offset(aPattern,numberList)
     repeat while it > 0
        delete char it to (it+3) of numberList
        get offset(aPattern,numberList)
     end repeat
   end repeat
Oops!

   put length(targetLine) into returnOffset
   repeat for each line aPattern in it
     get offset(aPattern,numberList)
     repeat while it > 0
        delete char it to (it+returnOffset) of numberList
        get offset(aPattern,numberList)
     end repeat
   end repeat
--

Rob Cozens
CCW, Serendipity Software Company
http://www.oenolog.net/who.htm
"And I, which was two fooles, do so grow three;
Who are a little wise, the best fooles bee."
from "The Triple Foole" by John Donne (1572-1631)
_______________________________________________
use-revolution mailing list
[EMAIL PROTECTED]
http://lists.runrev.com/mailman/listinfo/use-revolution