Anonymous user
Menu: Difference between revisions
→{{header|Red}}
Line 2,487:
menu: function [items][
print either empty? items [""] [until [
repeat n length? items [print [n ":" items/:n]]
attempt [pick items to-integer ask "Your choice: "]
]]
]</lang>
{{out}}
<pre>
1 : fee fie
2 : huff and puff
3 : mirror mirror
4 : tick tock
Your choice:
1 : fee fie
2 : huff and puff
Line 2,511:
4 : tick tock
Your choice: 3
mirror mirror
>> menu []
>> </pre>
=={{header|REXX}}==
|