Reajusta el formato de la
pantalla.
Determina el formato del
valor del rótulo dentro
del propio rótulo.
Calcula el número de
columnas necesarias para
un rótulo.
Completa el eje con
trazos, entre las señales
del rótulo.
Acumula una señal de
rótulo.
235 5TO 82
236 FIX 4
237 RTN
238eLBL 84
239 REL 86
248 /
241 RND
2420LBL 85
243 RES
244 INT
245 X=0?
246 GTO 88
247 RN
248 5
249%eLBL 88
250 LOG
251 INT
252 REL 85
233 +
254 3
235 +
256 7
257 *
258 RTN
259LBL 86
268 ENTER?
261 ENTERt
262 7
263 0D
264 2
265 7
266 INT
267 SKPCOL
266 -
269 --
270eLBL 87
2?
272 X
273 CTO 8
274 -
275 ACA
276 6TO 87
2770LBL 88
276 RDN
279 SKPCOL
280eLBL 88
281 127
282 ACCOL
283 R*
284 RTN
Calcula el valor del
multiplicador y lo ingresa
dentro de X. Acumula la
línea de "unidades".
Genera el mensaje DATA
ERROR (error de datos)
en el caso de ingresos
errados.
79
285eLBL 89
286 *+ CUNITS="
287 xC=Y?
288 GTO 18
289 XOY
290 ABS
291 xY?
292 XOY
293 L0G
294 x<B?
295 6TO 88
296 INT
297 2
293 YOY
299 XY7
380 GTO el
381 -
382 STO 85
383 8
384 TO 82
305*LBL 08
386 FRE
307 Y=7
308 1
389 LASTA
318 INT
311 XO
re -
313LBL 81
314 * E-
J150LBL 82
316 4
317 SKPCHR
313 ACA
319 FIX 8
320 RON
321 =87
322 GTO 88
323 RCX
324 181
325 2
326 STO 85
327 FIX 2
328 RDN
329 ETO 8l
338eLBL 88
3311
332 ACK
333 FIX IND 85
JI4eLBL Ol
335 " -
336 ACR
337 RTN
338e0LBL 18
339 8
EC
341 END