34 lines
1.1 KiB
C++
34 lines
1.1 KiB
C++
|
|
|
|
|
|
$SP,"<1>",1$
|
|
|
|
|
|
|
|
|
|
U0 MenuSprite()
|
|
{
|
|
I64 i;
|
|
DocPut->flags|=DOCF_FORM; //Cursor navigation will skip empty locations.
|
|
do {
|
|
DocClear;
|
|
NewLine(1);
|
|
|
|
//Sprite with flags for left-expression and an exit.
|
|
//See $LK,"doc_dft_flags1","MN:doc_dft_flags1"$. Note the %d in the string for the sprite number.
|
|
PutSprite($IB,"<1>",1$,"$$FG,LTBLUE$$$$SP+LE+X,\"50 Hz\",50,%d$$");
|
|
|
|
NewLine(3);
|
|
"$$MU,\"100 Hz\",100$$\n";
|
|
"$$MU,\"200 Hz\",200$$\n";
|
|
"$$MU,\"CANCEL\",DOCM_CANCEL$$\n";
|
|
i=DocMenuDo(DocPut);
|
|
if (i>0) Snd(i);
|
|
} while (i>=0);
|
|
Snd(0);
|
|
DocClear;
|
|
NewLine(1);
|
|
DocPut->flags&=~DOCF_FORM;
|
|
}
|
|
|
|
MenuSprite; Ú ÿÿÿÿÿ ÿÿÿ ÿ ÿ ÿ ÿ ÿÿ ÿÿÿÿ ÿÿÿÿÿ ÿÿÿÿÿÿ ÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ |