78
Apéndice C: Lista de Programas [PRPLOT) Comentados
Incrementa el valor de x y
verifica si el trazado está
completo.
Reajusta el modo de
presentación en la pantalla.
Calcula e imprime el
rótulo del eje y.
Convierte nnn.aaa para
nnn y verifica nnn.
Determina el formato y
acumula el rótulo Y MIN.
Calcula y Omiteel
número de columnas entre
los rótulos Y MIN e
Y MAX.
Acumula el rótulo Y
MAXe imprime los
rótulos del eje y.
Calcula la localización de
la columna deleje (si está
impresa).
98 REL 18
99 ST+ 86
108 RCL 89
181 RCL 96
182 X=
183 CTO 14
184 FIX 4
185 RTN
106eLBL "PRAXIS-
187 CF 12
108 REL 88
109 REL 81
118 y-
111 XEQ 89
112 STO 86
113 125
114 ACCHR
115 PRBUF
116 REL 82
117 1NT
118 9BS
119 STO 82
120 168
121 XY?
122 ETO 10
123 RCL 00
124 RCL 86
125 /
126 RND
127 AC
128 XEO 85
129 R*
138 REL 81
131 XEQ 84
132 R1
133 +
134 -
135 7
136 XC=V?
137 RDN
138 SKPCOL
139 REL 81
148 RCL 86
14 7
142 RND
143 ACA
144 ADY
145 REL 84
146 SIGH
147 =0?
148 GTO 63
143 LASTE
150 RCL 88
151 0Y?
152 6TO18
153 -
154 RCL 8l
155 RCL 08
156 -
157 xY?
158 CTO 16
159 /
160 RCL 82
161 1
162 -
163 «
164 .5
Posiciona e imprime el
rótulo del eje.
Calcula la posición de la
señal del eje e imprimeel
eje y.
Ingresa nnn.aaa en Ro.
165 +
165 INT
167 STO Y
169 REL 84
169 REL 86
170 -
171 RO
172 ACX
173 XEQ S
174 2
175 /
176 Y?
177 GTO 88
178 +
179 REL 82
188 1
181 -
182 X(Y?
183 ENTERt
184 -
185 GTO el
1860LBL 88
187 ENTER?
188 +
189 RCL 82
198 -
191eLBL l
192 SKPCOL
193 ADV
194 XEQ 08
195 STO 5
196 X=0?
197 CT0
198 REL 02
199 1
218 ETO 8l
211sLBL 83
212 XEQ 08
2130LBL 08
214 RCL 82
215 2
¿160LBL 81
217 -
218 XEQ 6
219 ANY
220 REL 62
221 RCL eS
222 1
2234
224 1 El
225 /
226 +
227 ENTER!
228 Cs
229 XOY
230 RCL 4
231 SIGH
232 X6
233 RN
234 RDN