Menu: Difference between revisions
Content added Content deleted
Thundergnat (talk | contribs) m (syntax highlighting fixup automation) |
No edit summary |
||
Line 1,823: | Line 1,823: | ||
You chose: mirror mirror |
You chose: mirror mirror |
||
</pre> |
</pre> |
||
=={{header|M2000 Interpreter}}== |
|||
We use the dropdown menu, from M2000 Console. This menu open at text coordinates (moving to better position if can't fit to screen). We can choose something with enter + arrows or using mouse pointer. There is a way to feed the internal menu array, one by one, first using Menu without parameters, to clear the previous loaded menu, then using Menu + string expression, for each new item, and finally for opening the menu, we place: Menu ! |
|||
The If$() statement return for boolean -1, 0 or for any number>0, as the Nth expression (from 1 to the last one). |
|||
<syntaxhighlight lang="m2000 interpreter"> |
|||
Module TestMenu { |
|||
Print "Make your choice: "; |
|||
Do |
|||
Menu "fee fie", "huff and puff", "mirror mirror", "tick tock" |
|||
when menu=0 |
|||
Print Menu$(Menu) |
|||
Print "That was the ";If$(Menu->"1st","2nd","3rd","4th");" option, bravo;" |
|||
} |
|||
TestMenu |
|||
</syntaxhighlight> |
|||
{{out}} |
|||
<pre> |
|||
Make your choice: mirror mirror |
|||
That was the 3rd option, bravo; |
|||
</pre> |
|||
=={{header|Mathematica}} / {{header|Wolfram Language}}== |
=={{header|Mathematica}} / {{header|Wolfram Language}}== |
||
'''Interpreter:''' Wolfram Desktop and Wolfram Desktop Kernel |
'''Interpreter:''' Wolfram Desktop and Wolfram Desktop Kernel |