Re: search

[cld@xxxxxxxx]

≪ A project I'm working on now requires almost incessant
searches in a file I created in XyDos 4.018, and I'm
beginning to get a bit testy about having to return
manually to the top of the file when the item I'm
searching for turns out to be above rather than below the
cursor.

Is there a command that will search to eof and then
automatically take me to tof to continue the search from
there? ≫

Judith:

Let's capitalize on the extensibility of U2.

DECode the following CSE (Circular SEarch) routine, add
it to U2, and issue LH to reload U2.

The usage is CSE [search_term] to search
forward, CSEB to search backward. Each tap of the
Helpkey finds the next occurrence. In forward operation,
if the item is not found, the cursor automatically jumps
to Top of File and resumes the search; in backward
operation, the cursor jumps to EOF and resumes. For
case-sensitive searches, use CSEA and CSEBA (or CSEAB).

XPLeNCODE v2.0
b-gin [UNTITLED]
{{;5cse*}} Circular SEarch (bidirectional) [CLD
8/7/00][cr|lf
]{2}[XH_][BX_]es
1[Q2_]{<}IF{<}VA|50{>}<0{>}{<}PRCSE[B][A] se
arch_term{>}{<}EX{>}{<}EI{>};*;[cr|lf]{<}SV01,[T
F_][
TF_]{>}{<}SV02,{>}{<}IF@upr({<}VA$FR{>}){240}"B"{>}{<}SV0
1,[B
F_][BF_]{>}{<}SV02,b{>}{<}EI{>};*;[cr|lf]{<}LBa{>}[BX_]se
{<}P
V02{>}{<}IF@upr({<}VA$FR{>}){240}"A"{>}a{<}EI{>}
[999]{<}PV50
{>}[999][Q2_];*;[cr|lf]{<}IF{<}ER{>}{>}{<}IF{<}VA|02{>}<1
&{<}
VA$FB{>}<1!{<}VA|02{>}>0&{<}VA$FE{>}<1{>}{<}PV01{>}{<}GLa
{>}{
<}EI{>};*;[cr|lf]{<}PR\10{>}{<}EX{>}{<}EI{>}{<}EX{>}{2}[c
r|lf
][cr|lf]
-nd
XPLeNCODE

--------------
Carl Distefano
cld@xxxxxxxx
http://users.datarealm.com/xywwweb/