Trying to create a simple menu

[SMcNeill]

I see it isn't sending the zero value back to the calling sub.

Pete's drinking.  What he's saying has nothing to do with your problem.  Ignore him 100%. 

    PopUpMenu (state&)    <--- This line is the problem, and I think it's one you've had before.

*DON'T use parenthesis with SUB calls.  It prevents passing of values back and forth.

Change that to the following and it works:

    PopUpMenu state&

OR Change it to the following and it works:

    CALL PopUpMenu (state&)

But as you have it, you're not passing values back and forth and as such you're not getting that exit value back from the SUB.  That's the only problem I see with what you've got here.  You simply can't pass values back and forth inside parenthesis like that.