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