Re: U2 fram PrsExe50

[Harry Binswanger hb@xxxxxxxx]

Carl,
Many thanks! Before I try it, I want to understand it. First I had to
confront the long-delayed issue of what on earth it means to put commands
in quotes inside a SX. I can see that PV-ing subsequently executes it, but
how does one understand what this, for example, *means*?

Aside from that, here's my general understanding of what you did--am I
getting any of it wrong?
1. Get and prepare to re-instate the defaults for error beep and wait time.
Set the bell to 0 and the wait time to 0 (rather than using ES 1, which
suppresses needed info).

2. Try to eXeCute what's on the command line.
3. If there's any error other than "command not recognized," exit, after
reinstating the defaults and showing the error message.
4. If there was an error, but it's "command not recognized," the command
line should be an attempt to call a U2 frame, so call it (after displaying
the current error message and restoring the defaults)--but why display any
error message in this case?
5. If calling the U2 frame generated "application error . . ." then exit,
after displaying "Bad framename [command line contents]".
6. If get to here, then XC generated no error at all, so just restore the
defaults.
If I'm assigning the ENTER key to this frame, I still have to wrap your
whole routine in a test for VA$TX = 0, and put out  if it isn't 0, right?

Thanks,
Harry
Harry:
There was an extraneous (albeit harmless) command in the frame I just
posted. Use this instead:

XPLeNCODE v2.0
b-gin [UNTITLED]
{{;5XCorU2}} Execute native command|launch U2 frame [ arg(s)]
 [CLD][cr|lf]{002}{<}SX01,{<}VA$EB{>}{>}{<}SX02,{<}VAWA{>}{>}
{<}SX01,"[BX_]d eb="+{<}IS01{>}+",wa="+{<}IS02{>}+"[Q2_]"{>}[
BX_]d eb=0,0,wa=0[Q2_][XC_]{<}IF{<}ER{>}&{<}VA$ER{>}<>12{>}{<
}SX02,{<}VA$ER{>}{>}{<}PV01{>}[BX_]beep[Q2_]{<}SX01,"{<}VA\"+
{<}IS02{>}+"{>}"{>}{<}SX01,{<}PV01{>}{>}{<}PR@01{>}{<}EX{>}{<
}EI{>}{<}IF{<}ER{>}{>}{<}SV02,{>}{<}IF{<}VA$MG{>}<>""{>}{<}SX
02,{<}VA$MG{>}{>}{<}EI{>}{<}PV01{>}{<}PR@02{>}[JM_]2.PrsCMlin
e[Q2_]{<}IF{<}VA$ER{>}>1351{>}{<}SX01,@upr({<}IS01{>}){>}{<}P
RBad framename @01{>}{<}EI{>}{<}EX{>}{<}EI{>}{<}PV01{>}{002}[
cr|lf][cr|lf]
-nd
XPLeNCODE

--
Carl Distefano
cld@xxxxxxxx


Harry Binswanger
hb@xxxxxxxx