|
 |
|
El siguiente ejemplo muestra como va creciendo el porcentaje dentro de una barra de progreso.
Muy Importante:
Colocar a la calculadora en base decimal DEC antes de digitar el programa, esto permitirá que los enteros binarios # no afecten la visualización de las imagenes.
Los enteros binarios # que representan posiciones en el eje vertical, están referidos a la altura de una pantalla de 131×64, para calculadoras como la HP49G+ y la HP50G que cuentan con pantallas más amplias 131×80 estos valores verticales pueden ser incrementados en 16 unidades para centrar la barra de progreso.
Leyendo el código:
Al iniciar el programa se piden valores para las variables a y b, donde a la variable a le corresponde el número de unidades con respecto al total que se desea graficar, y a la variable b el valor que corresponde al 100%.
Se inicia el procedimiento << >>, en su interior la imagen de la pantalla LCD reemplaza al entorno gráfico PICT. Se ejecuta la línea { #0 #0 } PVIEW para empezar a visualizar el entorno gráfico.
Se coloca un gráfico en blanco de dimensiones #104 × 25 en las coordenadas { #12 #21 }.
Se dibuja un cuadro entre las coordenadas
{ #13 #22 } y { #114 #38 } utilizando el comando BOX.
Se abre la estructura bucle FOR NEXT desde el valor %0 hasta el %100 calculado en base a la regla de tres simple (100×a)/b. El comando IP extrae la parte entera de un número real.
En cada una de las iteraciones de la estructura bucle se dibujan líneas verticales que irán llenando la barra de progreso. Además también se mostrará en las coordenadas
{ #13 #40 } el dibujo del texto con el valor númerico del porcentaje, mientras este se va incrementando.
Se cierra la estructura bucle.
Se ejecuta la línea 0 WAIT DROP para detener la ejecución del programa hasta que se presione una tecla, borrando finalmente el código de la tecla presionada con el comando DROP.
Almacenamiento y prueba (En Modo RPN)
1. Digitar y verificar la escritura del programa, luego presionar ENTER.
2. Activar el indicador ALFA y digitar el nombre del programa entre apostrofes: 'NOMBRE'.
3. Presionar la tecla STO.
4. Para ejecutar el programa ingresar al menú VAR, colocar en la pila ó stack los dos valores reales para las variables a y b, y se presiona la tecla del menú correspondiente al programa.
|
|