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