Anonymous user
Menu: Difference between revisions
→{{header|Ruby}}
Line 1,306:
response = select("Which is from the three pigs", items)
puts "you chose: >#{response}<"</lang>
=={{header|Run BASIC}}==
<lang runbasic>dim choose$(5)
choose$(1) = "1 Fee Fie"
choose$(2) = "2 Huff Puff"
choose$(3) = "3 Mirror, Mirror"
choose$(4) = "4 Tick, Tock"
choose$(5) = "Exit"
[start]
print "Menu Selection"
listbox #lb,choose$(),5
button #sel, "Accept",[select]
wait
[select]
selected$=#lb selection$()
print " "
if selected$<>"" then
print "You selected ";selected$
else
print "No selection made"
end if
button #con, "Continue",[go2]
wait
[go2]
if selected$<>"Exit" then
cls
goto [start]
else
cls
end
end if</lang>
=={{header|Seed7}}==
| |||