Harry wrote:
Yep. Works great.
Here's a matched pair of routines: ADDSS (same as before, but tweaked to preserve original cursor position) and a new frame, DELSS, which deletes the empty SS commands embedded by ADDSS (leaving the corresponding US commands intact).
XPLeNCODE v2.0 b-gin [UNTITLED] {{;5addss}} Add dummy (empty) SS commands for orphan US comma nds in current file (command(s) embedded at top of file) [CLD ][cr|lf]{002}[BX_]es 1[Q2_]{<}SX01,{<}CP{>}{>}[DX_][XP_][TF_] [YD_]{<}SV02,{>}{<}LBa{>}[BX_]se [w<]US[Q2_]{<}IF@not({<}ER{ {062}}){>}[DF_][BX_]se/f [w>][Q2_][DF_]{<}SV03{>}[CR_]{<}SX50,{< }CP{>}{>}[YD_][TF_][BX_]se "[w<]SS{<}PV03{>}"[Q2_]{<}IF{<}ER{ {062}}{>}{<}SX02,{<}IS02{>}+"{<}SS"+{<}IS03{>}+"{>}"{>}{<}EI{>}[J M_]2.ReJuMP[Q2_]{<}GLa{>}{<}EI{>}{<}IF{<}VA|02{>}>0{>}[TF_]{< }GT02{>}{<}EI{>}{<}SX50,{<}PV01{>}+{<}VA|02{>}{>}[JM_]2.ReJuM P[Q2_][DO_][FF_]{<}PRDone{>}{002}[cr|lf][cr|lf]{{;5delss}} De lete dummy (empty) SS commands from current file (leaves corr esponding US commands intact) [CLD][cr|lf]{002}[BX_]es 1[Q2_] {<}SX50,{<}CP{>}{>}[DX_][XP_][TF_]{<}LBa{>}[YD_][BX_]se "[w<] SS"[Q2_]{<}IF@not({<}ER{>}){>}[BX_]seb [w<][Q2_][DF_][BX_]se [w>][Q2_][DF_]{<}SV01{>}{<}IF","{238}{<}IS01{>}<0{>}[DN_]{< }EI{>}{<}GLa{>}{<}EI{>}[JM_]2.ReJuMP[Q2_][DO_][FF_]{<}PRDone{ {062}}{002}[cr|lf][cr|lf] -nd XPLeNCODE -- Carl Distefano cld@xxxxxxxxxx