Re: U2 frame

[Harry Binswanger hb@xxxxxxxx]

Terrific! Just what I wanted. I took out the prompting (not suitable for my uses) and saved it under a new name (per our protocol) in xywwweb.u2. I hope you'll include your frame in v. 120. The need for this has come up repeatedly in what I've been programming over the last year.



On Sun, Sep 11, 2011 at 2:41 AM, Carl Distefano mailto:cld@xxxxxxxx wrote:



Reply to note from Harry Binswanger mailto:hb@xxxxxxxx Sun, 11 Sep

2011 01:15:14 -0400



Whoops, needed a bit of additional code to clean up if operation is

aborted midway. Use this version, please.



XPLeNCODE v2.0

b-gin [UNTITLED]

{{;5swapwild*}} Swap wild substrings in current file [CLD 9/1

1/11][cr|lf]{002}{<}IF{<}VA$WS{>}==1{>}{<}IF{<}VA|50{>}>0{>}[

BX_]es 1[Q2_][DX_][TF_][255+048+068][CL_]{<}SV01,[wW]{>}{<}SX

02,0{>}{<}SV03,{>}{<}XS50,01,04,,03{>}{<}SV05,{>}{<}XS03,01,0

6,,05{>}{<}LBa{>}[BX_]se/f {252}{<}PV50{>}{252}[Q2_]{<}IF@not

({<}ER{>}){>}[YD_][DF_][BX_]se {252}{<}PV50{>}{252}[Q2_][DF_]

{<}SV07{>}{<}SV08,{>}{<}XS07,04,03,09,08{>}{<}SV10,{>}{<}XS08

,06,11,,10{>}{<}SV12,{>}{<}XS10,05,13,,12{>}{<}SX14,{<}IS04{>

}+{<}IS13{>}+{<}IS06{>}+{<}IS11{>}+{<}IS12{>}+{<}IS05{>}{>}[D

O_]{<}SX07,"Change to """+{<}IS14{>}+""" (y|N){>}{<}PR@07{>}{

<}SX07,@upr({<}RK{>}){>}{<}IF{<}VA$KC{>}<2{>}[YD_]{<}SX50,{<}

CP{>}{>}[TF_][RC_][JM_]2.ReJuMP[Q2_]{<}PRQuit{>}{<}EX{>}{<}EI

{>}{<}IF{<}IS07{>}=="Y"{>}[DN_]{<}GT14{>}[DX_]{<}SX02,{<}PV02

{>}+1{>}{<}EI{>}[YD_]{<}GLa{>}{<}EI{>}[TF_][RC_]{<}SX01,{<}IS

02{>}+" changes{>}{<}PR@01{>}{<}EX{>}{<}EI{>}{<}PRSWAPWILD fe

e[W]fi[W]foo{>}{<}EX{>}{<}EI{>}{<}PRNo file{>}{002}[

cr|lf][cr|lf]

-nd

XPLeNCODE



--

Carl Distefano

mailto:cld@xxxxxxxx