Economy-x-Talk - Sample Scripts
Case Sensitive Offset
HyperTalk case sensitive offset function.
-- Michael D. Mays
function caseSensOffsetModified theLookedFor,theChunk
put (the length of theLookedFor) into theLen
put 0 into theOffsetsOffset
repeat
put offset(theLookedFor,theChunk) into theOffset
if theOffset=0 then return 0
put char theOffset to theLen-1+theOffset of theChunk into theHit
if (theLookedFor<theHit or theLookedFor>theHit)
then
put "" into char theOffset of theChunk
add 1 to theOffsetsOffset
else
return theOffset+theOffsetsOffset
end if
end repeat
end caseSensOffsetModified
Keep this extensive resource of tutorials and samples on-line! Support RunRev.info!
| Yes, this script is useful. I make a donation and choose freely how much I want to donate on-line (PayPal). Click here if you want to make a donation in dollars. | This script has not (completely) solved my problem and I want Economy-x-Talk to take care of it. Let me contact you. |
Copyright©2002-2008 by Mark Schonewille, Nijmegen, the Netherlands. This web site is in no way affiliated with Runtime Revolution Ltd., but we do recommend the Revolution development platform.