$ od -c -N 50000 [Indigo]<IFS>VMEMSPY.DM!1 0000000 377 \0 \0 V M e m S p y . d e c l \0 0000020 373 226 177 337 ? \0 \0 376 001 \0 215 350 / / V 0000040 M e m S p y . d e c l \r / / C 0000060 o p y r i g h t X e r o x C 0000100 o r p o r a t i o n 1 9 8 0 , 0000120 1 9 8 1 \r / / L a s t m o 0000140 d i f i e d J a n u a r y 4 0000160 , 1 9 8 1 6 : 3 0 P M 0000200 b y B o g g s \r \r m a n i f e 0000220 s t \r [ \r m a x O v s = 1 2 0000240 8 \t \t \t / / m a x # o f 0000260 o v e r l a y s \r m a x L i n e 0000300 s = 4 0 \t \t \t / / m a x 0000320 # o f d i s p l a y l i n 0000340 e s ( 1 K p a g e s ) \r \r w 0000360 i d t h B o r d e r = 2 \r w 0000400 i d t h A d d r e s s = 6 0 0000420 \r w i d t h D i r t y 376 001 \0 6 0000440 . = 2 0 \r w i d t h V P a g e 0000460 = 6 0 \r w i d t h N a m e 0000500 = 1 3 0 \r \r p o s A d d r e s 0000520 s = 1 2 0 \r p o s L B o r d 0000540 e r = p o s A d d r e s s 0000560 + w i d t h A d d r e s s \r p 0000600 o s D i r t y = p o s L B o 0000620 r d e r + w i d t h B o r d 0000640 e r \r p o s V P a g e = p o 0000660 s D i r t y + w i d t h D i 0000700 r t y \r p o s N a m e = p o 0000720 s V P a g e + w i d t h V P 0000740 a g e \r p o s R B o r d e r = 0000760 p o s N a m e + w i d t h 0001000 N a m e \r ] \r \r / / - - - - - - 0001020 - - - - - - - - - - - - - - - - 0001040 - 376 001 \0 E 234 - - - - - - - - - - 0001060 - - - - - - - - - - - - - - - - * 0001120 - - - - - - - - - - - \r s t r u 0001140 c t u r e D T ^ 1 , m a x L i 0001160 n e s : \t / / D i s p l a y 0001200 T a b l e \r / / - - - - - - - - 0001220 - - - - - - - - - - - - - - - - * 0001320 - - - - \r [ \r a d d r e s s w 0001340 o r d \t \t / / c o r e a d d 0001360 r e s s \r l a s t A d d r e s s 0001400 w o r d \r n a m e w o r d \t 0001420 \t / / - > s t r i n g \r l a 0001440 s t N a m e 376 001 \0 203 032 w o r d 0001460 \r l o c k e d w o r d \t \t / / 0001500 t r u e = > b l a c k b 0001520 a c k g r o u n d \r l a s t L o 0001540 c k e d w o r d \r d i r t y 0001560 w o r d \t \t / / t r u e = > 0001600 m a r k d i r t y \r l a s t 0001620 D i r t y w o r d \r v P a g e 0001640 w o r d \t \t / / v P a g e 0001660 # . 0 = > d o n ' t d 0001700 i s p l a y \r l a s t V P a g e 0001720 w o r d \r d s w o r d \t \t \t 0001740 / / - > d i s p l a y s t 0001760 r e a m \r b i t M a p w o r d 0002000 \t \t / / - > b i t m a p f 0002020 o r d i s p l a y s t r e a 0002040 m \r ] \r m a n i f e s 376 \0 025 s 225 0002060 t l e n D T = s i z e D 0002100 T / 1 6 \r 377 \0 \0 V M e m S p y C 0002120 o r e . b c p l \0 373 226 v 245 026 \0 \0 0002140 376 001 \0 312 @ / / V M e m S p y C 0002160 o r e . b c p l \r / / C o p y 0002200 r i g h t X e r o x C o r p 0002220 o r a t i o n 1 9 8 0 \r / / 0002240 L a s t m o d i f i e d D e 0002260 c e m b e r 2 8 , 1 9 8 0 0002300 6 : 3 1 P M b y B o g g 0002320 s \r \r g e t " P u p 0 . d e c 0002340 l " \r g e t " P u p 1 . d e c 0002360 l " \r g e t " S t r e a m s . 0002400 d " \r g e t " A l t o D e f s 0002420 . d " \r g e t " I f s R s . d 0002440 e c l " \r g e t " V M e m . d 0002460 " \r g e t " I f s V M e m . d 0002500 e c l " \r g e t " I f s V M e 0002520 m S p y . d e c l " \r g e t " 0002540 V M e m S 376 001 \0 310 202 p y . d e c 0002560 l " \r \r e x t e r n a l \r [ \r / 0002600 / o u t g o i n g p r o c e 0002620 d u r e s \r S p y \r \r / / i n 0002640 c o m i n g p r o c e d u r e 0002660 s \r P u t s ; R e s e t s ; 0002700 E n d o f s ; P u t T e m p l 0002720 a t e ; W s s \r S e t B i t P 0002740 o s ; E r a s e B i t s ; C 0002760 h a r W i d t h \r C a l l S w a 0003000 t ; M o v e B l o c k ; D e 0003020 q u e u e ; M u l t E q \r \r B 0003040 l o c k ; S e t T i m e r ; 0003060 T i m e r H a s E x p i r e d \r 0003100 \r O p e n L e v e l 1 S o c k e 0003120 t ; C l o s e L e v e l 1 S o 0003140 c k e t \r G e t P B 376 001 \0 022 266 I 0003160 ; C o m p l e t e P u p ; R 0003200 e l e a s e P B I ; F l u s h 0003220 Q u e u e \r \r / / i n c o m i 0003240 n g s t a t i c s \r d t ; n 0003260 t ; p o r t ; s h o w ; n 0003300 o s h o w ; k e y s ; d s p 0003320 \r ] \r \f \r / / - - - - - - - - - 0003340 - - - - - - - - - - - - - - - - * 0003440 - - - \r l e t S p y ( ) b e 0003460 \r / / - - - - - - - - - - - - - 0003500 - - - - - - - - - - - - - - - - * 0003540 - - - - - - - - - - - - - - - 376 0003560 001 \0 8 O - - - - - - - - - - - - 0003600 - - - - \r [ \r p o r t > > P o r 0003620 t . s o c k e t ^ 1 = 1 \r p 0003640 o r t > > P o r t . s o c k e t 0003660 ^ 2 = s o c k e t V M e m S 0003700 p y \r l e t s p y S o c = 0003720 v e c l e n P u p S o c \r O p 0003740 e n L e v e l 1 S o c k e t ( s 0003760 p y S o c , 0 , p o r t ) \r 0004000 l e t o l d S t a t s = v 0004020 e c l e n V M S t a t s \r w h 0004040 i l e E n d o f s ( k e y s ) 0004060 d o \r [ / / m a i 0004100 n p r o g r a m l o o p \r 0004120 l e t p b i , t i m e r 0004140 = n i l , n i l \r i 0004160 f s p 376 001 \0 017 334 y S o c > > P 0004200 u p S o c . i Q . h e a d e q 0004220 0 t h e n \r [ 0004240 / / s e n d a p r o b e 0004260 \r [ \r 0004300 p b i = G e t P B 0004320 I ( s p y S o c , t r u e ) \r 0004340 i f p b i 0004360 n e 0 b r e a k \r 0004400 F l u s h Q u e u e ( l 0004420 v s p y S o c > > P u p S o c 0004440 . i Q ) \r B l 0004460 o c k ( ) \r ] 0004500 r e p e a t \r C o 0004520 m p l e t e P u p ( p b i , t 0004540 y p e V M e m S p y R e q u e s 0004560 t , p u p O v B 376 001 \0 273 n y t 0004600 e s ) \r S e t T i m 0004620 e r ( l v t i m e r , 1 0 0 0004640 ) / / 1 s e c o n d \r 0004660 ] \r \r / / w a i 0004700 t f o r a n a n s w e r \r 0004720 B l o c k ( ) r e p e a 0004740 t u n t i l T i m e r H a s E 0004760 x p i r e d ( l v t i m e r ) 0005000 % s p y S o c > > P u p S o 0005020 c . i Q . h e a d n e 0 \r 0005040 p b i = D e q u e u e ( 0005060 l v s p y S o c > > P u p S o 0005100 c . i Q ) ; i f p b i e q 0005120 0 l o o p / / t i m e d 0005140 o u t \r \r i f p b i > 0005160 > P B I . p u p . t y p e 376 001 0005200 \0 230 , e q t y p e V M e m S p 0005220 y R e p l y t h e n \r 0005240 [ \r f o r i 0005260 = 0 t o 1 5 d o c u r 0005300 s o r B i t M a p ! i = n o 0005320 t c u r s o r B i t M a p ! i 0005340 \r l e t v m s = 0005360 l v p b i > > P B I . p u p 0005400 . w o r d s \r / / 0005420 A l l l o o p s g o f r o 0005440 m 1 t o 6 3 , i g n o r 0005460 i n g r e a l p a g e 0 0005500 s i n c e i t i s \r 0005520 / / s p e c i a l i n 0005540 m a n y w a y s a n d w 0005560 e k n o w i t c a n ' t 0005600 b e 376 001 \0 s 210 a v M e m b 0005620 u f f e r . \r \r l e 0005640 t n u m P a g e s = 0 \r 0005660 f o r r P a g e = 0005700 1 t o 6 3 i f v m s > 0005720 > V M S . t y p e ^ r P a g e 0005740 n e 0 t h e n \r 0005760 n u m P a g e s = n u 0006000 m P a g e s + 1 \r 0006020 i f n u m P a g e s g r m 0006040 a x L i n e s t h e n C a l 0006060 l S w a t ( " I n c r e a s e 0006100 m a x L i n e s " ) \r 0006120 f o r l i n e = 1 t o 0006140 m a x L i n e s d o d t > 0006160 > D T ^ l i n e . a d d r e s s 0006200 = 0 \r 376 001 \0 g 273 0006220 l e t l i n e = ( m a x L 0006240 i n e s - n u m P a g e s ) / 2 0006260 \r f o r r P a g e 0006300 = 1 t o 6 3 i f v m 0006320 s > > V M S . t y p e ^ r P a g 0006340 e n e 0 t h e n \r 0006360 [ \r 0006400 d t > > D T ^ l i n e . a d d r 0006420 e s s = r P a g e \r 0006440 l i n e = l i n e 0006460 + 1 \r ] \r \f 0006500 \r / / S p y ( c o n t ' d ) 0006520 \r \r f o r r P a g 0006540 e = 1 t o 6 3 d o \r 0006560 [ \r 0006600 l e t l i n e = 376 001 \0 0006620 9 b 0 \r f o 0006640 r j = 1 t o m a x L i 0006660 n e s d o \r 0006700 i f d t > > D T ^ j . a 0006720 d d r e s s e q r P a g e 0006740 t h e n \r 0006760 [ l i n e = j ; 0007000 b r e a k ] \r 0007020 i f l i n e e q 0 l o 0007040 o p \r \r d t > 0007060 > D T ^ l i n e . v P a g e = 0007100 v m s > > V M S . v P a g e ^ 0007120 r P a g e \r d 0007140 t > > D T ^ l i n e . d i r t y 0007160 = v m s > > V M S . d i r t 0007200 y ^ r P a g e n e 0 \r 0007220 376 001 \0 ? ; d t > > D 0007240 T ^ l i n e . l o c k e d = 0007260 v m s > > V M S . l o c k e d ^ 0007300 r P a g e n e 0 \r \r 0007320 s w i t c h o n v m 0007340 s > > V M S . t y p e ^ r P a g 0007360 e i n t o \r 0007400 [ \r 0007420 c a s e 0 : e n d c a s e 0007440 / / n o t a V M b u f 0007460 f e r \r 0007500 c a s e v m i T y p e O v e r 0007520 l a y : \r 0007540 [ \r 0007560 d t > > D T ^ l i n e 0007600 . n a m e = n t ! ( v m s > 0007620 > V M S . o v 376 001 \0 314 h N u m ^ 0007640 r P a g e ) \r 0007660 e n d c a s e \r 0007700 ] \r 0007720 c a s e 0007740 v m i T y p e V F i l e : \r 0007760 [ \r 0010000 d t 0010020 > > D T ^ l i n e . n a m e = 0010040 " V F i l e " \r 0010060 e n d c a s e \r 0010100 ] 0010120 \r c a s 0010140 e v m i T y p e D D : \r 0010160 [ \r 0010200 d t > 0010220 > D T ^ l i n e . n a m 376 001 \0 n 0010240 3 e = " D i s k D e s c r i 0010260 p t o r " \r 0010300 e n d c a s e \r 0010320 ] \r 0010340 c a s e v 0010360 m i T y p e L e a f : \r 0010400 [ \r 0010420 d t > > 0010440 D T ^ l i n e . n a m e = " 0010460 L e a f " \r 0010500 e n d c a s e \r 0010520 ] \r 0010540 c a s e m 0010560 a x V M I T y p e + 1 : / / 0010600 s n a r f e d \r 0010620 [ \r 0010640 376 001 \0 J 273 d t > 0010660 > D T ^ l i n e . l o c k e d 0010700 = t r u e \r 0010720 d t > > D T ^ l i n 0010740 e . v P a g e = 0 \r 0010760 d t > > D 0011000 T ^ l i n e . n a m e = s e 0011020 l e c t o n v m s > > V M S . 0011040 j o b T y p e ^ r P a g e - 1 0011060 i n t o \r 0011100 [ \r 0011120 c a s e 0011140 j o b T y p e F T P : " F T 0011160 P j o b " \r 0011200 c a s e j o 0011220 b T y p e M T P : " M T P j 0011240 o b " \r 376 001 \0 | 373 0011260 c a s e 0011300 j o b T y p e T e l n e t : " 0011320 T e l n e t j o b " \r 0011340 c a 0011360 s e j o b T y p e B a c k u p 0011400 : " B a c k u p j o b " \r 0011420 0011440 c a s e j o b T y p e M a i 0011460 l : " M a i l j o b " \r 0011500 0011520 c a s e j o b T y p e M i s c 0011540 e l l a n e o u s : " M i s c 0011560 S e r v j o b " \r 0011600 c a s e 0011620 j o b T y p e L e a f : " L 0011640 e a f j o b " \r 376 001 \0 G 272 0011660 0011700 c a s e j o b T y p e P r e s 0011720 s : " P r e s s j o b " \r 0011740 0011760 c a s e j o b T y p e N a m 0012000 e U p d a t e : " N a m e U p 0012020 d a t e j o b " \r 0012040 c a s e 0012060 j o b T y p e B o o t U p d a 0012100 t e : " B o o t U p d a t e 0012120 j o b " \r 0012140 c a s e j o b T 0012160 y p e C o p y D i s k : " C o 0012200 p y D i s k j o b " \r 0012220 d e 0012240 f a u l t : " S n a r f e d " 0012260 376 001 \0 3 g \r 0012300 ] \r 0012320 e n d c a s e 0012340 \r 0012360 ] \r c a 0012400 s e m a x V M I T y p e + 2 : 0012420 / / f r e e p a g e \r 0012440 [ \r 0012460 d 0012500 t > > D T ^ l i n e . n a m e 0012520 = " F r e e p a g e " \r 0012540 d t > 0012560 > D T ^ l i n e . v P a g e = 0012600 0 \r 0012620 e n d c a s e \r 0012640 ] \r 0012660 376 001 \0 275 X d e f a 0012700 u l t : \r 0012720 [ \r 0012740 d t > > D T ^ l i n e 0012760 . n a m e = " [ U n k n o w 0013000 n p a g e t y p e ] " \r 0013020 e n d 0013040 c a s e \r 0013060 ] \r 0013100 ] \r ] \r \f 0013120 \r / / S p y ( c o n t ' d ) 0013140 \r \r f o r l i n e 0013160 = 1 t o m a x L i n e s 0013200 d o \r [ \r 0013220 l e t d s = 0013240 d t > > D T ^ l i n e . d s \r 0013260 \r 376 001 \0 320 202 / 0013300 / a d d r e s s \r 0013320 i f d t > > D T ^ l i n 0013340 e . l a s t A d d r e s s n e 0013360 d t > > D T ^ l i n e . a d d 0013400 r e s s t h e n \r 0013420 [ \r 0013440 d t > > D T ^ l i n e . 0013460 l a s t A d d r e s s = d t 0013500 > > D T ^ l i n e . a d d r e s 0013520 s \r R e 0013540 s e t s ( d s ) \r 0013560 d t > > D T ^ l i n e 0013600 . l a s t L o c k e d = f a 0013620 l s e \r 0013640 i f d t > > D T ^ l i n e . a 0013660 d d r e s s e q 0 l o o 376 0013700 001 \0 8 203 p \r 0013720 S e t B i t P o s ( d s , 0013740 p o s A d d r e s s ) \r 0013760 P u t T e m p l 0014000 a t e ( d s , " $ 6 U O " , 0014020 d t > > D T ^ l i n e . a d d r 0014040 e s s l s h i f t 1 0 ) \r 0014060 S e t B i 0014100 t P o s ( d s , p o s L B o r 0014120 d e r ) \r 0014140 E r a s e B i t s ( d s , w 0014160 i d t h B o r d e r , 1 ) 0014200 / / l e f t \r 0014220 S e t B i t P o s ( d s , 0014240 p o s R B o r d e r ) \r 0014260 E r a s e B i 0014300 t s ( d 376 001 \0 026 035 s , w i d t 0014320 h B o r d e r , 1 ) / / r 0014340 i g h t \r 0014360 ] \r i f d 0014400 t > > D T ^ l i n e . a d d r e 0014420 s s e q 0 l o o p \r \r 0014440 / / v P a g e \r 0014460 i f d t > > 0014500 D T ^ l i n e . l a s t V P a g 0014520 e n e d t > > D T ^ l i n e 0014540 . v P a g e t h e n \r 0014560 [ \r 0014600 d t > > D T ^ l i n 0014620 e . l a s t V P a g e = d t 0014640 > > D T ^ l i n e . v P a g e \r 0014660 S e t B 0014700 i t P o s ( d s , 376 001 \0 344 & p 0014720 o s V P a g e ) \r 0014740 E r a s e B i t s ( d 0014760 s , w i d t h V P a g e , 0 0015000 ) \r i f 0015020 d t > > D T ^ l i n e . v P a 0015040 g e n e 0 t h e n \r 0015060 [ \r 0015100 S e t 0015120 B i t P o s ( d s , p o s V P 0015140 a g e ) \r 0015160 P u t T e m p l a t e ( 0015200 d s , " $ 6 U O " , d t > > 0015220 D T ^ l i n e . v P a g e ) \r 0015240 ] \r 0015260 i f d 0015300 t > > D T ^ l i n e . l a s 376 001 0015320 \0 , 210 t L o c k e d t h e n \r 0015340 [ 0015360 \r 0015400 S e t B i t P o s ( d s , p o 0015420 s V P a g e ) \r 0015440 E r a s e B i t s 0015460 ( d s , w i d t h V P a g e , 0015500 - 1 ) \r 0015520 ] \r 0015540 ] \r \r / / 0015560 n a m e \r i 0015600 f d t > > D T ^ l i n e . l a 0015620 s t N a m e n e d t > > D T 0015640 ^ l i n e . n a m e t h e n \r 0015660 [ \r 0015700 d t > > D T 0015720 ^ l i 376 001 \0 G s n e . l a s t N 0015740 a m e = d t > > D T ^ l i n 0015760 e . n a m e \r 0016000 S e t B i t P o s ( d s , 0016020 p o s N a m e ) \r 0016040 E r a s e B i t s ( 0016060 d s , w i d t h N a m e , 0 0016100 ) \r i f 0016120 d t > > D T ^ l i n e . n a m 0016140 e n e 0 t h e n \r 0016160 [ \r 0016200 S e t B 0016220 i t P o s ( d s , p o s N a m 0016240 e ) \r 0016260 W s s ( d s , d t > > D T 0016300 ^ l i n e . n a m e ) \r 0016320 376 001 \0 H 207 0016340 ] \r i f 0016360 d t > > D T ^ l i n e . l a s 0016400 t L o c k e d t h e n \r 0016420 [ \r 0016440 S e t 0016460 B i t P o s ( d s , p o s N a 0016500 m e ) \r 0016520 E r a s e B i t s ( d s , 0016540 w i d t h N a m e , - 1 ) \r 0016560 ] 0016600 \r ] \r 0016620 \f \r / / 0016640 S p y ( c o n t ' d ) \r \r 0016660 / / d i r t y \r 0016700 i f d t > > 0016720 D T ^ l i n e . l a s t D 376 001 \0 0016740 217 313 i r t y n e d t > > D T 0016760 ^ l i n e . d i r t y t h e n 0017000 \r [ \r 0017020 d t > > D 0017040 T ^ l i n e . l a s t D i r t y 0017060 = d t > > D T ^ l i n e . d 0017100 i r t y \r 0017120 S e t B i t P o s ( d s , p 0017140 o s D i r t y ) \r 0017160 t e s t d t > > D T 0017200 ^ l i n e . d i r t y \r 0017220 i f s o 0017240 P u t s ( d s , $ * 3 7 7 ) 0017260 / / m a r k d i r t y \r 0017300 i f n 0017320 o t E r a s e B i t s ( d s , 0017340 1 376 001 \0 340 364 6 , ( d t > > D 0017360 T ^ l i n e . l a s t L o c k e 0017400 d ? 1 , 0 ) ) \r 0017420 ] \r \r 0017440 / / B a c k g r o u n d \r 0017460 i f d t > > 0017500 D T ^ l i n e . l a s t L o c k 0017520 e d n e d t > > D T ^ l i n 0017540 e . l o c k e d t h e n \r 0017560 [ \r 0017600 d t > > D T ^ l 0017620 i n e . l a s t L o c k e d = 0017640 d t > > D T ^ l i n e . l o c 0017660 k e d \r 0017700 S e t B i t P o s ( d s , p o 0017720 s D i r t y ) \r 0017740 E r a 376 001 \0 \n 241 s e B i 0017760 t s ( d s , p o s R B o r d e 0020000 r - p o s D i r t y , - 1 ) \r 0020020 ] \r 0020040 ] \r \r 0020060 / / p r o c e s s v m e m 0020100 s t a t s \r l e t 0020120 v m S t a t s = l v v m s 0020140 > > V M S . s t a t s \r 0020160 u n l e s s M u l t E q ( 0020200 o l d S t a t s , v m S t a t 0020220 s , l e n V M S t a t s ) d 0020240 o \r [ \r 0020260 R e s e t s ( n o s 0020300 h o w ) \r W s 0020320 s ( n o s h o w , " V M e m 0020340 O v e r l a y 376 001 \0 343 0020360 \v V F i l e D 0020400 D L e a f " ) \r 0020420 W s s ( n o s h o w 0020440 , " * N R e a d s " ) \r 0020460 f o r t y p e 0020500 = 1 t o m a x V M I T y p 0020520 e d o \r 0020540 P u t T e m p l a t e ( n o s 0020560 h o w , " $ 9 E D " , l v 0020600 v m S t a t s > > V M S t a t s 0020620 . r e a d s ^ t y p e ) \r 0020640 W s s ( n o s h o w 0020660 , " * N W r i t e s " ) \r 0020700 f o r t y p e 0020720 = 1 t o m a x V M I T y p 0020740 e d o \r 0020760 376 001 \0 301 b P u t T e m p l a t 0021000 e ( n o s h o w , " $ 9 E D " 0021020 , l v v m S t a t s > > V M 0021040 S t a t s . w r i t e s ^ t y p 0021060 e ) \r l e t 0021100 p = l v v m S t a t s > > 0021120 V M S t a t s . o v X M R e a d 0021140 s \r i f p ! 0021160 0 n e 0 % p ! 1 n e 0021200 0 t h e n \r 0021220 P u t T e m p l a t e ( n 0021240 o s h o w , " * N $ E D o v 0021260 e r l a y r e a d s f r o m 0021300 X M , $ E D f r o m d i 0021320 s k " , \r 0021340 l v v m S t a t s > > V M 0021360 S t a t s . 376 001 \0 355 363 o v X M R 0021400 e a d s , l v v m S t a t s 0021420 > > V M S t a t s . o v D i s k 0021440 R e a d s ) \r 0021460 d t > > D T ^ 1 . d s > > D S . 0021500 l d c b > > D C B . n e x t = 0021520 n o s h o w > > D S . f d c b 0021540 \r l e t t e 0021560 m p = s h o w ; s h o w 0021600 = n o s h o w ; n o s h o w 0021620 = t e m p \r 0021640 M o v e B l o c k ( o l d S t 0021660 a t s , v m S t a t s , l e 0021700 n V M S t a t s ) \r 0021720 ] \r ] \r \r 0021740 R e l e a s e P B I ( p b i ) 0021760 \r ] \r \r C l o s 376 \0 030 222 311 0022000 e L e v e l 1 S o c k e t ( s p 0022020 y S o c ) \r ] \r 377 \0 \0 V M e m S 0022040 p y . b c p l \0 373 231 301 ` | \0 \0 376 0022060 001 \0 O + / / V M e m S p y . b 0022100 c p l \r / / C o p y r i g h t 0022120 X e r o x C o r p o r a t i 0022140 o n 1 9 8 0 , 1 9 8 1 \r / / 0022160 L a s t m o d i f i e d S 0022200 e p t e m b e r 2 8 , 1 9 8 0022220 2 1 0 : 2 3 P M b y B 0022240 o g g s \r \r g e t " S y s D e 0022260 f s . d " \r g e t " B c p l F 0022300 i l e s . d " \r g e t " A l t 0022320 o D e f s . d " \r g e t " V M 0022340 e m S p y . d e c l " \r g e t 0022360 " P u p 0 . d e c l " \r g e t 0022400 " P u p 1 . d e c l " \r g e t 0022420 " P u p R t p . d e c l " \r g e 0022440 t " P u p B s p . d e c l " \r 0022460 g e t 376 001 \0 033 021 " F t p P r o 0022500 t . d e c l " \r \r e x t e r n a 0022520 l \r [ \r / / i n c o m i n g 0022540 p r o c e d u r e s \r S p y ; 0022560 W s s ; S y s E r r \r \r C r e 0022600 a t e K e y b o a r d S t r e a 0022620 m ; P u t T e m p l a t e \r C 0022640 r e a t e D i s p l a y S t r e 0022660 a m ; S h o w D i s p l a y S 0022700 t r e a m \r E r a s e B i t s ; 0022720 C h a r W i d t h ; S e t L 0022740 m a r g \r \r G e t P a r t n e r 0022760 ; C r e a t e B S P S t r e a 0023000 m ; B S P R e a d B l o c k \r 0023020 O p e n L e v e l 1 S o c k e t 0023040 ; C l o s e L e v e l 1 S o c 0023060 k e t \r O p e n R 376 001 \0 3 202 T P 0023100 S o c k e t ; C l o s e R T P 0023120 S o c k e t \r \r U s e r O p e n 0023140 ; U s e r C l o s e ; U s e 0023160 r R e t r i e v e \r I n i t P L 0023200 i s t ; F r e e P L i s t \r \r 0023220 G e t s ; P u t s ; C l o s 0023240 e s ; R e s e t s \r C a l l S 0023260 w a t ; Z e r o ; M o v e B 0023300 l o c k ; N o o p ; I d l e 0023320 \r I n i t i a l i z e Z o n e ; 0023340 A d d T o Z o n e ; A l l o 0023360 c a t e ; F r e e \r M y F r a 0023400 m e ; E n q u e u e ; J u n 0023420 t a ; M u l t E q ; D o u b 0023440 l e I n c r e m e n t \r T i m e 0023460 r H a s E x p i r e d ; S 376 001 0023500 \0 T b e t T i m e r \r E x t r a 0023520 c t S u b s t r i n g ; C o p 0023540 y S t r i n g \r \r I n i t i a l 0023560 i z e C o n t e x t ; C a l l 0023600 C o n t e x t L i s t ; B l o 0023620 c k \r I n i t P u p L e v e l 1 0023640 ; I n i t F t p U t i l ; I 0023660 n i t F t p P L i s t \r I n i t 0023700 B c p l R u n t i m e ; L o a 0023720 d R a m \r \r / / o u t g o i n 0023740 g s t a t i c s \r d t ; n t 0023760 ; p o r t ; s h o w ; n o 0024000 s h o w \r s y s Z o n e ; d s 0024020 p \r \r / / i n c o m i n g s 0024040 t a t i c s \r k e y s ; s y s 0024060 F o n t \r R a m I m a g e ; C 0024100 t x R 376 001 \0 [ 304 u n n i n g \r U 0024120 s e r N a m e ; U s e r P a s 0024140 s w o r d ; l v U s e r F i n 0024160 i s h P r o c \r ] \r \r s t a t i 0024200 c \r [ \r d t ; n t ; s h o w 0024220 ; n o s h o w ; p o r t \r s 0024240 a v e d U F P ; l i n e W o r 0024260 d s ; s y s Z o n e ; d s p 0024300 \r ] \r \r m a n i f e s t s t a 0024320 c k L i m i t = 3 3 5 b \r \r 0024340 s t r u c t u r e B B F D : \t 0024360 \t / / B B F i l e D e s c 0024400 r i p t o r \r [ \r n a m e w o 0024420 r d \r b l a n k w o r d 3 \r 0024440 ] \r m a n i f e s t l e n B B 0024460 F D = s i z e B B F D / 1 0024500 6 \r \f \r / / - - 376 001 \0 215 357 - - - 0024520 - - - - - - - - - - - - - - - - * 0024620 - - - - - - - \r l e t V M e m 0024640 S p y ( ) b e \r / / - - - - - 0024660 - - - - - - - - - - - - - - - - * 0024760 - - - - - - - \r [ \r l e t j u 0025000 n t a L e v e l = L o a d R 0025020 a m ( R a m I m a g e ) e q 0025040 0 ? l e v B a s i c , l e v 0025060 B c p l \r i f j u n t a L e v 0025100 e l e q l e v B a s i 376 001 \0 0025120 257 357 c t h e n I n i t B c p 0025140 l R u n t i m e ( ) \r J u n t a 0025160 ( j u n t a L e v e l , A f t 0025200 e r J u n t a ) \r ] \r \r / / - - 0025220 - - - - - - - - - - - - - - - - * 0025320 - - - - - - - - - - \r a n d A 0025340 f t e r J u n t a ( ) b e \r / 0025360 / - - - - - - - - - - - - - - - 0025400 - - - - - - - - - - - - - - - - * 0025460 - - - - - - - - - - - - - \r [ \r 0025500 C r e a t e K e y b o a r d S t 0025520 r e 376 001 \0 2 272 a m ( ) \r I d l e 0025540 = B l o c k \r f o r i = 0025560 0 t o 7 d o c u r s o 0025600 r B i t M a p ! i = 1 7 7 4 0025620 0 0 b \r f o r i = 8 t o 0025640 1 5 d o c u r s o r B i t 0025660 M a p ! i = 3 7 7 b \r s a v 0025700 e d U F P = @ l v U s e r F 0025720 i n i s h P r o c ; @ l v U s 0025740 e r F i n i s h P r o c = S 0025760 p y F i n i s h \r \r l e t f r 0026000 e e B e g i n = @ s t a c k 0026020 L i m i t \r @ s t a c k L i m i 0026040 t = M y F r a m e ( ) - 2 0026060 0 0 \r s y s Z o n e = I n i 0026100 t i a l i z e Z o n e ( f r e e 0026120 B e g i n , 376 001 \0 v 373 7 7 7 7 0026140 7 b , S y s E r r , 0 ) \r A 0026160 d d T o Z o n e ( s y s Z o n e 0026200 , f r e e B e g i n + 7 7 7 7 0026220 7 b , @ s t a c k L i m i t - 0026240 f r e e B e g i n - 7 7 7 7 7 b 0026260 ) \r \r l i n e W o r d s = l 0026300 D C B + 1 0 + 3 8 * 2 * ( ( s y 0026320 s F o n t ! - 2 + 1 ) r s h i 0026340 f t 1 ) \r d s p = C r e a 0026360 t e D i s p l a y S t r e a m ( 0026400 6 , A l l o c a t e ( s y s Z 0026420 o n e , 3 * l i n e W o r d s 0026440 ) , 3 * l i n e W o r d s ) \r 0026460 S h o w D i s p l a y S t r e a 0026500 m ( d s p , D S a l o n e ) \r 0026520 W s s ( d s p , " V M 376 001 \0 212 0026540 327 e m S p y o f 2 9 S e p 0026560 t 8 2 " ) \r \r p o r t = A 0026600 l l o c a t e ( s y s Z o n e , 0026620 l e n P o r t ) \r n t = A 0026640 l l o c a t e ( s y s Z o n e , 0026660 m a x O v s ) ; Z e r o ( n 0026700 t , m a x O v s ) \r \r l e t 0026720 c t x Q = A l l o c a t e ( 0026740 s y s Z o n e , 2 ) ; c t x 0026760 Q ! 0 = 0 \r I n i t P u p L 0027000 e v e l 1 ( s y s Z o n e , c 0027020 t x Q , 1 0 ) \r I n i t F t p 0027040 U t i l ( ) \r I n i t F t p P L 0027060 i s t ( ) \r E n q u e u e ( c t 0027100 x Q , I n i t i a l i z e C o 0027120 n t e x t ( A l l o c a t e ( s 0027140 y 376 001 \0 005 230 s Z o n e , 5 0 0 0027160 ) , 5 0 0 , \r S p y C t x , 0027200 l e n E x t r a C t x ) ) \r C 0027220 a l l C o n t e x t L i s t ( c 0027240 t x Q ! 0 ) r e p e a t / 0027260 / f o r e v e r \r ] \r \r / / - - 0027300 - - - - - - - - - - - - - - - - * 0027400 - - - - - - - - - - \r a n d S 0027420 p y F i n i s h ( ) b e \r / / 0027440 - - - - - - - - - - - - - - - - * 0027540 - - - - - - 376 001 \0 216 021 - - - - - 0027560 - \r [ \r m a n i f e s t k b I 0027600 n t e r r u p t B i t = 1 0027620 l s h i f t 1 2 \r @ a c t i v 0027640 e I n t e r r u p t s = @ a 0027660 c t i v e I n t e r r u p t s 0027700 & n o t k b I n t e r r u p 0027720 t B i t \r @ d i s p l a y I n t 0027740 e r r u p t = @ d i s p l a 0027760 y I n t e r r u p t & n o t 0030000 k b I n t e r r u p t B i t \r 0030020 @ d i s p l a y L i s t H e a d 0030040 = 0 \r f o r i = 0 t 0030060 o 3 0 0 0 0 l o o p \r @ l v 0030100 U s e r F i n i s h P r o c = 0030120 s a v e d U F P \r ] \r \r / / - 0030140 - - - - - - - - - - - 376 001 \0 344 311 0030160 - - - - - - - - - - - - - - - - * 0030260 \r a n d W s s ( s t r e a m , 0030300 s t r i n g ) b e \r / / - - 0030320 - - - - - - - - - - - - - - - - * 0030420 - - - - - - - - - - \r f o 0030440 r i = 1 t o s t r i n 0030460 g > > S t r i n g . l e n g t h 0030500 d o \r P u t s ( s 0030520 t r e a m , s t r i n g > > S 0030540 t r i n g . c h a r ^ i ) \r \r / 0030560 376 001 \0 352 307 / - - - - - - - - - - 0030600 - - - - - - - - - - - - - - - - * 0030700 - - \r a n d S y s E r r ( p 1 0030720 , e r r N o , p 2 , p 3 , 0030740 p 4 , p 5 ; n u m a r g s 0030760 n a ) b e \r / / - - - - - - 0031000 - - - - - - - - - - - - - - - - * 0031100 - - - - - - \r [ \r l e t t = 0031120 p 1 ; p 1 = e r r N o ; 0031140 e r r N o = t \r ( t a b l 0031160 e [ 7 376 001 \0 276 \a 7 4 0 3 b ; 0031200 1 4 0 1 b ] ) ( " S y s . E 0031220 r r o r s " , l v p 1 ) \r ] 0031240 \r \f \r / / - - - - - - - - - - - 0031260 - - - - - - - - - - - - - - - - * 0031360 - \r a n d S p y C t x ( ) b 0031400 e \t \t / / a c o n t e x t \r 0031420 / / - - - - - - - - - - - - - - 0031440 - - - - - - - - - - - - - - - - * 0031520 - - - - - - - - - - - - - - \r [ 0031540 \r l e t h o s t = G e t S 0031560 t r i n g ( " * N I 376 001 \0 271 313 F 0031600 S n a m e : " , t r u e ) 0031620 ; i f h o s t e q 0 l 0031640 o o p \r u n l e s s G e t P a 0031660 r t n e r ( h o s t , d s p , 0031700 p o r t , 0 , s o c k e t 0031720 F T P ) l o o p \r F r e e ( s 0031740 y s Z o n e , h o s t ) \r \r / 0031760 / o e p n a B S P c o n 0032000 n e c t i o n t o t h e F 0032020 t p s e r v e r \r Z e r o ( C 0032040 t x R u n n i n g + 3 , l e n 0032060 E x t r a C t x ) \r l e t s o 0032100 c = v e c l e n B S P S o 0032120 c \r C t x R u n n i n g > > F t 0032140 p C t x . b s p S o c = s o 0032160 c \r C t x R u n n i n g > > F 376 0032200 001 \0 255 254 t p C t x . d s p S t r 0032220 e a m = d s p \r O p e n L e 0032240 v e l 1 S o c k e t ( s o c , 0032260 0 , p o r t ) \r O p e n R T P 0032300 S o c k e t ( s o c , 0 , m 0032320 o d e I n i t A n d R e t u r n 0032340 ) \r l e t t i m e r = n i 0032360 l ; S e t T i m e r ( l v t 0032400 i m e r , 6 0 0 0 ) / / 0032420 1 m i n u t e \r B l o c k ( ) 0032440 r e p e a t u n t i l s o c 0032460 > > R T P S o c . s t a t e n 0032500 e s t a t e R F C O u t % \r 0032520 ( k b d A d ! 1 & 2 ) e 0032540 q 0 % T i m e r H a s E x 0032560 p i r e d ( l v t i m e r ) \r 0032600 u n l e 376 001 \0 % ' s s s o c > 0032620 > R T P S o c . s t a t e e q 0032640 s t a t e O p e n d o \r 0032660 [ \r P u t T e m p l a t 0032700 e ( d s p , " * N C o n n e c 0032720 t i o n a t t e m p t $ S " 0032740 , \r T i m e r H a s E x 0032760 p i r e d ( l v t i m e r ) ? 0033000 " t i m e d o u t " , " a 0033020 b o r t e d " ) \r C l o s 0033040 e R T P S o c k e t ( s o c , 0033060 0 ) \r C l o s e L e v e l 0033100 1 S o c k e t ( s o c ) \r 0033120 l o o p \r ] \r C t x R u n 0033140 n i n g > > F t p C t x . b s p 0033160 S t r e a m = C r e a t e B 0033200 S P S t r e a m ( 376 001 \0 f R s o 0033220 c ) \r C t x R u n n i n g > > F 0033240 t p C t x . l s t = l v N 0033260 o o p - o f f s e t S T . 0033300 p u t s / 1 6 \r C t x R u n n i 0033320 n g > > F t p C t x . d l s = 0033340 l v N o o p - o f f s e 0033360 t S T . p u t s / 1 6 \r C t x 0033400 R u n n i n g > > F t p C t x . 0033420 d b l s = C t x R u n n i n 0033440 g > > F t p C t x . b s p S t r 0033460 e a m \r u n l e s s U s e r O 0033500 p e n ( N o o p ) l o o p \r \r 0033520 / / r e t r i e v e t h e 0033540 s y m b o l t a b l e \r l e t 0033560 o k = 0 / / 0 = > 0033600 i n p r o g r e s s ; 1 376 001 0033620 \0 324 215 = > u n r e t r y a b 0033640 l e ; - 1 = > d o n e \r u 0033660 n t i l o k d o \r [ \r 0033700 i f U s e r N a m e > > 0033720 S t r i n g . l e n g t h e q 0033740 0 % U s e r P a s s w o r 0033760 d > > S t r i n g . l e n g t h 0034000 e q 0 t h e n \r 0034020 [ \r l e t u n a 0034040 m = G e t S t r i n g ( " * 0034060 N L o g i n u s e r : " , 0034100 t r u e ) ; u n l e s s u n 0034120 a m b r e a k \r C 0034140 o p y S t r i n g ( U s e r N a 0034160 m e , u n a m ) ; F r e e ( 0034200 s y s Z o n e , u n a m ) \r 0034220 376 001 \0 5 G l e t u p 0034240 s w = G e t S t r i n g ( " 0034260 p a s s w o r d : " , f a l 0034300 s e ) ; u n l e s s u p s w 0034320 b r e a k \r C o p 0034340 y S t r i n g ( U s e r P a s s 0034360 w o r d , u p s w ) ; F r e 0034400 e ( s y s Z o n e , u p s w ) 0034420 \r ] \r l e t 0034440 p L i s t = I n i t P L i s 0034460 t ( ) \r p L i s t > > P L 0034500 . U N A M = E x t r a c t S 0034520 u b s t r i n g ( U s e r N a m 0034540 e ) \r p L i s t > > P L . 0034560 U P S W = E x t r a c t S u 0034600 b s t r i n g ( U s e r P a s s 0034620 w o r d ) \r 376 001 \0 253 A p L 0034640 i s t > > P L . S F I L = E 0034660 x t r a c t S u b s t r i n g ( 0034700 " < S y s t e m > I F S . s y m 0034720 s " ) \r l e t m a r k 0034740 = U s e r R e t r i e v e ( p 0034760 L i s t , R e t r i e v e ) \r 0035000 F r e e P L i s t ( p L i 0035020 s t ) \r i f m a r k < < 0035040 M a r k . m a r k e q m a r 0035060 k N o t e s t ( m a r k < < 0035100 M a r k . s u b C o d e e q 0035120 2 % \r m a r k < < M a 0035140 r k . s u b C o d e e q 2 0 0035160 b % m a r k < < M a r k . s 0035200 u b C o d e e q 2 1 b ) \r 0035220 i f s o U s e 376 001 \0 0035240 r b r N a m e ! 0 , U s e r P 0035260 a s s w o r d ! 0 = 0 , 0 0035300 \r i f n o t b r e 0035320 a k \r o k = m a r k 0035340 e q 0 ? 1 , m a r k < < M 0035360 a r k . m a r k e q m a r k 0035400 E n d O f C o m m a n d \r 0035420 ] \r U s e r C l o s e ( o k e 0035440 q 1 ) \r u n l e s s o k e 0035460 q - 1 l o o p \r \f \r / / S 0035500 p y C t x ( c o n t ' d ) \r \r 0035520 / / d i s p l a y t a b l e 0035540 \r d t = A l l o c a t e ( s 0035560 y s Z o n e , l e n D T ) ; 0035600 Z e r o ( d t , l e n D T ) \r 0035620 f o r l i n e = 1 t o 0035640 m a 376 001 \0 371 031 x L i n e s d o 0035660 \r [ \r d t > > D T ^ 0035700 l i n e . b i t M a p = A l 0035720 l o c a t e ( s y s Z o n e , 0035740 l i n e W o r d s ) \r d t 0035760 > > D T ^ l i n e . d s = C 0036000 r e a t e D i s p l a y S t r e 0036020 a m ( 1 , d t > > D T ^ l i n 0036040 e . b i t M a p , l i n e W o 0036060 r d s ) \r S h o w D i s p 0036100 l a y S t r e a m ( d t > > D T 0036120 ^ l i n e . d s ) \r ] \r \r 0036140 / / V M s t a t s d i s p 0036160 l a y \r l e t s h o w B i t M 0036200 a p = A l l o c a t e ( s y 0036220 s Z o n e , 4 * l i n e W o r 0036240 d s ) \r s h o 376 001 \0 A 221 w = 0036260 C r e a t e D i s p l a y S t r 0036300 e a m ( 4 , s h o w B i t M a 0036320 p , 4 * l i n e W o r d s ) \r 0036340 S e t L m a r g ( s h o w , 1 0036360 2 0 ) \r l e t n o s h o w B i 0036400 t M a p = A l l o c a t e ( 0036420 s y s Z o n e , 4 * l i n e W 0036440 o r d s ) \r n o s h o w = C 0036460 r e a t e D i s p l a y S t r e 0036500 a m ( 4 , n o s h o w B i t M 0036520 a p , 4 * l i n e W o r d s ) 0036540 \r S e t L m a r g ( n o s h o w 0036560 , 1 2 0 ) \r \r S p y ( ) \t / / 0036600 S p y o n s e r v e r \r \r 0036620 / / d e s t r o y a l l d 0036640 i s p l a y s t r e a 376 001 \0 021 0036660 224 m s e x c e p t d s p \r S 0036700 h o w D i s p l a y S t r e a m 0036720 ( d s p , D S a l o n e ) \r f 0036740 o r i = 0 t o 3 0 0 0 0036760 0 l o o p / / g i v e d 0037000 i s p l a y t a s k t i m e 0037020 t o n o t i c e \r f o r l 0037040 i n e = 1 t o m a x L i 0037060 n e s d o \r [ \r F 0037100 r e e ( s y s Z o n e , d t > 0037120 > D T ^ l i n e . b i t M a p ) 0037140 \r C l o s e s ( d t > > D 0037160 T ^ l i n e . d s ) \r ] \r 0037200 F r e e ( s y s Z o n e , d t 0037220 ) \r C l o s e s ( s h o w ) ; 0037240 F r e e ( s y s Z o n e , s h 0037260 o 376 001 \0 270 225 w B i t M a p ) \r C 0037300 l o s e s ( n o s h o w ) ; F 0037320 r e e ( s y s Z o n e , n o s 0037340 h o w B i t M a p ) \r f o r i 0037360 = 0 t o m a x O v s - 1 0037400 d o i f n t ! i n e 0 0037420 t h e n F r e e ( s y s Z o 0037440 n e , n t ! i ) \r Z e r o ( n 0037460 t , m a x O v s ) \r ] r e p 0037500 e a t \r \f \r / / - - - - - - - - 0037520 - - - - - - - - - - - - - - - - * 0037620 - - - - \r a n d R e t r i e v 0037640 e ( p l ) = R e t r i e v e 0037660 F i l e \r / 376 001 \0 251 351 / - - - - 0037700 - - - - - - - - - - - - - - - - * 0040000 - - - - - - - - \r \r / / - - - - 0040020 - - - - - - - - - - - - - - - - * 0040120 - - - - - - - - \r a n d R e t 0040140 r i e v e F i l e ( p l ) = 0040160 v a l o f \r / / - - - - - - - - 0040200 - - - - - - - - - - - - - - - - * 0040260 - - - - - - - - - - - 376 001 \0 . y 0040300 - - - - - - - - - \r / / N o t 0040320 e t h a t t h i s p r o c 0040340 e d u r e c o u n t s o n 0040360 t h e f a c t t h a t t h 0040400 e n a m e s t r i n g a r 0040420 e a \r / / p r e c e e d s 0040440 t h e B B f i l e d e s c 0040460 r i p t o r a r e a i n a 0040500 S y m s f i l e . \r [ \r P u 0040520 t T e m p l a t e ( d s p , " 0040540 * N R e t r i e v i n g $ S . 0040560 . . " , p l > > P L . S F I L 0040600 ) \r l e t b s p S t r e a m 0040620 = C t x R u n n i n g > > F t 0040640 p C t x . b s p S t r e a m \r l 0040660 e t p o s = v e c 1 ; 0040700 376 001 \0 327 345 Z e r o ( p o s , 2 0040720 ) \r \r / / s y m f i l e h 0040740 e a d e r \r l e t s h = v 0040760 e c l S Y m s H e a d e r \r D 0041000 o u b l e I n c r e m e n t ( p 0041020 o s , B S P R e a d B l o c k 0041040 ( b s p S t r e a m , s h , 0041060 0 , l S Y m s H e a d e r * 2 0041100 ) ) \r i f ( s h > > S Y m s H 0041120 e a d e r . v e r s i o n & 0041140 1 7 7 4 0 0 b ) n e 1 0 0 0 0041160 b r e s u l t i s f a l s e 0041200 \r \r / / n a m e s \r l e t n 0041220 a m e P o s = v e c 1 ; 0041240 n a m e P o s ! 0 = 0 ; n 0041260 a m e P o s ! 1 = s h > > S 0041300 Y m s H e 376 001 \0 302 a d e r . n 0041320 a m e s A d d r * 2 \r u n t i l 0041340 M u l t E q ( p o s , n a m 0041360 e P o s ) d o [ G e t s ( 0041400 b s p S t r e a m ) ; D o u b 0041420 l e I n c r e m e n t ( p o s ) 0041440 ] \r l e t l e n N a m e A r 0041460 e a = G e t s ( b s p S t r 0041500 e a m ) l s h i f t 8 + 0041520 G e t s ( b s p S t r e a m ) \r 0041540 l e t n a m e A r e a = A 0041560 l l o c a t e ( s y s Z o n e , 0041600 l e n N a m e A r e a ) \r f o 0041620 r i = 1 t o l e n N a 0041640 m e A r e a - 1 d o \r n 0041660 a m e A r e a ! i = G e t s 0041700 ( b s p S t r e a m 376 001 \0 270 3 ) 0041720 l s h i f t 8 + G e t s 0041740 ( b s p S t r e a m ) \r D o u b 0041760 l e I n c r e m e n t ( p o s , 0042000 l e n N a m e A r e a ) \r D o 0042020 u b l e I n c r e m e n t ( p o 0042040 s , l e n N a m e A r e a ) \r 0042060 \r / / B B f i l e d e s c 0042100 r i p t o r s \r l e t b b P o 0042120 s = v e c 1 ; b b P o s 0042140 ! 0 = 0 ; b b P o s ! 1 0042160 = s h > > S Y m s H e a d e r 0042200 . b i n F i l e s A d d r * 2 \r 0042220 u n t i l M u l t E q ( p o s 0042240 , b b P o s ) d o [ G e 0042260 t s ( b s p S t r e a m ) ; D 0042300 o u b l e I n c r e m e n t ( 376 0042320 001 \0 W 216 p o s ) ] \r l e t n 0042340 u m B B F D = G e t s ( b s 0042360 p S t r e a m ) l s h i f t 0042400 8 + G e t s ( b s p S t r e 0042420 a m ) \r f o r n u m O v s = 0042440 0 t o n u m B B F D - 1 0042460 d o \r [ \r i f n u 0042500 m O v s g r m a x O v s t 0042520 h e n C a l l S w a t ( " I n 0042540 c r e a s e m a x O v s " ) \r 0042560 l e t b b f d = v e 0042600 c l e n B B F D \r D o u 0042620 b l e I n c r e m e n t ( p o s 0042640 , B S P R e a d B l o c k ( b 0042660 s p S t r e a m , b b f d , 0042700 0 , l e n B B F D * 2 ) ) \r 0042720 l e 376 001 \0 267 k t n a m e 0042740 = n a m e A r e a + b b f 0042760 d > > B B F D . n a m e \r 0043000 n t ! n u m O v s = E x t r 0043020 a c t S u b s t r i n g ( n a m 0043040 e , 1 , n a m e > > S t r i 0043060 n g . l e n g t h - 3 ) \r 0043100 ] \r \r F r e e ( s y s Z o n e , 0043120 n a m e A r e a ) \r u n t i l 0043140 G e t s ( b s p S t r e a m ) 0043160 e q - 1 l o o p \r W s s ( 0043200 d s p , " D o n e ! " ) \r r e 0043220 s u l t i s t r u e \r ] \r \f \r 0043240 / / - - - - - - - - - - - - - - 0043260 - - - - - - - - - - - - - - - - * 0043320 - - - - - - - - - 376 001 \0 327 311 - - 0043340 - - - - - - - - - - - - - - - - 0043360 - - - \r a n d G e t S t r i n 0043400 g ( p r o m p t , e c h o ) 0043420 = v a l o f \r / / - - - - - - 0043440 - - - - - - - - - - - - - - - - * 0043540 - - - - - - \r [ \r W s s ( d s p 0043560 , p r o m p t ) \r l e t s t 0043600 r i n g = v e c 1 2 8 \r l 0043620 e t c o u n t = 0 \r 0043640 [ \r l e t c h a r = 0043660 G e t s ( k e y s ) \r s w 0043700 i t c h o n c h a r i n t o 0043720 \r [ \r 376 001 0043740 \0 252 351 c a s e $ * S : c a 0043760 s e $ * N : c a s e $ * 0 0044000 3 3 : \r [ \r 0044020 i f c o u n t 0044040 n e 0 t h e n \r 0044060 [ P u t s ( d s 0044100 p , $ * S ) ; b r e a k ] 0044120 \r e n d c a s 0044140 e \r ] \r 0044160 c a s e $ * 0 0 1 : c 0044200 a s e $ * 0 1 0 : \r 0044220 [ \r i 0044240 f c o u n t n e 0 t h e 0044260 n \r [ \r 0044300 i f e 0044320 c h o t h e n \r 0044340 376 001 \0 351 ` E r a 0044360 s e B i t s ( d s p , - C h a 0044400 r W i d t h ( d s p , s t r i 0044420 n g > > S t r i n g . c h a r ^ 0044440 c o u n t ) ) \r 0044460 c o u n t = c o u n 0044500 t - 1 \r 0044520 ] \r e n d c 0044540 a s e \r ] \r 0044560 c a s e $ * 1 7 7 : 0044600 \r [ \r 0044620 W s s ( d s p , " 0044640 X X X " ) \r c 0044660 o u n t = 0 \r 0044700 b r e a k \r 0044720 ] \r d e f a u l t 0044740 : \r 376 001 \0 Q k 0044760 [ \r i f c o 0045000 u n t l s ( U s e r N a m e 0045020 ! - 1 ) l s h i f t 1 - 1 0045040 t h e n \r 0045060 [ \r 0045100 c o u n t = c o u n t + 1 0045120 \r s t r 0045140 i n g > > S t r i n g . c h a r 0045160 ^ c o u n t = c h a r \r 0045200 i f e c h 0045220 o t h e n P u t s ( d s p , 0045240 c h a r ) \r 0045260 ] \r e n 0045300 d c a s e \r ] 0045320 \r ] \r ] r e 0045340 p e a t \r \r i f c o u n 376 \0 X 0045360 310 257 t e q 0 r e s u l t i 0045400 s f a l s e \r s t r i n g > > 0045420 S t r i n g . l e n g t h = 0045440 c o u n t \r r e s u l t i s E 0045460 x t r a c t S u b s t r i n g ( 0045500 s t r i n g ) \r ] \r 377 \0 \0 V M e 0045520 m S p y F o n t . a s m \0 373 224 352 0045540 ) 4 \0 \0 376 001 \0 } > ; V M e m S 0045560 p y F o n t . a s m - h a n 0045600 d f i d d l e d \r ; C o p y 0045620 r i g h t X e r o x C o r p 0045640 o r a t i o n 1 9 7 9 \r ; L 0045660 a s t m o d i f i e d M a r 0045700 c h 2 , 1 9 8 0 1 1 : 5 0045720 9 P M b y B o g g s \r \r \t 0045740 . b e x t \t s y s F o n t \r \r \t 0045760 . s r e l \r \r s y s F o n t : . 0046000 s y s F o n t \r \r \t . n r e l \r 0046020 \r \t 1 4 \r \t 1 0 4 0 0 7 0046040 \r . s y s F o n t : 4 0 0 \r 0046060 \t 3 7 7 \r \t 3 7 6 \r 0046100 \t 3 7 5 \r \t 3 7 4 \r 0046120 \t 3 7 3 \r \t 3 7 2 \r 0046140 \t 3 7 1 \r \t 376 001 \0 J 374 0046160 3 7 0 \r \t 3 6 7 \r \t 0046200 3 6 6 \r \t 3 6 5 \r \t 0046220 3 6 4 \r \t 3 6 3 \r \t 0046240 3 6 2 \r \t 3 6 1 \r \t 0046260 3 6 0 \r \t 3 5 7 \r \t 0046300 3 5 6 \r \t 3 5 5 \r \t 0046320 3 5 4 \r \t 3 5 3 \r \t 0046340 3 5 2 \r \t 3 5 1 \r \t 0046360 3 5 3 \r \t 3 4 7 \r \t 0046400 3 4 6 \r \t 3 4 5 \r \t 0046420 3 4 4 \r \t 3 4 3 \r \t 0046440 3 4 2 \r \t 3 4 1 \r \t 0046460 3 4 5 \r \t 3 5 6 \r \t 0046500 3 6 2 \r \t 3 7 3 \r \t 0046520 4 0 6 \r \t 4 1 7 \r \t 0046540 4 3 0 \r \t 4 3 4 \r \t 376 001 0046560 \0 j * 4 5 0 \r \t 4 6 0046600 4 \r \t 4 7 2 \r \t 5 0 0046620 0 \r \t 5 0 5 \r \t 5 0 0046640 7 \r \t 5 1 2 \r \t 5 2 0046660 3 \r \t 5 3 4 \r \t 5 4 0046700 5 \r \t 5 5 6 \r \t 5 6 0046720 7 \r \t 6 0 0 \r \t 6 1 0046740 1 \r \t 6 2 2 \r \t 6 3 0046760 3 \r \t 6 4 4 \r \t 6 5 0047000 5 \r \t 6 6 4 \r \t 6 7 0047020 5 \r \t 7 0 6 \r \t 7 1 0047040 2 \r \t 7 2 3 \r \t 7 3 0047060 4 \r \t 7 4 5 \r \t 7 5 0047100 6 \r \t 7 6 7 \r \t 1 0 0 0047120 0 \r \t 1 0 1 1 \r \t 1 0 2 0047140 2 \r \t 1 0 3 3 \r \t 1 0 4 0047160 4 \r \t 376 001 \0 ; 344 1 0 5 5 \r \t 0047200 1 0 6 6 \r \t 1 0 7 7 \r \t 0047220 1 1 1 0 \r \t 1 1 2 1 \r \t 0047240 1 1 3 2 \r \t 1 1 4 3 \r \t 0047260 1 1 5 4 \r \t 1 1 6 5 \r \t 0047300 1 2 0 0 \r \t 1 2 1 1 \r \t 0047320 1 2 2 2 \r \t 1 2 3 3 \r \t 0047340 1 2 4 4 \r \t 1 2 5 5 \r \t 0047360 1 2 6 6 \r \t 1 2 7 7 \r \t 0047400 1 3 1 0 \r \t 1 3 2 1 \r \t 0047420 1 3 3 5 \r \t 1 3 4 6 \r \t 0047440 1 3 6 2 \r \t 1 3 7 1 \r \t 0047460 1 3 7 7 \r \t 2 4 0 \r \t 0047500 1 4 0 5 \r \t 1 4 1 6 \r \t 0047520 1 4 2 5 \r \t 1 4 3 6 \r \t 0047540 1 4 4 5 \r \t 1 4 5 6 \r \t 0047560 1 4 6 7 \r \t 376 001 \0 277 # 1 0047600 5 0 0 \r \t 1 5 1 1 \r \t 1 0047620 5 2 4 \r \t 1 5 3 5 \r \t 1 0047640 5 4 6 \r \t 1 5 5 5 \r \t 1 0047660 5 6 4 \r \t 1 5 7 3 \r \t 1 0047700 6 0 4 \r \t 1 6 1 5 \r \t 1 0047720 6 2 4 \r \t 1 6 3 3 \r \t 1 0047740 6 4 3 \r \t 1 6 5 2 \r \t 1 0047760 6 6 1 \r \t 1 6 7 0 \r \t 1 0050000 6 7 7 \r \t 1 7 1 0 \r \t 1 0050020 7 1 7 \r \t 1 7 3 3 \r \t 1 0050040 7 4 7 \r \t 1 7 6 3 \r \t 1 0050060 7 6 6 \r \t 2 0 1 \r \t 0050100 2 0 0 \r \t 1 7 7 \r \t 0050120 1 7 6 \r \t 1 7 5 \r \t 0050140 1 7 4 \r \t 1 7 3 \r \t 0050160 1 7 2 \r \t 1 7 1 \r \t 376 001 \0 0050200 F 260 1 7 0 \r \t 1 6 7 0050220 \r \t 1 6 6 \r \t 1 6 5 0050240 \r \t 1 6 4 \r \t 1 6 3 0050260 \r \t 1 6 2 \r \t 1 6 1 0050300 \r \t 1 6 0 \r \t 1 5 7 0050320 \r \t 1 5 6 \r \t 1 5 5 0050340 \r \t 1 5 4 \r \t 1 5 3 0050360 \r \t 1 5 2 \r \t 1 5 1 0050400 \r \t 1 5 0 \r \t 1 4 7 0050420 \r \t 1 4 6 \r \t 1 4 5 0050440 \r \t 1 4 4 \r \t 1 4 3 0050460 \r \t 1 4 2 \r \t 1 4 1 0050500 \r \t 1 4 0 \r \t 1 3 7 0050520 \r \t 1 3 6 \r \t 1 3 5 0050540 \r \t 1 3 4 \r \t 1 3 3 0050560 \r \t 1 3 2 \r \t 1 3 1 0050600 \r \t 376 001 \0 376 9 1 3 0 \r \t 0050620 1 2 7 \r \t 1 2 6 \r \t 0050640 1 2 5 \r \t 1 2 4 \r \t 0050660 1 2 3 \r \t 1 2 2 \r \t 0050700 1 2 1 \r \t 1 2 0 \r \t 0050720 1 1 7 \r \t 1 1 6 \r \t 0050740 1 1 5 \r \t 1 1 4 \r \t 0050760 1 1 3 \r \t 1 1 2 \r \t 0051000 1 1 1 \r \t 1 1 0 \r \t 0051020 1 0 7 \r \t 1 0 6 \r \t 0051040 1 0 5 \r \t 1 0 4 \r \t 0051060 1 0 3 \r \t 1 0 2 \r \t 0051100 1 0 1 \r \t 1 0 0 \r \t 0051120 7 7 \r \t 7 6 \r \t 0051140 7 5 \r \t 7 4 \r \t 0051160 7 3 \r \t 7 2 \r \t 0051200 7 1 \r \t 376 001 \0 D 220 0051220 7 0 \r \t 6 7 \r \t 0051240 6 6 \r \t 6 5 \r \t 0051260 6 4 \r \t 6 3 \r \t 0051300 6 2 \r \t 6 1 \r \t 0051320 6 0 \r \t 5 7 \r \t 0051340 5 6 \r \t 5 5 \r \t 0051360 5 4 \r \t 5 3 \r \t 0051400 5 2 \r \t 5 1 \r \t 0051420 5 0 \r \t 4 7 \r \t 0051440 4 6 \r \t 4 5 \r \t 0051460 4 4 \r \t 4 3 \r \t 0051500 4 2 \r \t 4 1 \r \t 0051520 4 0 \r \t 3 7 \r \t 0051540 3 6 \r \t 3 5 \r \t 0051560 3 4 \r \t 3 3 \r \t 0051600 3 2 \r \t 3 1 \r \t 376 001 \0 b 0051620 Q 3 0 \r \t 2 7 \r 0051640 \t 2 6 \r \t 2 5 \r 0051660 \t 2 4 \r \t 2 3 \r 0051700 \t 2 2 \r \t 2 1 \r 0051720 \t 2 0 \r \t 1 7 \r 0051740 \t 1 6 \r \t 1 5 \r 0051760 \t 1 4 \r \t 1 3 \r 0052000 \t 1 2 \r \t 1 1 \r 0052020 \t 1 0 \r \t 7 \r 0052040 \t 6 \r \t 5 \r 0052060 \t 4 \r \t 3 \r 0052100 \t 2 \r \t g r 0052120 a y - . \r \t 1 \r \t 0052140 0 \r \t 1 7 7 0 0 0 \r \t 0052160 1 \r \t 5 4 0 1 \r \t 0052200 1 7 \r \t 4 4 0 0 \r \t 1 0052220 0 376 001 \0 354 k 0 0 0 \r \t 1 0 0 0 0052240 0 \r \t 1 0 0 0 0 \r \t 1 0 0 0 0052260 0 \r \t 1 0 0 0 0 \r \t 0052300 0 \r \t 1 0 0 0 0 \r \t 1 0 0 0 0052320 0 \r \t 1 7 \r \t 4 1 0052340 0 \r \t 2 4 0 0 0 \r \t 2 4 0 0 0052360 0 \r \t 2 4 0 0 0 \r \t 1 0052400 7 \r \t 4 0 3 \r \t 1 2 0 0 0052420 0 \r \t 1 2 0 0 0 \r \t 7 7 0 0 0052440 0 \r \t 2 4 0 0 0 \r \t 2 4 0 0 0052460 0 \r \t 1 7 6 0 0 0 \r \t 5 0 0 0 0052500 0 \r \t 5 0 0 0 0 \r \t 1 0052520 7 \r \t 4 1 0 \r \t 1 0 0 0 0052540 0 \r \t 3 4 0 0 0 \r \t 5 2 0 0 0052560 0 \r \t 5 2 0 0 0 \r \t 3 0 0 0 0052600 0 \r \t 1 4 0 0 0 \r \t 5 2 0 0 0052620 0 \r \t 5 2 376 001 \0 261 177 0 0 0 \r \t 0052640 3 4 0 0 0 \r \t 1 0 0 0 0 \r \t 0052660 1 7 \r \t 1 2 \r \t 0052700 6 2 0 0 0 \r \t 1 2 4 0 0 0 \r \t 0052720 1 4 4 0 0 0 \r \t 1 0 0 0 0 \r \t 0052740 1 0 0 0 0 \r \t 2 3 0 0 0 \r \t 0052760 2 5 0 0 0 \r \t 4 6 0 0 0 \r \t 0053000 1 7 \r \t 4 1 0 \r \t 0053020 1 0 0 0 0 \r \t 2 4 0 0 0 \r \t 0053040 2 4 0 0 0 \r \t 1 0 0 0 0 \r \t 0053060 2 5 0 0 0 \r \t 4 2 0 0 0 \r \t 0053100 4 2 0 0 0 \r \t 3 5 0 0 0 \r \t 0053120 1 7 \r \t 4 1 0 \r \t 0053140 1 0 0 0 0 \r \t 1 0 0 0 0 \r \t 0053160 1 0 0 0 0 \r \t 1 7 \r \t 0053200 4 0 3 \r \t 4 0 0 0 \r \t 0053220 1 0 0 0 0 \r \t 1 0 376 001 \0 223 e 0053240 0 0 0 \r \t 2 0 0 0 0 \r \t 2 0 * 0053300 0 0 0 \r \t 2 0 0 0 0 \r \t 1 0 0053320 0 0 0 \r \t 1 0 0 0 0 \r \t 4 0053340 0 0 0 \r \t 1 7 \r \t 0053360 4 1 3 \r \t 2 0 0 0 0 \r \t 1 0 0053400 0 0 0 \r \t 1 0 0 0 0 \r \t 4 0053420 0 0 0 \r \t 4 0 0 0 \r \t 4 * 0053460 0 0 0 \r \t 1 0 0 0 0 \r \t 1 0 0053500 0 0 0 \r \t 2 0 0 0 0 \r \t 0053520 1 7 \r \t 4 1 3 \r \t 1 0 0053540 0 0 0 \r \t 5 2 0 0 0 \r \t 3 4 0053560 0 0 0 \r \t 5 2 0 0 0 \r \t 1 0 0053600 0 0 0 \r \t 1 7 \r \t 0053620 4 0 5 \r \t 1 0 0 0 0 \r \t 1 0 0053640 376 001 \0 t u 0 0 0 \r \t 7 6 0 0 0 0053660 \r \t 1 0 0 0 0 \r \t 1 0 0 0 0 0053700 \r \t 1 7 \r \t 1 4 0 5 0053720 \r \t 3 0 0 0 0 \r \t 1 0 0 0 0 0053740 \r \t 1 0 0 0 0 \r \t 2 0 0 0 0 0053760 \r \t 1 7 \r \t 3 4 0 4 0054000 \r \t 7 6 0 0 0 \r \t 1 7 0054020 \r \t 2 4 0 1 \r \t 1 0 0 0 0 0054040 \r \t 1 0 0 0 0 \r \t 1 7 0054060 \r \t 3 4 0 2 \r \t 2 0 0 0 0054100 \r \t 2 0 0 0 \r \t 4 0 0 0 0054120 \r \t 4 0 0 0 \r \t 1 0 0 0 0 0054140 \r \t 1 0 0 0 0 \r \t 2 0 0 0 0 0054160 \r \t 2 0 0 0 0 \r \t 1 7 0054200 \r \t 4 1 0 \r \t 3 4 0 0 0 0054220 \r \t 4 2 0 0 0 \r \t 4 6 0 0 0 0054240 \r \t 5 2 376 001 \0 314 x 0 0 0 \r \t 0054260 5 2 0 0 0 \r \t 6 2 0 0 0 \r \t 0054300 4 2 0 0 0 \r \t 3 4 0 0 0 \r \t 0054320 1 7 \r \t 4 1 0 \r \t 0054340 1 0 0 0 0 \r \t 3 0 0 0 0 \r \t 0054360 5 0 0 0 0 \r \t 1 0 0 0 0 \r \t 0054400 1 0 0 0 0 \r \t 1 0 0 0 0 \r \t 0054420 1 0 0 0 0 \r \t 7 6 0 0 0 \r \t 0054440 1 7 \r \t 4 1 0 \r \t 0054460 3 4 0 0 0 \r \t 4 2 0 0 0 \r \t 0054500 4 2 0 0 0 \r \t 4 0 0 0 \r \t 0054520 1 0 0 0 0 \r \t 2 0 0 0 0 \r \t 0054540 4 0 0 0 0 \r \t 7 6 0 0 0 \r \t 0054560 1 7 \r \t 4 1 0 \r \t 0054600 3 4 0 0 0 \r \t 4 2 0 0 0 \r \t 0054620 2 0 0 0 \r \t 3 4 0 0 0 \r \t 0054640 2 0 0 0 \r \t 2 376 001 \0 360 226 0 0054660 0 0 \r \t 4 2 0 0 0 \r \t 3 4 0 0054700 0 0 \r \t 1 7 \r \t 4 0054720 1 0 \r \t 1 4 0 0 0 \r \t 2 4 0 0054740 0 0 \r \t 2 4 0 0 0 \r \t 4 4 0 0054760 0 0 \r \t 4 4 0 0 0 \r \t 7 6 0 0055000 0 0 \r \t 4 0 0 0 \r \t 4 0 0055020 0 0 \r \t 1 7 \r \t 4 0055040 1 0 \r \t 7 6 0 0 0 \r \t 4 0 0 0055060 0 0 \r \t 4 0 0 0 0 \r \t 7 4 0 0055100 0 0 \r \t 4 2 0 0 0 \r \t 2 0 0055120 0 0 \r \t 4 2 0 0 0 \r \t 3 4 0 0055140 0 0 \r \t 1 7 \r \t 4 0055160 1 0 \r \t 3 4 0 0 0 \r \t 4 2 0 0055200 0 0 \r \t 4 0 0 0 0 \r \t 7 4 0 0055220 0 0 \r \t 4 2 0 0 0 \r \t 4 2 0 0055240 0 0 \r \t 4 2 0 0 0 \r \t 3 4 376 0055260 001 \0 235 e 0 0 0 \r \t 1 7 \r 0055300 \t 4 1 0 \r \t 7 6 0 0 0 \r 0055320 \t 2 0 0 0 \r \t 4 0 0 0 \r 0055340 \t 4 0 0 0 \r \t 1 0 0 0 0 \r 0055360 \t 1 0 0 0 0 \r \t 2 0 0 0 0 \r 0055400 \t 2 0 0 0 0 \r \t 1 7 \r 0055420 \t 4 1 0 \r \t 3 4 0 0 0 \r 0055440 \t 4 2 0 0 0 \r \t 4 2 0 0 0 \r 0055460 \t 3 4 0 0 0 \r \t 4 2 0 0 0 \r 0055500 \t 4 2 0 0 0 \r \t 4 2 0 0 0 \r 0055520 \t 3 4 0 0 0 \r \t 1 7 \r 0055540 \t 4 1 0 \r \t 3 4 0 0 0 \r 0055560 \t 4 2 0 0 0 \r \t 4 2 0 0 0 \r 0055600 \t 4 2 0 0 0 \r \t 3 6 0 0 0 \r 0055620 \t 2 0 0 0 \r \t 4 2 0 0 0 \r 0055640 \t 3 4 0 0 0 \r \t 1 7 \r 0055660 \t 376 001 \0 % 314 4 1 0 \r \t 1 0055700 0 0 0 0 \r \t 1 0 0 0 0 \r \t 0055720 0 \r \t 0 \r \t 1 0055740 0 0 0 0 \r \t 1 0 0 0 0 \r \t 0055760 1 7 \r \t 1 4 0 6 \r \t 1 0056000 0 0 0 0 \r \t 1 0 0 0 0 \r \t 0056020 0 \r \t 0 \r \t 3 0056040 0 0 0 0 \r \t 1 0 0 0 0 \r \t 1 0056060 0 0 0 0 \r \t 2 0 0 0 0 \r \t 0056100 1 7 \r \t 1 4 1 0 \r \t 0056120 4 0 0 0 \r \t 1 0 0 0 0 \r \t 2 0056140 0 0 0 0 \r \t 4 0 0 0 0 \r \t 4 0056160 0 0 0 0 \r \t 2 0 0 0 0 \r \t 1 0056200 0 0 0 0 \r \t 4 0 0 0 \r \t 0056220 1 7 \r \t 4 1 0 \r \t 7 0056240 6 0 0 0 \r \t 0 \r \t 7 0056260 6 0 0 0 \r \t 376 001 \0 234 Y 1 0056300 7 \r \t 2 0 0 3 \r \t 4 0 0 0 0056320 0 \r \t 2 0 0 0 0 \r \t 1 0 0 0 0056340 0 \r \t 4 0 0 0 \r \t 4 0 0 0056360 0 \r \t 1 0 0 0 0 \r \t 2 0 0 0 0056400 0 \r \t 4 0 0 0 0 \r \t 1 0056420 7 \r \t 4 1 0 \r \t 3 4 0 0 0056440 0 \r \t 4 2 0 0 0 \r \t 4 2 0 0 0056460 0 \r \t 4 0 0 0 \r \t 1 0 0 0 0056500 0 \r \t 0 \r \t 1 0 0 0 0056520 0 \r \t 1 0 0 0 0 \r \t 1 0056540 7 \r \t 4 1 0 \r \t 3 4 0 0 0056560 0 \r \t 4 2 0 0 0 \r \t 5 6 0 0 0056600 0 \r \t 5 2 0 0 0 \r \t 5 2 0 0 0056620 0 \r \t 5 6 0 0 0 \r \t 4 0 0 0 0056640 0 \r \t 3 6 0 0 0 \r \t 1 0056660 7 \r \t 4 1 0 \r \t 1 0 376 001 0056700 \0 2 214 0 0 0 \r \t 2 4 0 0 0 \r \t 0056720 2 4 0 0 0 \r \t 2 4 0 0 0 \r \t 0056740 4 2 0 0 0 \r \t 7 6 0 0 0 \r \t 0056760 4 2 0 0 0 \r \t 4 2 0 0 0 \r \t 0057000 1 7 \r \t 4 1 0 \r \t 0057020 7 0 0 0 0 \r \t 4 4 0 0 0 \r \t 0057040 4 4 0 0 0 \r \t 7 4 0 0 0 \r \t 0057060 4 2 0 0 0 \r \t 4 2 0 0 0 \r \t 0057100 4 2 0 0 0 \r \t 7 4 0 0 0 \r \t 0057120 1 7 \r \t 4 1 0 \r \t 0057140 3 4 0 0 0 \r \t 4 2 0 0 0 \r \t 0057160 4 2 0 0 0 \r \t 4 0 0 0 0 \r \t 0057200 4 0 0 0 0 \r \t 4 2 0 0 0 \r \t 0057220 4 2 0 0 0 \r \t 3 4 0 0 0 \r \t 0057240 1 7 \r \t 4 1 0 \r \t 0057260 7 4 0 0 0 \r \t 4 2 0 0 0 \r \t 0057300 4 2 376 001 \0 = z 0 0 0 \r \t 4 2 0057320 0 0 0 \r \t 4 2 0 0 0 \r \t 4 2 0057340 0 0 0 \r \t 4 2 0 0 0 \r \t 7 4 0057360 0 0 0 \r \t 1 7 \r \t 0057400 4 1 0 \r \t 7 6 0 0 0 \r \t 4 0 0057420 0 0 0 \r \t 4 0 0 0 0 \r \t 7 4 0057440 0 0 0 \r \t 4 0 0 0 0 \r \t 4 0 0057460 0 0 0 \r \t 4 0 0 0 0 \r \t 7 6 0057500 0 0 0 \r \t 1 7 \r \t 0057520 4 1 0 \r \t 7 6 0 0 0 \r \t 4 0 0057540 0 0 0 \r \t 4 0 0 0 0 \r \t 7 4 0057560 0 0 0 \r \t 4 0 0 0 0 \r \t 4 0 * 0057620 0 0 0 \r \t 1 7 \r \t 0057640 4 1 0 \r \t 3 4 0 0 0 \r \t 4 2 0057660 0 0 0 \r \t 4 2 0 0 0 \r \t 4 0 0057700 0 0 0 \r \t 5 6 376 001 \0 306 | 0 0 0 0057720 \r \t 4 2 0 0 0 \r \t 4 2 0 0 0 0057740 \r \t 3 4 0 0 0 \r \t 1 7 0057760 \r \t 4 1 0 \r \t 4 2 0 0 0 0060000 \r \t 4 2 0 0 0 \r \t 4 2 0 0 0 0060020 \r \t 7 6 0 0 0 \r \t 4 2 0 0 0 0060040 \r \t 4 2 0 0 0 \r \t 4 2 0 0 0 0060060 \r \t 4 2 0 0 0 \r \t 1 7 0060100 \r \t 4 1 0 \r \t 3 4 0 0 0 0060120 \r \t 1 0 0 0 0 \r \t 1 0 0 0 0 * 0060200 \r \t 3 4 0 0 0 \r \t 1 7 0060220 \r \t 4 1 0 \r \t 1 6 0 0 0 0060240 \r \t 2 0 0 0 \r \t 2 0 0 0 * 0060300 \r \t 4 2 0 0 0 \r \t 4 2 376 001 \0 0060320 % j 0 0 0 \r \t 3 4 0 0 0 \r \t 0060340 1 7 \r \t 4 1 0 \r \t 0060360 4 2 0 0 0 \r \t 4 4 0 0 0 \r \t 0060400 5 0 0 0 0 \r \t 7 0 0 0 0 \r \t 0060420 4 4 0 0 0 \r \t 4 4 0 0 0 \r \t 0060440 4 2 0 0 0 \r \t 4 2 0 0 0 \r \t 0060460 1 7 \r \t 4 1 0 \r \t 0060500 4 0 0 0 0 \r \t 4 0 0 0 0 \r \t * 0060560 4 0 0 0 0 \r \t 7 6 0 0 0 \r \t 0060600 1 7 \r \t 4 1 0 \r \t 0060620 4 2 0 0 0 \r \t 6 6 0 0 0 \r \t 0060640 6 6 0 0 0 \r \t 5 2 0 0 0 \r \t 0060660 5 2 0 0 0 \r \t 5 2 0 0 0 \r \t 0060700 5 2 0 0 0 \r \t 4 2 0 0 0 \r \t 0060720 376 001 \0 033 v 1 7 \r \t 4 0060740 1 0 \r \t 4 2 0 0 0 \r \t 6 2 0 0060760 0 0 \r \t 6 2 0 0 0 \r \t 5 2 0 0061000 0 0 \r \t 5 2 0 0 0 \r \t 4 6 0 0061020 0 0 \r \t 4 6 0 0 0 \r \t 4 2 0 0061040 0 0 \r \t 1 7 \r \t 4 0061060 1 0 \r \t 3 4 0 0 0 \r \t 4 2 0 0061100 0 0 \r \t 4 2 0 0 0 \r \t 4 2 0 * 0061140 0 0 \r \t 4 2 0 0 0 \r \t 3 4 0 0061160 0 0 \r \t 1 7 \r \t 4 0061200 1 0 \r \t 7 4 0 0 0 \r \t 4 2 0 0061220 0 0 \r \t 4 2 0 0 0 \r \t 4 2 0 0061240 0 0 \r \t 7 4 0 0 0 \r \t 4 0 0 0061260 0 0 \r \t 4 0 0 0 0 \r \t 4 0 0 0061300 0 0 \r \t 1 7 \r \t 4 0061320 1 0 \r \t 3 4 376 001 \0 \b 212 0 0 0 \r 0061340 \t 4 2 0 0 0 \r \t 4 2 0 0 0 \r * 0061420 \t 3 4 0 0 0 \r \t 1 0 0 0 0 \r 0061440 \t 6 0 0 0 \r \t 1 7 \r 0061460 \t 4 1 2 \r \t 7 4 0 0 0 \r 0061500 \t 4 2 0 0 0 \r \t 4 2 0 0 0 \r 0061520 \t 7 4 0 0 0 \r \t 5 0 0 0 0 \r 0061540 \t 4 4 0 0 0 \r \t 4 2 0 0 0 \r 0061560 \t 4 2 0 0 0 \r \t 1 7 \r 0061600 \t 4 1 0 \r \t 3 4 0 0 0 \r 0061620 \t 4 2 0 0 0 \r \t 4 2 0 0 0 \r 0061640 \t 3 0 0 0 0 \r \t 4 0 0 0 \r 0061660 \t 4 2 0 0 0 \r \t 4 2 0 0 0 \r 0061700 \t 3 4 0 0 0 \r \t 1 7 \r 0061720 \t 4 1 0 \r \t 7 6 376 001 \0 \n 0061740 p 0 0 0 \r \t 1 0 0 0 0 \r \t 1 0061760 0 0 0 0 \r \t 1 0 0 0 0 \r \t 1 * 0062020 0 0 0 0 \r \t 1 0 0 0 0 \r \t 0062040 1 7 \r \t 4 1 0 \r \t 4 0062060 2 0 0 0 \r \t 4 2 0 0 0 \r \t 4 * 0062140 2 0 0 0 \r \t 3 4 0 0 0 \r \t 0062160 1 7 \r \t 4 1 0 \r \t 4 0062200 2 0 0 0 \r \t 4 2 0 0 0 \r \t 4 0062220 2 0 0 0 \r \t 2 4 0 0 0 \r \t 2 0062240 4 0 0 0 \r \t 2 4 0 0 0 \r \t 1 0062260 0 0 0 0 \r \t 1 0 0 0 0 \r \t 0062300 1 7 \r \t 4 1 0 \r \t 4 0062320 2 0 0 0 \r \t 4 2 0 0 0 \r \t 5 0062340 2 376 001 \0 342 ~ 0 0 0 \r \t 5 2 0 0 0062360 0 \r \t 5 2 0 0 0 \r \t 2 4 0 0 0062400 0 \r \t 2 4 0 0 0 \r \t 2 4 0 0 0062420 0 \r \t 1 7 \r \t 4 1 0062440 0 \r \t 4 2 0 0 0 \r \t 4 2 0 0 0062460 0 \r \t 2 4 0 0 0 \r \t 1 0 0 0 0062500 0 \r \t 1 0 0 0 0 \r \t 2 4 0 0 0062520 0 \r \t 4 2 0 0 0 \r \t 4 2 0 0 0062540 0 \r \t 1 7 \r \t 4 1 0062560 0 \r \t 4 2 0 0 0 \r \t 4 2 0 0 0062600 0 \r \t 2 4 0 0 0 \r \t 2 4 0 0 0062620 0 \r \t 1 0 0 0 0 \r \t 1 0 0 0 * 0062660 0 \r \t 1 7 \r \t 4 1 0062700 0 \r \t 7 6 0 0 0 \r \t 2 0 0 0062720 0 \r \t 4 0 0 0 \r \t 1 0 0 0 0062740 0 \r \t 1 0 376 001 \0 204 p 0 0 0 \r \t 0062760 2 0 0 0 0 \r \t 4 0 0 0 0 \r \t 0063000 7 6 0 0 0 \r \t 1 7 \r \t 0063020 4 1 0 \r \t 3 4 0 0 0 \r \t 0063040 2 0 0 0 0 \r \t 2 0 0 0 0 \r \t * 0063140 2 0 0 0 0 \r \t 3 4 0 0 0 \r \t 0063160 1 7 \r \t 4 1 3 \r \t 0063200 2 0 0 0 0 \r \t 2 0 0 0 0 \r \t 0063220 1 0 0 0 0 \r \t 1 0 0 0 0 \r \t 0063240 4 0 0 0 \r \t 4 0 0 0 \r \t 0063260 2 0 0 0 \r \t 2 0 0 0 \r \t 0063300 1 7 \r \t 4 1 0 \r \t 0063320 3 4 0 0 0 \r \t 4 0 0 0 \r \t 0063340 4 0 0 0 \r \t 4 376 001 \0 e 226 0063360 0 0 0 \r \t 4 0 0 0 \r \t 4 * 0063440 0 0 0 \r \t 3 4 0 0 0 \r \t 0063460 1 7 \r \t 4 1 3 \r \t 1 0 0063500 0 0 0 \r \t 3 4 0 0 0 \r \t 5 2 0063520 0 0 0 \r \t 1 0 0 0 0 \r \t 1 0 0063540 0 0 0 \r \t 1 0 0 0 0 \r \t 0063560 1 7 \r \t 1 4 0 6 \r \t 1 0 0063600 0 0 0 \r \t 2 0 0 0 0 \r \t 7 6 0063620 0 0 0 \r \t 2 0 0 0 0 \r \t 1 0 0063640 0 0 0 \r \t 1 7 \r \t 1 0063660 4 0 5 \r \t 3 4 0 0 0 \r \t 2 0063700 0 0 0 \r \t 3 6 0 0 0 \r \t 4 2 0063720 0 0 0 \r \t 4 2 0 0 0 \r \t 3 6 0063740 0 0 0 \r \t 1 7 \r \t 1 0063760 376 001 \0 027 226 4 0 6 \r \t 4 0 0 0 0 0064000 \r \t 4 0 0 0 0 \r \t 5 4 0 0 0 0064020 \r \t 6 2 0 0 0 \r \t 4 2 0 0 0 0064040 \r \t 4 2 0 0 0 \r \t 6 2 0 0 0 0064060 \r \t 5 4 0 0 0 \r \t 1 7 0064100 \r \t 4 1 0 \r \t 3 4 0 0 0 0064120 \r \t 4 2 0 0 0 \r \t 4 0 0 0 0 0064140 \r \t 4 0 0 0 0 \r \t 4 2 0 0 0 0064160 \r \t 3 4 0 0 0 \r \t 1 7 0064200 \r \t 1 4 0 6 \r \t 2 0 0 0 0064220 \r \t 2 0 0 0 \r \t 3 2 0 0 0 0064240 \r \t 4 6 0 0 0 \r \t 4 2 0 0 0 0064260 \r \t 4 2 0 0 0 \r \t 4 6 0 0 0 0064300 \r \t 3 2 0 0 0 \r \t 1 7 0064320 \r \t 4 1 0 \r \t 3 4 0 0 0 0064340 \r \t 4 2 0 0 0 \r \t 7 6 0 0 0 0064360 \r \t 4 0 376 001 \0 020 237 0 0 0 \r \t 0064400 4 2 0 0 0 \r \t 3 4 0 0 0 \r \t 0064420 1 7 \r \t 1 4 0 6 \r \t 0064440 1 6 0 0 0 \r \t 2 0 0 0 0 \r \t 0064460 7 4 0 0 0 \r \t 2 0 0 0 0 \r \t 0064500 2 0 0 0 0 \r \t 2 0 0 0 0 \r \t * 0064540 1 7 \r \t 4 1 0 \r \t 0064560 3 2 0 0 0 \r \t 4 6 0 0 0 \r \t 0064600 4 2 0 0 0 \r \t 4 2 0 0 0 \r \t 0064620 4 6 0 0 0 \r \t 3 2 0 0 0 \r \t 0064640 2 0 0 0 \r \t 3 4 0 0 0 \r \t 0064660 1 7 \r \t 1 4 1 0 \r \t 0064700 4 0 0 0 0 \r \t 4 0 0 0 0 \r \t 0064720 5 4 0 0 0 \r \t 6 2 0 0 0 \r \t 0064740 4 2 0 0 0 \r \t 4 2 0 0 0 \r \t 0064760 4 2 0 0 0 \r \t 4 2 376 001 \0 366 L 0 0065000 0 0 \r \t 1 7 \r \t 4 0065020 1 0 \r \t 4 0 0 0 \r \t 0065040 0 \r \t 3 4 0 0 0 \r \t 4 0 0065060 0 0 \r \t 4 0 0 0 \r \t 4 0 * 0065120 0 0 \r \t 1 7 \r \t 4 0065140 1 0 \r \t 4 0 0 0 \r \t 0065160 0 \r \t 3 4 0 0 0 \r \t 4 0 0065200 0 0 \r \t 4 0 0 0 \r \t 4 0 * 0065240 0 0 \r \t 4 4 0 0 0 \r \t 3 0 0 0065260 0 0 \r \t 1 7 \r \t 4 0065300 1 2 \r \t 4 0 0 0 0 \r \t 4 0 0 0065320 0 0 \r \t 4 4 0 0 0 \r \t 5 0 0 0065340 0 0 \r \t 6 0 0 0 0 \r \t 5 0 0 0065360 0 0 \r \t 4 4 0 0 0 \r \t 4 2 376 0065400 001 \0 206 220 0 0 0 \r \t 1 7 \r 0065420 \t 4 1 0 \r \t 3 4 0 0 0 \r 0065440 \t 4 0 0 0 \r \t 4 0 0 0 \r * 0065520 \t 4 0 0 0 \r \t 1 7 \r 0065540 \t 4 1 0 \r \t 6 6 0 0 0 \r 0065560 \t 5 2 0 0 0 \r \t 5 2 0 0 0 \r * 0065620 \t 5 2 0 0 0 \r \t 1 7 \r 0065640 \t 1 4 0 6 \r \t 5 4 0 0 0 \r 0065660 \t 6 2 0 0 0 \r \t 4 2 0 0 0 \r 0065700 \t 4 2 0 0 0 \r \t 4 2 0 0 0 \r 0065720 \t 4 2 0 0 0 \r \t 1 7 \r 0065740 \t 1 4 0 6 \r \t 3 4 0 0 0 \r 0065760 \t 4 2 0 0 0 \r \t 4 2 0 0 0 \r 0066000 \t 4 2 376 001 \0 336 236 0 0 0 \r \t 4 0066020 2 0 0 0 \r \t 3 4 0 0 0 \r \t 0066040 1 7 \r \t 1 4 0 6 \r \t 5 0066060 4 0 0 0 \r \t 6 2 0 0 0 \r \t 4 0066100 2 0 0 0 \r \t 4 2 0 0 0 \r \t 6 0066120 2 0 0 0 \r \t 5 4 0 0 0 \r \t 4 0066140 0 0 0 0 \r \t 4 0 0 0 0 \r \t 0066160 1 7 \r \t 1 4 1 0 \r \t 3 0066200 2 0 0 0 \r \t 4 6 0 0 0 \r \t 4 0066220 2 0 0 0 \r \t 4 2 0 0 0 \r \t 4 0066240 6 0 0 0 \r \t 3 2 0 0 0 \r \t 0066260 2 0 0 0 \r \t 2 0 0 0 \r \t 0066300 1 7 \r \t 1 4 1 0 \r \t 5 0066320 4 0 0 0 \r \t 6 2 0 0 0 \r \t 4 0066340 0 0 0 0 \r \t 4 0 0 0 0 \r \t 4 0066360 0 0 0 0 \r \t 4 0 0 0 0 \r \t 0066400 1 7 \r \t 1 376 001 \0 004 234 4 0 0066420 6 \r \t 3 4 0 0 0 \r \t 4 2 0 0 0066440 0 \r \t 3 0 0 0 0 \r \t 4 0 0 0066460 0 \r \t 4 2 0 0 0 \r \t 3 4 0 0 0066500 0 \r \t 1 7 \r \t 1 4 0 0066520 6 \r \t 2 0 0 0 0 \r \t 7 4 0 0 0066540 0 \r \t 2 0 0 0 0 \r \t 2 0 0 0 0066560 0 \r \t 2 0 0 0 0 \r \t 2 2 0 0 0066600 0 \r \t 1 4 0 0 0 \r \t 1 0066620 7 \r \t 1 0 0 7 \r \t 4 2 0 0 0066640 0 \r \t 4 2 0 0 0 \r \t 4 2 0 0 0066660 0 \r \t 4 2 0 0 0 \r \t 4 6 0 0 0066700 0 \r \t 3 2 0 0 0 \r \t 1 0066720 7 \r \t 1 4 0 6 \r \t 4 2 0 0 0066740 0 \r \t 4 2 0 0 0 \r \t 2 4 0 0 0066760 0 \r \t 2 4 0 0 0 \r \t 1 0 0 0 0067000 0 \r \t 1 0 0 0 0 \r \t 376 001 0067020 \0 367 255 1 7 \r \t 1 4 0 6 \r \t 0067040 4 2 0 0 0 \r \t 4 2 0 0 0 \r \t 0067060 5 2 0 0 0 \r \t 5 2 0 0 0 \r \t 0067100 2 4 0 0 0 \r \t 2 4 0 0 0 \r \t 0067120 1 7 \r \t 1 4 0 6 \r \t 0067140 4 2 0 0 0 \r \t 2 4 0 0 0 \r \t 0067160 1 0 0 0 0 \r \t 1 0 0 0 0 \r \t 0067200 2 4 0 0 0 \r \t 4 2 0 0 0 \r \t 0067220 1 7 \r \t 1 4 0 6 \r \t 0067240 4 2 0 0 0 \r \t 4 2 0 0 0 \r \t 0067260 4 2 0 0 0 \r \t 2 4 0 0 0 \r \t 0067300 2 4 0 0 0 \r \t 1 0 0 0 0 \r \t 0067320 1 0 0 0 0 \r \t 6 0 0 0 0 \r \t 0067340 1 7 \r \t 1 4 1 0 \r \t 0067360 7 6 0 0 0 \r \t 4 0 0 0 \r \t 0067400 1 0 0 0 0 \r \t 1 0 0 0 0 \r \t 0067420 2 0 376 001 \0 327 h 0 0 0 \r \t 7 6 0067440 0 0 0 \r \t 1 7 \r \t 1 0067460 4 0 6 \r \t 6 0 0 0 \r \t 1 0 0067500 0 0 0 \r \t 1 0 0 0 0 \r \t 1 0 0067520 0 0 0 \r \t 1 0 0 0 0 \r \t 6 0 0067540 0 0 0 \r \t 1 0 0 0 0 \r \t 1 0 * 0067600 0 0 0 \r \t 6 0 0 0 \r \t 0067620 1 7 \r \t 4 1 3 \r \t 1 0 0067640 0 0 0 \r \t 1 0 0 0 0 \r \t 1 0 * 0067760 0 0 0 \r \t 1 7 \r \t 0070000 4 1 3 \r \t 6 0 0 0 0 \r \t 1 0 0070020 0 0 0 \r \t 1 0 376 \0 361 335 333 0 0 0 0070040 \r \t 1 0 0 0 0 \r \t 1 0 0 0 0 0070060 \r \t 6 0 0 0 \r \t 1 0 0 0 0 0070100 \r \t 1 0 0 0 0 \r \t 1 0 0 0 0 0070120 \r \t 1 0 0 0 0 \r \t 6 0 0 0 0 0070140 \r \t 1 7 \r \t 4 1 3 0070160 \r \t 3 1 0 0 0 \r \t 4 6 0 0 0 0070200 \r \t 1 7 \r \t 2 0 0 2 0070220 \r \t 5 2 5 2 5 \r \t 1 2 5 2 5 2 * 0070360 \r g r a y : \t 3 3 \r \t 0070400 1 4 \r \t \r \t . e n d \r 377 \0 0070420 \0 L o a d V M e m S p y . c m \0 0070440 373 231 301 8 Y \0 \0 376 001 \0 223 215 / / L 0070460 o a d V M e m S p y . c m - - 0070500 b u i l d s V M e m S p y . 0070520 r u n \r / / C o p y r i g h t 0070540 X e r o x C o r p o r a t i 0070560 o n 1 9 8 1 , 1 9 8 2 \r / / 0070600 L a s t m o d i f i e d S 0070620 e p t e m b e r 2 8 , 1 9 8 0070640 2 1 0 : 0 8 P M b y B 0070660 o g g s \r \r B l d r / L V 7 0 0070700 0 / W V M e m S p y V M e m 0070720 S p y C o r e ^ \r ^ \r F t p U 0070740 s e r P r o t F t p U s e r P 0070760 r o t F i l e ^ \r F t p P l i 0071000 s t P r o t F t p P L i s t I 0071020 m p 1 F t p P l i s t I m p 2 0071040 ^ \r F t p U t i l A 376 001 \0 y 0071060 I F t p U t i l B ^ \r ^ \r P u 0071100 p B S P O p e n C l o s e P u 0071120 p B S P S t r e a m s P u p B 0071140 S P P r o t P u p B S P B l o 0071160 c k P u p B S P A ^ \r P u p 0071200 R T P O p e n C l o s e P u p 0071220 R T P ^ \r P u p N a m e L o o 0071240 k u p P u p R o u t e ^ \r P 0071260 u p 1 O p e n C l o s e P u p 0071300 1 B P u p A L 1 A P u p D u 0071320 m m y G a t e ^ \r P u p A l E 0071340 t h B P u p A l E t h A ^ \r 0071360 ^ \r A l l o c D V e c B f s 0071400 M l B c p l T r i c k s C a 0071420 l l s C a l e n d a r ^ \r K 0071440 e y S t r e a m s B K e y S t 0071460 r 376 001 \0 : w e a m s A L e v B 0071500 u f f e r ^ \r D s p S t r e a 0071520 m s B D s p S t r e a m s A 0071540 V M e m S p y F o n t ^ \r ^ \r 0071560 C o n t e x t C o n t e x t I 0071600 n i t I n t e r r u p t B c 0071620 p l R u n t i m e ^ \r A l t o 0071640 Q u e u e A l t o T i m e r 0071660 A l t o B y t e B l t ^ \r K e 0071700 y w o r d S t r i n g U t i l 0071720 T e m p l a t e ^ \r T i m e 0071740 C o n v B T i m e C o n v A 0071760 T i m e I O ^ \r ^ \r F t p U t 0072000 i l I n i t F t p P L i s t I 0072020 n i t K e y w o r d I n i t 0072040 ^ \r P u p 1 I n i t P u p A l 0072060 E t h I n i 376 \0 G 314 331 t I n t 0072100 e r r u p t I n i t ^ \r L o a 0072120 d R a m B c p l R u n T i m e 0072140 M c \r / / n o r m a l n u m 0072160 b e r o f e r r o r s = 0072200 2 \r 377 \0 \0 B u i l d V M e m S p 0072220 y . c m \0 373 231 301 8 n \0 \0 376 001 \0 030 0072240 v / / B u i l d V M e m S p y 0072260 . c m - - b u i l d s V M 0072300 e m S p y . b o o t \r / / C o 0072320 p y r i g h t X e r o x C o 0072340 r p o r a t i o n 1 9 8 1 , 0072360 1 9 8 2 \r / / L a s t m o d 0072400 i f i e d S e p t e m b e r 0072420 2 8 , 1 9 8 2 1 0 : 0 8 0072440 P M b y B o g g s \r \r B l d 0072460 r / L V K V M e m S p y B o o 0072500 t / S 4 6 4 0 / V 1 0 0 0 / 0072520 W B a s i c B o o t B a s e / 0072540 J ^ \r V M e m S p y V M e m 0072560 S p y C o r e ^ \r ^ \r F t p U 0072600 s e r P r o t F t p U s e r P 0072620 r o t F i l e ^ \r F t p P L i 0072640 s 376 001 \0 247 205 t P r o t F t p P 0072660 L i s t I m p 1 F t p P L i s 0072700 t I m p 2 ^ \r F t p U t i l A 0072720 F t p U t i l B ^ \r ^ \r P u 0072740 p B S P O p e n C l o s e P u 0072760 p B S P S t r e a m s P u p B 0073000 S P P r o t P u p B S P B l o 0073020 c k P u p B S P A ^ \r P u p 0073040 R T P O p e n C l o s e P u p 0073060 R T P ^ \r P u p N a m e L o o 0073100 k u p P u p R o u t e ^ \r P 0073120 u p 1 O p e n C l o s e P u p 0073140 1 B P u p A L 1 A P u p D u 0073160 m m y G a t e ^ \r P u p A l E 0073200 t h B P u p A l E t h A ^ \r 0073220 ^ \r A l l o c D V e c B f s 0073240 M l B c p 376 001 \0 326 302 l T r i c 0073260 k s C a l l s C a l e n d a 0073300 r ^ \r K e y S t r e a m s B 0073320 K e y S t r e a m s A ^ \r D s 0073340 p S t r e a m s B D s p S t r 0073360 e a m s A V M e m S p y F o n 0073400 t ^ \r ^ \r C o n t e x t C o 0073420 n t e x t I n i t I n t e r r 0073440 u p t B c p l R u n t i m e 0073460 ^ \r A l t o Q u e u e A l t o 0073500 T i m e r A l t o B y t e B l 0073520 t ^ \r K e y w o r d S t r i 0073540 n g U t i l T e m p l a t e 0073560 ^ \r T i m e C o n v B T i m e 0073600 C o n v A T i m e I O ^ \r ^ 0073620 \r F t p U t i l I n i t F t p 0073640 P L i s t I n i t K 376 001 \0 7 236 0073660 e y w o r d I n i t ^ \r P u p 0073700 1 I n i t P u p A l E t h I n 0073720 i t I n t e r r u p t I n i t 0073740 ^ \r L o a d R a m B c p l R 0073760 u n T i m e M c \r / / n o r m 0074000 a l n u m b e r o f e r r 0074020 o r s = 2 \r \r B u i l d B o 0074040 o t V M e m S p y . m a p / L 0074060 V M e m S p y . B o o t / O 0074100 1 1 0 1 / G 3 / D D i s k B 0074120 o o t . R u n / B 3 0 0 / N 0074140 B a s i c B o o t B a s e . x c 0074160 / S 1 2 0 1 / V B a s i c B 0074200 o o t B a s e . R u n / E 1 1 0074220 4 1 / V V M e m S p y B o o t 0074240 . r u n / E \r \r D e l e t e V 0074260 376 \0 017 201 003 M e m S p y B o o t . 0074300 r u n \r 374 0074305