
A. MACRO PROGRAM EXAMPLE
B–61803E–1/10
APPENDIX
196
00450 X0 Y6 (F8.3 ) D#100 ;
00460 #141=300 ;
00470 M98 P0031 ;
00480 G243 X0 Y6 F8.3 Z1 K200 ;
00490 #141=100 ;
00500 M98 P0031 ;
00510 X0 Y6 (F8.3 ) D#100 ( LEADING ZERO NEG.) ;
00520 #141=300 ;
00530 M98 P0031 ;
00540 G243 X0 Y6 F5.2 K200 ;
00550 #141=100 ;
00560 M98 P0031 ;
00570 X0 Y6 (F5.2 ) D#100 ;
00580 #141=300 ;
00590 M98 P0031 ;
00600 #8509=0033 ; The character string is O0033.
00610 G243 X0 Y4 A1 B0 K200 ; Partial screen erase
00620 #141=100 ;
00630 M98 P0031 ;
00640 X0 Y4 (STRINGS DISPLAY TEST) ; Display
00650 G243 X0 Y6 K200 ; Screen partially erased
00660 X0 Y6 P10 ; The character string of sequence No. 10 is displayed.
00670 #141=300 ;
00680 M98 P0031 ;
00690 G243 X0 Y6 K200 ; Screen partially erased
00700 #141=100 ;
00710 M98 P0031 ;
00720 X0 Y6 P20 ; The character string of sequence No. 20 is displayed.
00730 #141=300 ;
00740 M98 P0031 ;
00750 #142=#8501 ; Key input variable is SAVED.
00760 N099 IF [#142 NE 16] GOTO 97 ; Return to the menu when the soft key is “END”.
00770 N098 #8500=1 ;
00780 M99;
00790 N097 M99 P1;
00800
00810
00820
00830
00840
Timer
Timer
Timer
Timer
Timer