
B–61803E–1/10
A. MACRO PROGRAM EXAMPLE
APPENDIX
169
00200 N102 (V141 --- TIMER ) ;
00210 N103 (V142 --- KEY CONTROL DATA -V8501- ) ;
00220 N104 (V143 --- STRINGS DATA OFFSET ) ;
00230 N105 (V144 --- KEY INPUT DATA -V8503- ) ;
00240 N105 (V145 --- ADDRESS INPUT DATA -V8504- ) ;
00250 N107 (V146 --- CURSOR X POINTER ) ;
00260 N108 (V147 --- CURSOR Y POINTER ) ;
00270 N109 (V148 --- ) ;
00280 N110 (V149 --- ) ;
00290 ;
00300 ;
00310 ;
00320 ;
00330 ;
00340 ;
00010 O0001 ;
00020 N000 G202 P3 ;
00030 #8505=0 ;
00040 G243 X0 Y0 A1 B0 (SAMPLE PROGRAM) ;
00050 X2 Y3 (1 -- KEY TEST) ;
00060 X2 Y5 (2 -- CURSOR TEST) ;
00070 X2 Y7 (3 -- DISPLAY TEST) ;
00080 X2 Y9 (4 -- ADDRESS VARIABLE) ;
00090 X2 Y11 (5 -- CIRCLE) ;
00100 #8509=0033 ;
00110 #143=300 ;
00120 M98 P0011 ;
00130 N001 #142=#8501 ;
00140 IF [#142 EQ 0] GOTO 99 ;
00150 IF [#142 LT 12] GOTO 99 ;
00160 IF [#142 GT 16] GOTO 99 ;
00170 #8500=[#142–11] *10 ;
00180 M99
00190 N099 M99 P1 ;
00200 ;
00210 ;
00220 ;
00230 ;
00240 ;