Re: search/replace program

[cld@xxxxxxxx (Carl Distefano)]

Reply to note from Bill Troop  Sun, 24 Mar 2002
16:42:30 -0500

> Has anyone got a simple program that will take email-style
> underlines (i.e _underline_) and convert the first one to
>  and the second to , going through the document
> until the end? Perhaps it's even built into Jumbo? But I would
> appreciate any help, on or off list.

This is deja vu all over again! Here's a somewhat more elaborate
version of what I posted last time:

XPLeNCODE v2.0
b-gin [UNTITLED]
;*; MDULMDIT.PM -- CLD 3/24/02[cr|lf];*; Change-Verify _phras
e_ or *phrase* to [255+65+69]MDUL[255+65+70]|[255+65+69]MDIT[
255+65+70]phrase[255+65+69]MDNM[255+65+70][cr|lf];*;[cr|lf]{<
}SV01,UL{>};*; <== UL or IT?[cr|lf];*;[cr|lf][XH_][BX_]es 1[Q
2_]{<}IF{<}VA|01{>}<>2{>}{<}SV01,UL{>}{<}EI{>}{<}SX02,"{<}MD"
+{<}IS01{>}+"{>}"{>}{<}SV03,{<}MDNM{>}{>};*;[cr|lf]{<}SV04,{>
}{<}IF{<}VA$DT{>}>0&{<}VA$DT{>}<>8{>}[TG_]{<}SV04,[TG_]{>}{<}
EI{>}{<}SX05,{<}CP{>}{>}[XP_];*;[cr|lf]{<}LBa{>}[BX_]se "[wS]
_[wO][wS]*"[Q2_]{<}IF@not({<}ER{>}){>}{<}SX06,"Change to {<}M
D"+@upr({<}IS01{>})+"{>}...{<}MDNM{>}? (y|N|Esc)"{>}{<}PR|@06
{>}{<}SX06,{<}RK{>}{>};*;[cr|lf]{<}IF{<}VA$KC{>}<2{>}{<}LBb{>
}{<}PV04{>}[BX_]jmp {<}PV05{>}[Q2_]{<}PRDone{>}{<}EX{>}{<}EI{
>};*;[cr|lf]{<}IF{<}VA$KC{>}==21{>}[YD_][DF_][CL_][DF_]{<}SV0
6{>}[DN_]{<}SX07,{<}CP{>}{>}{<}GT02{>};*;[cr|lf][BX_]se "{<}P
V06{>}[wS]"[Q2_]{<}IF{<}ER{>}{>}[BX_]jmp {<}PV07{>}[Q2_][DF_]
[BX_]se [w>][Q2_][DF_][DN_]{<}SX07,"Unbalanced "+{<}IS06{>}+
"!"{>}{<}PR@07{>}[BX_]p[Q2_]{<}GLa{>}{<}EI{>};*;[cr|lf][CL_][
BD_]{<}GT03{>}[BX_]se [w>][Q2_]{<}EI{>}{<}GLa{>}{<}EI{>}{<}G
Lb{>}[cr|lf][cr|lf]
-nd
XPLeNCODE

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