Big ci frame for Tame users

[Harry Binswanger hb@xxxxxxxx]

I don't know if it's just my system, but shelling out to DOS when I'm using
Tame badly messes up my screen display. If you have that problem, and want
to make changes where a wild W covers too much territory to fit on the
command line, you may want to use this U2 frame which substitutes ascii 252
(the little superscripted n) for XyWrite's wild W. (Carl's RCI can do the
job, too, but it involves shelling to DOS.)
Usage: install the U2 frame BCI, use s/g 60 for the find string and s/g 61
for the replace string, then JM 2.bciQ2

E.g.:

JM 2.bciQ2
Tested only cursorily, but works with long wild strings, and any or all
parts of the replace string can be null.

Decode this, which is heavily commented, with U2's DEC frame:

XPLeNCODE v2.0 (ENCODE.A3X)
b-gin [UNTITLED]
{123}{123}5bci{125}{125} big ci, uses find$ (s/g 60) and repla
ce$ (s/g 61) using {252} instead of [wW] --e.g., find$ = "AA{252}
BB" : replace$ = "XXX{252}YYYY" : jmx bci. Note that is can al
so be done as: RCI /AA[wW]BB/XXX$1YYYY but that means shelling
 to DOS[cr|lf]{002}{<}SV50,{252}{>}{<}XS60,50,51,,52{>};*; 51{032}
has the pre-wildcard part of find$, 52 post[cr|lf];*;[BC_]{<}P
V51{>} {<}PV52{>}{<}EX{>}[cr|lf][BC_]se/f /{<}PV51{>}/[XC_];*;
 find the start of find$ to jmp to do the final ci[cr|lf];*;[BC_]
here{<}EX1{>}[cr|lf]{<}IF{<}ER{>}{>}{<}EX{>}{<}EI{>};*;[cr|lf]
{<}SX50,{<}CP{>}{>};*; 50 now has start of find$ to use in fin
al ci[cr|lf][BC_]se /{<}PV51{>}/[XC_][XD_][DF_];*; DF the star
t of wild string[cr|lf][BX_]se/f /{<}PV52{>}/[Q2_];*; get to e
nd of wild string[cr|lf]{<}IF{<}ER{>}{>}[BC_]e1{<}EX1{>}{<}EI{>}
;*;[cr|lf][DF_]{<}SV51{>};*; store the wild string in re-cycle
d s/g 51[cr|lf][RD_]{252};*; delete the wild string in text &{032}
substitute {252} for it[cr|lf][BX_]jmp {<}PV50{>}[Q2_];*; posi
tion cursor to start of find$[cr|lf][BX_]ci/1 {179}{<}PV60{>}{179}
{<}PV61{>}{179}[Q2_];*; change the outer parts, leaving the li
teral {252} [cr|lf][BX_]se /{252}/[Q2_];*; get ready to replac
e the literal {252} with the wild string[cr|lf]{<}IF{<}ER{>}{>}
[BC_]e2{<}EX1{>}{<}EI{>};*;[cr|lf][BD_]{<}PV51{>}{<}EX{>} ;*;{032}
delete the literal {252} and put in the wild string[cr|lf]{002}
[cr|lf]
-nd
XPLeNCODE

Enjoy.

--Harry