Heading 'Cost of Buying Oranges test Menu'   # A title for the Input form.
    NumberIn 'Number of oranges' n     # A number input box.
    RadioButtons 'Price of one orange' p
       "cheap 2" 2
       "expensive 4" 4
    CalcButton 'Total Price'           # A button to perform the calculation.

t := n * p                             # The calculation formula.

    Heading 'Total Price of Oranges'   # A title for the calculation output.
    LineOut 'Number' n                 # The results we want to display.
    LineOut 'Price' p
    LineOut 'Total Price' t