HP 50g Guia Del Usuario página 759

Así, demostramos el uso de la función INFORM. Para ver cómo utilizar estos
valores de la entrada en un cálculo modificar el programa como sigue:
« " CHEZY'S EQN" { { "C:" "Chezy's coefficient" 0} { "R:" "Hydraulic radius" 0
} { "S:" "Channel bed slope" 0} } { } { 120 1 .0001} { 110 1.5 .00001 }
INFORM IF THEN OBJ DROP C R S 'C*(R*S)' NUM "Q" TAG ELSE
"Operation cancelled" MSGBOX END »
Los pasos del programa demostrados arriba después del comando INFORM
incluyen el uso de ramificación de la decisión con la instrucción IF-THEN-ELSE-
END (descrito detalladamente en otra parte en este capítulo). El control de
programa se puede enviar a una de dos posibilidades dependiendo del valor
en el nivel 1 de la pantalla. Si este valor es 1 el control se pasa a los
comandos:
OBJ DROP C R S 'C*√(R*S)' NUM "Q" TAG
Estos comandos calcularán el valor de Q y pondrán una etiqueta al resultado.
Por otra parte, si el valor en el nivel 1 de la pantalla es 0 (lo cuál sucede
cuando una instrucción @CANCEL se incluye al usar la forma interactiva) , el
control de programa se pasa a los comandos:
"Operation cancelled" MSGBOX
Estos comandos producirán una caja de mensaje (inglés, message box) que
indica que la operación fue cancelada.
Página 21-33