🚀 go-pugleaf

I am having a problem with using a dialog box that I was wondering
if someone has the answer to. The program sequence I am using goes like
this:

form_center(tree,&cx,&cy,&cw,&ch);
form_dial(FMD_START,cx,cy,cw,ch,0,0,0,0);
objc_draw(tree,0,MAX_DEPTH,cx,cy,cw,ch);
SHOW_MOUSE
setnum=-1;
do {
	n=form_do(tree,SETSEL);
	switch (n) {
		case SET0:
		case SET1:
		case SET2:
		case SET3:
			strcpy(s1,selptr[n]->te_ptext);
		/*	tree[n].ob_state &= ~SELECTED;  Return to normal */
			HIDE_MOUSE
			objc_draw(tree,SETSEL,0,cx,cy,cw,ch); 
			SHOW_MOUSE
			break;
			etc.


The form consists of several BOXTEXTs (SET0-3) which are marked as
SELECTABLE and EXIT in the resource. The problem that I am having is
that when I select one of the BOXTEXT objects with the mouse, the
box reverses as it should except for the small rectangle under the
mouse. Multiple selects keep leading to ever more checkerboarded
boxes. This condition exists immediately upon selection, in other
words, it exists on the screen at the return from the form_do.
This obviously doesn't happen on most people's programs so
why does it on mine? Is there something that I have forgotten or that
I am doing out of sequence?

One other question: How do you find the name of the program you are
running under GEM? Under a shell, it comes in argv[0] but that isn't
set when starting from GEM.

Any help would be appreciated!

Thanks,

Bob Foster