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