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