Talk:Menu: Difference between revisions
m
→going further: formatting
m (→going further) |
m (→going further: formatting) |
||
Line 182:
<lang j>
load 'misc'
displayMenu =: i.@# smoutput@,&":&> ' '&,&.>
makeMsg =: 'Choose a number 0..' , ': ',~ ":@<:@#
displayBadNumMsg =: [ smoutput bind 'Please choose a valid number!'
select=: ({::~ _&".@prompt@(makeMsg [ displayMenu)) :: ($:@displayBadNumMsg)
</lang>
| |||