Re: search

[Carl Distefano cld@xxxxxxxx]

Reply to note from Carl Distefano  Tue, 8 Aug 2000
02:01:20 -0400 (EDT)

Sorry, my "more polished" version of Circular SEarch had an error.
Here's the corrected code:

XPLeNCODE v2.0
b-gin [UNTITLED]
{{;5cse*}} Circular SEarch (bidirectional) [CLD rev. 8/8/00][
cr|lf]{2}[XH_]{<}IF{<}VA$WS{>}<>1{>}{<}PRNo file{>}{<}EX{>}{<
}EI{>}[BX_]es 1[Q2_];*;[cr|lf]{<}IF{<}VA|50{>}<1{>};*;[cr|lf]
{<}PRCSE[B][A]/SW1/SW2.../SWn search_term(s){>}{<}EX
{>}{<}EI{>};*;[cr|lf]{<}SX01,{<}CP{>}{>}{<}SX02,@upr({<}VA$FR
{>}){>};*;[cr|lf]{<}SV03,[TF_][TF_]{>}{<}SV04,{>}{<}IF{<}IS02
{>}{240}"B"{>}{<}SV03,[BF_][BF_]{>}{<}SV04,b{>}{<}EI{>};*;[cr
|lf]{<}SV05,{>}{<}IF{<}IS02{>}{240}"/"{>}{<}SV05,/{>}{<}XS02,
05,06,,05{>}{<}EI{>}{<}LBa{>}[DX_];*;[cr|lf][BX_];*;[cr|lf]se
{<}PV04{>}{<}IF{<}IS02{>}{240}"A"{>}a{<}EI{>}{<}IF{<}VA|05{>}
>0{>}/{<}PV05{>}{<}EI{>} [999]{<}PV50{>}[999];*;[cr|lf][Q2_];
*;[cr|lf]{<}IF{<}ER{>}{>}{<}IF{<}VA|04{>}<1&{<}VA$FB{>}<1!{<}
VA|04{>}>0&{<}VA$FE{>}<1{>}{<}PV03{>}{<}GLa{>}{<}EI{>};*;[cr|
lf][BX_]jmp {<}PV01{>}[Q2_]{<}PR\10{>}{<}EI{>}{<}EX{>}{2}[cr|
lf][cr|lf]
-nd
XPLeNCODE


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