TSE: Mark from the current position until some found string

[knud van eeden]

Hi,

Is there any default TSE command out of the box

that will 

"mark from the current position until some found string?"

(because that is a very frequently occurring operation in text editing, that is, you want to select or mark some text starting from the current cursor position until some string or character is found.

E.g. something like this:

---

PROC Main()

 STRING s[255] = "test"

 IF ( NOT ( Ask( " = ", s, _EDIT_HISTORY_ ) ) AND ( Length( s ) > 0 ) ) RETURN() ENDIF

 UnMarkBlock()

 MarkStream()

 LFind( s, "x" )

END

---

Thanks

with friendly greetings

Knud van Eeden