Re: XPL best practices

[Carl Distefano cld@xxxxxxxx]

Reply to note from Harry Binswanger  Sat, 11 Nov
2006 21:44:10 -0500

Harry:

> One thing I wandered into was the U2 routine XSE, on which
> there's no help in the .inf file. Wazzat?

XSE is one of a series of parsing frames, {XS,XSR,XSE*,XSE} and
{InStr,InStrR}, that emulates Basic's InStr and InStrRev, or Rexx's
Pos and LastPos, instructions. HELP XSE should take you to
a brief description. Doesn't it? If not, you have a long outdated
version of XYWWWEB.INF!

Actually, the call to XSR in Patricia's routine is unnecessary. The
VA@ operator works just as well, with less overhead. Also, there
was an extra  in the original that I neglected to delete. Also,
it was unnecessary to introduce a new S/G, 10, to show Elapsed Time;
reuse 01 instead. Here's the revised routine ("Version 2b"):

XPLeNCODE v2.0
b-gin [UNTITLED]
{<}LBVersion2b{>}[ZT_]{<}SX01,{<}VA$FP{>}{>}{<}SX02,{<}VA@01.
1{>}+".wp"{>}{<}SX03,{<}VAWW{>}{>};*;[cr|lf];*;[cr|lf]{<}SX01
,"@echo off[cr|lf]"+{<}IS03{>}+"W4W17F.EXE "+{<}IS01{>}+" /N{032}
/V2[cr|lf]DELAY.EXE 2 >nul[cr|lf]if exist "+{<}IS02{>}+" del{032}
"+{<}IS02{>}+"[cr|lf]"+{<}IS03{>}+"W4W48T.EXE "+{<}IS02{>}+"[
cr|lf]"{>}[BX_]sa %01,{<}PV03{>}xytowp.bat[Q2_][BX_]wait[Q2_]
;*;[cr|lf];*;[cr|lf];*; [BX_]dos/nv/z /c {<}PV03{>}xytowp.bat
[Q2_];*; <== un-comment to run BAT file[cr|lf]{<}SX01,{<}VA$E
T{>}{>}{<}PR@01{>}{<}EX{>}[cr|lf][cr|lf]
-nd
XPLeNCODE

--
Carl Distefano
cld@xxxxxxxx