$ od -c -N 50000 [Cyan]<D0Source>AMesaSources.Dm!5 0000000 377 \0 \0 S a v e A M e s a S o u r 0000020 c e s . C m \0 373 227 361 324 302 \0 \0 376 001 0000040 \0 l 223 F t p I n d i g o C o 0000060 n n e c t D 0 S o u r c e D 0000100 u m p / C A M e s a S o u r c 0000120 e s . D m ^ \r S a v e A M e s 0000140 a S o u r c e s . C m S a v e 0000160 A M e s a M B . C m O v e r l 0000200 a y A l l . C m M i c r o A l 0000220 l . C m M i . C m ^ \r N e w 0000240 A M e s a . C m L F A M e s a 0000260 . C m A M e s a . C m A M e 0000300 s a . M l f A M e s a R e l e 0000320 a s e . C m ^ \r * A M e s a . 0000340 R e g s * A M e s a . C S M a 0000360 p N e w A M e s a . M i d a s 0000400 B i t B l t . M i d a s M e 0000420 m E r r o r s . M i d a s ^ \r 0000440 D 0 L 376 001 \0 \0 } a n g . M c M 0000460 P C o d e s . M c G l o b a l 0000500 D e f s . M c I n i t i a l i 0000520 z e . M c F a u l t . M c ^ 0000540 \r A l t o . M c A l t o X . M 0000560 c B i t B l t . M c D i s k 0000600 . M c T r i d e n t . M c E 0000620 t h e r . M c ^ \r D i s p l a 0000640 y D e f s . M c D i s p l a y 0000660 I n i t . M c L F D i s p l a 0000700 y . M c D i s p l a y . M c 0000720 ^ \r T i m e r . M c A u d i o 0000740 . M c L o a d R A M . M c K 0000760 e r n e l O c c u p i e d . M c 0001000 ^ \r O v e r l a y O c c u p i 0001020 e d . M c M i c O v e r l a y 0001040 O c c u p i e d 376 \0 212 250 326 . M c 0001060 ^ \r M e s a D e f s . M c M 0001100 e s a L S . M c M e s a J . M 0001120 c M e s a X . M c M e s a P 0001140 . M c M e s a F P . M c M e 0001160 s a I O . M c ^ \r C D C T a s 0001200 k . M c J a s m i n e . M c 0001220 J a s m i n e H a l f t o n e . 0001240 M c J a s m i n e H a l f t o 0001260 n e 4 . M c \r 377 \0 \0 S a v e A M 0001300 e s a M B . C m \0 373 227 361 324 252 \0 \0 0001320 376 \0 M m 265 F t p I n d i g o 0001340 D i r e c t o r y / C D 0 > T 0001360 e s t S t o r e / C A M e s 0001400 a . M b C S L K e y b o a r d 0001420 . M b M i c O v e r l a y . M 0001440 b \r 377 \0 \0 O v e r l a y A l l . 0001460 C m \0 373 231 251 , 336 \0 \0 376 001 \0 / 337 / 0001500 / R e a s s e m b l e a l l 0001520 f i l e s a f f e c t e d b 0001540 y W i t h M i d a s , C S L 0001560 O v e r l a y , F i n a l O v 0001600 e r l a y , a n d \r / / W i t 0001620 h F l o a t i n g P o i n t s 0001640 w i t c h e s i n G l o b a 0001660 l D e f s . M c . \r / / E d i t 0001700 1 0 S e p t e m b e r 1 9 0001720 8 2 \r M i c r o / U D 0 L a n 0001740 g G l o b a l D e f s \r M i c 0001760 r o / O / U G l o b a l D e f 0002000 s / R F a u l t \r M i c r o / 0002020 O / U G l o b a l D e f s / R 0002040 I n i t i a l i z e \r M i c r 0002060 o / O / U G l o b a l D e f 376 0002100 \0 265 251 < s / R T i m e r \r M i 0002120 c r o / O / U G l o b a l D e 0002140 f s / R D i s p l a y I n i t 0002160 \r M i c r o / O / U G l o b a 0002200 l D e f s / R D i s p l a y \r 0002220 M i c r o / O / U G l o b a l 0002240 D e f s / R L F D i s p l a y 0002260 \r M i c r o / O / U G l o b a 0002300 l D e f s / R M e s a F P \r M 0002320 i c r o / O / U G l o b a l D 0002340 e f s / R M i c O v e r l a y 0002360 O c c u p i e d \r 377 \0 \0 M i c r 0002400 o A l l . C m \0 373 227 367 024 ] \0 \0 376 0002420 001 \0 2 \r M i c r o / U D 0 L a 0002440 n g G l o b a l D e f s \r M i 0002460 c r o / O / U G l o b a l D e 0002500 f s / R F a u l t \r M i c r o 0002520 / O / U G l o b a l D e f s / 0002540 R A l t o \r M i c r o / O / U 0002560 G l o b a l D e f s / R A l 0002600 t o X \r M i c r o / O / U G l 0002620 o b a l D e f s / R B i t B l 0002640 t \r M i c r o / O / U G l o b 0002660 a l D e f s / R M e s a P \r M 0002700 i c r o / O / U G l o b a l D 0002720 e f s / R M e s a L S \r M i c 0002740 r o / O / U G l o b a l D e f 0002760 s / R M e s a J \r M i c r o / 0003000 O / U G l o b a l D e f s / R 0003020 M e s 376 001 \0 210 355 a X \r M i c r 0003040 o / O / U G l o b a l D e f s 0003060 / R M e s a F P \r M i c r o / 0003100 O / U G l o b a l D e f s / R 0003120 M e s a I O \r M i c r o / O / 0003140 U G l o b a l D e f s / R I 0003160 n i t i a l i z e \r M i c r o / 0003200 O / U G l o b a l D e f s / R 0003220 D i s k \r M i c r o / O / U 0003240 G l o b a l D e f s / R E t h 0003260 e r \r M i c r o / O / U G l o 0003300 b a l D e f s / R T i m e r \r 0003320 M i c r o / O / U G l o b a l 0003340 D e f s / R D i s p l a y I n 0003360 i t \r M i c r o / O / U G l o 0003400 b a l D e f s / R L F D i s p 0003420 l a y \r M i c r o 376 001 \0 ! 204 / O 0003440 / U G l o b a l D e f s / R 0003460 D i s p l a y \r M i c r o / O / 0003500 U G l o b a l D e f s / R C 0003520 D C T a s k \r M i c r o / O / U 0003540 G l o b a l D e f s / R J a 0003560 s m i n e H a l f t o n e \r M i 0003600 c r o / O / U G l o b a l D e 0003620 f s / R J a s m i n e \r M i c 0003640 r o / O / U G l o b a l D e f 0003660 s / R A u d i o \r M i c r o / 0003700 O / U G l o b a l D e f s / R 0003720 O v e r l a y O c c u p i e d 0003740 \r M i c r o / O / U G l o b a 0003760 l D e f s / R M i c O v e r l 0004000 a y O c c u p i e d \r / / M i c 0004020 r o / O / U G l o b a l D 376 \0 0004040 201 225 304 e f s / R T r i d e n t 0004060 \r / / M i c r o / O / U G l o 0004100 b a l D e f s / R J a s m i n 0004120 e H a l f t o n e 4 \r / / M i c 0004140 r o / O / U G l o b a l D e f 0004160 s / R L o a d R A M \r / / M i 0004200 c r o / O / U G l o b a l D e 0004220 f s / R K e r n e l O c c u p 0004240 i e d \r 377 \0 \0 M i . C m \0 373 224 270 0004260 376 227 \0 \0 376 \0 026 266 323 M i c r o / O 0004300 / U G l o b a l D e f s / R 377 0004320 \0 \0 N e w A M e s a . C m \0 373 231 0004340 251 9 353 \0 \0 376 \0 376 u q / / b u i 0004360 l d s m i d a s b o o t v 0004400 e r s i o n , a l t o m o d 0004420 e , c s l i o d e v i c e 0004440 s \r D e l e t e A M e s a . M 0004460 b A M e s a . D l s \r \r M i c 0004500 r o D / n / m / r N e w A M e 0004520 s a / o G l o b a l D e f s 0004540 K e r n e l O c c u p i e d L 0004560 o a d R A M I n i t i a l i z 0004600 e ^ \r F a u l t T i m e r 0004620 D i s p l a y D i s k E t h 0004640 e r C D C T a s k D i s p l 0004660 a y I n i t ^ \r A l t o A l 0004700 t o X B i t B l t M e s a L 0004720 S M e s a J M e s a X M e 0004740 s a P M e s a 376 \0 003 I R I O \r 0004760 377 \0 \0 L F A M e s a . C m \0 373 227 0005000 # E V \0 \0 376 \0 372 310 v / / B u i l 0005020 d s m i d a s b o o t v e 0005040 r s i o n , a l t o m o d e 0005060 , c s l i o d e v i c e s 0005100 e x c e p t L F k e y b o 0005120 a r d \r M i c r o D / n / m / r 0005140 N e w A M e s a / o G l o b 0005160 a l D e f s A l t o A l t o 0005200 X L F D i s p l a y D i s k 0005220 E t h e r C D C T a s k ^ 0005240 \r L o a d R A M T i m e r F 0005260 a u l t B i t B l t K e r n 0005300 e l O c c u p i e d D i s p l 0005320 a y I n i t I n i t i a l i z 0005340 e ^ \r M e s a L S M e s a J 0005360 M e s a X M e s a P M e s 0005400 a I O \r 377 \0 \0 A M e s a . C m \0 0005420 373 227 307 266 376 \0 \0 376 001 \0 I 200 / / B u 0005440 i l d s A l t o - c o m p a t 0005460 i b l e b o o t m i c r o c 0005500 o d e c o n s i s t i n g o 0005520 f a n i n i t i a l m i c 0005540 r o s t o r e \r / / l o a d a 0005560 n d t w o o v e r l a y s . 0005600 N O T E : r e s e r v e s 0005620 s p a c e f o r L o a d R 0005640 A M , s o s o m e p r e v 0005660 i o u s \r / / m i c r o c o d e 0005700 ( e . g . , I n i t i a l ) 0005720 m u s t h a v e p u t L 0005740 o a d R A M i n t o s t o r 0005760 a g e . \r D e l e t e N e w A 0006000 M e s a . M b N e w A M e s a 0006020 . D l s N e w A M e s 376 001 \0 242 0006040 c a . R e g s \r \r M i c r o D / 0006060 n / m / r A M e s a / O G l 0006100 o b a l D e f s O v e r l a y 0006120 O c c u p i e d I n i t i a l 0006140 i z e ^ \r F a u l t T i m e 0006160 r L F D i s p l a y D i s k 0006200 E t h e r C D C T a s k D 0006220 i s p l a y I n i t ^ \r A l t 0006240 o A l t o X B i t B l t M 0006260 e s a L S M e s a J M e s a 0006300 X M e s a P M e s a I O \r \r 0006320 M i c r o D / n / m C S L K e 0006340 y b o a r d / O G l o b a l D 0006360 e f s D i s p l a y \r \r M i c 0006400 r o D / n / m / r M i c O v e 0006420 r l a y / O G l o b a l D e f 0006440 s 376 \0 ; 032 + J a s m i n e J 0006460 a s m i n e H a l f t o n e A 0006500 u d i o ^ \r M e s a F P M i 0006520 c O v e r l a y O c c u p i e d 0006540 \r 377 \0 \0 A M e s a . M l f \0 373 231 0006560 & 224 ^ \0 \0 376 001 \0 345 224 * M a k e 0006600 L o a d e r F i l e c o m m a 0006620 n d f i l e t o b u i l d 0006640 D 0 m i c r o c o d e b o 0006660 o t f i l e s 3 J u n e 0006700 1 9 8 2 \r * F i r s t p r o 0006720 d u c e d i s k b o o t f 0006740 i l e \r r e a d \r I n i t i a l 0006760 . M b \r w r i t e \r I n i t i a 0007000 l A l t o . E b \r 4 1 0 0 \r n o 0007020 d o n o t c l o s e f i 0007040 l e \r y e s c l e a r c o n 0007060 t r o l s t o r e \r P a d o 0007100 u t t h e r e s t o f t 0007120 h i s p a g e \r r e a d \r A M 0007140 e s a . M b \r w r i t e \r 7 2 0 0007160 3 \r n o d o n o 376 001 \0 w J t 0007200 c l o s e f i l e \r y e s 0007220 c l e a r c o n t r o l s t 0007240 o r e \r r e a d \r C S L K e y b 0007260 o a r d . M b \r w r i t e \r 7 6 0007300 1 0 \r n o d o n ' t c l o s 0007320 e f i l e \r y e s c l e a r 0007340 c o n t r o l s t o r e \r r 0007360 e a d \r M i c O v e r l a y . M 0007400 b \r w r i t e \r 2 0 0 3 \r y e s 0007420 c l o s e f i l e \r y e s 0007440 c l e a r c o n t r o l s t 0007460 o r e \r r e a d \r A M e s a . M 0007500 b \r w r i t e \r A l t o D 0 . E 0007520 b \r 7 2 0 4 \r n o d o n o t 0007540 c l o s e f i l e \r y e s 0007560 c l e a r c o n t r o l s 376 0007600 \0 232 & 215 t o r e \r r e a d \r C S 0007620 L K e y b o a r d . M b \r w r i 0007640 t e \r 7 6 1 0 \r n o d o n ' t 0007660 c l o s e f i l e \r y e s 0007700 c l e a r c o n t r o l s t 0007720 o r e \r r e a d \r M i c O v e r 0007740 l a y . M b \r w r i t e \r 2 0 0 0007760 3 \r y e s c l o s e f i l e 0010000 \r y e s c l e a r c o n t r 0010020 o l s t o r e \r q u i t \r 377 \0 0010040 \0 A M e s a R e l e a s e . C m 0010060 \0 373 231 251 \v p \0 \0 376 001 \0 214 353 D e l 0010100 e t e A l t o D 0 . E b T r 0010120 i n i t y I n i t i a l A l t o 0010140 D 0 . E b R u b i c o n I n i 0010160 t i a l A l t o D 0 . E b \r F t 0010200 p I n d i g o D i r e c t o 0010220 r y / C D 0 > T e s t R e t 0010240 r i e v e / C A M e s a . M b 0010260 C S L K e y b o a r d . M b 0010300 M i c O v e r l a y . M b \r M a 0010320 k e L o a d e r F i l e A M e 0010340 s a \r F t p I n d i g o D i 0010360 r e c t o r y / C < D 0 > T e 0010400 s t S t o r e / C R u b i c 0010420 o n I n i t i a l A l t o D 0 . 0010440 E b T r i n i t y I n i t i a 0010460 l A l t o D 0 . E b A l 376 \0 \b 0010500 H 371 t o D 0 . E b \r 377 \0 \0 A M e 0010520 s a . r e g s \0 373 232 376 252 \0 \0 \0 376 0010540 001 \0 N { * M i c r o D 9 . 1 0010560 3 ( O S 1 6 ) o f F e b 0010600 r u a r y 2 , 1 9 8 1 \r * 0010620 a t 2 7 - M a y - 8 3 1 0010640 7 : 0 1 : 0 2 \r \r \r R M : \r \r 0010660 0 I 0010700 N T T E M P 1 \r 1 0010720 C A R R Y I N 0010740 T T E M P 2 S T A C K 0 \r 0010760 2 R P 0011000 A C 1 S T A C K 1 \r 0011020 3 B B N E G 0011040 B I T S L E F T S T A C K 2 \r 0011060 4 0011100 A C 2 S T A C K 3 \r 0011120 5 A C 2 H I 0011140 C O M 376 001 \0 N 335 P F L A G S 0011160 T A C K 4 \r 6 0011200 B B D L A S T B B 0011220 I T E M W I D S T A C K 5 Z 0011240 W O R D \r 7 0011260 B B I T E M S L E F T 0011300 S M A S T A C K 6 Z W O R 0011320 D H I \r 1 0 0011340 A C 0 M A P A D D R 0011360 S T A C K 7 \r 1 1 0011400 A C 0 H I R E A 0011420 L P A G E S T A C K 8 \r 0011440 1 2 D E V 0011460 I N D E X S T A C K 9 \r 0011500 1 3 S T A 0011520 C K 1 0 \r 1 4 0011540 I N I B 376 001 \0 313 317 F 0 0011560 R 1 7 7 4 0 0 S T A C K 1 1 0011600 \r 1 5 0011620 I N I B F 1 R 1 7 7 4 0 1 0011640 S T A C K 1 2 \r 1 6 0011660 E M L I N K I 0011700 N I B F 2 R 1 7 7 4 0 2 S T 0011720 A C K 1 3 \r 1 7 0011740 I N I B F 3 R 1 7 0011760 7 4 0 3 R P A C 2 X F O T P 0012000 R E G \r 2 1 0012020 B B D B M R C U R R E 0012040 N T T I M E \r 2 2 0012060 A C 3 C O D E \r 0012100 2 3 0012120 A C 3 H I C O D E H I \r 0012140 2 4 N 376 001 0012160 \0 313 367 W W \r 2 5 0012200 B B F U N C T I O N 0012220 P R E V X F X T P R E G \r 0012240 2 6 A 0012260 C 1 L O C A L \r 2 7 0012300 A C 1 H I L 0012320 O C A L H I \r 3 0 0012340 P C B \r 3 0012360 1 P C B H I 0012400 \r 3 2 0012420 M D S P B A S E R M Z E R 0012440 O R Z E R O \r 3 3 0012460 M D S H I P B 0012500 A S E H I \r 3 4 0012520 B B S L X I B U F 0012540 R B U F 1 \r 3 5 0012560 376 001 \0 300 353 B B S L 0012600 A S T B B S T Y I B U F 1 0012620 X C N T \r 3 6 0012640 B B D L X B O O T T 0012660 Y P E I B U F 2 \r 3 7 0012700 B B D T Y 0012720 I B U F 3 P A G E C O U N T \r 0012740 4 0 0012760 B B G R A Y L O C A L C A C H 0013000 E 0 W B U F \r 4 1 0013020 B B G R A Y 1 0013040 L O C A L C A C H E 1 W B U F 0013060 1 \r 4 2 0013100 B B G R A Y 2 L O C A L C 0013120 A C H E 2 W B U F 2 \r 0013140 4 3 L O C A 0013160 L C A C H E 3 376 001 \0 265 _ W B U 0013200 F 3 \r 4 4 0013220 B B D E S T Q U E U E 1 0013240 X B U F \r 4 5 0013260 Q U E U E 1 H I X 0013300 B U F 1 \r 4 6 0013320 Q U E U E 2 X B U F 0013340 2 \r 4 7 0013360 Q U E U E 2 H I X B U F 3 0013400 \r 5 0 0013420 B B S R C B B Y H I I T E 0013440 M P Q T E M P Y B U F \r 0013460 5 1 I T 0013500 E M P 1 Q T E M P H I Y B U 0013520 F 1 \r 5 2 0013540 E R R O R C N T R T E M 0013560 P Y B U F 2 \r 5 376 001 \0 0013600 021 f 3 E R R 0013620 O R C O U N T X R T E M P 1 0013640 Y B U F 3 \r 5 4 0013660 G L O B A L R P A 0013700 C 0 \r 5 5 0013720 G L O B A L H I R P A C 0013740 3 \r 5 6 0013760 B B S R C Q L O L P D E S 0014000 T W W X F M Y X N X H \r 0014020 5 7 A 0014040 C T I V E B B S R C Q H I I 0014060 N T L E V E L L P D E S T H I 0014100 X B I X F M X \r 6 0 0014120 R 4 0 0 \r 0014140 6 1 A 0014160 L L O N E S \r 6 2 0014200 376 001 \0 317 ) M E M S 0014220 T A T \r 6 3 0014240 X F W D C \r 6 4 0014260 B B N E G I 0014300 T E M W I D D M A P R F L A 0014320 G S X F A T P R E G \r 0014340 6 5 A S S I 0014360 G N E D D M A H I X F G F I 0014400 W O R D \r 6 6 0014420 B B S R C W L O L P 0014440 M Q X F C O U N T X F T E 0014460 M P 2 \r 6 7 0014500 B B S B M R I N T T Y 0014520 P E L P H I X F F S I \r 0014540 7 0 B B 0014560 D E S T Q L O X F F R A M E 0014600 Z B U F \r 376 001 \0 { 340 7 1 0014620 B B D E S T 0014640 Q H I R L I N K X F R L I N 0014660 K Z B U F 1 \r 7 2 0014700 B B N E G S D N 0014720 O N O V E R L A P P R T I M E 0014740 X F T E M P Z B U F 2 \r 0014760 7 3 B B 0015000 D E S T W L O P R O C E S S 0015020 X F T E M P 1 Z B U F 3 \r 0015040 7 4 R W 0015060 P A C 2 S K I P P C F 0 X F 0015100 B R K B Y T E \r 7 5 0015120 R W P A C 1 S 0015140 K I P P C F 1 \r 7 6 0015160 R W P A C 0 S 0015200 K I P P C F 2 T I C K 376 001 \0 \n 0015220 5 C O U N T \r 7 7 0015240 R W P A C 3 S K 0015260 I P P C F 3 X F X T S R E G \r 0015300 \r 1 0 0 0015320 E X T E M P 2 M A P E N T R 0015340 Y \r 1 0 1 0015360 E X C O U N T T A S K N U 0015400 M B E R \r 1 0 2 0015420 E X P T R R E F T Y 0015440 P E \r 1 0 3 0015460 C R A S H C O D E E X P 0015500 T R H I \r 1 0 4 0015520 C A R D N U M B E R 0015540 E X T E M P 1 \r 1 0 5 0015560 E X T E M P M 0015600 A P F L A G S \r 1 0 6 0015620 376 001 \0 211 374 Q U A 0015640 D A D D R \r 1 0 7 0015660 S Y N D R O M E \r 0015700 1 2 0 C 0015720 D C T E M P \r 1 2 1 0015740 C D C T E M P 1 \r 0015760 1 2 4 0016000 C D C D P T R \r 1 2 5 0016020 C D C D P T R H 0016040 I \r 1 2 6 0016060 C D C C M P T R \r 1 2 0016100 7 C D C C M 0016120 P T R H I \r 1 3 0 0016140 C D C S C A N L I N 0016160 E C O U N T \r 1 3 1 0016200 C D C W O R D C O 0016220 U N T \r 376 001 \0 036 266 1 3 2 0016240 C D C M D S L 0016260 O C \r 1 3 3 0016300 C D C M D S L O C H I \r 0016320 1 4 0 E 0016340 O T E M P 2 \r 1 4 1 0016360 E O C O U N T \r 0016400 1 4 2 E 0016420 O P T R \r 1 4 3 0016440 E O P T R H I \r 0016460 1 4 4 E O T 0016500 E M P 1 \r 1 4 5 0016520 E O T E M P \r 1 0016540 6 0 E I T E 0016560 M P 2 \r 1 6 1 0016600 E I C O U N T \r 1 0016620 6 2 376 001 \0 % 265 0016640 E I P T R \r 1 6 3 0016660 E I P T R H I \r 0016700 1 6 4 E 0016720 I T E M P 1 \r 1 6 5 0016740 E I T E M P \r 0016760 1 6 6 E M 0017000 D S 6 0 0 \r 1 6 7 0017020 E M D S 6 0 0 H I \r 0017040 1 7 0 0017060 E F L A G \r \r 2 0 0 0017100 R D C T E M P \r 0017120 2 0 1 R 0017140 D C T E M P 1 \r 2 0 2 0017160 R D C L O N G P 0017200 O I N T E R \r 2 0 3 0017220 R D C L O N G P O 0017240 376 001 \0 362 \t I N T E R 1 \r 2 0017260 0 4 R D C C 0017300 O U N T \r 2 0 5 0017320 R D C P A R T I T I O 0017340 N \r 2 0 6 0017360 R D C A L T O C O M M A N D 0017400 \r 2 0 7 0017420 R D C I N T W O R D \r 2 0017440 1 0 R D C A 0017460 L T O S T A T U S \r 2 1 1 0017500 R D C A L T 0017520 O D A R D C D I S K C O M M A 0017540 N D \r 2 1 2 0017560 R D C D I S K S T A T U S 0017600 \r 2 1 3 0017620 R D C P O S I T I O N \r 0017640 2 1 4 376 001 \0 @ z 0017660 R D C 5 2 0 \r 2 1 5 0017700 R D C 5 2 0 H 0017720 I \r 2 1 6 0017740 R D C D C B \r 2 1 7 0017760 R D C D C B H 0020000 I \r 2 4 0 0020020 V D B U F 0 \r 2 4 1 0020040 V D B U F 1 \r 0020060 2 4 2 0020100 V T E M P 1 \r 2 4 3 0020120 V T E M P \r 0020140 2 4 4 V L I 0020160 N K \r 2 4 5 0020200 V N W R D S \r 2 4 6 0020220 V D B A V 0020240 S I Z E \r 2 4 376 001 \0 304 254 7 0020260 V S L C \r 0020300 2 5 0 V 0020320 B A S E \r 2 5 1 0020340 V B A S E H I \r 0020360 2 5 2 V C R 0020400 \r 2 5 3 0020420 V C U R S O R Y \r 2 5 4 0020440 V C U R R E 0020460 N T Y \r 2 5 5 0020500 V C U R S O R C O N T R 0020520 O L \r 2 5 6 0020540 V M S G \r 2 5 7 0020560 V C N T \r 0020600 2 6 0 V M S 0020620 G S T A T U S \r 2 6 1 0020640 V M O U S E X 376 0020660 001 \0 e 313 Y \r 2 6 2 0020700 V B U T T O N S \r 0020720 2 6 3 V 0020740 K E Y B U F F E R \r 2 6 4 0020760 V F I E L D 0021000 F I L L \r 2 7 0 0021020 H E A D E R F L A K E 0021040 C N T \r 2 7 1 0021060 S E R V I C E L A T E C 0021100 N T \r 2 7 2 0021120 V M D S 1 7 7 4 0 0 \r 0021140 2 7 3 V M 0021160 D S 1 7 7 4 0 0 H I \r 2 7 0021200 4 V M D S 4 0021220 2 0 \r 2 7 5 0021240 V M D S 4 2 0 H I \r 0021260 2 7 6 376 001 \0 340 J 0021300 V M D S V Z E R O \r 0021320 2 7 7 V M D 0021340 S H I \r \r 3 2 2 0021360 R T C L O W L O W \r 0021400 3 2 3 R 0021420 T C L O W \r 3 2 4 0021440 R C O N S T A N T L 0021460 O \r 3 2 5 0021500 R C O N S T A N T H I \r 0021520 3 2 6 S T 0021540 O R A G E P A G E S \r 3 4 0021560 0 T I M E R 0021600 B A S E \r 3 4 1 0021620 T I M E R B A S E H I 0021640 \r 3 4 2 0021660 R S I M A G E \r 376 001 \0 314 205 0021700 3 4 3 T I 0021720 M E R T E M P \r 3 4 4 0021740 X P A G E C O U 0021760 N T \r 3 4 5 0022000 X S T O R A G E F A U L T 0022020 S \r 3 4 6 0022040 X H A R D B A D P A G E S \r 0022060 3 4 7 0022100 X S O F T B A D P A G E S \r 0022120 3 5 2 P N 0022140 I P S M A S H 0 \r 3 5 3 0022160 P N I P S M A 0022200 S H 1 \r 3 5 7 0022220 R T I M E R \r 3 6 0022240 0 P I P E R 0022260 E G \r 3 6 1 376 001 0022300 \0 | 360 P I P E R E G 1 0022320 \r 3 6 2 0022340 P I P E R E G 2 R W 1 \r 0022360 3 6 3 P I 0022400 P E R E G 3 R W 0 \r 3 6 0022420 4 P I P E R 0022440 E G 4 R C N T \r 3 6 5 0022460 P I P E R E G 0022500 5 R A D D R \r 3 6 6 0022520 F F A U L T \r 0022540 3 6 7 F 0022560 A U L T P A R M R D A T A \r 0022600 3 7 0 R 0022620 W S T A T \r 3 7 1 0022640 R T M P \r 3 7 0022660 2 R X S T K 0022700 \r 376 \0 m 267 323 3 7 3 0022720 R X P P B \r 3 0022740 7 4 R X C T 0022760 A S K \r 3 7 5 0023000 R X A P C \r 3 7 6 0023020 R X A L U \r 0023040 3 7 7 0023060 R E F R \r 377 \0 \0 A M e s a . c s 0023100 m a p \0 373 232 376 251 372 \0 \0 376 001 \0 344 J 0023120 * M i c r o D 9 . 1 3 ( O 0023140 S 1 6 ) o f F e b r u a r 0023160 y 2 , 1 9 8 1 \r * a t 0023200 2 7 - M a y - 8 3 1 7 : 0 1 0023220 : 0 2 \r \r A M e s a c o n t a 0023240 i n s t h e f o l l o w i n 0023260 g m o d u l e s : \r \r G l 0023300 o b a l D e f s 0023320 0 ( 0 D ) \r O 0023340 v e r l a y O c c u p i e d 0023360 0 ( 0 D ) \r 0023400 I n i t i a l i z e 0023420 3 4 1 ( 2 2 5 D ) 0023440 \r F a u l t 0023460 2 5 3 ( 1 7 0023500 1 D ) \r T i m e r 0023520 376 001 \0 271 345 0023540 6 1 ( 4 9 D ) \r L F D 0023560 i s p l a y 0023600 4 7 1 ( 3 1 3 D ) \r 0023620 D i s k 0023640 4 3 6 ( 2 8 6 D ) 0023660 \r E t h e r 0023700 2 4 6 ( 1 6 0023720 6 D ) \r C D C T a s k 0023740 5 3 0023760 ( 4 3 D ) \r D i s p l a y I 0024000 n i t 1 6 0024020 7 ( 1 1 9 D ) \r A l t o 0024040 0024060 1 2 2 6 ( 6 6 2 D ) \r A l 0024100 t o X 0024120 376 001 \0 257 025 6 2 ( 5 0 0024140 D ) \r B i t B l t 0024160 4 0 0 ( 0024200 2 5 6 D ) \r M e s a L S 0024220 5 4 0024240 5 ( 3 5 7 D ) \r M e s a J 0024260 0024300 3 5 3 ( 2 3 5 D ) \r M e 0024320 s a X 0024340 1 0 1 0 ( 5 2 0 D ) \r 0024360 M e s a P 0024400 4 7 3 ( 3 1 5 D 0024420 ) \r M e s a I O 0024440 2 7 ( 2 0024460 3 D ) \r \r T o t a l I n s t r 0024500 u c t i o n s = 7 3 1 6 0024520 ( 3 7 9 0 D ) \r \r P 376 001 \0 ) 355 a 0024540 g e 0 ( 0 D ) : \r 0024560 I n i t i a l i z e 0024600 1 4 ( 1 2 D ) 0024620 \r F a u l t 0024640 2 5 2 ( 1 7 0024660 0 D ) \r A l t o 0024700 3 1 0024720 ( 2 5 D ) \r M e s a J 0024740 0024760 6 ( 6 D ) \r I M R E S E R 0025000 V E d 0025020 4 2 ( 3 4 D ) \r F r e e 0025040 I n s t r u c t i o n s = 0025060 1 1 ( 9 D ) \r \r P a g e 0025100 1 ( 1 D ) : \r A 0025120 l t o 376 0025140 001 \0 327 241 3 3 6 ( 2 0025160 2 2 D ) \r A l t o X 0025200 3 6 0025220 ( 3 0 D ) \r F r e e I n 0025240 s t r u c t i o n s = 0025260 4 ( 4 D ) \r \r P a g e 0025300 2 ( 2 D ) : \r L F D 0025320 i s p l a y 0025340 3 7 7 ( 2 5 5 D ) \r 0025360 F r e e I n s t r u c t i o n 0025400 s = 1 ( 1 D ) \r 0025420 \r P a g e 3 ( 3 D ) 0025440 : \r T i m e r 0025460 3 6 ( 3 0025500 0 D ) \r E t h e r 0025520 2 2 2 0025540 ( 1 4 6 376 001 \0 201 t D ) \r A l 0025560 t o 0025600 1 1 1 ( 7 3 D ) \r 0025620 I M R E S E R V E d 0025640 2 ( 2 D ) \r 0025660 F r e e I n s t r u c t i o 0025700 n s = 5 ( 5 D ) 0025720 \r \r P a g e 4 ( 4 D 0025740 ) : \r A l t o 0025760 3 3 ( 0026000 2 7 D ) \r M e s a L S 0026020 1 5 3 0026040 ( 1 0 7 D ) \r M e s a X 0026060 0026100 5 0 ( 4 0 D ) \r M e s a 0026120 P 0026140 1 1 7 ( 7 9 376 001 \0 023 221 D ) 0026160 \r F r e e I n s t r u c t 0026200 i o n s = 3 ( 3 0026220 D ) \r \r P a g e 5 ( 0026240 5 D ) : \r A l t o 0026260 6 0026300 ( 6 D ) \r M e s a L S 0026320 3 7 0026340 2 ( 2 5 0 D ) \r F r e e 0026360 I n s t r u c t i o n s = 0026400 0 ( 0 D ) \r \r P a g e 0026420 6 ( 6 D ) : \r A 0026440 l t o 0026460 2 4 ( 2 0 D ) \r 0026500 M e s a J 0026520 3 4 5 ( 2 2 9 D 0026540 ) \r M e s a X 376 001 0026560 \0 221 365 0026600 7 ( 7 D ) \r F r e e I 0026620 n s t r u c t i o n s = 0026640 0 ( 0 D ) \r \r P a g e 0026660 7 ( 7 D ) : \r F a 0026700 u l t 0026720 1 ( 1 D ) \r A 0026740 l t o 0026760 1 0 ( 8 D ) \r 0027000 M e s a X 0027020 3 6 6 ( 2 4 6 D ) 0027040 \r F r e e I n s t r u c t 0027060 i o n s = 1 ( 1 0027100 D ) \r \r P a g e 1 0 ( 0027120 8 D ) : \r T i m e r 0027140 6 0027160 ( 6 376 001 \0 { 217 D ) \r D i s 0027200 k 0027220 1 3 ( 1 1 D ) \r A 0027240 l t o 0027260 6 ( 6 D ) \r 0027300 M e s a X 0027320 3 4 3 ( 2 2 7 D ) 0027340 \r M e s a I O 0027360 4 ( 4 D 0027400 ) \r F r e e I n s t r u c 0027420 t i o n s = 2 ( 0027440 2 D ) \r \r P a g e 1 1 0027460 ( 9 D ) : \r A l t o 0027500 2 0027520 4 ( 2 0 D ) \r M e s a P 0027540 0027560 3 5 4 ( 2 3 6 376 001 \0 352 P D ) \r 0027600 F r e e I n s t r u c t i 0027620 o n s = 0 ( 0 D 0027640 ) \r \r P a g e 1 2 ( 1 0027660 0 D ) : \r A l t o X 0027700 1 1 0027720 ( 9 D ) \r B i t B l t 0027740 3 6 0027760 7 ( 2 4 7 D ) \r F r e e 0030000 I n s t r u c t i o n s = 0030020 0 ( 0 D ) \r \r P a g e 0030040 1 3 ( 1 1 D ) : \r 0030060 L F D i s p l a y 0030100 4 ( 4 D ) \r 0030120 A l t o 0030140 3 5 1 ( 2 3 3 D 0030160 ) \r A l t o X 376 001 \0 0030200 , 352 0030220 1 3 ( 1 1 D ) \r F r e e 0030240 I n s t r u c t i o n s = 0030260 1 0 ( 8 D ) \r \r P a g e 0030300 1 4 ( 1 2 D ) : \r 0030320 D i s k 0030340 3 7 3 ( 2 5 1 D ) 0030360 \r F r e e I n s t r u c t 0030400 i o n s = 5 ( 5 0030420 D ) \r \r P a g e 1 5 ( 0030440 1 3 D ) : \r I n i t i a l i 0030460 z e 1 0030500 3 ( 1 1 D ) \r L F D i s p 0030520 l a y 0030540 6 6 ( 5 4 D ) \r D i s k 0030560 0030600 376 001 \0 255 211 1 6 ( 1 4 D ) 0030620 \r C D C T a s k 0030640 5 3 ( 4 3 0030660 D ) \r A l t o 0030700 2 6 ( 0030720 2 2 D ) \r B i t B l t 0030740 1 1 0030760 ( 9 D ) \r M e s a I O 0031000 2 0031020 3 ( 1 9 D ) \r I M R E S E 0031040 R V E d 0031060 1 2 4 ( 8 4 D ) \r F r e e 0031100 I n s t r u c t i o n s = 0031120 0 ( 0 D ) \r \r P a g 0031140 e 1 6 ( 1 4 D ) : \r 0031160 I n i t i a l i z e 0031200 376 001 \0 n 213 3 1 2 0031220 ( 2 0 2 D ) \r I M R E S E R 0031240 V E d 0031260 1 4 ( 1 2 D ) \r F r e e 0031300 I n s t r u c t i o n s = 0031320 5 2 ( 4 2 D ) \r \r P a g 0031340 e 1 7 ( 1 5 D ) : \r 0031360 T i m e r 0031400 1 5 ( 1 3 D ) 0031420 \r D i s k 0031440 1 2 ( 1 0 0031460 D ) \r E t h e r 0031500 2 4 ( 0031520 2 0 D ) \r D i s p l a y I n 0031540 i t 1 6 7 0031560 ( 1 1 9 D ) \r I M R E S E 0031600 R V E d 376 \0 1 002 0031620 346 1 2 0 ( 8 0 D ) \r 0031640 F r e e I n s t r u c t i o 0031660 n s = 1 6 ( 1 4 D 0031700 ) \r 377 \0 \0 N e w A M e s a . c s 0031720 m a p \0 373 232 376 232 324 \0 \0 376 001 \0 307 327 0031740 * M i c r o D 9 . 1 3 ( O 0031760 S 1 6 ) o f F e b r u a r 0032000 y 2 , 1 9 8 1 \r * a t 0032020 2 7 - M a y - 8 3 1 5 : 5 6 0032040 : 3 2 \r \r N e w A M e s a c o 0032060 n t a i n s t h e f o l l o 0032100 w i n g m o d u l e s : \r \r 0032120 G l o b a l D e f s 0032140 0 ( 0 D ) \r 0032160 K e r n e l O c c u p i e d 0032200 0 ( 0 D ) 0032220 \r L o a d R A M 0032240 4 2 ( 3 4 0032260 D ) \r I n i t i a l i z e 0032300 4 1 6 ( 0032320 2 7 0 D ) \r F a u l t 0032340 376 001 \0 211 277 0032360 3 1 5 ( 2 0 5 D ) \r 0032400 T i m e r 0032420 6 4 ( 5 2 D ) \r 0032440 D i s p l a y 0032460 3 7 5 ( 2 5 3 0032500 D ) \r D i s k 0032520 4 3 6 ( 0032540 2 8 6 D ) \r E t h e r 0032560 2 4 0032600 6 ( 1 6 6 D ) \r C D C T a 0032620 s k 0032640 5 3 ( 4 3 D ) \r D i s 0032660 p l a y I n i t 0032700 1 0 3 ( 6 7 D ) \r A 0032720 l t o 0032740 1 376 001 \0 267 ( 2 2 6 ( 6 0032760 6 2 D ) \r A l t o X 0033000 6 2 0033020 ( 5 0 D ) \r B i t B l t 0033040 4 0033060 0 0 ( 2 5 6 D ) \r M e s a 0033100 L S 0033120 5 4 5 ( 3 5 7 D ) \r M 0033140 e s a J 0033160 3 5 3 ( 2 3 5 D ) \r 0033200 M e s a X 0033220 1 0 1 0 ( 5 2 0 0033240 D ) \r M e s a P 0033260 4 7 3 ( 0033300 3 1 5 D ) \r M e s a I O 0033320 2 0033340 7 ( 2 3 D ) \r \r T 376 001 \0 242 ~ o 0033360 t a l I n s t r u c t i o n s 0033400 = 7 3 2 2 ( 3 7 9 4 D ) 0033420 \r \r P a g e 0 ( 0 D 0033440 ) : \r L o a d R A M 0033460 4 2 ( 0033500 3 4 D ) \r I n i t i a l i z 0033520 e 1 4 0033540 ( 1 2 D ) \r F a u l t 0033560 2 0033600 6 1 ( 1 7 7 D ) \r A l t o 0033620 0033640 3 1 ( 2 5 D ) \r M e 0033660 s a J 0033700 6 ( 6 D ) \r F 0033720 r e e I n s t r u c t i o n s 0033740 = 2 ( 2 D ) \r 376 0033760 001 \0 335 253 \r P a g e 1 0034000 ( 1 D ) : \r A l t o 0034020 3 3 0034040 6 ( 2 2 2 D ) \r A l t o X 0034060 0034100 3 6 ( 3 0 D ) \r F r e 0034120 e I n s t r u c t i o n s = 0034140 4 ( 4 D ) \r \r P a 0034160 g e 2 ( 2 D ) : \r 0034200 D i s p l a y 0034220 3 7 1 ( 2 4 9 D 0034240 ) \r F r e e I n s t r u c 0034260 t i o n s = 7 ( 0034300 7 D ) \r \r P a g e 3 0034320 ( 3 D ) : \r T i m e r 0034340 4 0034360 1 ( 3 376 001 \0 306 B 3 D ) \r E 0034400 t h e r 0034420 2 2 2 ( 1 4 6 D ) \r 0034440 A l t o 0034460 1 1 1 ( 7 3 D 0034500 ) \r I M R E S E R V E d 0034520 2 ( 2 0034540 D ) \r F r e e I n s t r u 0034560 c t i o n s = 2 0034600 ( 2 D ) \r \r P a g e 4 0034620 ( 4 D ) : \r A l t o 0034640 0034660 3 3 ( 2 7 D ) \r M e s a L 0034700 S 0034720 1 5 3 ( 1 0 7 D ) \r M e 0034740 s a X 0034760 5 0 ( 376 001 \0 346 312 4 0 0035000 D ) \r M e s a P 0035020 1 1 7 ( 0035040 7 9 D ) \r F r e e I n s t 0035060 r u c t i o n s = 0035100 3 ( 3 D ) \r \r P a g e 0035120 5 ( 5 D ) : \r A l t o 0035140 0035160 6 ( 6 D ) \r M e s a 0035200 L S 0035220 3 7 2 ( 2 5 0 D ) \r F 0035240 r e e I n s t r u c t i o n s 0035260 = 0 ( 0 D ) \r \r 0035300 P a g e 6 ( 6 D ) : 0035320 \r A l t o 0035340 2 4 ( 2 0 0035360 D ) \r M e s a J 376 001 0035400 \0 [ 034 0035420 3 4 5 ( 2 2 9 D ) \r M e s 0035440 a X 0035460 7 ( 7 D ) \r F r 0035500 e e I n s t r u c t i o n s 0035520 = 0 ( 0 D ) \r \r P 0035540 a g e 7 ( 7 D ) : \r 0035560 F a u l t 0035600 1 ( 1 D ) 0035620 \r A l t o 0035640 1 0 ( 8 D 0035660 ) \r M e s a X 0035700 3 6 6 ( 2 0035720 4 6 D ) \r F r e e I n s t 0035740 r u c t i o n s = 0035760 1 ( 1 D ) \r \r P a g e 0036000 1 0 376 001 \0 247 m ( 8 D ) : \r 0036020 T i m e r 0036040 6 ( 6 D ) \r 0036060 D i s k 0036100 1 3 ( 1 1 D ) 0036120 \r A l t o 0036140 6 ( 6 D 0036160 ) \r M e s a X 0036200 3 4 3 ( 2 0036220 2 7 D ) \r M e s a I O 0036240 4 0036260 ( 4 D ) \r F r e e I n s 0036300 t r u c t i o n s = 0036320 2 ( 2 D ) \r \r P a g e 0036340 1 1 ( 9 D ) : \r A l t o 0036360 0036400 2 4 ( 2 376 001 \0 344 \b 0 D ) 0036420 \r M e s a P 0036440 3 5 4 ( 2 3 0036460 6 D ) \r F r e e I n s t r 0036500 u c t i o n s = 0 0036520 ( 0 D ) \r \r P a g e 1 0036540 2 ( 1 0 D ) : \r A l t o X 0036560 0036600 1 1 ( 9 D ) \r B i t B 0036620 l t 0036640 3 6 7 ( 2 4 7 D ) \r F 0036660 r e e I n s t r u c t i o n s 0036700 = 0 ( 0 D ) \r \r 0036720 P a g e 1 3 ( 1 1 D ) 0036740 : \r D i s p l a y 0036760 4 ( 4 0037000 D ) \r A l t o 376 001 \0 0037020 224 236 0037040 3 5 1 ( 2 3 3 D ) \r A l t 0037060 o X 0037100 1 3 ( 1 1 D ) \r F 0037120 r e e I n s t r u c t i o n s 0037140 = 1 0 ( 8 D ) \r \r 0037160 P a g e 1 4 ( 1 2 D ) 0037200 : \r D i s k 0037220 3 7 3 ( 2 0037240 5 1 D ) \r F r e e I n s t 0037260 r u c t i o n s = 0037300 5 ( 5 D ) \r \r P a g e 0037320 1 5 ( 1 3 D ) : \r I n i t 0037340 i a l i z e 0037360 1 3 ( 1 1 D ) \r D i 0037400 s k 0037420 376 001 \0 355 256 1 6 ( 1 4 0037440 D ) \r C D C T a s k 0037460 5 3 ( 0037500 4 3 D ) \r A l t o 0037520 2 6 0037540 ( 2 2 D ) \r B i t B l t 0037560 0037600 1 1 ( 9 D ) \r M e s a I O 0037620 0037640 2 3 ( 1 9 D ) \r F r e e 0037660 I n s t r u c t i o n s = 0037700 2 1 2 ( 1 3 8 D ) \r \r P 0037720 a g e 1 6 ( 1 4 D ) : 0037740 \r I n i t i a l i z e 0037760 3 6 4 ( 2 4 0040000 4 D ) \r I M R E S E R V E d 0040020 376 001 \0 177 a 0040040 1 4 ( 1 2 D ) \r F r e 0040060 e I n s t r u c t i o n s = 0040100 0 ( 0 D ) \r \r P a 0040120 g e 1 7 ( 1 5 D ) : \r 0040140 I n i t i a l i z e 0040160 3 ( 3 D ) 0040200 \r F a u l t 0040220 3 3 ( 2 7 0040240 D ) \r T i m e r 0040260 1 5 ( 0040300 1 3 D ) \r D i s k 0040320 1 2 0040340 ( 1 0 D ) \r E t h e r 0040360 0040400 2 4 ( 2 0 D ) \r D i s p l 0040420 a y I n i t 376 \0 T & 0040440 264 1 0 3 ( 6 7 D ) \r 0040460 I M R E S E R V E d 0040500 1 2 0 ( 8 0 D 0040520 ) \r F r e e I n s t r u c 0040540 t i o n s = 4 4 ( 0040560 3 6 D ) \r 377 \0 \0 N e w A M e s a 0040600 . M i d a s \0 373 226 ' 334 y \0 \0 376 \0 0040620 361 [ T L X L o a d N E W A 0040640 M E S A \r L B 1 A d d r R 0040660 M 3 6 6 \r L B 1 V a l 1 0040700 0 0 0 0 \r L B 0 A d d r P 0040720 C B \r L B 1 A d d r N W W 0040740 \r L B 2 A d d r D M A \r L 0040760 B 3 A d d r A C 0 \r L B 0041000 4 A d d r A C 1 \r L B 5 0041020 A d d r A C 2 \r L B 6 A d 0041040 d r A C 3 \r L B 7 A d d r 0041060 I B U F \r L B 8 A d d r 0041100 I B U F 1 \r L B 9 A d d r 0041120 I B U F 2 \r L B 1 0 A d d r 0041140 I B U F 3 \r L X T i m e O 0041160 u t 1 0 0 0 0 \r L X S S 0041200 K G O \r 377 \0 \0 B i t B l t . M i 0041220 d a s \0 373 225 / 233 326 \0 \0 376 001 \0 H 321 0041240 L B 1 2 A d d r B B D E S 0041260 T Q L O \r L B 1 3 A d d r 0041300 B B D E S T Q H I \r L B 1 4 0041320 A d d r B B D E S T W L O \r L 0041340 B 1 5 A d d r B B D B M R 0041360 \r L B 1 6 A d d r B B D L 0041400 X \r L B 1 7 A d d r B B D 0041420 L A S T \r L C 1 2 A d d r 0041440 B B S R C Q L O \r L C 1 3 A 0041460 d d r B B S R C Q H I \r L C 0041500 1 4 A d d r B B S R C W L O 0041520 \r L C 1 5 A d d r B B S B 0041540 M R \r L C 1 6 A d d r B B 0041560 S L X \r L C 1 7 A d d r B 0041600 B S L A S T \r L B 1 8 A d d 0041620 r B B F U N C T I O N \r L C 0041640 376 \0 ` { 260 8 A d d r B B I T 0041660 E M S L E F T \r L C 9 A d d 0041700 r B B N E G I T E M W I D \r L 0041720 C 1 0 A d d r B B N E G B 0041740 I T S L E F T \r L C 1 8 A d 0041760 d r B B N E G S D N O N O V E 0042000 R L A P \r 377 \0 \0 M e m E r r o r 0042020 s . M i d a s \0 373 226 ' U 332 \0 \0 376 0042040 \0 243 ; 032 L C 9 A d d r M A 0042060 P E N T R Y \r L C 1 0 A d d 0042100 r T A S K N U M B E R \r L C 0042120 1 1 A d d r R E F T Y P E \r 0042140 L C 1 2 A d d r C R A S H 0042160 C O D E \r L C 1 3 A d d r 0042200 C A R D N U M B E R \r L C 1 4 0042220 A d d r M A P F L A G S \r L 0042240 C 1 5 A d d r Q U A D A D 0042260 D R \r L C 1 6 A d d r S Y 0042300 N D R O M E \r 377 \0 \0 D 0 L a n g 0042320 . M c \0 373 230 \t \a 022 \0 \0 376 001 \0 303 h 0042340 % D 0 L a n g . m c \r E d i t 0042360 h i s t o r y : \r 2 9 O c t 0042400 8 1 b y F i a l a \t F i x 0042420 S t a c k & + / - n _ S t 0042440 a c k & + / - n F 2 . u s e d 0042460 . t w i c e b u g \r 1 S e 0042500 p 8 1 b y F i a l a \t A d 0042520 d e d o t h e r R M r e g 0042540 , F 2 w i t h R e a d P i 0042560 p e \r 6 F e b 8 1 b y 0042600 F i a l a \t A d d e d : U N L 0042620 E S S , H I A , L O A , N 0042640 S A L U F , A L U R E S U L T 0042660 & N S A L U F \r 9 D e c 8 0042700 0 b y F i a l a \t A d d R 0042720 V 2 , R V 4 , P S E T m a 0042740 376 001 \0 302 273 c r o s \r 2 9 O c t 0042760 8 0 b y F i a l a \t A d d 0043000 e d O D D O K a n d N O N 0043020 Q U A D O K \r \r N a m i n g c 0043040 o n v e n t i o n : I n t e 0043060 r n a l s y m b o l s n o t 0043100 u s e d b y p r o g r a m 0043120 m e r s a l l e n d w i t 0043140 h \r " @ " ; s y m b o l s d 0043160 e f i n e d i n t h e " D 0043200 0 M i c r o A s s e m b l e r 0043220 " d o c u m e n t a n d M 0043240 i c r o \r b u i l t i n s d o 0043260 n ' t . \r % \r B U I L T I N [ M 0043300 A C R O , 2 ] ; \r B U I L T I N 0043320 [ N E U T R A L , 3 ] ; \r B U I 0043340 L T I N [ 376 001 \0 Q P M E M O R Y 0043360 , 4 ] ; \t * D e c l a r e M e 0043400 m o r y [ n a m e , w o r d s i 0043420 z e , l e n g t h , s r c m a c 0043440 r o , \r \t \t \t * s i n k m a c r 0043460 o , t a g m a c r o , p o s t m 0043500 a c r o ] \r B U I L T I N [ T A 0043520 R G E T , 5 ] ; \r B U I L T I N 0043540 [ D E F A U L T , 6 ] ; \r B U I 0043560 L T I N [ F I E L D , 7 ] ; \t * 0043600 D e c l a r e f i e l d ( # 0043620 1 = b i t 1 , # 2 = b 0043640 i t n ) \r B U I L T I N [ P F , 0043660 1 0 ] ; \t \t * P r e a s s i g n 0043700 v a l u e t o f i e l d \r 0043720 B U I L T I N [ S E T , 1 1 ] ; 0043740 \t * D e c l a r e 376 001 \0 \b 223 i 0043760 n t e g e r a n d s e t v 0044000 a l u e \r B U I L T I N [ A D D 0044020 , 1 2 ] ; \t * A d d u p t o 0044040 8 i n t e g e r s \r B U I L 0044060 T I N [ I P , 1 3 ] ; \t \t * I n 0044100 t e g e r p a r t o f a d 0044120 d r e s s \r B U I L T I N [ I F 0044140 S E , 1 4 ] ; \t * I f s t r i 0044160 n g e q u a l ( I F S E [ s 0044200 1 , s 2 , t r u e , f a l s e ] 0044220 ) \r B U I L T I N [ I F A , 1 5 0044240 ] ; \t * I f f i e l d a s s 0044260 i g n e d ( I F A [ f i e l d 0044300 , t r u e , f a l s e ] ) \r B U 0044320 I L T I N [ I F E , 1 6 ] ; \t * 0044340 I f i n t e g e r s e q u 376 0044360 001 \0 312 L a l \r B U I L T I N [ I 0044400 F G , 1 7 ] ; \t * I f i n t e 0044420 g e r 1 > i n t e g e r 0044440 2 \r B U I L T I N [ I D F , 2 0 0044460 ] ; \t * I f s y m b o l i n 0044500 s y m b o l t a b l e a n 0044520 d n o t u n b o u n d a d 0044540 d r e s s \r * B U I L T I N [ I 0044560 F M E , 2 1 ] ; \t * I f m e m 0044600 o r y p a r t o f a d d r 0044620 e s s e q u a l s s t r i n 0044640 g \r B U I L T I N [ E R , 2 2 ] 0044660 ; \t \t * E r r o r m e s s a g 0044700 e ( E R [ s t r i n g , a b o 0044720 r t f l a g , i n t e g e r ] ) 0044740 \r \t \t \t * a b o r t f l a g = 0044760 0 m 376 001 \0 O 207 e s s a g e , 0045000 1 f a t a l , 2 e r r o 0045020 r , 3 w a r n i n g \r B U I 0045040 L T I N [ L I S T , 2 3 ] ; \t * 0045060 S e t l i s t i n g m o d e 0045100 f o r m e m o r y \r * B U I 0045120 L T I N [ I N S E R T , 2 4 ] ; 0045140 \t * I n s e r t f i l e ( M 0045160 i c r o p r e d e f i n e s 0045200 t h i s n a m e ) \r B U I L T 0045220 I N [ N O T , 2 5 ] ; \t * 1 ' S 0045240 c o m p l e m e n t \r B U I L 0045260 T I N [ R E P E A T , 2 6 ] ; \t 0045300 * R e p e a t t h e t e x t 0045320 # 2 # 1 t i m e s \r B U I 0045340 L T I N [ O R , 2 7 ] ; \t \t * I 0045360 n c l u s i v e 376 001 \0 311 A o r 0045400 u p t o 1 0 i n t e g e 0045420 r s \r B U I L T I N [ X O R , 3 0045440 0 ] ; \t * E x c l u s i v e o 0045460 r u p t o 1 0 i n t e g 0045500 e r s \r B U I L T I N [ A N D , 0045520 3 1 ] ; \t * A n d u p t o 0045540 1 0 i n t e g e r s \r B U I L 0045560 T I N [ C O M C H A R , 3 2 ] ; 0045600 \t * S e t c o m m e n t c h 0045620 a r f o r c o n d i t i o n 0045640 a l a s s e m b l i e s \r * B 0045660 U I L T I N [ B I T T A B L E , 0045700 3 3 ] ; \t * M a k e s # 1 a 0045720 b i t t a b l e o f l e 0045740 n g t h # 2 b i t s \r * B U 0045760 I L T I N [ G E T B I T , 3 376 001 0046000 \0 354 266 4 ] ; \t * I s t h e b 0046020 i t i n b i t t a b l e # 0046040 1 a t p o s . # 2 \r * B U 0046060 I L T I N [ S E T B I T , 3 5 ] 0046100 ; \t * S E T B I T [ t a b l e , 0046120 b i t 1 , n b i t s , d i s t a 0046140 n c e , v a l u e ] \r * B U I L 0046160 T I N [ F I N D B I T , 3 6 ] ; 0046200 \t * F I N D B I T [ t a b l e , 0046220 b i t 1 , n b i t s , d i s t a 0046240 n c e , h o p d i s t a n c e , 0046260 n h o p s ] \r * B U I L T I N [ 0046300 M E M B T , 3 7 ] ; \t * M E M B 0046320 T [ m e m o r y , t a b l e ] 0046340 c r e a t e s a b i t t a 0046360 b l e f o r m e m o r y \r B 0046400 U I L 376 001 \0 P 362 T I N [ L S H I 0046420 F T , 4 0 ] ; \t * S h i f t s 0046440 t h e i n t e g e r # 1 l 0046460 e f t # 2 p o s i t i o n s 0046500 \r B U I L T I N [ R S H I F T , 0046520 4 1 ] ; \t * S h i f t s t h e 0046540 i n t e g e r # 1 r i g h 0046560 t # 2 p o s i t i o n s \r B 0046600 U I L T I N [ F V A L , 4 2 ] ; 0046620 \t * F V A L [ f i e l d ] i s 0046640 a n i n t e g e r w h o s 0046660 e v a l u e i s t h e \r \t 0046700 \t \t * c u r r e n t c o n t e 0046720 n t s o f t h e f i e l d 0046740 \r B U I L T I N [ S E L E C T , 0046760 4 3 ] ; \t * # 1 i s a n i 0047000 n t e g e r . 376 001 \0 345 267 g e . 0047020 0 a n d . l e . 7 . 0047040 e v a l u a t e s \r \t \t \t * # 2 0047060 i f # 1 = 0 , . . . , 0047100 # 9 i f # 1 = 7 . 0047120 E r r o r i f # 1 > 7 \r 0047140 B U I L T I N [ S E T P O S T , 0047160 4 4 ] ; \t * S e t p o s t - e 0047200 v a l u a t i o n m a c r o 0047220 ( S E T P O S T [ m e m , m a c 0047240 r o ] ) \r B U I L T I N [ L I S 0047260 T F I E L D S , 4 6 ] ; \t * L I 0047300 S T F I E L D S [ m e m , w o r 0047320 d ] a s s e m b l e s w o r 0047340 d a s f o r D E F A U L T 0047360 \r \t \t \t * a n d t h e 1 - b 0047400 i t s d e n o t e t h 376 001 \0 0047420 033 021 e r i g h t - m o s t b 0047440 i t s o f f i e l d s \r \t \t 0047460 \t * i n t h e o c t a l l 0047500 i s t i n g . \r B U I L T I N [ 0047520 S E T M B E X T , 4 7 ] ; \t * S 0047540 e t . m b f i l e e x t e 0047560 n s i o n \r B U I L T I N [ S U 0047600 B , 5 0 ] ; \t * S U B [ a 1 , 0047620 a 2 , . . . , a n ] = 0047640 a 1 - a 2 - . . . - a n \r B U I 0047660 L T I N [ E Q U A T E , 5 1 ] ; 0047700 \t * E Q U A T E [ n e w , o l d 0047720 ] g i v e s n e w s a m e 0047740 d e f i n i t i o n a s o 0047760 l d \r B U I L T I N [ A S M M O 0050000 D E , 5 2 ] ; \t * A S M M O D E 0050020 [ 0 376 001 \0 272 023 ] i s n o r m 0050040 a l , A S M M O D E [ 1 ] i 0050060 g n o r e s a l l \r \t \t \t * s 0050100 t a t e m e n t s e x c e p t 0050120 t h o s e b e g i n n i n g 0050140 w i t h " : " \r B U I L T I 0050160 N [ T R A C E M O D E , 5 3 ] ; 0050200 \t * T R A C E M O D E [ n , v ] 0050220 t u r n s o n t r a c i n 0050240 g f e a t u r e n i f v 0050260 n e 0 , \r \t \t \t * o f f i 0050300 f v = 0 . n = 0 i s 0050320 t r a c e s y m b o l i n 0050340 s e r t i o n s , \r \t \t \t * 1 0050360 i s t r a c e a l l a p p 0050400 l i c a t i o n s o f t h e 0050420 f o r m n 376 001 \0 253 367 a m e [ 0050440 a r g s ] \r B U I L T I N [ W H 0050460 I L E , 5 4 ] ; \t * W H I L E [ 0050500 e x p r , c l a u s e ] r e p 0050520 e a t e d l y e x e c u t e s 0050540 c l a u s e w h i l e \r \t \t 0050560 \t * e x p r i s n o n - z e 0050600 r o . \r \r B U I L T I N [ M @ , 0050620 2 ] ; \t \t * = M A C R O ( i n 0050640 t e r n a l u s e ) \r B U I L 0050660 T I N [ F @ , 7 ] ; \t \t * = F I 0050700 E L D \r B U I L T I N [ E Q @ , 0050720 5 1 ] ; \t * = E Q U A T E \r \r S 0050740 E T M B E X T [ D I B ] ; \r \r E 0050760 R [ 2 9 . O c t . 8 1 - - D 0 L 0051000 a n g . v e r s i o n . 1 4 , 0 0051020 ] ; \r \f \r * I M f i e 376 001 \0 u 0051040 305 l d d e f i n i t i o n s \r 0051060 F @ [ M I R M O D @ , 0 , 1 ] ; 0051100 \t * M E M I N S @ a n d R M 0051120 O D @ \r F @ [ R S E L @ , 2 , 5 0051140 ] ; \r F @ [ M R @ , 0 , 5 ] 0051160 ; \t \t * M E M I N S @ , R M O 0051200 D @ , a n d R S E L @ \r F @ 0051220 [ F 2 @ , 2 2 , 2 5 ] ; \t \t * F 0051240 F [ 4 : 7 ] \r F @ [ J C @ , 2 6 0051260 , 3 0 ] ; \t \t * J u m p c o n 0051300 t r o l \r F @ [ J C 0 @ , 2 0051320 6 , 2 6 ] ; \r F @ [ J C 2 @ 0051340 , 3 0 , 3 0 ] ; \r F @ [ J A 2 @ 0051360 , 3 1 , 3 6 ] ; \r F @ [ J A 0051400 7 @ , 3 6 , 3 6 ] ; \r * F @ [ I 0051420 M P A R I T Y @ , 3 7 , 3 7 ] ; 0051440 \t 376 001 \0 A 256 * P a r i t y b i 0051460 t \r F @ [ R X @ , 1 2 0 , 1 2 1 0051500 ] ; \r F @ [ R X 1 @ , 1 2 1 0051520 , 1 2 1 ] ; \r F @ [ J A 1 @ , 1 0051540 2 2 , 1 2 3 ] ; \r \r * F i e l d 0051560 s i n r e g u l a r m i ' 0051600 s \r F @ [ A L F @ , 6 , 1 1 ] ; 0051620 \t \t * A L U F f i e l d \r 0051640 F @ [ A F 0 @ , 6 , 6 ] ; \t \t * 0051660 S i g n o f A L U F f o r 0051700 c o n s t a n t s \r F @ [ B S 0051720 @ , 1 2 , 1 3 ] ; \t \t * S o u r 0051740 c e f o r B ( 0 - 1 = 0051760 c o n s t a n t s , 2 = T 0052000 , 3 = o t h e r ) \r F @ [ 0052020 F 1 @ , 1 4 , 1 7 ] ; \t \t * F F 0052040 [ 0 : 3 ] \r 376 001 \0 301 254 F @ [ 0052060 B S F 1 @ , 1 2 , 1 7 ] ; \t * B 0052100 S @ a n d F 1 @ \r F @ [ L R 0052120 @ , 2 0 , 2 0 ] ; \t \t * L o a d 0052140 R M \r F @ [ L T @ , 2 1 , 2 1 0052160 ] ; \t \t * L o a d T \r \r * F i 0052200 e l d s i n m e m o r y r 0052220 e f e r e n c e m i ' s \r E Q 0052240 @ [ T Y P E @ , A L F @ ] ; \t * 0052260 T y p e o f m e m o r y r 0052300 e f e r e n c e \r F @ [ S R C D 0052320 E S @ , 1 2 , 2 1 ] ; \t * S o u 0052340 r c e / d e s t i n a t i o n \r 0052360 F @ [ S R D S 0 3 @ , 1 2 , 0052400 1 5 ] ; \r F @ [ S R D S 6 7 0052420 @ , 2 0 , 2 1 ] ; \r F @ [ S 0052440 R D S 7 @ , 2 1 , 2 1 376 001 \0 l 357 0052460 ] ; \r F @ [ M R T Y P @ , 0 , 1 0052500 1 ] ; \t * B o t h M R @ a n 0052520 d T Y P E @ \r \r * E x t r a 0052540 s t u f f f o r M i c r o D 0052560 \r F @ [ B R K P @ , 4 0 , 4 0 ] 0052600 ; \t * M i d a s b r e a k p o 0052620 i n t \r F @ [ @ W 0 @ , 4 1 , 4 0052640 1 ] ; \t \t * P l a c e a t a 0052660 b s o l u t e l o c . W 0 \r 0052700 * F @ [ G L B @ , 4 2 , 4 2 ] ; 0052720 \r F @ [ P W 0 @ , 4 3 , 4 3 ] ; 0052740 \t \t * B i t 4 3 = 1 t e l l 0052760 s M i c r o D t h a t 4 4 0053000 : 4 7 c o n t a i n t h e 0053020 p a g e \r \t \t \t * o n w h i c 0053040 h t h e m i s h o u l d 0053060 376 001 \0 I 312 b e p l a c e d \r F 0053100 @ [ W 0 @ , 4 4 , 5 7 ] ; \t \t * 0053120 f u l l a d d r e s s f o r 0053140 p l a c e m e n t \r F @ [ 0053160 P G E @ , 4 4 , 4 7 ] ; \t * p a 0053200 g e f o r m i p l a c e m 0053220 e n t \r \r F @ [ R E T C L @ , 6 0053240 0 , 6 1 ] ; \t * B i t e n c o 0053260 d e d : 2 = d o n ' t c 0053300 o n s t r a i n p l a c e m e 0053320 n t o f t h i s m i \r \t \t 0053340 \t * 1 = p u t W 2 @ a t 0053360 t h i s m i ' s l o c a t 0053400 i o n + 1 m o d 2 0 \r 0053420 F @ [ O D D C A L L @ , 6 2 , 6 0053440 2 ] ; \t * I n d i c a t e s t 0053460 h a t e 376 001 \0 \0 1 v e n t h 0053500 o u g h t h i s m i e n c 0053520 o d e s a C A L L \r \t \t \t * 0053540 i n J C @ , i t s i n l i 0053560 n e s u c c e s s o r i s 0053600 n o t c o n s t r a i n e d 0053620 t o \r \t \t \t * l i e a t . + 0053640 1 i n t h e m i c r o s t 0053660 o r e . \r F @ [ S W P A G E @ , 0053700 6 3 , 6 3 ] ; \t * L o a d s t 0053720 h e P A G E r e g i s t e r 0053740 ( f o r M i c r o D e r r 0053760 o r c h k ) \r F @ [ W 1 @ , 6 0054000 4 , 7 7 ] ; \t \t * I m a g i n a 0054020 r y a d d r e s s o f u n 0054040 c o n d i t i o n a l o r f 0054060 a l s e b r a n c 376 001 \0 255 322 h 0054100 \r \r F @ [ C H P A G E @ , 1 0 1 0054120 , 1 0 1 ] ; \t * P r e d e c e s 0054140 s o r d i d L O A D P A G E 0054160 ( f o r M i c r o D e r r 0054200 o r c h k ) \r * F @ [ E M U L 0054220 @ , 1 0 2 , 1 0 2 ] ; \t * P r e 0054240 s e n t l y u n u s e d \r F @ 0054260 [ C N D @ , 1 0 3 , 1 0 3 ] ; \t 0054300 * H a s a b r a n c h c o 0054320 n d i t i o n \r F @ [ W 2 @ , 1 0054340 0 4 , 1 1 7 ] ; \t * I m a g i n 0054360 a r y a d d r e s s o f c 0054400 o n d i t i o n a l b r a n c 0054420 h w h e n t r u e \r \r * M @ 0054440 [ M R S @ , M R @ [ X O R [ R S 0054460 H I F T [ # 1 , 2 ] , 1 4 ] ] 376 0054500 001 \0 207 032 R X @ [ A N D [ # 1 , 0054520 3 ] ] ] ; * M E M I N S @ R 0054540 M O D @ & R S E L @ \r M @ [ 0054560 B R E A K P O I N T , B R K P @ 0054600 [ 1 ] ? ] ; \t * C a u s e s M 0054620 i d a s t o c r e a t e a 0054640 b p w h e n l o a d i n g 0054660 \r M @ [ N O P , P F [ B S @ , 2 0054700 ] ] ; \t * F o r n o - o p m 0054720 i ' s \r \r M @ [ F 1 T @ , E R [ 0054740 F 1 . u s e d . t w i c e , 2 ] 0054760 ] ; \t M @ [ F F 1 @ , I F A [ F 0055000 1 @ , F 1 T @ [ ] , F 1 @ [ # 1 0055020 ] ] ] ; \r M @ [ F 2 T @ , E R 0055040 [ F 2 . u s e d . t w i c e , 2 0055060 ] ] ; \t M @ [ F F 2 @ , I F A [ 0055100 F 2 @ , 376 001 \0 6 ] F 2 T @ [ ] , 0055120 F 2 @ [ # 1 ] ] ] ; \r M @ [ F 0055140 Z @ , F F 1 @ [ R S H I F T [ # 0055160 1 , 4 ] ] F F 2 @ [ A N D [ # 0055200 1 , 1 7 ] ] ] ; \r M @ [ B S F @ 0055220 , B S F 1 @ [ R S H I F T [ # 1 0055240 , 4 ] ] F F 2 @ [ A N D [ # 1 0055260 , 1 7 ] ] ] ; \r \r M @ [ T M A R 0055300 G S @ , E R [ T o o . m a n y . 0055320 a r g s . f o r . # 1 , 2 ] ] ; 0055340 \r M @ [ T B I G @ , E R [ # 1 . 0055360 c o u n t . t o o . b i g , 2 ] 0055400 ] ; \r M @ [ T S M A L L @ , E R 0055420 [ # 1 . c o u n t . t o o . s m 0055440 a l l , 2 ] ] ; \r M @ [ N O A R 0055460 G S @ , E R [ N o . a r g s . a 0055500 l l o w e d . i n 376 001 \0 + . # 0055520 1 , 2 ] ] ; \r \r \r * F i e l d s 0055540 f o r I M M A S K a s s e 0055560 m b l y \r F @ [ C O N M S K @ , 0055600 0 , 1 7 ] ; \t * C o n s t r a i 0055620 n t m a s k : b i t n = 0055640 1 = > c a n p l a c e 0055660 a t n m o d 2 0 \r F @ [ D 0055700 T L E N @ , 2 0 , 2 3 ] ; \t * D 0055720 i s p a t c h t a b l e l e 0055740 n g t h - 1 \r \f \r % N e u t 0055760 r a l s a n d c o n n e c t 0056000 i o n m a c r o s : \r \r A n 0056020 e u t r a l " R B " d i s t 0056040 i n c t f r o m " A " i s 0056060 n e e d e d s o t h a t 0056100 e x p r e s s i o n s s u 376 001 0056120 \0 | 362 c h a s : \r \t D B [ R A 0056140 d d r ] _ ( B B F B X [ D B [ R 0056160 A d d r ] ] ) S A L U F O P 0056200 T , D I S P [ B B L O O P ] ; 0056220 \r c a n b e c o m p i l e d 0056240 . I n t h i s c a s e 0056260 t h e D B [ R A d d r ] m a 0056300 c r o c a n n o t l e a v e 0056320 t h e \r n e u t r a l " A " 0056340 b e c a u s e t h a t w o 0056360 n ' t w o r k i n t h e 0056400 d e s t i n a t i o n p a r t 0056420 o f t h e c l a u s e . \r 0056440 T h i s i s a l s o t h e 0056460 r e a s o n f o r t h e 0056500 R B _ m a c r o . \r % \r N E U 0056520 T R A 376 001 \0 016 \v L [ A ] ; \t * A 0056540 L U A s o u r c e s \r N E U T 0056560 R A L [ A _ ] ; \t * A L U A d 0056600 e s t i n a t i o n s \r N E U T 0056620 R A L [ R B ] ; \t * R M a d d 0056640 r e s s e s o r f u n c t i 0056660 o n s o f R M a d d r e s 0056700 s e s \r N E U T R A L [ B ] ; \t 0056720 * H 2 s o u r c e s \r N E U T 0056740 R A L [ B _ ] ; \t * H 2 d e s 0056760 t i n a t i o n s \r N E U T R A 0057000 L [ L U ] ; \t * A L U f u n c 0057020 t i o n s \r N E U T R A L [ L U 0057040 _ ] ; \t * A L U d e s t i n a 0057060 t i o n s ( R M , T ) \r N E 0057100 U T R A L [ T ] ; \t * T r e g 0057120 i s t e r \r N E 376 001 \0 316 W U T R 0057140 A L [ ? ] ; \t * L e f t b y 0057160 m a c r o s t h a t c a n n 0057200 o t b e c o n n e c t e d 0057220 t o a n y t h i n g b y " 0057240 _ " \r \r M @ [ B _ B , B ] ; \r M 0057260 @ [ B _ T , B ] ; \r M @ [ L U _ 0057300 L U , L U ] ; \r M @ [ T _ , L T 0057320 @ [ 1 ] L U _ ] ; \r M @ [ R B 0057340 _ , L R @ [ 1 ] L U _ ] ; \r \r 0057360 * M i c r o i s s u p p o s 0057400 e d t o r u n f a s t e r 0057420 i f s y m b o l s s u c h 0057440 a s t h e s e i n t e g e 0057460 r s a r e \r * d e f i n e d 0057500 p r i o r t o t h e i r a 0057520 p p e a r a n c e i n 376 001 \0 0057540 360 020 a m a c r o , s o d e 0057560 f i n e t h e m h e r e . \r 0057600 S E T [ Z @ , 0 ] ; S E T [ Z 0057620 1 @ , 0 ] ; S E T [ Z 2 @ , 0 0057640 ] ; S E T [ Z 3 @ , 0 ] ; \r S 0057660 E T [ T S K F L G @ , 0 ] ; S 0057700 E T [ C H P G F L G @ , 0 ] ; 0057720 S E T [ R E G I F L A G @ , 0 ] 0057740 ; S E T [ R T N I L L @ , 0 ] 0057760 ; \r \r % M e m o r y r e f e r 0060000 e n c e i n t e r l o c k s 0060020 o n l y o c c u r w h e n 0060040 t h e A L U A s o u r c e 0060060 p a r t i c i p a t e s i n \r 0060100 t h e A L U o p e r a t i o 0060120 n , s o d e f a u l t t h 0060140 e 376 001 \0 352 313 A L U o p e r a 0060160 t i o n t o L U _ A w h e 0060200 n a n A d e s t i n a t i 0060220 o n \r i s l o a d e d ; i f 0060240 L U _ B a p p e a r s i n 0060260 t h e m i , w a r n h i 0060300 m o f p o t e n t i a l e 0060320 r r o r u n l e s s h e \r h 0060340 a s p u t a N O R E G I L 0060360 O C K O K c l a u s e i n 0060400 t h e s a m e m i . \r % \r M 0060420 @ [ N O R E G I L O C K O K , S 0060440 E T [ R E G I F L A G @ , I F E 0060460 [ R E G I F L A G @ , 1 , 0 , 2 0060500 ] ] ? ] ; \r M @ [ A _ A , P F 0060520 [ A L F @ , 1 ] S E T [ R E G 0060540 I F L A G @ , 376 001 \0 343 \b I F G [ 0060560 R E G I F L A G @ , 1 , 0 , 1 ] 0060600 ] A ] ; \r E Q @ [ A _ R B , A 0060620 _ A ] ; \r \r \r * A L U o p e r 0060640 a t i o n s d e f i n e d f 0060660 o r ( A , R B ) o p ( B , 0060700 T ) \r M @ [ L U _ B , A L F @ [ 0060720 0 ] L U ] ; \t \t E Q @ [ L U _ 0060740 T , L U _ B ] ; \r M @ [ L U _ A 0060760 , A L F @ [ 1 ] L U ] ; \t \t E 0061000 Q @ [ L U _ R B , L U _ A ] ; \r 0061020 M @ [ A A N D B , A L F @ [ 2 ] 0061040 L U ] ; \t \t E Q @ [ A A N D T 0061060 , A A N D B ] ; \r E Q @ [ R 0061100 B A N D B , A A N D B ] ; \t \t E 0061120 Q @ [ R B A N D T , A A N D B ] 0061140 ; \r M @ [ A O R B , A L 376 001 \0 227 0061160 v F @ [ 3 ] L U ] ; \t \t E Q @ 0061200 [ A O R T , A O R B ] ; \r E 0061220 Q @ [ R B O R B , A O R B ] ; \t 0061240 \t E Q @ [ R B O R T , A O R B ] 0061260 ; \r M @ [ A X O R B , A L F @ [ 0061300 4 ] L U ] ; \t \t E Q @ [ A X O 0061320 R T , A X O R B ] ; \r E Q @ 0061340 [ R B X O R B , A X O R B ] ; \t 0061360 \t E Q @ [ R B X O R T , A X O R 0061400 B ] ; \r E Q @ [ A # B , A X 0061420 O R B ] ; \t \t E Q @ [ A # T , A 0061440 X O R B ] ; \r E Q @ [ R B # 0061460 B , A X O R B ] ; \t \t E Q @ [ R 0061500 B # T , A X O R B ] ; \r M @ [ A 0061520 A N D N O T B , A L F @ [ 5 ] 0061540 L U ] ; \t E Q @ [ A A N D N O T 0061560 T 376 001 \0 ) Q , A A N D N O T B ] 0061600 ; \r E Q @ [ R B A N D N O T 0061620 B , A A N D N O T B ] ; \t E Q @ 0061640 [ R B A N D N O T T , A A N D N 0061660 O T B ] ; \r M @ [ A O R N O T B 0061700 , A L F @ [ 6 ] L U ] ; \t \t E 0061720 Q @ [ A O R N O T T , A O R N O 0061740 T B ] ; \r E Q @ [ R B O R N 0061760 O T B , A O R N O T B ] ; \t E Q 0062000 @ [ R B O R N O T T , A O R N O 0062020 T B ] ; \r M @ [ A X N O R B , A 0062040 L F @ [ 7 ] L U ] ; \t \t E Q @ 0062060 [ A X N O R T , A X N O R B ] ; 0062100 \r E Q @ [ R B X N O R B , A 0062120 X N O R B ] ; \t \t E Q @ [ R B X 0062140 N O R T , A X N O R B ] ; \r 0062160 E Q @ [ A = 376 001 \0 E 304 B , A X N 0062200 O R B ] ; \t \t E Q @ [ A = T , A 0062220 X N O R B ] ; \r E Q @ [ R B 0062240 = B , A X N O R B ] ; \t \t E Q @ 0062260 [ R B = T , A X N O R B ] ; \r M 0062300 @ [ A + 1 , A L F @ [ 1 0 ] L 0062320 U ] ; \t \t E Q @ [ R B + 1 , A + 0062340 1 ] ; \r M @ [ A + B , A L F @ [ 0062360 1 1 ] L U ] ; \t \t E Q @ [ A + 0062400 T , A + B ] ; \r E Q @ [ R B 0062420 + B , A + B ] ; \t \t E Q @ [ R B 0062440 + T , A + B ] ; \r M @ [ A + B + 0062460 1 , A L F @ [ 1 2 ] L U ] ; \t 0062500 \t E Q @ [ A + T + 1 , A + B + 1 0062520 ] ; \r E Q @ [ R B + B + 1 , 0062540 A + B + 1 ] ; \t \t E Q @ [ R B + 0062560 T + 1 , A + B + 1 ] ; 376 001 \0 033 257 0062600 \r M @ [ A - 1 , A L F @ [ 1 3 ] 0062620 L U ] ; \t \t E Q @ [ R B - 1 , 0062640 A - 1 ] ; \r M @ [ A - B , A L F 0062660 @ [ 1 4 ] L U ] ; \t \t E Q @ [ 0062700 A - T , A - B ] ; \r E Q @ [ 0062720 R B - B , A - B ] ; \t \t E Q @ [ 0062740 R B - T , A - B ] ; \r M @ [ A - 0062760 B - 1 , A L F @ [ 1 5 ] L U ] 0063000 ; \t \t E Q @ [ A - T - 1 , A - B 0063020 - 1 ] ; \r E Q @ [ R B - B - 0063040 1 , A - B - 1 ] ; \t \t E Q @ [ R 0063060 B - T - 1 , A - B - 1 ] ; \r * A 0063100 L U F [ 1 6 ] U N A S S I G N 0063120 E D \r M @ [ A S A L U F O P B , 0063140 A L F @ [ 1 7 ] L U ] ; \t E Q 0063160 @ [ A S A L U F O P T , A S A L 0063200 376 001 \0 222 $ U F O P B ] ; \r E 0063220 Q @ [ R B S A L U F O P B , A S 0063240 A L U F O P B ] ; \t E Q @ [ R B 0063260 S A L U F O P T , A S A L U F O 0063300 P B ] ; \r \f \r % T h r e e m a 0063320 c r o s d e f i n e p a r a 0063340 m e t e r s f r o m w h i c 0063360 h c o n s t a n t s , R M 0063400 v a l u e s , o r \r I M d a 0063420 t a c a n b e c o n s t r 0063440 u c t e d : \r M P [ N A M 0063460 E , o c t a l s t r i n g ] m 0063500 a k e s a p a r a m e t e r 0063520 o f N A M E ; \r S P [ 0063540 N A M E , P 1 , P 2 , P 3 , P 4 0063560 , P 5 , P 6 , P 7 , P 8 ] m a 0063600 k e s a 376 001 \0 204 201 p a r a m 0063620 e t e r N A M E e q u a l 0063640 t o t h e s u m \r o f P n 0063660 , w h e r e t h e P n m 0063700 a y b e p a r a m e t e r s 0063720 o r a d d r e s s e s . \r 0063740 N S P [ N A M E , P 1 , P 2 0063760 , P 3 , P 4 , P 5 , P 6 , P 7 , 0064000 P 8 ] i s o n e s c o m p 0064020 l e m e n t o f S P . \r \r T 0064040 h e p a r a m e t e r " N A 0064060 M E " i s d e f i n e d b 0064100 y t h e i n t e g e r " N 0064120 A M E ! " , s o i t i s 0064140 o k t o \r u s e " N A M E " 0064160 f o r a c o n s t a n t 0064200 a s w e l l a s 376 001 \0 n h 0064220 a p a r a m e t e r . H o 0064240 w e v e r , i t i s i l l 0064260 e g a l \r t o d e f i n e c 0064300 o n s t a n t s , a d d r e s 0064320 s e s , e t c . w i t h i 0064340 d e n t i c a l n a m e s . \r 0064360 \r " L i t e r a l " c o n s t 0064400 a n t s s u c h a s " 3 2 0064420 2 C " , " 1 7 7 6 2 2 C " , 0064440 o r " 3 2 4 0 0 C " m a y 0064460 b e \r u s e d i n m i ' s 0064500 w i t h o u t p r e v i o u s 0064520 d e f i n i t i o n . \r \r A l 0064540 t e r n a t i v e l y , c o n 0064560 s t a n t s m a y b e c o 0064600 n s t r u c t e d f r o m 376 0064620 001 \0 Y 354 p a r a m e t e r s , 0064640 i n t e g e r s , a n d \r a d 0064660 d r e s s e s u s i n g t h 0064700 e f o l l o w i n g m a c r 0064720 o s : \r M C [ N A M E , P 0064740 1 , P 2 , P 3 , P 4 , P 5 , P 6 0064760 , P 7 , P 8 ] d e f i n e s 0065000 n a m e a s a c o n s t a 0065020 n t w i t h v a l u e = \r 0065040 s u m o f p a r a m e t e r 0065060 s P n ; \r N M C [ N A M 0065100 E , P 1 , P 2 , P 3 , P 4 , P 5 0065120 , P 6 , P 7 , P 8 ] i s t h 0065140 e o n e s c o m p l e m e n 0065160 t o f M C . \r \r N o t e : 0065200 M C a n d N M C a l s o 0065220 d e f 376 001 \0 005 E i n e N A M 0065240 E a s a p a r a m e t e r 0065260 . \r % \r \r * F i e l d s f o r 0065300 i n i t i a l i z i n g 1 6 0065320 - b i t w i d e m e m o r i 0065340 e s \r F @ [ E 0 @ , 0 , 3 ] ; 0065360 F @ [ E 1 @ , 4 , 1 7 ] ; \r \r * 0065400 M a c r o t o i n i t i a l 0065420 i z e ( 1 6 - b i t ) v a r 0065440 i a b l e s i n t h e t a 0065460 r g e t m e m o r y . T h 0065500 i s i s \r * d o n e b y w 0065520 r i t i n g 3 2 1 0 0 V ( i 0065540 . e . , a s a l i t e r a 0065560 l ) . \r M @ [ V , E 1 @ [ # 1 ] 0065600 E 0 @ [ # 2 ] ] ; \r \r M @ [ ! 0065620 , 0 ] ; \r M @ [ M 376 001 \0 033 \n P , 0065640 S E T [ # 1 ! , # 2 ] ] ; \r \r M 0065660 @ [ P X @ , I D F [ # 1 ! , # 1 0065700 ! , # 1 ] ] ; \r M @ [ D P S @ , 0065720 A D D [ P X @ [ # 1 ] , P X @ [ 0065740 # 2 ] , P X @ [ # 3 ] , P X @ [ 0065760 # 4 ] , P X @ [ # 5 ] , P X @ [ 0066000 # 6 ] , P X @ [ # 7 ] , P X @ [ 0066020 # 8 ] ] ] ; \r \r M @ [ S P , I F 0066040 G [ # 0 , 1 1 , T M A R G S @ [ 0066060 # 1 ] , \r S E T [ # 1 ! , D 0066100 P S @ [ # 2 , # 3 , # 4 , # 5 , 0066120 # 6 , # 7 , # 8 , # 9 ] ] ] ] ; 0066140 \r \r M @ [ N S P , I F G [ # 0 , 0066160 1 1 , T M A R G S @ [ # 1 ] , \r 0066200 S E T [ # 1 ! , N O T [ D P 0066220 S @ [ # 2 , # 3 , # 4 , # 5 376 001 0066240 \0 354 ! , # 6 , # 7 , # 8 , # 9 ] 0066260 ] ] ] ] ; \r \r M @ [ M C , I F G 0066300 [ # 0 , 1 1 , T M A R G S @ [ # 0066320 1 ] , \r S E T [ # 1 ! , D P 0066340 S @ [ # 2 , # 3 , # 4 , # 5 , # 0066360 6 , # 7 , # 8 , # 9 ] ] \r M 0066400 @ [ # 1 , A D D [ # 1 ! ] C ] ] 0066420 ] ; \r \r M @ [ N M C , I F G [ # 0066440 0 , 1 1 , T M A R G S @ [ # 1 ] 0066460 , \r S E T [ # 1 ! , N O T [ 0066500 D P S @ [ # 2 , # 3 , # 4 , # 5 0066520 , # 6 , # 7 , # 8 , # 9 ] ] ] \r 0066540 M @ [ # 1 , A D D [ # 1 ! ] 0066560 C ] ] ] ; \r \r M @ [ $ R S E T D 0066600 I S P L O , A N D [ # 2 , 3 7 7 0066620 ] C ] ; \r M @ [ $ R S E T D I S 0066640 P H I 376 001 \0 334 356 , A N D [ A D D 0066660 [ L S H I F T [ # 1 , 1 4 ] , # 0066700 2 ] , 1 7 7 4 0 0 ] C ] ; \r \r \r 0066720 * F o r m m m m n n n n C , 0066740 # 1 = n n n n , # 2 = 0066760 m m m m \r M @ [ C , I F E [ A N 0067000 D [ # 1 , 3 7 7 ] , 0 , B S @ [ 0067020 1 ] F F 1 @ [ # 2 ] F F 2 @ 0067040 [ R S H I F T [ # 1 , 1 0 ] ] , 0067060 \r B S @ [ 0 ] F F 1 @ 0067100 [ R S H I F T [ # 2 # 1 , 4 ] ] 0067120 F F 2 @ [ A N D [ # 1 , 1 7 ] 0067140 ] ] B \r ] ; \r \r M @ [ - C , S 0067160 U B [ 0 , # 2 # 1 ] C ] ; \r \f \r 0067200 % C y c l e r - m a s k e r s 0067220 t u f f : \r \r A r g u m e n t s 0067240 t o L D F 376 001 \0 220 ~ a n d 0067260 D I S P A T C H m a c r o s 0067300 a r e P O S a n d S I Z 0067320 E , w h e r e P O S i s 0067340 t h e l e f t \r b i t o f 0067360 t h e f i e l d a n d S I 0067400 Z E t h e n u m b e r o f 0067420 b i t s i n t h e f i e 0067440 l d , i d e n t i c a l t o 0067460 M e s a \r r e a d - f i e l d 0067500 a n d w r i t e - f i e l d 0067520 d e s c r i p t o r s ; R B 0067540 i s a n y R - b u s s o 0067560 u r c e s p e c i f i a b l e 0067600 \r w i t h o u t u s i n g F 0067620 1 o r F 2 . \r \r L D F [ R B 0067640 , P O S , S I Z E ] r i 376 001 \0 0067660 242 211 g h t - j u s t i f i e s 0067700 a n y f i e l d . \r 0 \t 0067720 - 1 7 \t 2 0 1 - b i t f 0067740 i e l d s b i t 0 t o 1 0067760 7 \r 2 0 \t - 3 6 \t 1 7 0070000 2 - b i t f i e l d s b i t 0070020 0 t o 1 6 \r 3 7 \t - 0070040 5 4 \t 1 6 3 - b i t f i e 0070060 l d s b i t 0 t o 1 5 \r 0070100 5 5 \t - 7 1 \t 1 5 4 - 0070120 b i t f i e l d s b i t 0 0070140 t o 1 4 \r 7 2 \t - 1 0 5 0070160 \t 1 4 5 - b i t f i e l d 0070200 s b i t 0 t o 1 3 \r 1 0070220 0 6 \t - 1 2 0 \t 1 3 6 - b i 0070240 t f i e l d s b i t 0 t 0070260 o 376 001 \0 016 K 1 2 \r 1 2 1 \t - 0070300 1 3 2 \t 1 2 7 - b i t f i 0070320 e l d s b i t 0 t o 1 1 0070340 \r 1 3 3 \t - 1 4 3 \t 1 1 1 0 0070360 - b i t f i e l d s b i t 0070400 0 t o 1 0 \r 1 4 4 \t - 1 5 0070420 3 \t 1 0 1 1 - b i t f i e l 0070440 d s b i t 0 t o 7 \r 0070460 1 5 4 \t - 1 6 2 \t 7 1 2 - b 0070500 i t f i e l d s b i t 0 0070520 t o 6 \r 1 6 3 \t - 1 7 0 \t 0070540 6 1 3 - b i t f i e l d s 0070560 b i t 0 t o 5 \r 1 7 0070600 1 \t - 1 7 5 \t 5 1 4 - b i t 0070620 f i e l d s b i t 0 t o 0070640 4 \r 1 7 6 \t - 2 0 1 \t 4 0070660 1 5 - b i t 376 001 \0 370 ( f i e 0070700 l d s b i t 0 t o 3 \r 0070720 2 0 2 \t - 2 0 4 \t 3 1 6 - 0070740 b i t f i e l d s b i t 0 0070760 t o 2 \r 2 0 5 \t - 2 0 6 0071000 \t 2 1 7 - b i t f i e l d 0071020 s b i t 0 t o 1 \r \r D 0071040 I S P A T C H [ R B , P O S , S 0071060 I Z E ] l o a d s A P C w 0071100 i t h a f i e l d o f S 0071120 I Z E < = 4 b i t s : \r 0071140 2 0 7 \t - 2 2 6 \t 2 0 1 - b 0071160 i t f i e l d s b i t 0 0071200 t o 1 7 \r 2 2 7 \t - 2 4 5 \t 0071220 1 7 2 - b i t f i e l d s 0071240 b i t 0 t o 1 6 \r 2 4 0071260 6 \t - 2 6 3 \t 1 6 3 376 001 \0 % 0071300 372 - b i t f i e l d s b i t 0071320 0 t o 1 5 \r 2 6 4 \t - 3 0071340 0 0 \t 1 5 4 - b i t f i e 0071360 l d s b i t 0 t o 1 4 \r 0071400 \r R S H [ R B , s h i f t c o u 0071420 n t ] r i g h t - s h i f t s 0071440 R B b y s h i f t c o u n 0071460 t 1 t o 1 7 . \r u s e s 0071500 L D F [ R B s o u r c e , 0 , 0071520 ( 2 0 - s h i f t c o u n t 0071540 ) ] c o d e s \r \r L S H [ R 0071560 B , s h i f t c o u n t ] l e 0071600 f t - s h i f t s R B b y 0071620 s h i f t c o u n t 1 t o 0071640 1 7 . \r 3 0 1 \t - 3 1 7 \t 1 7 0071660 l e f t s h i f t s o f 0071700 1 376 001 \0 031 357 , . . . , 1 7 0071720 b i t s \r \r L C Y [ R B , s h i 0071740 f t c o u n t ] l e f t - c y 0071760 c l e s R B b y s h i f t 0072000 c o u n t 1 t o 1 7 . \r 0072020 3 2 0 \t - 3 3 6 \t 1 7 l e f t 0072040 c y c l e s o f 1 , . . 0072060 . , 1 7 b i t s \r \r R C Y [ 0072100 R B , s h i f t c o u n t ] r 0072120 i g h t - c y c l e s R B b 0072140 y s h i f t c o u n t 1 t 0072160 o 1 7 . \r u s e s L C Y [ 0072200 R B , ( 2 0 - s h i f t c o 0072220 u n t ) ] c o d e s \r \r O t 0072240 h e r s t r a n g e o n e s 0072260 : \r - - \t R H M A S K [ R B ] 0072300 \t = L D F 376 001 \0 021 001 [ R B , 1 0072320 0 , 1 0 ] \r 3 3 7 \t L H M A S 0072340 K [ R B ] \t = R B & 1 7 7 0072360 4 0 0 \r 3 4 0 \t Z E R O \t \t = 0072400 0 \r 3 4 1 \t F I X V A [ R B 0072420 ] \t = R S H [ R B , 1 ] & 0072440 4 0 1 0 0 \r - - \t F O R M 1 [ 0072460 R B ] \t = L D F [ R B , 1 7 , 0072500 1 ] \r 3 4 2 \t F O R M 2 [ R B 0072520 ] \t = R B & 2 \r - - \t F 0072540 O R M 3 [ R B ] \t = L D F [ R 0072560 B , 1 6 , 2 ] \r 3 4 3 \t F O R 0072600 M 4 [ R B ] \t = R B & 4 \r 0072620 3 4 4 \t F O R M 5 [ R B ] \t = 0072640 R B & 5 \r 3 4 5 \t F O R 0072660 M 6 [ R B ] \t = R B & 6 \r 0072700 - - \t F O R M 7 [ R 376 001 \0 205 356 0072720 B ] \t = L D F [ R B , 1 5 , 3 0072740 ] \r 3 4 6 \t F O R M 1 0 [ R B 0072760 ] \t = R B & 1 0 \r 3 4 7 0073000 \t F O R M - 2 [ R B ] \t = R B 0073020 & - 2 \r 3 5 0 \t F O R M - 0073040 3 [ R B ] \t = R B & - 3 \r 0073060 3 5 1 \t F O R M - 4 [ R B ] \t 0073100 = R B & - 4 \r 3 5 2 \t F 0073120 O R M - 5 [ R B ] \t = R B & 0073140 - 5 \r 3 5 3 \t F O R M - 6 [ 0073160 R B ] \t = R B & - 6 \r 3 0073200 5 4 \t F O R M - 7 [ R B ] \t = 0073220 R B & - 7 \r 3 5 5 \t F O R 0073240 M - 1 0 [ R B ] \t = R B & 0073260 - 1 0 \r 3 5 6 \t N I B 0 R S H 0073300 8 [ R B ] \t = ( R B r s h i 0073320 376 001 \0 307 024 f t 1 0 ) & 3 6 0073340 0 \r % \r \f \r M @ [ I L S I Z @ , 0073360 E R [ I l l e g a l . S I Z E , 0073400 2 ] ] ; \r M @ [ I L P S @ , E R 0073420 [ I l l e g a l . P O S + S I Z 0073440 E , 2 ] ] ; \r \r M @ [ L D F , I 0073460 F G [ A D D [ # 2 , # 3 ] , 2 0 0073500 , I L P S @ [ ] , I F G [ 1 , # 0073520 3 , I L S I Z @ [ ] , \r S E 0073540 T [ Z @ , A D D [ # 2 , I F G [ 0073560 # 3 , 7 , \r S E L E C T [ 0073600 S U B [ # 3 , 1 0 ] , 1 5 3 3 , 0073620 1 5 4 4 , 1 5 5 4 , 1 5 6 3 , 1 0073640 5 7 1 , 1 5 7 6 , 1 6 0 2 , 1 6 0073660 0 5 ] , \r S E L E C T [ # 0073700 3 , 1 0 0 0 0 0 , 1 4 0 0 , 1 4 0073720 2 0 , 1 4 376 001 \0 373 226 3 7 , 1 4 5 0073740 5 , 1 4 7 2 , 1 5 0 6 , 1 5 2 1 0073760 ] ] ] ] \r B S F @ [ Z @ ] 0074000 # 1 ] ] ] ; \r \r * I m p o s e 0074020 r e g i s t e r i n t e r l o 0074040 c k o n l y f o r t h i s 0074060 o n e \r M @ [ D I S P A T C H 0074100 , S E T [ R T N I L L @ , 1 ] \r 0074120 I F G [ # 3 , 4 , I L S I Z 0074140 @ [ ] , I F G [ A D D [ # 2 , # 0074160 3 ] , 2 0 , I L P S @ [ ] , \r 0074200 S E T [ Z @ , A D D [ 0074220 # 2 , S E L E C T [ # 3 , 1 0 0 0074240 0 0 0 , 1 6 0 7 , 1 6 2 7 , 1 6 0074260 4 6 , 1 6 6 4 ] ] ] \r B S F 0074300 @ [ Z @ ] A _ # 1 ] ] ] ; \r \r 0074320 M @ [ R S H , I F G 376 001 \0 ( 235 [ 0074340 # 2 , 1 7 , T B I G @ [ R S H ] 0074360 , I F G [ 1 , # 2 , T S M A L L 0074400 @ [ R S H ] , \r S E T [ Z @ , 0074420 I F G [ # 2 , 7 , S E L E C T [ 0074440 S U B [ # 2 , 1 0 ] , 1 5 3 3 , 0074460 1 5 2 1 , 1 5 0 6 , 1 4 7 2 , 1 0074500 4 5 5 , 1 4 3 7 , 1 4 2 0 , 1 4 0074520 0 0 ] , \r S E L E C T 0074540 [ # 2 , 1 0 0 0 0 0 , 1 6 0 5 , 0074560 1 6 0 2 , 1 5 7 6 , 1 5 7 1 , 1 0074600 5 6 3 , 1 5 5 4 , 1 5 4 4 ] ] ] 0074620 \r B S F @ [ Z @ ] # 1 ] ] 0074640 ] ; \r \r M @ [ L S H , I F G [ # 0074660 2 , 1 7 , T B I G @ [ L S H ] , 0074700 I F G [ 1 , # 2 , T S M A L L @ 0074720 [ L S H ] , \r B S F 1 376 0074740 001 \0 340 232 @ [ 7 4 ] F F 2 @ [ # 0074760 2 ] # 1 ] ] ] ; \r \r M @ [ R C 0075000 Y , I F G [ # 2 , 1 7 , T B I G 0075020 @ [ R C Y ] , I F G [ 1 , # 2 , 0075040 T S M A L L @ [ R C Y ] , \r 0075060 B S F 1 @ [ 7 5 ] F F 2 @ 0075100 [ S U B [ 1 7 , # 2 ] ] # 1 ] 0075120 ] ] ; \r \r M @ [ L C Y , I F G [ 0075140 # 2 , 1 7 , T B I G @ [ L C Y ] 0075160 , I F G [ 1 , # 2 , T S M A L L 0075200 @ [ L C Y ] , \r B S F 1 0075220 @ [ 7 5 ] F F 2 @ [ S U B [ # 0075240 2 , 1 ] ] # 1 ] ] ] ; \r \r M @ 0075260 [ R H M A S K , B S F 1 @ [ 6 6 0075300 ] F F 2 @ [ 3 ] # 1 ] ; \r 0075320 \r M @ [ L H M A S K , B S F 1 @ 0075340 [ 7 5 ] 376 001 \0 l ] F F 2 @ [ 1 0075360 7 ] # 1 ] ; \r \r M @ [ Z E R 0075400 O , B S F 1 @ [ 7 6 ] F F 2 @ 0075420 [ 0 ] A ] ; \r \r M @ [ F I X V 0075440 A , B S F 1 @ [ 7 6 ] F F 2 @ 0075460 [ 1 ] # 1 ] ; \r M @ [ F O R M 0075500 1 , L D F [ # 1 , 1 7 , 1 ] ] ; 0075520 \r M @ [ F O R M 2 , B S F 1 @ [ 0075540 7 6 ] F F 2 @ [ 2 ] # 1 ] ; 0075560 \r M @ [ F O R M 3 , L D F [ # 1 0075600 , 1 6 , 2 ] ] ; \r M @ [ F O R M 0075620 4 , B S F 1 @ [ 7 6 ] F F 2 @ 0075640 [ 3 ] # 1 ] ; \r M @ [ F O R M 0075660 5 , B S F 1 @ [ 7 6 ] F F 2 @ 0075700 [ 4 ] # 1 ] ; \r M @ [ F O R M 0075720 6 , B S F 1 @ [ 7 6 ] F F 2 @ 0075740 [ 5 ] # 1 ] ; \r 376 001 \0 " 274 M @ 0075760 [ F O R M 7 , L D F [ # 1 , 1 5 0076000 , 3 ] ] ; \r M @ [ F O R M 1 0 , 0076020 B S F 1 @ [ 7 6 ] F F 2 @ [ 6 0076040 ] # 1 ] ; \r M @ [ F O R M - 2 0076060 , B S F 1 @ [ 7 6 ] F F 2 @ [ 0076100 7 ] # 1 ] ; \r M @ [ F O R M - 0076120 3 , B S F 1 @ [ 7 6 ] F F 2 @ 0076140 [ 1 0 ] # 1 ] ; \r M @ [ F O R 0076160 M - 4 , B S F 1 @ [ 7 6 ] F F 0076200 2 @ [ 1 1 ] # 1 ] ; \r M @ [ F 0076220 O R M - 5 , B S F 1 @ [ 7 6 ] 0076240 F F 2 @ [ 1 2 ] # 1 ] ; \r M @ 0076260 [ F O R M - 6 , B S F 1 @ [ 7 6 0076300 ] F F 2 @ [ 1 3 ] # 1 ] ; \r 0076320 M @ [ F O R M - 7 , B S F 1 @ [ 0076340 7 6 ] F F 2 @ [ 1 4 ] # 376 001 0076360 \0 S 240 1 ] ; \r M @ [ F O R M - 1 0076400 0 , B S F 1 @ [ 7 6 ] F F 2 @ 0076420 [ 1 5 ] # 1 ] ; \r M @ [ N I B 0076440 0 R S H 8 , B S F 1 @ [ 7 6 ] 0076460 F F 2 @ [ 1 6 ] # 1 ] ; \r \f \r 0076500 S E T [ R L 0 @ , 1 7 7 7 7 7 ] 0076520 ; S E T [ R L 1 @ , 1 7 7 7 7 0076540 7 ] ; \r S E T [ R L 2 @ , 1 7 7 0076560 7 7 7 ] ; S E T [ R L 3 @ , 1 0076600 7 7 7 7 7 ] ; \r S E T [ R L @ , 0076620 1 7 7 7 7 7 ] ; \r S E T [ C T A 0076640 S K @ , 0 ] ; S E T [ Q T A S 0076660 K @ , 0 ] ; S E T [ S U B T S 0076700 K @ , 0 ] ; S E T [ R M B A S 0076720 E @ , 0 ] ; \r \r M @ [ S E T T A 0076740 S K , S E T [ C T A S K @ , # 1 0076760 ] \r 376 001 \0 301 377 I F G [ C T A 0077000 S K @ , 1 7 , E R [ I l l e g a 0077020 l . S E T T A S K , 2 ] , \r 0077040 S E L E C T [ Q T A S K @ , 0077060 S E T [ R L 0 @ , R L @ ] , S E 0077100 T [ R L 1 @ , R L @ ] , S E T [ 0077120 R L 2 @ , R L @ ] , S E T [ R L 0077140 3 @ , R L @ ] ] \r S E T 0077160 [ Q T A S K @ , R S H I F T [ C 0077200 T A S K @ , 2 ] ] S E T [ S U 0077220 B T S K @ , A N D [ 3 , C T A S 0077240 K @ ] ] \r S E T [ R M B 0077260 A S E @ , L S H I F T [ Q T A S 0077300 K @ , 6 ] ] \r S E T [ R 0077320 L @ , S E L E C T [ Q T A S K @ 0077340 , R L 0 @ , R L 1 @ , R L 2 @ , 0077360 R L 3 @ ] ] ] ] 376 001 \0 002 321 ; \r \r 0077400 % R M a d d r e s s e s u s 0077420 e d a s s o u r c e s / d e 0077440 s t i n a t i o n s e x e c u 0077460 t e t h e R S R C @ / R S I 0077500 N K @ m a c r o s . \r R M a 0077520 d d r e s s i s l e g a l 0077540 i f t o p t w o b i t s 0077560 m a t c h Q T A S K a n d 0077600 e i t h e r t h e n e x t 0077620 t w o \r a d d r e s s b i t s 0077640 a r e n o n - 0 o r t h 0077660 e S U B T S K i s 0 . 0077700 B e l o w , u n m a t c h i n 0077720 g q u a d t a s k c a u s e 0077740 s \r a " V a l u e w o n ' t 0077760 f i t " e r r o r o 376 001 \0 0100000 003 [ n t h e f i e l d s t 0100020 o r e i n t o R S E L @ ; 0100040 t h e I L L R A @ m a c r o 0100060 \r i s e v a l u a t e d w h 0100100 e n a t a s k n e 0 m 0100120 o d 4 i l l e g a l l y a 0100140 c c e s s e s 0 - 1 7 i n 0100160 t h e R M r e g i o n . \r N 0100200 o t e t h a t R S E L [ 0 : 0100220 1 ] m u s t b e c o m p l 0100240 e m e n t e d f o r t h e 0100260 h a r d w a r e . \r % \r M @ [ I 0100300 L L R A @ , E R [ # 1 . i n . 0 0100320 . t o . 1 7 . o f . R M . r e g 0100340 i o n . u n a d d r e s s a b l 0100360 e . b y . t a s k . , 2 , C T A 0100400 S K 376 001 \0 P ! @ ] ] ; \r \r M @ [ 0100420 R S I N K @ , M I R M O D @ [ 0 0100440 ] S E T [ Z @ , X O R [ I P [ 0100460 # 1 ] , R M B A S E @ , 6 0 ] ] 0100500 \r R X @ [ A N D [ Z @ , 3 ] 0100520 ] R S E L @ [ R S H I F T [ Z 0100540 @ , 2 ] ] \r I F G [ Z @ , 5 0100560 7 , I F E [ S U B T S K @ , 0 , 0100600 , I L L R A @ [ # 1 ] ] ] L R 0100620 @ [ 1 ] L U _ ] ; \r \r M @ [ R 0100640 S R C @ , M I R M O D @ [ 0 ] 0100660 S E T [ Z @ , X O R [ I P [ # 1 0100700 ] , R M B A S E @ , 6 0 ] ] \r 0100720 R X @ [ A N D [ Z @ , 3 ] ] 0100740 R S E L @ [ R S H I F T [ Z @ , 0100760 2 ] ] \r I F G [ Z @ , 5 7 , 0101000 I F E [ S U B 376 001 \0 312 g T S K @ 0101020 , 0 , , I L L R A @ [ # 1 ] ] ] 0101040 R B ] ; \r \r \r % M e m o r y 0101060 d e c l a r a t i o n s m u s 0101100 t h a v e n a m e s a n d 0101120 s i z e s a g r e e i n g 0101140 w i t h t h o s e i n \r M i 0101160 d a s , e x c e p t t h a t 0101200 I M m u s t a g r e e w 0101220 i t h t h e f o r m e x p 0101240 e c t e d b y M i c r o D . 0101260 \r % \r M @ [ W @ , ] ; \t \t * D u 0101300 m m y m a c r o r e q u i r 0101320 e d f o r m e m o r y d e 0101340 f i n i t i o n s \r M E M O R Y 0101360 [ I M , 1 2 4 , 1 0 0 0 0 , W @ 0101400 , W @ ] ; \r M E M O R Y 376 001 \0 ( 0101420 244 [ R M , 2 0 , 4 0 0 , R S R C 0101440 @ , R S I N K @ ] ; \r M E M O R 0101460 Y [ I M L O C K , 1 , 1 0 0 0 0 0101500 , W @ , W @ ] ; \r M E M O R Y [ 0101520 V E R S I O N , 2 0 , 1 , W @ , 0101540 W @ ] ; \r * M E M O R Y [ D I S 0101560 P , 4 0 , 1 0 0 0 0 , W @ , W @ 0101600 ] ; \t * D i s p a t c h t a b 0101620 l e i n f o p a s s e d t 0101640 o M i c r o D \r M E M O R Y [ 0101660 I M M A S K , 2 4 , 1 0 0 0 0 , 0101700 W @ , W @ ] ; \t * F a k e m e 0101720 m o r y f o r I M p l a c 0101740 e m e n t c o n s t r a i n t 0101760 s \r \r % S e c o n d a r g o 0102000 f L I S T c o n t r o l s 0102020 l 376 001 \0 364 371 i s t i n g o f 0102040 m e m o r i e s a s f o l l 0102060 o w s : \r 1 = ( T A G ) n 0102100 n n n n n n n n n n n . . 0102120 . \r 2 = ( T A G ) F 1 _ 3 0102140 , F 2 _ 4 , . . . \r 4 = 0102160 n u m e r i c a l l y - o r d e 0102200 r e d l i s t o f a d d r 0102220 e s s s y m b o l s \r 1 0 = 0102240 a l p h a b e t i c a l l y - 0102260 o r d e r e d l i s t o f 0102300 a d d r e s s s y m b o l s \r 0102320 2 0 = ( T A G ) 1 n n n n 0102340 n 1 n n n n n . . . ( 1 6 0102360 - b i t p r i n t o u t i f 0102400 f 1 s e t a l s o ) \r L I 0102420 S T F I E L 376 001 \0 l 031 D S o v 0102440 e r r u l e s t h e 1 a n 0102460 d 2 0 n u m e r i c p r i 0102500 n t o u t m o d e s \r % \r * L 0102520 i s t I M i n 2 0 - b i t 0102540 u n i t s , R M a s s i 0102560 n g l e w o r d \r F @ [ V 0 @ 0102600 , 0 , 1 7 ] ; F @ [ V 1 @ , 2 0102620 0 , 3 7 ] ; \r L I S T F I E L D 0102640 S [ I M , ( V 0 @ [ 1 ] V 1 @ 0102660 [ 1 ] J A 1 @ [ 1 ] W 0 @ [ 0102700 1 ] W 1 @ [ 1 ] W 2 @ [ 1 ] 0102720 ) ] ; \r L I S T F I E L D S [ R 0102740 M , V 0 @ [ 1 ] ] ; \r L I S T F 0102760 I E L D S [ I M M A S K , C O N 0103000 M S K @ [ 1 ] D T L E N @ [ 1 0103020 ] ] ; \r L I S T [ I M 376 001 \0 | 027 0103040 , 2 7 ] ; L I S T [ R M , 2 5 0103060 ] ; L I S T [ , 2 5 ] ; \r \r % 0103100 R M w o r d s a r e a l l 0103120 o c a t e d i n t w o s t 0103140 e p s . F i r s t , t h e 0103160 g r o u p o f 1 0 0 r e 0103200 g i s t e r s \r t h a t m u s 0103220 t c o n t a i n t h e o n 0103240 e s b e i n g a l l o c a t 0103260 e d i s d e c l a r e d b 0103300 y S E T T A S K . \r \r T h e n 0103320 r e g i s t e r s i n t h 0103340 a t g r o u p o f 1 0 0 0103360 a r e a l l o c a t e d a s 0103400 f o l l o w s : \r \t R V [ F O 0103420 O , 2 3 , p 1 , . . . , p 7 ] ; 0103440 376 001 \0 $ 026 \t * C r e a t e s F 0103460 O O = R M 2 3 , v a l u 0103500 e s u m o f p a r a m s \r 0103520 \t R V [ F O O , 2 3 ] ; \t \t * C 0103540 r e a t e s F O O = R M 0103560 2 3 , n o v a l u e \r \t R V 0103600 [ F O O ] ; \t \t * C r e a t e s 0103620 F O O a t l a s t l o c 0103640 a t i o n + 1 \r \t R V [ F O 0103660 O , , 1 7 5 7 5 ] ; \t \t * C r e 0103700 a t e s a d d r e s s F O O 0103720 a t l o c a t i o n a f t 0103740 e r \r \t \t \t \t * l a s t o n e 0103760 a l l o c a t e d w i t h 0104000 v a l u e 1 7 5 7 5 \r T h e s 0104020 e m a c r o s l e a v e t 0104040 h e i n 376 001 \0 260 030 t e g e r 0104060 R L i , w h e r e i = 0 0104100 t o 3 ( t h e r e g i o 0104120 n ) \r b o u n d t o t h e 0104140 l a s t d i s p l a c e m e n 0104160 t a l l o c a t e d , a n d 0104200 t h e i n t e g e r R L 0104220 i s a l w a y s \r e q u a l 0104240 t o R L i f o r t h e c 0104260 u r r e n t r e g i o n . \r % 0104300 \r \r M @ [ R V , S E T [ R L @ , 0104320 I F S E [ # 2 , , A D D [ 1 , R 0104340 L @ ] , # 2 ] ] \r I F G [ R 0104360 L @ , 7 7 , E R [ R M . o v f , 0104400 2 ] ] \r I F G [ # 0 , 2 , R 0104420 M [ R L C @ , A D D [ R M B A S 0104440 E @ , R L @ ] ] \r 376 001 \0 - m 0104460 R L C @ [ # 1 : V 0 @ 0104500 [ D P S @ [ # 3 , # 4 , # 5 , # 0104520 6 , # 7 , # 8 , # 9 ] ] ] , \r 0104540 R M [ # 1 , A D D [ R M B 0104560 A S E @ , R L @ ] ] ] \r ] ; \r \r 0104600 * M a c r o s t o d e f i n 0104620 e g r o u p s o f f o u r 0104640 / t w o R M r e g i s t e r 0104660 s . \r M @ [ R V 4 , R V [ # 1 , 0104700 # 5 ] R V [ # 2 , A d d [ 1 , 0104720 # 5 ] ] R V [ # 3 , A d d [ 2 0104740 , # 5 ] ] R V [ # 4 , A d d [ 0104760 3 , # 5 ] ] ] ; \r M @ [ R V 2 , 0105000 R V [ # 1 , # 3 ] R V [ # 2 , 0105020 A d d [ 1 , # 3 ] ] ] ; \r \f \r S 0105040 E T [ N O N Q U A D O K @ , 0 376 0105060 001 \0 @ 352 ] ; \r M @ [ N O N Q U A 0105100 D O K , S E T [ N O N Q U A D O 0105120 K @ , 1 ] ] ; * S u p p r e s 0105140 s n e x t " N o t . Q u a d 0105160 a l i g n e d " w a r n i n g 0105200 \r M @ [ M E R N Q @ , I F E [ N 0105220 O N Q U A D O K @ , 0 , E R [ W 0105240 A R N I N G : . # 1 . n o t . q 0105260 u a d a l i g n e d , 3 ] , \r 0105300 S E T [ N O N Q U A D O K @ , 0105320 0 ] ] ] ; \r M @ [ Q R S @ , S E 0105340 T [ Z @ , X O R [ 6 0 , I P [ # 0105360 1 ] , R M B A S E @ ] ] \r I 0105400 F E [ A N D [ Z @ , 3 ] , 0 , I 0105420 F G [ Z @ , 7 7 , I L L R A @ [ 0105440 # 1 ] , M R @ [ R S H I F T [ A 0105460 D D [ Z 376 001 \0 370 v @ , 1 0 0 ] , 0105500 2 ] ] ] , M E R N Q @ [ ] ] \r R 0105520 B ] ; \r \r * P C F [ R M A D D R 0105540 ] , S B [ R M A D D R ] , a 0105560 n d D B [ R M A D D R ] a r 0105600 e a l s o A s o u r c e s 0105620 \r M @ [ P C F , R X @ [ 0 ] Q 0105640 R S @ [ # 1 ] ] ; \r M @ [ S B , 0105660 R X @ [ 1 ] Q R S @ [ # 1 ] 0105700 ] ; \r M @ [ D B , R X @ [ 2 ] 0105720 Q R S @ [ # 1 ] ] ; \r \r * O t 0105740 h e r r e g i s t e r s o u 0105760 r c e s \r * ( o p e n - c o d e 0106000 d M R S @ [ x ] a n d L D 0106020 F [ R B , P , S ] h e r e f 0106040 o r s p e e d ) \r \t \t \t \t \t \t 0106060 \t * M R S @ L D 376 001 \0 # & F [ 0106100 R B , x , y ] \r M @ [ S S T K P 0106120 & N S T K P , R X @ [ 3 ] M R 0106140 @ [ 3 4 ] A ] ; \t \t \t * 1 0 3 0106160 \r M @ [ S S T K P , R X @ [ 0106200 3 ] M R @ [ 3 4 ] B S F 1 @ [ 6 0106220 5 ] F F 2 @ [ 1 3 ] A ] ; \t \t 0106240 * 1 0 3 \t 0 , 1 0 \r M @ [ N 0106260 S T K P , R X @ [ 3 ] M R @ [ 3 0106300 4 ] B S F 1 @ [ 6 6 ] F F 2 @ [ 0106320 3 ] A ] ; \t \t * 1 0 3 \t 1 0 , 0106340 1 0 \r * a l u r e s u l t = 0106360 o v f , c a r , = 0 , < 0 \r * * 0106400 N o t e t h a t S A L U F 0106420 i s r e a d C O M P L E M E 0106440 N T E D b u t n o t n a m 0106460 e d t h a t w a y h e 376 001 0106500 \0 036 [ r e \r M @ [ A L U R E S U 0106520 L T & N S A L U F , R X @ [ 3 ] 0106540 M R @ [ 3 5 ] A ] ; \t \t \t * 1 0106560 0 7 \r M @ [ A L U R E S U L 0106600 T , R X @ [ 3 ] M R @ [ 3 5 ] B 0106620 S F 1 @ [ 6 3 ] F F 2 @ [ 1 ] 0106640 A ] ; \t * 1 0 7 \t 4 , 4 \r M 0106660 @ [ N S A L U F , R X @ [ 3 ] M 0106700 R @ [ 3 5 ] B S F 1 @ [ 6 6 ] F 0106720 F 2 @ [ 3 ] A ] ; \t \t * 1 0 7 0106740 \t 1 0 , 1 0 \r M @ [ M E M S Y N 0106760 D R O M E , R X @ [ 3 ] M R @ [ 0107000 3 6 ] A ] ; \t \t \t * 1 1 3 \r M 0107020 @ [ M E M E R R O R , R X @ [ 3 0107040 ] M R @ [ 3 7 ] A ] ; \t \t \t \t 0107060 * 1 1 7 \r M @ [ C Y C L E & P C 0107100 X F , 376 001 \0 \t 337 R X @ [ 3 ] M R 0107120 @ [ 3 1 ] A ] ; \t \t \t \t * 1 2 0107140 7 \r M @ [ C Y C L E C O N T 0107160 R O L , R X @ [ 3 ] M R @ [ 3 1 0107200 ] B S F 1 @ [ 6 5 ] F F 2 @ [ 1 0107220 3 ] A ] ; \t * 1 2 7 \t 0 , 1 0 0107240 \r M @ [ D B X R E G , R 0107260 X @ [ 3 ] M R @ [ 3 1 ] B S F 1 0107300 @ [ 6 2 ] F F 2 @ [ 1 5 ] A ] 0107320 ; \t * 1 2 7 \t 0 , 4 \r M 0107340 @ [ M W X R E G , R X @ [ 3 ] M 0107360 R @ [ 3 1 ] B S F 1 @ [ 6 3 ] F 0107400 F 2 @ [ 1 ] A ] ; \t \t * 1 2 7 0107420 \t 4 , 4 \r M @ [ P C X R E G 0107440 , R X @ [ 3 ] M R @ [ 3 1 ] B S 0107460 F 1 @ [ 6 3 ] F F 2 @ [ 5 ] A 0107500 ] ; \t \t * 1 2 7 376 001 \0 P 377 \t 1 0 0107520 , 4 \r M @ [ P C F R E G , R 0107540 X @ [ 3 ] M R @ [ 3 1 ] B S F 1 0107560 @ [ 6 3 ] F F 2 @ [ 1 1 ] A ] 0107600 ; \t \t * 1 2 7 \t 1 4 , 4 \r 0107620 M @ [ P C F . W O R D , R X @ 0107640 [ 3 ] M R @ [ 3 1 ] B S F 1 @ [ 0107660 6 2 ] F F 2 @ [ 1 3 ] A ] ; \t 0107700 * 1 2 7 \t 1 4 , 3 \r M @ [ P R I 0107720 N T E R , R X @ [ 3 ] M R @ [ 3 0107740 1 ] F F 2 @ [ 0 ] A ] ; \t \t \t 0107760 * 1 2 7 \r M @ [ D B S B , R X @ 0110000 [ 3 ] M R @ [ 3 2 ] F F 2 @ [ 0 0110020 ] A ] ; \t \t \t * 1 3 3 \r M @ [ 0110040 T I M E R , R X @ [ 3 ] M R @ [ 0110060 3 2 ] A ] ; \t \t \t \t * 1 3 3 \r 0110100 M @ [ R S 2 3 2 , R X @ [ 376 001 \0 0110120 = \r 3 ] M R @ [ 3 3 ] A ] ; \t 0110140 \t \t \t * 1 3 7 \r M @ [ M N B R , 0110160 F F 2 @ [ 0 ] R X @ [ 3 ] M R @ 0110200 [ 3 3 ] A ] ; \t \t \t * 1 3 7 \r 0110220 M @ [ A P C T A S K & A P C , R 0110240 X @ [ 3 ] M R @ [ 2 4 ] A ] ; 0110260 \t \t \t * 1 4 3 \r M @ [ A P C 0110300 T A S K , R X @ [ 3 ] M R @ [ 2 0110320 4 ] B S F 1 @ [ 6 2 ] F F 2 @ [ 0110340 1 5 ] A ] ; \t \t * 1 4 3 \t 0 , 0110360 4 \r M @ [ A P C , R X @ [ 3 0110400 ] M R @ [ 2 4 ] B S F 1 @ [ 6 7 0110420 ] F F 2 @ [ 1 5 ] A ] ; \t \t * 0110440 1 4 3 \t 4 , 1 4 \r M @ [ C T A S 0110460 K & N C I A , R X @ [ 3 ] M R @ 0110500 [ 2 5 ] A ] ; \t \t \t \t * 1 4 7 0110520 \r 376 001 \0 342 ~ M @ [ C T A S K 0110540 , R X @ [ 3 ] M R @ [ 2 5 ] B S 0110560 F 1 @ [ 6 2 ] F F 2 @ [ 1 5 ] 0110600 A ] ; \t \t * 1 4 7 \t 0 , 4 \r 0110620 M @ [ N C I A , R X @ [ 3 ] M R 0110640 @ [ 2 5 ] B S F 1 @ [ 6 7 ] F F 0110660 2 @ [ 1 5 ] A ] ; \t \t * 1 4 7 0110700 \t 4 , 1 4 \r M @ [ C S D A T A , 0110720 R X @ [ 3 ] M R @ [ 2 6 ] A ] 0110740 ; \t \t \t \t * 1 5 3 \r M @ [ P A G 0110760 E & P A R & B O O T , R X @ [ 3 0111000 ] M R @ [ 2 7 ] A ] ; \t \t \t * 0111020 1 5 7 \r M @ [ P A G E , R X 0111040 @ [ 3 ] M R @ [ 2 7 ] B S F 1 @ 0111060 [ 6 2 ] F F 2 @ [ 1 5 ] A ] ; 0111100 \t \t * 1 5 7 \t 0 , 4 \r M @ [ 0111120 P A R I T Y , 376 001 \0 004 310 R X @ [ 0111140 3 ] M R @ [ 2 7 ] B S F 1 @ [ 6 0111160 3 ] F F 2 @ [ 1 ] A ] ; \t \t * 0111200 1 5 7 \t 4 , 4 \r M @ [ B O O 0111220 T R E A S O N , R X @ [ 3 ] M R 0111240 @ [ 2 7 ] B S F 1 @ [ 6 6 ] F F 0111260 2 @ [ 3 ] A ] ; \t * 1 5 7 \t 1 0111300 0 , 1 0 \r \r % T o g e t a 0111320 m u l t i - f i e l d w o r d 0111340 u s i n g o n l y o n e 0111360 s p e c i f i c a t i o n , 0111400 u s e \r G E T R S P E C [ m r 0111420 s a d d r e s s ] . T h u 0111440 s t o l o a d T w i t h 0111460 A P C T A S K a n d A P C 0111500 : \r \t T _ G E T R S P E C [ 0111520 1 4 3 ] ; \r % \r M @ [ G 376 001 \0 025 0111540 262 E T R S P E C , M R @ [ X O R 0111560 [ R S H I F T [ # 1 , 2 ] , 1 4 0111600 ] ] R X @ [ A N D [ # 1 , 3 ] 0111620 ] A ] ; \r \r * S t k P s o u 0111640 r c e s / d e s t i n a t i o n 0111660 s : \r * ( o p e n - c o d e d 0111700 M R S @ [ x ] h e r e f o r 0111720 s p e e d ) \r M @ [ S T A C K 0111740 , R X @ [ 3 ] M R @ [ 2 0 ] 0111760 A ] ; \t \t * M R S @ [ 1 6 3 ] \r 0112000 M @ [ S T A C K _ , R X @ [ 3 ] 0112020 M R @ [ 2 0 ] L R @ [ 1 ] 0112040 L U _ ] ; \r M @ [ S T A C K & + 0112060 1 , R X @ [ 3 ] M R @ [ 2 1 ] 0112100 A ] ; \t \t * 1 6 7 \r M @ [ S T 0112120 A C K & + 1 _ , R X @ [ 3 ] M 0112140 R 376 001 \0 = 211 @ [ 2 1 ] L R @ [ 0112160 1 ] L U _ ] ; \r M @ [ S T A C 0112200 K & - 1 , R X @ [ 3 ] M R @ [ 0112220 2 2 ] A ] ; \t \t * 1 7 3 \r M @ 0112240 [ S T A C K & - 1 _ , R X @ [ 3 0112260 ] M R @ [ 2 2 ] L R @ [ 1 ] 0112300 L U _ ] ; \r M @ [ S T A C K & 0112320 - 2 , R X @ [ 3 ] M R @ [ 2 3 0112340 ] A ] ; \t \t * 1 7 7 \r M @ [ S 0112360 T A C K & - 2 _ , R X @ [ 3 ] 0112400 M R @ [ 2 3 ] L R @ [ 1 ] L 0112420 U _ ] ; \r M @ [ S T A C K & + 2 0112440 , R X @ [ 3 ] M R @ [ 2 0 ] 0112460 F 2 @ [ 3 ] A ] ; \t * 1 6 3 , 0112500 S T A C K S H I F T \r M @ [ S 0112520 T A C K & + 2 _ , R X @ [ 3 ] 0112540 M R @ [ 2 0 376 001 \0 D 253 ] F 2 @ 0112560 [ 3 ] L R @ [ 1 ] L U _ ] ; 0112600 \r M @ [ S T A C K & + 3 , R X @ 0112620 [ 3 ] M R @ [ 2 1 ] F 2 @ [ 0112640 3 ] A ] ; \t * 1 6 7 , S T A 0112660 C K S H I F T \r M @ [ S T A C K 0112700 & + 3 _ , R X @ [ 3 ] M R @ [ 0112720 2 1 ] F 2 @ [ 3 ] L R @ [ 1 0112740 ] L U _ ] ; \r M @ [ S T A C K 0112760 & - 3 , R X @ [ 3 ] M R @ [ 2 0113000 3 ] F 2 @ [ 3 ] A ] ; \t * 1 0113020 7 7 , S T A C K S H I F T \r M 0113040 @ [ S T A C K & - 3 _ , R X @ [ 0113060 3 ] M R @ [ 2 3 ] F 2 @ [ 3 0113100 ] L R @ [ 1 ] L U _ ] ; \r \f 0113120 \r % F u n c t i o n s a r e 0113140 d i v i d e d i n t 376 001 \0 262 \v 0113160 o t h e f o l l o w i n g 0113200 c l a s s e s : \r \r 1 . G r 0113220 o u p A ( c u r r e n t l y 0113240 n o n e ) a n d G r o u p 0113260 B - - o n l y i n r e g u 0113300 l a r m i ' s , \r u s 0113320 e F 1 a n d F 2 . \r 2 . 0113340 F 1 o n l y - - o n l y i 0113360 n r e g u l a r m i ' s . \r 0113400 3 . F 2 o n l y - - e i t 0113420 h e r m e m o r y r e f e r 0113440 e n c e o r r e g u l a r 0113460 m i ' s . \r % \r * G r o u p B 0113500 f u n c t i o n s \r M @ [ S P 0113520 A R E F U N C T I O N , F F 1 @ 0113540 [ 7 ] F F 2 @ [ 0 ] ? ] ; \r 0113560 376 001 \0 B 227 M @ [ R E S E T E R R 0113600 O R S , F F 1 @ [ 7 ] F F 2 @ 0113620 [ 1 ] ? ] ; \r M @ [ I N C M P 0113640 A N E L , F F 1 @ [ 7 ] F F 2 0113660 @ [ 2 ] ? ] ; \r M @ [ C L E A 0113700 R M P A N E L , F F 1 @ [ 7 ] 0113720 F F 2 @ [ 3 ] ? ] ; \r M @ [ G 0113740 E N S R C L O C K , F F 1 @ [ 7 0113760 ] F F 2 @ [ 4 ] ? ] ; \r M @ 0114000 [ R E S E T W D T , F F 1 @ [ 7 0114020 ] F F 2 @ [ 5 ] ? ] ; \r M @ 0114040 [ B O O T , F F 1 @ [ 7 ] F F 0114060 2 @ [ 6 ] ? ] ; \r M @ [ S E T 0114100 F A U L T , F F 1 @ [ 7 ] F F 0114120 2 @ [ 7 ] ? ] ; \r M @ [ A P C 0114140 T A S K & A P C _ , F F 1 @ [ 7 0114160 ] F F 2 376 001 \0 _ 266 @ [ 1 0 ] 0114200 S E T [ R T N I L L @ , 1 ] A 0114220 _ ] ; \r M @ [ R E S T O R E , F 0114240 F 1 @ [ 7 ] F F 2 @ [ 1 1 ] 0114260 A _ ] ; \r M @ [ R E S E T F A U 0114300 L T , F F 1 @ [ 7 ] F F 2 @ [ 0114320 1 2 ] ? ] ; \r M @ [ U S E C T 0114340 A S K , F F 1 @ [ 7 ] F F 2 @ 0114360 [ 1 3 ] ? ] ; \r M @ [ W R I T 0114400 E C S 0 & 2 , F F 2 @ [ 1 4 ] 0114420 F F 1 @ [ 7 ] J C @ [ 6 ] ? 0114440 ] ; \r M @ [ W R I T E C S 1 , F 0114460 F 2 @ [ 1 5 ] F F 1 @ [ 7 ] 0114500 J C @ [ 6 ] ? ] ; \r M @ [ R E 0114520 A D C S , F F 2 @ [ 1 6 ] F F 0114540 1 @ [ 7 ] J C @ [ 6 ] ? ] ; 0114560 \r M @ [ D 0 O F F , 376 001 \0 ( 242 F 0114600 F 1 @ [ 7 ] F F 2 @ [ 1 7 ] 0114620 ? ] ; \r \r * F 1 o n l y \r * 0 0114640 0 t a k e a n R M a d d 0114660 r e s s a s a r g u m e n t 0114700 \r M @ [ B B F A , F F 2 @ [ 0 ] 0114720 P F [ A L F @ , 3 ] F F 1 @ 0114740 [ 0 0 ] # 1 ] ; \t * A d i s 0114760 p a t c h \r M @ [ R S 2 3 2 _ , 0115000 F F 1 @ [ 1 ] B _ ] ; \r * 0 0115020 2 - 0 3 t a k e a n R M 0115040 a d d r e s s a s a r g u m 0115060 e n t \r M @ [ L O A D T I M E R 0115100 , F F 1 @ [ 2 ] A _ # 1 ] ; 0115120 \r M @ [ A D D T O T I M E R , F 0115140 F 1 @ [ 3 ] A _ # 1 ] ; \r * 0115160 0 4 u n u s e d \r M @ [ L O 376 0115200 001 \0 P S A D P A G E , F F 1 @ [ 0115220 5 ] F F 2 @ [ # 1 ] S W P A 0115240 G E @ [ 1 ] I F E [ C H P G F 0115260 L G @ , 1 , C H P A G E @ [ 1 ] 0115300 ] \r S E T [ C H P G F L G @ 0115320 , 2 ] ] ; \r * 0 6 = G r o u 0115340 p A ; 0 7 = G r o u p 0115360 B ; 1 0 = n o - o p \r * 1 0115400 1 - 1 4 t a k e a n R M 0115420 a d d r e s s a s a r g u m 0115440 e n t \r M @ [ W F A , F F 1 @ [ 0115460 1 1 ] # 1 ] ; \r M @ [ B B F B 0115500 , F F 1 @ [ 1 2 ] # 1 ] ; \r M 0115520 @ [ W F B , F F 1 @ [ 1 3 ] # 0115540 1 ] ; \r M @ [ R F , F F 1 @ [ 1 0115560 4 ] # 1 ] ; \r M @ [ B B F B X 0115600 , F F 1 376 001 \0 240 200 @ [ 1 5 ] # 0115620 1 ] ; \r % N E X T I N S T a n 0115640 d N E X T D A T A u s u a l 0115660 l y r e q u i r e a c a l 0115700 l i n J C @ s o t h a t 0115720 a q u a d w o r d o v f \r 0115740 t r a p w i l l r e t u r n 0115760 t o t h e m i c o n t a 0116000 i n i n g t h e N E X T I N 0116020 S T / N E X T D A T A ; t h e 0116040 " O D D C A L L " \r b i t i 0116060 s s e t b y t h e s e f 0116100 o r m s s o t h a t M i c 0116120 r o D w i l l n o t r e q 0116140 u i r e t h e s u c c e s s 0116160 o r t o \r b e a t . + 1 . 0116200 H o w e v e r 376 001 \0 254 l , 0116220 s o m e t i m e s o n e o f 0116240 t h e f o l l o w i n g s 0116260 i t u a t i o n s e x i s t s 0116300 : \r ( 1 ) q o v f t r a p 0116320 i s i m p o s s i b l e ( 0116340 e . g . , b e c a u s e P C 0116360 F i s o d d ) ; \r ( 2 ) 0116400 t h e v a l u e a l r e a d 0116420 y i n T P C i s a n a 0116440 p p r o p r i a t e r e t u r 0116460 n f r o m a q o v f t r 0116500 a p ; \r ( 3 ) a r e a l 0116520 c a l l i s c o n t a i n e 0116540 d i n t h e s a m e m i 0116560 . \r I n t h e s e s i t u a 0116600 t i o n s , t h e C N E 376 001 0116620 \0 336 370 X T I N S T / C N E X T D 0116640 A T A f o r m s a r e u s 0116660 e d w h i c h i m p o s e 0116700 n o \r c o n s t r a i n t u p 0116720 o n t h e b r a n c h c l 0116740 a u s e i n t h e s a m e 0116760 m i . \r S K I P D A T A i s 0117000 l i k e N E X T D A T A a 0117020 n d C S K I P D A T A l i k 0117040 e C N E X T D A T A e x c e 0117060 p t t h a t t h e y \r d i s 0117100 c a r d t h e n e x t b y 0117120 t e . \r % \r M @ [ N E X T I N S 0117140 T , F F 1 @ [ 1 6 ] R E T C L 0117160 @ [ 1 ] O D D C A L L @ [ 1 ] 0117200 J C @ [ 5 ] R X @ [ 0 ] Q 0117220 R S @ 376 001 \0 $ s [ # 1 ] ] ; \r M 0117240 @ [ C N E X T I N S T , F F 1 @ 0117260 [ 1 6 ] R X @ [ 0 ] Q R S @ 0117300 [ # 1 ] ] ; \r M @ [ N E X T D A 0117320 T A , F F 1 @ [ 1 7 ] R E T C 0117340 L @ [ 1 ] O D D C A L L @ [ 1 0117360 ] J C @ [ 5 ] R X @ [ 0 ] 0117400 Q R S @ [ # 1 ] ] ; \r M @ [ C N 0117420 E X T D A T A , F F 1 @ [ 1 7 ] 0117440 R X @ [ 0 ] Q R S @ [ # 1 ] 0117460 ] ; \r M @ [ S K I P D A T A , F 0117500 F 1 @ [ 1 7 ] J C @ [ 5 ] O 0117520 D D C A L L @ [ 1 ] ? ] ; \r M 0117540 @ [ C S K I P D A T A , F F 1 @ 0117560 [ 1 7 ] ? ] ; \r \r * F 2 o n 0117600 l y \r M @ [ R E G S H I F T , F 0117620 F 2 @ [ 0 ] ? 376 001 \0 \t & ] ; \r 0117640 M @ [ S T K P _ , F F 2 @ [ 1 ] 0117660 A _ ] ; \r M @ [ F R E E Z E R 0117700 E S U L T , F F 2 @ [ 2 ] ? ] 0117720 ; \r * 3 i s S T A C K S H I 0117740 F T ( u s e d o n l y b y 0117760 S T A C K , S T A C K _ , 0120000 e t c . ) \r M @ [ I O S T R O B 0120020 E , F F 2 @ [ 3 ] ? ] ; * s 0120040 a m e a s S T A C K S H I F 0120060 T \r M @ [ C Y C L E C O N T R O 0120100 L _ , F F 2 @ [ 4 ] A _ ] ; \r 0120120 M @ [ S B _ , F F 2 @ [ 5 ] A 0120140 _ ] ; \r M @ [ D B _ , F F 2 @ [ 0120160 6 ] A _ ] ; \r * 7 i s ? ? 0120200 ? \r * 1 0 i s B R A N C H S 0120220 H I F T \r M @ [ S A L U F 376 001 \0 0120240 345 K _ , F F 2 @ [ 1 1 ] B _ 0120260 ] ; \r * 1 2 i s a n o - o 0120300 p \r M @ [ M N B R _ , F F 2 @ [ 0120320 1 3 ] A _ ] ; \r M @ [ P C F 0120340 _ , F F 2 @ [ 1 4 ] A _ ] ; 0120360 \r M @ [ R E S E T M E M E R R S 0120400 , F F 2 @ [ 1 5 ] ? ] ; \r M @ 0120420 [ U S E C O U T A S C I N , F F 0120440 2 @ [ 1 6 ] ? ] ; \r M @ [ P R 0120460 I N T E R _ , F F 2 @ [ 1 7 ] 0120500 A _ ] ; \r \f \r % M e m o r y 0120520 r e f e r e n c e c l a u s e 0120540 s a r e e n c o d e d i n 0120560 o n e o f t h e f o l l 0120600 o w i n g f o r m s : \r \r P F 0120620 E T C H n [ B a s e R e g , R A 0120640 d d 376 001 \0 177 371 r , F 2 ] ; \t * n 0120660 = 1 , 2 , 4 \r P S T O R 0120700 E n [ B a s e R e g , R A d d r 0120720 , F 2 ] ; \t * n = 1 , 2 , 0120740 4 \r I O F E T C H n [ B a s e 0120760 R e g , D e v i c e , F 2 ] ; \t 0121000 * n = 4 , 2 0 \r I O S T O 0121020 R E n [ B a s e R e g , D e v i 0121040 c e , F 2 ] ; \t * n = 4 , 0121060 2 0 \r X M A P [ B a s e R e g , 0121100 R A d d r , F 2 ] ; \r * I N P U 0121120 T , O U T P U T , o r R E 0121140 A D P I P E D e v A d d r i 0121160 s ( H 2 [ 1 0 , 1 3 ] o r 0121200 C T A S K [ 0 , 3 ] ) , , H 2 [ 0121220 1 4 , 1 7 ] . \r * R A d d r i 0121240 s a s s e m 376 001 \0 c % b l e d 0121260 i n t o t h e s r c d e s 0121300 t m i f i e l d ; O t h e 0121320 r R A d d r i s n o t u s 0121340 e d b y \r * t h e o p e r a 0121360 t i o n , b u t w i l l b 0121400 e a s s e m b l e d i n t o 0121420 t h e B a s e R e g f i e 0121440 l d i f s u p p l i e d \r * 0121460 ( u s e f u l f o r d o i n 0121500 g R < 0 b . c . i n s a 0121520 m e m i o r f o r A L U 0121540 t e s t s i n t h e n e 0121560 x t m i ) . \r * F 2 i s n 0121600 o t u s e d b y R E A D P 0121620 I P E b u t w i l l b e 0121640 a s s e m b l e d i f 376 001 \0 k 0121660 020 s u p p l i e d . \r I N P U 0121700 T [ R A d d r , F 2 , O t h e r 0121720 R A d d r ] ; \r O U T P U T [ R 0121740 A d d r , F 2 , O t h e r R A d 0121760 d r ] ; \r R E A D P I P E [ R A 0122000 d d r , F 2 , O t h e r R A d d 0122020 r ] ; \r R E F R E S H [ R A d d 0122040 r ] ; \r \r B a s e R e g m u s 0122060 t n o r m a l l y b e e v 0122100 e n a n d m e e t t h e 0122120 s a m e c o n d i t i o n s 0122140 a s R S R C @ / R S I N K @ ; 0122160 \r i n t h e e v e n t t h 0122200 e p r o g r a m m e r r e a 0122220 l l y w a n t s t o u s e 0122240 a n o d d b a s e r e g 0122260 i 376 001 \0 233 3 s t e r , w h i c 0122300 h \r w i l l u s e t h e s 0122320 a m e R M w o r d f o r 0122340 b o t h h a l v e s o f t 0122360 h e b a s e r e g i s t e r 0122400 , h e w r i t e s \r O D D P 0122420 F E T C H n , O D D P S T O R 0122440 E n , O D D I O F E T C H n , 0122460 O D D I O S T O R E n , o r 0122500 O D D X M A P . \r \r r a d d r 0122520 i s l e g a l i f e i t 0122540 h e r i t i s S T A C K 0122560 o r ( 1 ) e v e r y 0 i 0122600 n t h e t o p f o u r b 0122620 i t s \r m u s t h a v e a 0122640 m a t c h i n g 0 i n C T 0122660 A S K ; ( 376 001 \0 [ 211 2 ) f o 0122700 r P F E T C H 2 / P S T O R E 0122720 2 r a d d r m u s t b e 0122740 e v e n ; \r f o r P F E T C H 0122760 4 / P S T O R E 4 r a d d r 0123000 m u s t b e q u a d a l i g 0123020 n e d . \r \r D 0 L a n g o u t 0123040 p u t s M E M I N S = 1 ; R 0123060 M O D = 1 i f d i s p l a c 0123100 e m e n t f r o m o p t i o 0123120 n a l F 2 a r g \r e l s e 0123140 R M O D = 0 i f d i s p l a 0123160 c e m e n t f r o m T ; R 0123200 S E L = B a s e R e g & 7 7 0123220 ; T Y P E = k i n d o f r 0123240 e f e r e n c e ; \r S R C D E S 0123260 = 0 i f S T A C K 376 001 \0 351 272 0123300 e l s e S R C D E S = r a d 0123320 d r . \r % \r M @ [ W N @ , E R [ 0123340 W r o n g . n u m b e r . a r g 0123360 s . f o r . r e f e r e n c e , 0123400 2 ] ] ; \r M @ [ O B @ , E R [ B 0123420 a s e . r e g i s t e r . # 1 . 0123440 i s . o d d , 2 ] ] ; \r * # 1 0123460 = b a s e r e g , # 2 = 0123500 t y p e , # 3 = n a r g 0123520 s , # 4 = o p t i o n a l 0123540 F 2 \r M @ [ B R @ , T Y P E @ 0123560 [ # 2 ] M I R M O D @ [ # 3 ] 0123600 \r S E T [ Z @ , X O R [ I P 0123620 [ # 1 ] , R M B A S E @ , 6 0 ] 0123640 ] R X @ [ A N D [ Z @ , 3 ] ] 0123660 R S E L @ [ R S H I F T [ Z @ 0123700 376 001 \0 / c , 2 ] ] \r I F G [ 0123720 Z @ , 5 7 , I F E [ S U B T S K 0123740 @ , 0 , , I L L R A @ [ # 1 ] ] 0123760 ] \r S E L E C T [ # 3 , W N 0124000 @ [ ] , W N @ [ ] , , F F 2 @ [ 0124020 # 4 ] ] \r I F E [ F V A L [ 0124040 R X 1 @ ] , 1 , O B @ [ # 1 ] ] 0124060 \r ] ; \r \r M @ [ E B @ , E R [ B 0124100 a s e . r e g i s t e r . # 1 . 0124120 i s . e v e n , 2 ] ] ; \r M @ [ 0124140 O B R @ , T Y P E @ [ # 2 ] M 0124160 I R M O D @ [ # 3 ] \r S E T 0124200 [ Z @ , X O R [ I P [ # 1 ] , R 0124220 M B A S E @ , 6 0 ] ] R X @ [ 0124240 A N D [ Z @ , 3 ] ] R S E L @ 0124260 [ R S H I F T [ Z @ , 2 ] ] \r 0124300 I F G [ 376 001 \0 g 341 Z @ , 5 7 , 0124320 I F E [ S U B T S K @ , 0 , , I 0124340 L L R A @ [ # 1 ] ] ] \r S E 0124360 L E C T [ # 3 , W N @ [ ] , W N 0124400 @ [ ] , , F F 2 @ [ # 4 ] ] \r 0124420 I F E [ F V A L [ R X 1 @ ] , 0124440 0 , E B @ [ # 1 ] ] \r ] ; \r \r M 0124460 @ [ M E R E 0 @ , E R [ # 1 = 0 0124500 . . s t a c k . w i l l . b e . 0124520 u s e d , 2 ] ] ; \r M @ [ M E M 0124540 R 0 @ , I F S E [ # 1 , S T A C 0124560 K , S R C D E S @ [ 0 ] , S R C 0124600 D E S @ [ # 1 ] \r I F E [ I 0124620 P [ # 1 ] , 0 , M E R E 0 @ [ # 0124640 1 ] , \r I F E [ O R [ F 0124660 V A L [ S R D S 0 3 @ ] , C T A 0124700 S K @ ] , F V A L [ 376 001 \0 e 016 S 0124720 R D S 0 3 @ ] , , I L L R A @ [ 0124740 # 1 ] ] ] ] ] ; \r \r S E T [ O D 0124760 D O K @ , 0 ] ; \r M @ [ O D D O 0125000 K , S E T [ O D D O K @ , 1 ] ] 0125020 ; \t * S u p p r e s s n e x t 0125040 " N o t . E v e n " w a r n 0125060 i n g \r M @ [ M E R N E @ , I F 0125100 E [ O D D O K @ , 0 , E R [ W A 0125120 R N I N G : . # 1 . n o t . e v 0125140 e n , 3 ] , S E T [ O D D O K @ 0125160 , 0 ] ] ] ; \r M @ [ M E M R 1 @ 0125200 , I F S E [ # 1 , S T A C K , S 0125220 R C D E S @ [ 0 ] , S R C D E S 0125240 @ [ # 1 ] \r I F E [ I P [ # 0125260 1 ] , 0 , M E R E 0 @ [ # 1 ] , 0125300 \r I F E [ O R [ F V A 376 0125320 001 \0 \ l L [ S R D S 0 3 @ ] , C 0125340 T A S K @ ] , F V A L [ S R D S 0125360 0 3 @ ] , \r I F E [ 0125400 F V A L [ S R D S 7 @ ] , 0 , , 0125420 M E R N E @ [ # 1 ] ] , I L L R 0125440 A @ [ # 1 ] ] ] ] ] ; \r \r M @ [ 0125460 M E M R 3 @ , I F S E [ # 1 , S 0125500 T A C K , S R C D E S @ [ 0 ] , 0125520 S R C D E S @ [ # 1 ] \r I F 0125540 E [ I P [ # 1 ] , 0 , M E R E 0 0125560 @ [ # 1 ] , \r I F E [ O 0125600 R [ F V A L [ S R D S 0 3 @ ] , 0125620 C T A S K @ ] , F V A L [ S R D 0125640 S 0 3 @ ] , \r I F E 0125660 [ F V A L [ S R D S 6 7 @ ] , 0 0125700 , , M E R N Q @ [ # 1 ] ] , I L 0125720 L R A @ 376 001 \0 Q \b [ # 1 ] ] ] ] 0125740 ] ; \r \r M @ [ I O U D @ , E R [ 0125760 # 1 . u n a d d r e s s a b l e 0126000 . d e v i c e , 2 ] ] ; \r M @ [ 0126020 I O D V @ , S R C D E S @ [ # 1 0126040 ] I F E [ O R [ C T A S K @ , 0126060 F V A L [ S R D S 0 3 @ ] ] , F 0126100 V A L [ S R D S 0 3 @ ] , , I O 0126120 U D @ [ # 1 ] ] ] ; \r \r M @ [ A 0126140 N Y B R @ , S E T [ Z @ , X O R 0126160 [ I P [ # 1 ] , R M B A S E @ , 0126200 6 0 ] ] R X @ [ A N D [ Z @ , 0126220 3 ] ] R S E L @ [ R S H I F T 0126240 [ Z @ , 2 ] ] \r I F G [ Z @ 0126260 , 5 7 , I F E [ S U B T S K @ , 0126300 0 , , I L L R A @ [ # 1 ] ] ] ] 0126320 ; \r \f \r * t y p e 376 001 \0 263 330 0 0126340 i s u n u s e d \r M @ [ P F 0126360 E T C H 1 , B R @ [ # 1 , 0126400 4 , # 0 , # 3 ] M E M R 0 @ [ 0126420 # 2 ] ? ] ; \r M @ [ P F E T C 0126440 H 2 , B R @ [ # 1 , 5 , # 0126460 0 , # 3 ] M E M R 1 @ [ # 2 ] 0126500 ? ] ; \r M @ [ P F E T C H 4 , 0126520 B R @ [ # 1 , 6 , # 0 , # 0126540 3 ] M E M R 3 @ [ # 2 ] ? ] 0126560 ; \r M @ [ P S T O R E 1 , B 0126600 R @ [ # 1 , 1 0 , # 0 , # 3 ] 0126620 M E M R 0 @ [ # 2 ] ? ] ; \r M 0126640 @ [ P S T O R E 2 , B R @ [ 0126660 # 1 , 1 1 , # 0 , # 3 ] M E M 0126700 R 1 @ [ # 2 ] ? ] ; \r M @ [ P 0126720 S T O R E 4 , B R @ [ # 376 001 0126740 \0 ) 266 1 , 1 2 , # 0 , # 3 ] M 0126760 E M R 3 @ [ # 2 ] ? ] ; \r M @ 0127000 [ X M A P , B R @ [ # 0127020 1 , 1 6 , # 0 , # 3 ] M E M R 0127040 0 @ [ # 2 ] ? ] ; \r M @ [ I O 0127060 F E T C H 4 , B R @ [ # 1 , 0127100 1 , # 0 , # 3 ] I O D V @ [ # 0127120 2 ] ? ] ; \r M @ [ I O F E T C 0127140 H 1 6 , B R @ [ # 1 , 1 4 , # 0 0127160 , # 3 ] I O D V @ [ # 2 ] ? 0127200 ] ; \r M @ [ I O S T O R E 4 , 0127220 B R @ [ # 1 , 1 5 , # 0 , # 3 ] 0127240 I O D V @ [ # 2 ] ? ] ; \r M 0127260 @ [ I O S T O R E 1 6 , B R @ [ 0127300 # 1 , 1 7 , # 0 , # 3 ] I O D 0127320 V @ [ # 2 ] ? ] ; \r * F o r 0127340 T a 376 001 \0 302 j d d r e s s i n 0127360 g i n c o n j u n c t i o n 0127400 w i t h a n O t h e r R A 0127420 d d r , l e a v e 2 n d a 0127440 r g b l a n k . \r M @ [ I N P 0127460 U T , T Y P E @ [ 7 ] M I R M 0127500 O D @ [ I F G [ # 0 , 1 , I F S 0127520 E [ # 2 , , 2 , F F 2 @ [ # 2 ] 0127540 3 ] , 2 ] ] \r M E M R 0 @ [ 0127560 # 1 ] I F G [ # 0 , 2 , A N Y 0127600 B R @ [ # 3 ] ] ? ] ; \r M @ [ 0127620 O U T P U T , T Y P E @ [ 1 3 ] 0127640 M I R M O D @ [ I F G [ # 0 , 0127660 1 , I F S E [ # 2 , , 2 , F F 2 0127700 @ [ # 2 ] 3 ] , 2 ] ] \r M E 0127720 M R 0 @ [ # 1 ] I F G [ # 0 , 0127740 2 , A N Y B R @ 376 001 \0 U c [ # 3 0127760 ] ] ? ] ; \r M @ [ R E A D P I 0130000 P E , T Y P E @ [ 2 ] M I R M 0130020 O D @ [ I F G [ # 0 , 1 , I F S 0130040 E [ # 2 , , 2 , F F 2 @ [ # 2 ] 0130060 3 ] , 2 ] ] \r M E M R 0 @ [ 0130100 # 1 ] I F G [ # 0 , 2 , A N Y 0130120 B R @ [ # 3 ] ] ? ] ; \r * N o 0130140 t a s k c h e c k s o n 0130160 R E F R E S H ; f o r c e d 0130200 i s p l a c e m e n t o f 0 0130220 \r M @ [ R E F R E S H , F F 2 @ 0130240 [ 0 ] R X @ [ A N D [ I P [ # 0130260 1 ] , 3 ] ] \r \t M R T Y P @ [ X 0130300 O R [ A N D [ 3 6 0 , L S H I F 0130320 T [ I P [ # 1 ] , 2 ] ] , 1 7 0 0130340 3 ] ] ? ] ; \r \r M @ [ O D 376 001 \0 0130360 244 242 D P F E T C H 1 , O B R 0130400 @ [ # 1 , 4 , # 0 , # 3 ] M 0130420 E M R 0 @ [ # 2 ] ? ] ; \r M @ 0130440 [ O D D P F E T C H 2 , O B 0130460 R @ [ # 1 , 5 , # 0 , # 3 ] 0130500 M E M R 1 @ [ # 2 ] ? ] ; \r M 0130520 @ [ O D D P F E T C H 4 , O 0130540 B R @ [ # 1 , 6 , # 0 , # 3 ] 0130560 M E M R 3 @ [ # 2 ] ? ] ; \r 0130600 M @ [ O D D P S T O R E 1 , 0130620 O B R @ [ # 1 , 1 0 , # 0 , # 3 0130640 ] M E M R 0 @ [ # 2 ] ? ] ; 0130660 \r M @ [ O D D P S T O R E 2 , 0130700 O B R @ [ # 1 , 1 1 , # 0 , # 0130720 3 ] M E M R 1 @ [ # 2 ] ? ] 0130740 ; \r M @ [ O D D P S T O R E 4 , 0130760 376 001 \0 \ F O B R @ [ # 1 , 1 0131000 2 , # 0 , # 3 ] M E M R 3 @ [ 0131020 # 2 ] ? ] ; \r M @ [ O D D X M 0131040 A P , O B R @ [ # 1 , 0131060 1 6 , # 0 , # 3 ] M E M R 0 @ 0131100 [ # 2 ] ? ] ; \r M @ [ O D D I 0131120 O F E T C H 4 , O B R @ [ # 1 0131140 , 1 , # 0 , # 3 ] I O D V @ 0131160 [ # 2 ] ? ] ; \r M @ [ O D D I 0131200 O F E T C H 1 6 , O B R @ [ # 1 0131220 , 1 4 , # 0 , # 3 ] I O D V @ 0131240 [ # 2 ] ? ] ; \r M @ [ O D D I 0131260 O S T O R E 4 , O B R @ [ # 1 0131300 , 1 5 , # 0 , # 3 ] I O D V @ 0131320 [ # 2 ] ? ] ; \r M @ [ O D D I 0131340 O S T O R E 1 6 , O B R @ [ # 1 0131360 , 1 7 , # 0 , 376 001 \0 216 I # 3 ] 0131400 I O D V @ [ # 2 ] ? ] ; \r \r E 0131420 Q @ [ I O F E T C H 2 0 , I O F 0131440 E T C H 1 6 ] ; E Q @ [ I O S 0131460 T O R E 2 0 , I O S T O R E 1 6 0131500 ] ; \r E Q @ [ O D D I O F E T C 0131520 H 2 0 , O D D I O F E T C H 1 6 0131540 ] ; E Q @ [ O D D I O S T O R 0131560 E 2 0 , O D D I O S T O R E 1 6 0131600 ] ; \r \f \r * C o n t r o l s t 0131620 u f f : \r \r I M [ . , 0 ] ; \t \t 0131640 * L o c a t i o n c o u n t e 0131660 r f o r I M \r M @ [ . - 3 , 0131700 S U B [ I P [ . ] , 3 ] ] ; \t M 0131720 @ [ . + 3 , A D D [ I P [ . ] , 0131740 3 ] ] ; \r M @ [ . - 2 , S U B [ 0131760 I P [ . ] , 2 ] ] ; \t M 376 001 \0 N 0132000 316 @ [ . + 2 , A D D [ I P [ . ] 0132020 , 2 ] ] ; \r M @ [ . - 1 , S U B 0132040 [ I P [ . ] , 1 ] ] ; \t M @ [ . 0132060 + 1 , A D D [ I P [ . ] , 1 ] ] 0132100 ; \r \r M @ [ A L U E R R T S T , 0132120 I F E [ T S K F L G @ , 1 , E R 0132140 [ A l u . r e s u l t s . t e s 0132160 t e d . f o l l o w i n g . R E 0132200 T U R N , 2 ] ] ] ; \r \r * M a c 0132220 r o s i n s e r t " ~ @ " 0132240 o r " ~ " b e f o r e B C 0132260 n a m e s i n t h e p r 0132300 o g r a m f o r t y p e c 0132320 h e c k s . \r * R e g u l a r 0132340 B C ' S \t \t \t \t \t * C o m p l e 0132360 m e n t a r y \r M @ [ ~ A L U # 0132400 0 376 001 \0 g 215 , C N D @ [ 1 ] J 0132420 C @ [ 0 ] J A 7 @ [ 0 ] A L 0132440 U E R R T S T ] ; \t E Q @ [ ~ @ 0132460 A L U = 0 , ~ A L U # 0 ] ; \r M 0132500 @ [ ~ C A R R Y , C N D @ [ 1 ] 0132520 J C @ [ 0 ] J A 7 @ [ 1 ] 0132540 A L U E R R T S T ] ; \t E Q @ [ 0132560 ~ @ C A R R Y ' , ~ C A R R Y ] 0132600 ; \r M @ [ ~ A L U < 0 , C N D @ 0132620 [ 1 ] J C @ [ 1 ] J A 7 @ [ 0132640 0 ] A L U E R R T S T ] ; \t E 0132660 Q @ [ ~ @ A L U > = 0 , ~ A L U 0132700 < 0 ] ; \r M @ [ ~ H 2 B I T 8 ' 0132720 , C N D @ [ 1 ] J C @ [ 1 ] 0132740 J A 7 @ [ 1 ] ] ; \t \t E Q @ [ ~ 0132760 @ H 2 B I T 8 , ~ H 2 B I T 8 ' 0133000 ] ; \r M @ [ 376 001 \0 a 267 ~ R < 0 , 0133020 C N D @ [ 1 ] J C @ [ 2 ] J 0133040 A 7 @ [ 0 ] ] ; \t \t E Q @ [ ~ @ 0133060 R > = 0 , ~ R < 0 ] ; \r M @ [ ~ 0133100 R O D D , C N D @ [ 1 ] J C 0133120 @ [ 2 ] J A 7 @ [ 1 ] ] ; \t \t 0133140 E Q @ [ ~ @ R E V E N , ~ R 0133160 O D D ] ; \r M @ [ ~ I O A T T E 0133200 N ' , C N D @ [ 1 ] J C @ [ 3 0133220 ] J A 7 @ [ 0 ] ] ; \t \t E Q @ 0133240 [ ~ @ I O A T T E N , ~ I O A T 0133260 T E N ' ] ; \r M @ [ ~ M B , C N 0133300 D @ [ 1 ] J C @ [ 3 ] J A 7 0133320 @ [ 1 ] ] ; \t \t \t E Q @ [ ~ @ M 0133340 B ' , ~ M B ] ; \r \r M @ [ ~ I N 0133360 T P E N D I N G , C N D @ [ 1 ] 0133400 J C @ [ 0 ] J A 7 @ 376 001 \0 231 u 0133420 [ 0 ] F F 2 @ [ 1 0 ] ] ; \t E 0133440 Q @ [ ~ @ I N T P E N D I N G ' 0133460 , ~ I N T P E N D I N G ] ; \r M 0133500 @ [ ~ O V F ' , C N D @ [ 1 ] J 0133520 C @ [ 0 ] J A 7 @ [ 1 ] F F 2 @ 0133540 [ 1 0 ] A L U E R R T S T ] ; \t 0133560 E Q @ [ ~ @ O V F , ~ O V F ' ] 0133600 ; \r M @ [ ~ B P C C H K , C N D 0133620 @ [ 1 ] J C @ [ 1 ] J A 7 @ 0133640 [ 0 ] F F 2 @ [ 1 0 ] ] ; \t E 0133660 Q @ [ ~ @ B P C C H K ' , ~ B P 0133700 C C H K ] ; \r * M @ [ ~ U N U S 0133720 E D , C N D @ [ 1 ] J C @ [ 1 0133740 ] J A 7 @ [ 1 ] F F 2 @ [ 1 0133760 0 ] ] ; \t E Q @ [ ~ @ U N U S E 0134000 D ' , ~ U N U S E D ] ; \r M @ [ 0134020 376 001 \0 u X ~ Q U A D O V F , C N 0134040 D @ [ 1 ] J C @ [ 2 ] J A 7 0134060 @ [ 0 ] F F 2 @ [ 1 0 ] ] ; \t 0134100 E Q @ [ ~ @ Q U A D O V F ' , ~ 0134120 Q U A D O V F ] ; \r M @ [ ~ T I 0134140 M E O U T , C N D @ [ 1 ] J C 0134160 @ [ 2 ] J A 7 @ [ 1 ] F F 2 0134200 @ [ 1 0 ] ] ; \t E Q @ [ ~ @ T I 0134220 M E O U T ' , ~ T I M E O U T ] 0134240 ; \r M @ [ ~ , ] ; \t \t \t \t \t \t E 0134260 Q @ [ ~ @ , ~ ] ; \r \r % B r a n 0134300 c h a n d g o t o m a c r 0134320 o s a r e n o w i d e n t 0134340 i c a l a n d i n t e r c h 0134360 a n g e a b l e . I f t h 0134400 e n e x t \r m i t o b e 0134420 e x e c u 376 001 \0 h 370 t e d i s 0134440 o f f - p a g e , t h e m 0134460 a c r o m u s t h a v e a 0134500 " P " f o l l o w i n g i 0134520 t . \r T h u s u s e G O T O 0134540 P [ x y z ] w h e n t h e 0134560 p a g e o f x y z d i f f 0134600 e r s f r o m t h a t o f 0134620 t h e c u r r e n t \r m i 0134640 ( o n l y h a p p e n s w h 0134660 e n t h e m i p r e c e d 0134700 i n g t h e c u r r e n t 0134720 o n e d i d L O A D P A G E 0134740 ) . \r % \r \r M @ [ D B L G O T O 0134760 , I D F [ ~ @ # 3 , W 1 @ [ # 1 0135000 ] W 2 @ [ # 2 ] ~ @ # 3 , W 0135020 2 @ [ # 1 ] W 1 @ 376 001 \0 256 \ [ 0135040 # 2 ] ~ # 3 ] ] ; \r M @ [ D B 0135060 L G O T O P , C H P A G E @ [ 1 0135100 ] D B L G O T O [ # 1 , # 2 , 0135120 # 3 ] ] ; \r \r * S e t o n l y 0135140 t h e h i g h a n d l o 0135160 w b i t s o f J C s o 0135200 t h a t a C S r d / w r 0135220 c a n o v e r r u l e w i t 0135240 h \r * t h e v a l u e 6 . \r 0135260 M @ [ G O T O , I F S E [ # 2 , 0135300 , W 1 @ [ # 1 ] J C 0 @ [ 1 ] 0135320 J C 2 @ [ 0 ] , \r I D 0135340 F [ ~ @ # 2 , W 1 @ [ # 1 ] 0135360 ~ @ # 2 , W 2 @ [ # 1 ] ~ # 0135400 2 ] ] ] ; \r M @ [ G O T O P , 0135420 C H P A G E @ [ 1 ] G O T O 376 0135440 001 \0 371 245 [ # 1 , # 2 ] ] ; \r M @ 0135460 [ S K I P , G O T O [ . + 2 , # 0135500 1 ] ] ; \r M @ [ S K I P P , G O 0135520 T O P [ . + 2 , # 1 ] ] ; \r \r * 0135540 C a l l s r e t u r n t o 0135560 ( c a l l e r ' s a d d r e s 0135600 s + 1 ) m o d 2 0 . \r M 0135620 @ [ C A L L , I F S E [ # 2 , , 0135640 R E T C L @ [ 1 ] J C @ [ 5 ] 0135660 W 1 @ [ # 1 ] , N O A R G S @ 0135700 [ C A L L ' s ] ] ? ] ; \r M @ [ 0135720 C A L L P , C H P A G E @ [ 1 ] 0135740 C A L L [ # 1 , # 2 ] ] ; \r M 0135760 @ [ C A L L X , O D D C A L L @ 0136000 [ 1 ] C A L L [ # 1 ] ] ; \r \r 0136020 * T A S K d o e s a C A L 0136040 L [ . + 376 001 \0 * 9 1 ] i n t 0136060 h e c u r r e n t m i a n 0136100 d f o r c e s t h e n e x 0136120 t \r * m i i n l i n e t o 0136140 d o a R E T U R N . \r M @ [ 0136160 T A S K , R E T C L @ [ 1 ] 0136200 J C @ [ 5 ] W 2 @ [ . + 2 ] 0136220 S E T [ T S K F L G @ , 4 ] ] ; 0136240 \r \r M @ [ R E T N @ , I F S E [ 0136260 # 1 , , R E T C L @ [ 2 ] J C 0136300 @ [ 6 ] J A 7 @ [ # 2 ] , N O 0136320 A R G S @ [ # 3 ' s ] ] ] ; \r M 0136340 @ [ R E T U R N , R E T N @ [ # 0136360 1 # 2 , 0 , R E T U R N ] ] ; \r 0136400 M @ [ N I R E T , R E T N @ [ # 0136420 1 # 2 , 1 , N I R E T ] ] ; \t * 0136440 U s e d a f t e 376 001 \0 % 7 r 0136460 N e x t I n s t \r \r * E x t e r 0136500 n a l R e f e r e n c e s - - 0136520 a r g u m e n t i s a n i 0136540 n t e g e r \r M @ [ G O T O E X 0136560 T E R N A L , I F S E [ # 2 # 3 0136600 , , \r R E T C L @ [ 2 ] J 0136620 C @ [ 4 ] J A 1 @ [ A N D [ 3 0136640 , R S H I F T [ # 1 , 6 ] ] ] 0136660 J A 2 @ [ A N D [ # 1 , 7 7 ] ] 0136700 , \r E R [ N o . c o n d i t 0136720 i o n a l . e x t e r n a l . g 0136740 o t o , 2 ] ] ] ; \r M @ [ C A L 0136760 L E X T E R N A L , I F S E [ # 0137000 2 # 3 , , \r R E T C L @ [ 3 0137020 ] J C @ [ 5 ] J A 1 @ [ A N 0137040 D [ 3 , R S H I F T [ # 1 , 376 001 0137060 \0 327 x 6 ] ] ] J A 2 @ [ A N D 0137100 [ # 1 , 7 7 ] ] , \r E R [ n 0137120 o . a r g s . a l l o w e d . i 0137140 n . e x t e r n a l . c a l l , 0137160 2 ] ] ] ; \r M @ [ L O A D P A G 0137200 E E X T E R N A L , F F 1 @ [ 5 0137220 ] F F 2 @ [ # 1 ] ] ; \r \r M @ 0137240 [ D I S P , I F S E [ # 2 # 3 , 0137260 , J C @ [ 7 ] W 1 @ [ # 1 ] , 0137300 N O A R G S @ [ D I S P ' s ] ] 0137320 ? ] ; \r M @ [ D I S P P , C H P 0137340 A G E @ [ 1 ] D I S P [ # 1 , 0137360 # 2 , # 3 ] ] ; \r \f \r * T o p 0137400 r e v e n t M i c r o D a l 0137420 l o c a t i o n i n r e s e 0137440 r v e d l o c a t i o n s : \r 0137460 * 376 001 \0 ] 275 I M R E S E R V 0137500 E [ p a g e # , f i r s t a 0137520 d d r e s s , n u m b e r o f 0137540 a d d r e s s e s ] \r F @ [ L 0137560 O C K @ , 0 , 0 ] ; I M L O C 0137600 K [ L K @ , 0 ] ; \r M @ [ I M R 0137620 E S E R V E , I M L O C K [ L K 0137640 @ , A D D [ L S H I F T [ # 1 , 0137660 1 0 ] , # 2 ] ] R E P E A T [ 0137700 # 3 , L K @ [ L O C K @ [ 1 ] ] 0137720 ] ] ; \r M @ [ I M U N R E S E R 0137740 V E , I M L O C K [ L K @ , A D 0137760 D [ L S H I F T [ # 1 , 1 0 ] , 0140000 # 2 ] ] R E P E A T [ # 3 , L 0140020 K @ [ L O C K @ [ 0 ] ] ] ] ; \r 0140040 \r * * ? ? C h e c k t h i s ? 0140060 ? \r M @ [ M I D 376 001 \0 266 037 A S I 0140100 N I T , I M R E S E R V E [ 0 , 0140120 0 , 2 ] I M R E S E R V E [ 0 0140140 , 1 0 0 , 2 1 ] I M R E S E R 0140160 V E [ 1 7 , 0 , 4 0 0 ] ] ; \r \r 0140200 % D I S P T A B L E [ L E N G T 0140220 H , M A S K , V A L U E ] a p 0140240 p e a r i n g i n a s t a 0140260 t e m e n t c a u s e s t h 0140300 a t \r s t a t e m e n t t o 0140320 b e g i n a g r o u p o f 0140340 L E N G T H c o n s e c u t 0140360 i v e l y - p l a c e d s t a 0140400 t e m e n t s , \r 1 < = L E 0140420 N G T H < = 2 0 . T h e 0140440 f i r s t s t a t e m e n t 0140460 i s p l a c e d s o 376 001 \0 0140500 _ 230 t h a t \r < a d d r e s s 0140520 A N D M A S K > = V A L 0140540 U E . M A S K d e f a u l 0140560 t s t o 1 7 a n d V A L 0140600 U E t o 0 . \r N o t e : L 0140620 E N G T H + V A L U E m u s t 0140640 b e < = 2 0 . \r % \r I M M 0140660 A S K [ M A S K L C @ , 0 ] ; \t 0140700 * L o c a t i o n c o u n t e 0140720 r f o r I M M A S K \r M @ [ 0140740 D I S P T A B L E , S E T [ Z @ 0140760 , S U B [ # 1 , 1 ] ] \r I F 0141000 E [ A N D [ Z @ , 1 7 7 7 6 0 ] 0141020 , 0 , , E R [ D I S P T A B L E 0141040 . i l l . l e n g t h ] ] \r 0141060 S E T [ Z 1 @ , # 2 ] I F E [ 0141100 Z 1 376 001 \0 ! 233 @ , 0 , S E T [ Z 0141120 1 @ , 1 7 ] ] \r I F E [ A N 0141140 D [ # 3 , Z 1 @ ] , # 3 , , E R 0141160 [ D I S P T A B L E . i m p o s 0141200 s i b l e . c o n s t r a i n t 0141220 ] ] \r S E T [ Z 2 @ , 0 ] 0141240 S E T [ Z 3 @ , 0 ] \r R E P 0141260 E A T [ 2 0 , I F E [ A N D [ Z 0141300 2 @ , Z 1 @ ] , # 3 , S E T [ Z 0141320 3 @ , O R [ Z 3 @ , R S H I F T 0141340 [ 1 0 0 0 0 0 , Z 2 @ ] ] ] ] \r 0141360 S E T [ Z 2 @ , A D D [ 0141400 Z 2 @ , 1 ] ] ] \r I M M A S 0141420 K [ M A S K L C @ , I P [ . ] ] 0141440 M A S K L C @ [ C O N M S K @ 0141460 [ Z 3 @ ] D T L E N @ [ Z @ ] 0141500 ] \r ] ; \r \r * 376 001 \0 324 < T h e 0141520