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