This page demonstrates a menu which translates string selections into numbers, and another which contains a big sequence of integers written compactly as a list. At the end of the page is a form which can dynamically change the options on the first menu by allowing the user to add new options.
<!-- Menus.wom --> <HTML> <HEAD><TITLE>Menus</TITLE></HEAD> <BODY> <H1>Menus</H1> <WOMForm> Pick an action from the menu and apply it to the number below.<BR> <RealMenu action options={"Halve it":0.5,"Double it":2,"Treble it":3} display="Double it" value=2 ><BR> <Text x value="1"><BR> <INPUT TYPE=SUBMIT> <OnSubmit rexx> { $x~setValue($x~getValue*$action~getValue) } </OnSubmit> </WOMForm> <HR> <WOMForm> Pick a number. <IntegerMenu y options={0 to 10,12 to 18 by 2,"Twenty":20} display=0 value=0 ><BR> <Text message value=""><BR> <INPUT TYPE=SUBMIT> <OnSubmit rexx> { $message~setValue("You chose" $y~getValue) } </OnSubmit> </WOMForm> <HR> <WOMForm> Type an action name (e.g. "quadruple it") and a number (e.g. 4) to add to the first menu above.<BR> Action: <TextField action_name><BR> Number: <RealField action_value><BR> <INPUT TYPE=SUBMIT> <OnSubmit rexx> { $action~setOption( $action_name~getValue,, $action_value~getValue, ) } </OnSubmit> </WOMForm> </BODY> </HTML>