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