Re: Testing $X

[Harry Binswanger hb@xxxxxxxx]

This one is worse than the last! Can it be me?
Here's what I did:

1. Ca$ u2 (or maybe <$XKey>... see below)
2. Pasted in your XPLEncoded stuff.
3. Decode
4. LH
5. Assigned $X to key 28
6. d wa=12<$Xkey>
7. va/nv wa<$Xkey>
got 0
8. va/nv eb<$Xkey>
got 0.
I'm going to re-do all those steps (well, just checking for step 5), after
quitting Xy.

Okay, this time I got the right value for WA but EB is 0,0.
I think the difference may be that before I did CA$ U2<$Xkey> (don't remember).
Just quit Xy again, and the WA reset is working, but the EB, which started
at 768,20000 (va/nv) is left at 0,0 after doing a va/nv wa<$Xkey>.
The previous version worked great for me (since I use WA=0), so I'll stick
with that.
Reply to note from Harry Binswanger  Sun, 28 Sep
2008 22:05:17 -0400

> Well . . . This sequence fails:
>
> 1. d wa=11<$Xkey>|XC-key
> 2. va/nv wa gives 11
> 3. va/nv wa<$Xkey> gives 0.

Hoh-kay. Try this.

And... nice knowing you, Harry. Take good care now.

No, seriously. This should do it.

XPLeNCODE v2.0
b-gin [UNTITLED]
{{;5$X}} Issue COMMAND[ arg(s)] or U2_FRAMENAME[ arg(s
)] with a single key [CLD rev.9/28/08-e][cr|lf]{002}
{<}SX01,{<}IS00{>}{>}{<}IF{<}VA$KC{>}==28!{<}VA$KC{>}==104{>}
{<}IF{<}VA$SM{>}>0{>}[JM_]2.null[Q2_]{<}EI{>}{<}IF{<}VA$TX{>}
{062}0{>}[255+048+068]{<}EX{>}{<}EI{>}{<}EI{>}{<}IF{<}VA!620{>}<1
&{<}VA|01{>}>0{>}[$S_]{<}EI{>}{<}IF{<}IS01{>}=="?"!{<}VA|01{>
}>1&"HELP"{238}@upr({<}IS01{>})<>0{>}{<}SX02,{<}VA$EB{>}{>}{<
}SX03,{<}VAWA{>}{>}[BX_]d wa=0[Q2_]{<}SX02,"[BX_]es 1[Q2_][BX
_]d eb="+{<}IS02{>}+"[Q2_]"{>}{<}SX03,"[BX_]d wa="+{<}IS03{>}
+"[Q2_]"{>}{<}IF"D "{238}@upr({<}IS01{>})==0!"DEFAULT "{238}@
upr({<}IS01{>})==0!"VA/NV "{238}@upr({<}IS01{>})==0{>}{<}SV02
,[BX_]es 1[Q2_]{>}{<}EI{>}{<}IF"D WA"{238}@upr({<}IS01{>})==0
!"DEFAULT WA"{238}@upr({<}IS01{>})==0{>}{<}SV03,{>}{<}EI{>}{<
}IF{<}VA|02{>}>0{>}[BX_]d eb=0,0[Q2_]{<}EI{>}{<}IF"VA/NV WA"{
238}@upr({<}is01{>})==0{>}{<}PV03{>}{<}SV03,{>}{<}EI{>}[XC_]{
<}IF@not({<}ER{>})!{<}VA$ER{>}<>12{>}{<}PV02{>}{<}PV03{>}{<}E
X{>}{<}EI{>}[BX_]wait[Q2_]{<}PV02{>}{<}PV03{>}{<}EI{>}{<}SV01
,{>}{<}IF{<}VA$MG{>}<>""{>}{<}SX01,{<}VA$MG{>}{>}{<}EI{>}{<}P
R@01{>}[BX_]es[Q2_][JM_]2.PrsCMline[Q2_]{002}[cr|lf]
-nd
XPLeNCODE

--
Carl Distefano
cld@xxxxxxxx


Harry Binswanger
hb@xxxxxxxx