impulsado por menú en Prolog
get_action(Choice) :-
menu('Title',
[ option_1 : 'Option One'
, option_2 : 'Option Two'
, quit : 'Quit'
], Choice).
Homely Hippopotamus