$ od -c -N 50000 [Indigo]<Loops>RELEASE>1-MAY-84>LOADLOOPS.DCOM!1 0000000 ( F I L E C R E A T E D " 3 0 0000020 - A p r - 8 4 1 8 : 0 0 : 0 5 0000040 " ( " c o m p i l e d o n 0000060 " { I N D I G O } < L O O P S 0000100 > S O U R C E S > L O A D L O O 0000120 P S . ; 7 5 ) \r " 9 - A p r 0000140 - 8 4 1 6 : 2 8 : 0 8 " r e 0000160 c o m p i l e d e x p r s : 0000200 L O A D L O O P S L o o p s T 0000220 e d i t Q u i t i n L O O P 0000240 S . S Y S O U T d a t e d \r 0000260 " 3 0 - A p r - 8 4 1 6 : 4 9 0000300 : 4 5 " ) \r ( F I L E C R E A T 0000320 E D " 3 0 - A p r - 8 4 1 7 0000340 : 5 9 : 3 5 " { I N D I G O } 0000360 < L O O P S > S O U R C E S > L 0000400 O A D L O O P S . ; 7 5 3 1 8 0000420 9 8 c h a n g e s t o : ( 0000440 F N S \r L O A D L O O P S L 0000460 o o p s T e d i t Q u i t ) ( 0000500 V A R S L O A D L O O P S C O 0000520 M S ) p r e v i o u s d a t 0000540 e : " 2 7 - A p r - 8 4 1 6 0000560 : 0 4 : 5 6 " \r { I N D I G O 0000600 } < L O O P S > S O U R C E S > 0000620 L O A D L O O P S . ; 7 4 ) \r I 0000640 N I T . K B P A R C D 1 \r ( F 0000660 0 L I S P U S E R S D I R E 0000700 C T O R I E S F 1 D I R E 0000720 C T O R I E S ) \0 w \0 002 \0 \0 l 0000740 d \t \0 \0 g \0 \0 o \0 \0 \0 \n \0 \0 g \0 0000760 \0 l 036 \n \0 \0 g \0 \0 i \n \0 \0 g \0 \0 0001000 \t \0 \0 g \0 \0 o \0 \0 \0 \n \0 \0 g \0 \0 0001020 o \0 \0 \0 \n \0 \0 g \0 \0 i \n \0 \0 g \0 0001040 \0 i \n \0 \0 g \0 \0 o \0 \0 \0 \n \0 \0 g 0001060 \0 \0 g \0 \0 \n \0 \0 g \0 \0 i \n \0 \0 h 0001100 g \0 \0 g \0 \0 P 032 032 032 c 002 o \0 \0 \0 0001120 \t \0 \0 i 020 \0 ( 1 6 3 Q A D D T 0001140 O V A R 1 3 7 Q R P A Q Q 0001160 1 3 0 Q R P A Q Q 1 1 7 Q 0001200 R P A Q Q 1 0 5 Q R P A Q Q 0001220 7 6 Q R P A Q Q 6 7 Q R 0001240 P A Q Q 5 5 Q R P A Q Q 4 0001260 3 Q R P A Q Q 3 5 Q R P A 0001300 Q Q 2 6 Q R P A Q Q 1 6 Q 0001320 R P A Q Q 4 C H A N G E S 0001340 L I C E ) \r ( 1 4 6 Q { D S K 0001360 } 1 4 3 Q { I N D I G O } < 0001400 L O O P S > S O U R C E S > 1 0001420 3 3 Q A U T O B A C K T R A C 0001440 E F L G 1 2 5 Q A L L 1 2 0001460 2 Q C L O S E B R E A K W I N 0001500 D O W F L G 1 1 0 Q C L E A 0001520 N U P O P T I O N S 1 0 1 Q 0001540 D W I M I F Y C O M P F L G 7 0001560 2 Q N O R M A L C O M M E N T 0001600 S F L G 6 0 Q * * C O M M E 0001620 N T * * F L G 4 6 Q E D I T 0001640 C H A R A C T E R S 4 0 Q C 0001660 L I S P I F Y E N G L S H F L G 0001700 3 1 Q P R O M P T # F L G 0001720 2 1 Q D W I M W A I T 7 F 0001740 I X S P E L L D E F A U L T ) \r 0001760 ( 1 6 0 Q ( I N I T I A L S 0002000 L S T ( B O B R O W D a n n 0002020 y d g b : ) ( S T E F I K 0002040 M a r k m j s : ) ( T O N G 0002060 C h r i s c h t : ) ( G A 0002100 D O L S t e v e s g : " { 0002120 P H Y L U M } < G A D O L > " ) 0002140 ( B O R R I E L L O G a e t 0002160 a n o g b : ) ( D M R u s s 0002200 e l l D a n d m r : ) ( A 0002220 B E L L A l a n a g b : ) 0002240 ( D Y M C l i v e c l d : ) 0002260 ( H A U S L A D E N M a r y 0002300 m h : ) ( M I T T A L S a 0002320 n j a y s m : ) ( B E R L I 0002340 N D a n n y d l s b : " { 0002360 I V Y } < B E R L I N > L O O P 0002400 S " ) ( Y U E K a i k z y 0002420 : ) ( W I N O G R A D T e r 0002440 r y t w : ) ) 1 1 4 Q ( R 0002460 C S T L I S T ) 6 4 Q " 0002500 ( * - - ) " 5 2 Q 0002520 ( J ( H G ) Z Y N ( 0002540 O N I L ) ) 1 3 Q ( Q U O 0002560 T E n ) ) \r C o p y F i l e s 0002600 U s i n g S p e c s A 0 0 0 9 0002620 D 1 \r ( N A M E E R R O R S E 0002640 T L ( 2 E R R O R S E T . 0002660 W 1 E R R O R S E T . V 0 0002700 E R R O R S E T . U ) F 0 0002720 x ) \0 \a \0 001 \0 003 P 001 - h 032 020 0002740 \0 N I L \r N I L \r N I L \r C o p 0002760 y F i l e s U s i n g S p e c s 0003000 D 1 \r ( P 1 1 Q z P 5 0003020 x P 4 c o p i e d P 0003040 3 o p t i o n P 2 f i l 0003060 e s P 1 f r o m D i r P 0003100 0 s t a t u s I 1 t o 0003120 D i r I 0 s p e c s F 0003140 1 2 Q T T Y F 1 3 Q y ) 0003160 001 u \n 002 \0 002 i 021 Q 005 @ 261 001 f d 0003200 001 ] d 001 004 l 004 360 262 ' 277 o \0 \0 \0 \t 0003220 \0 \0 c 026 265 033 o \0 \0 \0 W 024 \n \0 \0 277 0003240 M W 024 \n \0 \0 277 W 024 \t \0 \0 277 h 200 001 0003260 272 M 002 001 271 J 264 003 202 261 001 & M d 002 002 0003300 244 277 g \0 \0 202 002 002 001 [ g \0 \0 360 250 K 0003320 d g \0 \0 360 262 | 277 021 0 \b J 260 . d 001 0003340 021 001 \t I O 022 \n \0 \0 \t \0 \0 A O 022 \n 0003360 \0 \0 \t \0 \0 \n \0 \0 022 276 O 016 265 \b N h 0003400 032 _ 020 201 N & _ 016 277 002 003 265 323 O 020 022 0003420 274 h L 034 221 h 270 o \0 \0 \0 W 024 \n \0 \0 0003440 277 J W 024 \n \0 \0 277 o \0 \0 \0 W 024 \n \0 0003460 \0 277 I W 024 \n \0 \0 277 o \0 \0 \0 W 024 \n 0003500 \0 \0 277 A W 024 \n \0 \0 277 W 024 \t \0 \0 277 0003520 K g \0 \0 360 250 K g \0 \0 360 242 261 \0 205 021 0003540 0 \b J 260 6 d 001 021 001 \t I O 022 o \0 \0 0003560 \0 \v \0 \0 \t \0 \0 A O 022 o \0 \0 \0 \v \0 0003600 \0 \t \0 \0 \n \0 \0 022 276 O 016 265 \b N h 032 0003620 _ 020 201 N & _ 016 277 002 003 265 313 O 020 022 274 0003640 h L 034 221 h 270 o \0 \0 \0 W 024 \n \0 \0 277 0003660 J W 024 \n \0 \0 277 o \0 \0 \0 W 024 \n \0 \0 0003700 277 I W 024 \n \0 \0 277 o \0 \0 \0 W 024 \n \0 0003720 \0 277 A W 024 \n \0 \0 277 W 024 \t \0 \0 200 X 0003740 277 002 003 265 003 202 261 376 231 H 020 \0 ( 5 4 6 0003760 Q T E R P R I 5 4 0 Q P R 0004000 I N 1 5 3 1 Q P R I N 1 5 0004020 1 7 Q P R I N 1 5 1 0 Q P 0004040 R I N 1 4 7 6 Q P R I N 1 0004060 4 6 7 Q P R I N 1 4 1 7 Q 0004100 C O P Y F I L E 4 1 4 Q M K 0004120 A T O M 4 1 1 Q C O N C A T 0004140 3 7 7 Q M K A T O M 3 7 4 0004160 Q C O N C A T 3 2 7 Q T E 0004200 R P R I 3 2 1 Q P R I N 1 0004220 3 1 2 Q P R I N 1 3 0 0 Q 0004240 P R I N 1 2 7 1 Q P R I N 1 0004260 2 5 7 Q P R I N 1 2 5 0 Q 0004300 P R I N 1 2 0 0 Q C O P Y 0004320 F I L E 1 7 5 Q M K A T O M 0004340 1 7 2 Q C O N C A T 1 6 4 0004360 Q M K A T O M 1 6 1 Q C O 0004400 N C A T 6 4 Q T E R P R I 0004420 5 6 Q P R I N 1 4 7 Q P R 0004440 I N 1 3 2 Q C o p y F i l e 0004460 s U s i n g S p e c s A 0 0 0 9 0004500 ) \r ( 3 4 2 Q B 3 3 4 Q C 0004520 1 3 4 Q B 1 2 5 Q S 1 0004540 1 5 Q C ) \r ( 5 2 4 Q " t 0004560 o : " 5 0 3 Q " f r o m 0004600 : " 4 6 2 Q " C o p i e d 0004620 c o m p i l e d f i l e s : 0004640 " 4 0 6 Q " . D C O M " 0004660 3 7 1 Q " . D C O M " 3 0 5 0004700 Q " t o : " 2 6 4 Q " 0004720 f r o m : " 2 4 3 Q " C 0004740 o p i e d s o u r c e f i l 0004760 e s : " 4 2 Q " C a n n o 0005000 t c a r r y o u t s p e c s 0005020 : " 2 7 Q ( D U M M Y . F 0005040 O R . E R R O R S E T ) ) \r E n 0005060 t e r S y s A 0 0 0 1 D 1 \r ( 0005100 N A M E E R R O R S E T L 0005120 ( 2 E R R O R S E T . W 1 0005140 E R R O R S E T . V 0 E R R 0005160 O R S E T . U ) F 0 L O G 0005200 I N H O S T / D I R ) \0 \a \0 001 0005220 \0 003 P \t \0 \0 i 020 \0 ( 3 / C N D 0005240 I R ) \r N I L \r ( ) \r E n t e r 0005260 S y s A 0 0 0 2 D 1 \r ( N A M 0005300 E E R R O R S E T L ( 2 0005320 E R R O R S E T . W 1 E R R 0005340 O R S E T . V 0 E R R O R S 0005360 E T . U ) F 0 L O G I N H 0005400 O S T / D I R ) \0 \a \0 001 \0 003 P 0005420 \t \0 \0 i 020 \0 ( 3 / C N D I R ) 0005440 \r N I L \r ( ) \r E n t e r S y s 0005460 D 1 \r ( P 1 l o g i n H o 0005500 s t E n t r y P 0 u s e r 0005520 E n t r y I 0 l o g I n F 0005540 l g F 2 U S E R N A M E 0005560 F 3 I N I T I A L S L S T 0005600 F 4 I N I T I A L S F 5 0005620 L O G I N H O S T / D I R F 0005640 6 D E F A U L T P R I N T I 0005660 N G H O S T F 7 L e e s b 0005700 u r g F l g F 1 0 Q S t a 0005720 n d A l o n e F l g F 1 1 Q 0005740 D E F A U L T F I L E S E R V 0005760 E R F 1 2 Q F I R S T N A 0006000 M E ) \0 326 002 \t \0 001 021 001 W 016 223 0006020 \b \0 \0 020 W 020 223 \b \0 \0 020 @ 264 017 \b \0 0006040 \0 277 h i \n \0 \0 c 004 277 h i \n \0 \0 c 0006060 004 d g \0 \0 360 245 d g \0 \0 360 222 277 i 201 0006100 277 h 223 \b \0 \0 020 R S \n \0 \0 X 265 K @ 0006120 243 \b \0 \0 277 \b \0 \0 \t \0 \0 c 004 d g \0 0006140 \0 360 224 277 \b \0 \0 020 S \n \0 \0 X d 263 * 0006160 i \n \0 \0 c 004 277 g \0 \0 c \b 277 g \0 \0 0006200 c \n 277 o \0 \0 \0 i \n \0 \0 277 g \0 \0 \t 0006220 \0 \0 222 \b \0 \0 i 020 002 002 002 001 Y d 005 \a 0006240 265 030 o \0 \0 \0 I 265 004 W 022 o \0 \0 \0 R 0006260 o \0 \0 \0 \r 005 \0 \0 c \n H 002 002 002 002 001 0006300 265 003 V c \f H 002 002 001 265 005 g \0 \0 c \b 0006320 H 002 001 c 024 o \0 \0 \0 i \n \0 \0 h 020 \0 0006340 ( 3 2 2 Q E n t e r S y s A 0 0006360 0 0 2 2 5 5 Q P A C K * 2 0006400 1 3 Q G R E E T 2 0 7 Q I 0006420 N F I L E P 2 0 0 Q E n t e 0006440 r S y s A 0 0 0 1 1 5 1 Q U 0006460 S E R N A M E 1 4 1 Q F A S 0006500 S O C 1 3 4 Q E n t e r S y 0006520 s F o r L o o p s C o u r s e 0006540 1 2 0 Q M K A T O M 1 1 5 Q 0006560 U S E R N A M E 1 1 1 Q L 0006600 O G I N 1 0 1 Q F A S S O C 0006620 7 3 Q E n t e r S y s F o r 0006640 L o o p s C o u r s e 4 4 Q 0006660 U S E R N A M E 3 4 Q U S E 0006700 R N A M E 2 6 Q L O G I N 0006720 1 7 Q E n t e r S y s F o r S 0006740 t a n d A l o n e 1 0 Q E n 0006760 t e r S y s F o r L e e s b u r 0007000 g ) \r ( 3 0 3 Q e d i t e d : 0007020 2 0 4 Q { D S K } I N I T . 0007040 L I S P 1 6 5 Q { D S K } 0007060 1 5 7 Q e d i t e d : 1 2 6 0007100 Q L O O P S C O U R S E 6 0 0007120 Q L O O P S C O U R S E . G U 0007140 E S T 5 2 Q L O O P S C O U 0007160 R S E ) \r ( 3 1 6 Q ( D U M 0007200 M Y . F O R . E R R O R S E T ) 0007220 2 5 1 Q " > L I S P > " 2 0007240 4 4 Q " } < " 2 3 3 Q " { 0007260 " 1 7 4 Q ( D U M M Y . F O 0007300 R . E R R O R S E T ) ) \r E n t 0007320 e r S y s F o r L o o p s C o u 0007340 r s e A 0 0 1 2 D 1 \r ( N A M 0007360 E E R R O R S E T L ( 2 0007400 E R R O R S E T . W 1 E R R 0007420 O R S E T . V 0 E R R O R S 0007440 E T . U ) F 0 L O G I N H 0007460 O S T / D I R ) \0 \b \0 001 \0 003 P 0007500 \t \0 \0 h 032 020 \0 ( 3 / C N D I R 0007520 ) \r N I L \r N I L \r E n t e r S 0007540 y s F o r L o o p s C o u r s e 0007560 D 1 \r ( F 0 S t u d e n t 0007600 N a m e F 1 I N I T I A L 0007620 S F 2 L O G I N H O S T / 0007640 D I R F 3 F I R S T N A M 0007660 E F 4 L O O P S C O U R S 0007700 E D I R ) \0 & \0 005 \0 \0 o \0 \0 \0 0007720 \t \0 \0 c \0 g \0 \0 c 002 g \0 \0 c 006 T 0007740 d 235 P \n \0 \0 c 004 o \0 \0 \0 i \n \0 \0 0007760 020 \0 ( 4 3 Q E n t e r S y s F 0010000 o r L o o p s C o u r s e A 0 0 0010020 1 2 3 1 Q P A C K * 6 I 0010040 N T T Y ) \r ( 2 0 Q S t u d e 0010060 n t 1 3 Q e d i t e d : ) \r 0010100 ( 3 7 Q ( D U M M Y . F O R . 0010120 E R R O R S E T ) 3 " W h a 0010140 t i s y o u r l a s t n 0010160 a m e , p l e a s e ? " ) \r 0010200 E n t e r S y s F o r S t a n d 0010220 A l o n e D 1 \r N I L \0 \n \0 0010240 \0 \0 \0 o \0 \0 \0 \t \0 \0 h 020 \0 ( 6 0010260 W R I T E ) \r N I L \r ( 3 " W 0010300 e l c o m e t o t h e L o 0010320 o p s D e m o - - S T A N 0010340 D A L O N E v e r s i o n . " 0010360 ) \r E n t e r S y s F o r L e e 0010400 s b u r g A 0 0 1 3 D 1 \r ( N 0010420 A M E E R R O R S E T L ( 0010440 2 E R R O R S E T . W 1 E 0010460 R R O R S E T . V 0 E R R O 0010500 R S E T . U ) F 0 L O G I 0010520 N H O S T / D I R ) \0 \a \0 001 \0 0010540 003 P \t \0 \0 i 020 \0 ( 3 / C N D I 0010560 R ) \r N I L \r N I L \r E n t e r 0010600 S y s F o r L e e s b u r g D 0010620 1 \r ( F 0 L O G I N H O S T 0010640 / D I R F 1 S t u d e n t 0010660 N a m e F 2 I N I T I A L 0010700 S F 3 F I R S T N A M E 0010720 F 4 L O O P S C O U R S E D 0010740 I R F 5 U S E R N A M E ) 0010760 \0 ~ \0 006 \0 \0 o \0 \0 \0 \t \0 \0 277 o 0011000 \0 \0 \0 h o \0 \0 \0 \v \0 \0 c 002 277 g \0 0011020 \0 c 004 277 g \0 \0 c 006 277 T Q g \0 \0 \v 0011040 \0 \0 c \0 277 U g \0 \0 360 247 o \0 \0 \0 \t 0011060 \0 \0 277 P \t \0 \0 225 P \t \0 \0 260 6 o \0 0011100 \0 \0 P \n \0 \0 277 o \0 \0 \0 o \0 \0 \0 o 0011120 \0 \0 \0 \v \0 \0 g \0 \0 360 263 245 o \0 \0 \0 0011140 P \n \0 \0 277 P \t \0 \0 277 o \0 \0 \0 i \n 0011160 \0 \0 h 020 \0 ( 1 7 2 Q E n t e r 0011200 S y s F o r L e e s b u r g A 0 0011220 0 1 3 1 6 1 Q N S C R E A T 0011240 E D I R E C T O R Y 1 5 4 Q 0011260 W R I T E 1 3 6 Q I N T T Y 0011300 1 1 6 Q W R I T E 1 0 4 Q 0011320 / C N D I R 7 7 Q D I R E 0011340 C T O R Y N A M E P 7 2 Q W 0011360 R I T E 5 2 Q P A C K * 2 0011400 3 Q I N T T Y 6 W R I T E 0011420 ) \r ( 1 4 1 Q N 6 1 Q L O 0011440 O P S C O U R S E 4 7 Q > 0011460 3 7 Q S t u d e n t 3 1 Q 0011500 e d i t e d : ) \r ( 1 6 6 Q ( 0011520 D U M M Y . F O R . E R R O R S 0011540 E T ) 1 5 0 Q " C r e a t i 0011560 n g d i r e c t o r y f o r 0011600 " 1 3 3 Q " T y p e Y 0011620 t o c r e a t e a n e w 0011640 d i r e c t o r y . \r T y p e 0011660 N t o r e - e n t e r y o 0011700 u r l a s t n a m e . " 1 0011720 2 7 Q ( Y N ) 1 2 3 Q " 0011740 C r e a t e a n e w d i r 0011760 e c t o r y ( Y / N ) ? " 0012000 1 1 2 Q " N o d i r e c t o 0012020 r y e x i s t s y e t f o 0012040 r " 6 7 Q " P l e a s e 0012060 L O G I N a s L O O P S C O 0012100 U R S E a n d t y p e t h 0012120 e c o u r s e p a s s w o r 0012140 d . " 2 0 Q " E n t e r y 0012160 o u r n a m e . e . g . J 0012200 O N E S . ( U s e a l l 0012220 c a p i t a l s a n d n o 0012240 s p a c e s . ) " 1 3 Q " W 0012260 h a t i s y o u r l a s t 0012300 n a m e , p l e a s e ? " 0012320 3 " W e l c o m e t o L 0012340 i s p a n d L o o p s . " ) 0012360 \r F o r c e L o a d F o n t s 0012400 D 1 \r N I L \0 017 \0 \0 \0 \0 g \0 \0 0012420 \t \0 \0 g \0 \0 \t \0 \0 h 020 \0 ( 1 3 Q 0012440 N E W F O N T 5 N E W F O 0012460 N T ) \r ( 1 0 Q P A R C 2 0012500 B I G ) \r N I L \r L E E S B U R 0012520 G D 1 \r ( F 0 F I L E L S 0012540 T F 1 L e e s b u r g F l 0012560 g F 2 L O O P S C O U R S 0012600 E D I R F 3 L I S P U S E 0012620 R S D I R E C T O R I E S F 0012640 4 U S E R N A M E F 5 F 0012660 O N T D I R E C T O R I E S F 0012700 6 D E M O F L G S E T U P 0012720 F 7 N S . D E F A U L T . P 0012740 R I N T E R F 1 0 Q D I R 0012760 E C T O R I E S ) \0 G \0 \t \0 \0 0013000 \b \0 \0 i c 002 g \0 \0 g \0 \0 g \0 \0 \v 0013020 \0 \0 g \0 \0 c 004 h c 006 d c \n d c \0 0013040 g \0 \0 c 016 g \0 \0 c \b g \0 \0 \t \0 \0 0013060 i c \f o \0 \0 \0 c \0 h g \0 \0 h 032 032 0013100 c 020 \b \0 \0 020 \0 ( 1 0 4 Q S e t 0013120 U p D e m o 5 7 Q P R I N T 0013140 E R M O D E 2 1 Q C H A N G 0013160 E N A M E 2 F o r c e L o a 0013200 d F o n t s ) \r ( 7 4 Q { F S 0013220 : } < L O O P S > 5 4 Q I N 0013240 T E R P R E S S 4 7 Q N o t 0013260 L o g g e d I n 4 2 Q L I S 0013300 P P R I N T 2 4 Q { F S : } 0013320 < L O O P S C O U R S E > 1 6 0013340 Q E V Q 1 3 Q F O N T C O 0013360 P Y 1 0 Q \ S E T . T T Y I 0013400 N B O L D F O N T ) \r ( 6 6 Q 0013420 ( G A U G E S T R U C K I N P 0013440 T R U C K I N V T R U C K I 0013460 N D B T R U C K I N R L O O 0013500 P S D E M O ) ) \r L O A D D E M 0013520 O D 1 \r ( I 0 s o u r c e 0013540 F l g F 0 D E M O D I R 0013560 F 1 D I R E C T O R I E S 0013600 F 2 D E M O F I L E S ) \0 0013620 V \0 003 \0 001 g \0 \0 g \0 \0 \n \0 \0 P Q 0013640 034 247 Q P h 032 \n \0 \0 277 @ \t \0 \0 @ 235 0013660 R 206 d 001 \t \0 \0 277 002 003 265 370 260 ! R \t 0013700 \0 \0 277 g \0 \0 g \0 \0 g \0 \0 \v \0 \0 277 0013720 g \0 \0 g \0 \0 g \0 \0 \v \0 \0 277 g \0 \0 0013740 \t \0 \0 g \0 \0 \t \0 \0 020 \0 ( 1 2 3 Q 0013760 N E W F O N T 1 1 5 Q N E 0014000 W F O N T 1 0 6 Q L O A D F 0014020 N S 7 1 Q L O A D F N S 5 0014040 4 Q D O F I L E S L O A D 4 0014060 1 Q L O A D 3 0 Q L O A D 0014100 T R U C K I N 2 3 Q \ N C O 0014120 N C 2 1 0 Q L O A D ) \r ( 1 0014140 2 0 Q P A R C 1 1 2 Q B I 0014160 G 1 0 3 Q P R O P 1 0 0 Q 0014200 L O O P S D E M O 7 5 Q L 0014220 i g h t R u l e s 6 6 Q P R 0014240 O P 6 3 Q T R U C K I N D B 0014260 6 0 Q A p p l e . S e t P r 0014300 i c e 5 P R O P 2 G A U 0014320 G E S ) \r ( ) \r L O A D L O O P 0014340 S D 1 \r ( P 0 F I L E I 0014360 3 n o S c r e e n S e t u p 0014400 I 2 c o n n e c t D i r e 0014420 c t o r y I 1 s y s o u t 0014440 F l g I 0 o p t i o n F 0014460 1 A F T E R S Y S O U T F O 0014500 R M S F 2 L o o p s P a t 0014520 c h F i l e s F 3 L O O P 0014540 S F I L E S F 4 A F T E R 0014560 L O G O U T F O R M S F 5 0014600 L i s p U s e r F i l e s F o r 0014620 L o o p s F 6 O p t i o n 0014640 a l L i s p u s e r F i l e s 0014660 F 7 K E R N E L L O O P S F 0014700 I L E S F 1 0 Q M A K E S 0014720 Y S D A T E F 1 1 Q L i s 0014740 p D a t e F 1 2 Q S Y S O 0014760 U T G A G F 1 3 Q S M A L 0015000 L L O O P S F I L E S F 1 4 0015020 Q F I L E L S T F 1 5 Q 0015040 C O M P I L E . E X T F 1 6 0015060 Q L o o p s D a t e F 1 7 0015100 Q L O G I N H O S T / D I R 0015120 F 2 0 Q T E D I T . R E A D 0015140 T A B L E ) 001 334 001 020 \0 004 @ \t \0 0015160 \0 b \0 B 224 B \t \0 \0 277 @ d g \0 \0 360 0015200 232 277 o \0 \0 \0 i \n \0 \0 h 020 262 F @ g 0015220 \0 \0 360 263 ? @ g \0 \0 360 263 8 @ g \0 \0 0015240 360 263 1 @ g \0 \0 360 263 * @ g \0 \0 360 263 0015260 # @ g \0 \0 360 263 034 @ g \0 \0 360 263 025 @ 0015300 g \0 \0 360 254 @ g \0 \0 360 246 @ g \0 \0 360 0015320 262 & g \0 \0 o \0 \0 \0 U V \n \0 \0 032 \n 0015340 \0 \0 R 224 R \t \0 \0 277 W 020 k l \t \v \0 0015360 \0 c 022 S 260 ? o \0 \0 \0 020 d 001 021 001 \0 0015400 @ d g \0 \0 360 225 277 H W 026 034 212 g \0 \0 0015420 360 224 H W 016 034 200 i 262 032 g \0 \0 H g \0 0015440 \0 @ g \0 \0 360 221 h 201 W 032 \f \0 \0 \t \0 0015460 \0 277 023 002 003 265 306 \b \0 \0 k l 017 \v \0 \0 0015500 c 034 g \0 \0 \t \0 \0 232 l 030 g \0 \0 W 0015520 \v \0 \0 277 @ g \0 \0 360 246 @ g \0 \0 360 264 0015540 006 S \t \0 \0 c 030 277 C 263 & @ d g \0 \0 0015560 360 263 037 d g \0 \0 360 263 030 d g \0 \0 360 257 0015600 277 A 247 @ d g \0 \0 360 245 277 \b \0 \0 277 @ 0015620 g \0 \0 360 263 024 @ g \0 \0 360 253 @ g \0 \0 0015640 360 245 @ g \0 \0 360 233 \b \0 \0 277 \b \0 \0 277 0015660 \b \0 \0 277 o \0 \0 \0 Q \n \0 \0 263 034 Q o 0015700 \0 \0 \0 h 032 \n \0 \0 c 002 277 T o \0 \0 \0 0015720 h 032 \n \0 \0 c \b 277 g \0 \0 h 032 c 024 @ 0015740 d g \0 \0 360 225 277 \b \0 \0 260 , g \0 \0 360 0015760 225 i \t \0 \0 260 ! @ d g \0 \0 360 225 277 \b 0016000 \0 \0 260 024 g \0 \0 360 223 \b \0 \0 210 @ g \0 0016020 \0 360 223 \b \0 \0 277 \b \0 \0 h c 036 A d 262 0016040 ( i 360 244 A \t \0 \0 200 h 264 035 @ d g \0 0016060 \0 360 224 277 g \0 \0 213 g \0 \0 360 223 g \0 \0 0016100 202 g \0 \0 \t \0 \0 020 \0 ( 7 3 1 Q S 0016120 Y S O U T 6 7 2 Q / C N D I 0016140 R 6 5 4 Q U n M a r k C h a 0016160 n g e s 6 5 0 Q T e s t e r 0016200 S y s t e m 6 3 6 Q S T A N 0016220 D A L O N E 6 2 4 Q S A L E 0016240 E S B U R G 6 0 7 Q S T A N 0016260 D A L O N E 5 7 4 Q L E E S 0016300 B U R G 5 4 7 Q \ A P P E N 0016320 D 2 5 3 2 Q \ A P P E N D 2 0016340 5 1 6 Q M E M B E R 5 0 5 0016360 Q S e t U p D e m o 5 0 1 Q 0016400 L O A D C O U R S E 4 7 5 Q 0016420 L O A D D E M O 4 4 0 Q S 0016440 e t U p S c r e e n 3 6 7 Q 0016460 \ A P P E N D 2 3 4 5 Q T E 0016500 D I T . S E T F U N C T I O N 0016520 3 3 2 Q F N T Y P 3 2 2 Q 0016540 S U B S T R I N G 3 1 4 Q D 0016560 A T E 3 0 3 Q L O A D 3 0 0016600 0 Q P A C K F I L E N A M E 0016620 2 0 3 Q S U B S T R I N G 1 0016640 7 2 Q D O F I L E S L O A D 0016660 1 6 4 Q A P P L Y 1 6 0 Q 0016700 \ A P P E N D 2 3 4 Q P R I 0016720 N T 1 3 Q C N D I R 3 U 0016740 - C A S E ) \r ( 7 2 6 Q L O O 0016760 P S . S Y S O U T 7 2 2 Q O 0017000 O P S . S Y S O U T 7 1 5 Q 0017020 S M A L L 7 1 1 Q L O O P S 0017040 D E M O . S Y S O U T 7 0 3 Q 0017060 D E M O 6 4 3 Q T E S T E 0017100 R 6 3 1 Q S T A N D A L O N 0017120 E 6 1 6 Q S A L E E S B U R 0017140 G 6 0 1 Q 1 0 M B Y T E 5 0017160 6 6 Q L E E S B U R G 5 5 5 0017200 Q E n t e r S y s 4 7 0 Q 0017220 S T A N D A L O N E 4 6 2 Q 0017240 L E E S B U R G 4 5 4 Q S A 0017260 L E E S B U R G 4 4 5 Q D E 0017300 M O 4 3 2 Q K E R N E L 4 0017320 2 0 Q S T A N D A L O N E 4 0017340 1 1 Q L E E S B U R G 4 0 2 0017360 Q D E M O 3 6 0 Q D E M O 0017400 3 5 2 Q D E B U G 3 4 0 Q 0017420 L o o p s T e d i t Q u i t 0017440 3 2 7 Q T E D I T 2 6 7 Q 0017460 S O U R C E S 2 6 3 Q E X T 0017500 E N S I O N 2 5 7 Q N A M E 0017520 2 4 2 Q K E R N E L 2 2 7 0017540 Q S M A L L 1 4 7 Q F I L 0017560 E S L O A D 1 4 1 Q T E S T 0017600 E R 1 3 3 Q K E R N E L 1 0017620 2 5 Q S O U R C E S 1 1 6 Q 0017640 D E B U G 1 0 7 Q D E M O 0017660 1 0 0 Q S T A N D A L O N E 0017700 7 1 Q L E E S B U R G 6 2 0017720 Q S A L E E S B U R G 5 3 Q 0017740 S M A L L 4 4 Q 1 0 M B Y 0017760 T E 2 1 Q ? ) \r ( 5 4 2 Q 0020000 ( D B - I n i t U I ) 5 2 5 0020020 Q ( D B - I n i t U I ) 5 1 0020040 2 Q ( D B - I n i t U I ) 2 0020060 1 4 Q " B a d o p t i o n . 0020100 o p t i o n c a n b e o 0020120 n e o f N I L D E B U G 0020140 S O U R C E S K E R N E L . \r 0020160 F o r m o r e i n f o r m a 0020200 t i o n t y p e \r L O A D L O 0020220 O P S ( ? ) " 1 5 3 Q ( S Y 0020240 S L O A D F R O M V A L U E 0020260 O F L I S P U S E R S D I R E 0020300 C T O R I E S ) 3 0 Q " L O 0020320 A D L O O P S c a s e s : \r o 0020340 p t i o n = N I L , l o a d s 0020360 D C O M o f L O O P S F 0020400 I L E S ; s e t s F I L E L 0020420 S T t o N I L . \r o p t i o 0020440 n s = 1 0 M B Y T E , l o a d 0020460 s D C O M o f L O O P S 0020500 F I L E S ; r u n s S T A N 0020520 D A L O N E ( T ) \r \t s o t h 0020540 a t n o d i r e c t o r i e 0020560 s a r e i n s t a l l e d . 0020600 \r o p t i o n = S M A L L l o 0020620 a d s D C O M o f L O O P 0020640 S F I L E S n o t i n c l u 0020660 d i n g \r L O O P S D A T A 0020700 B A S E , G A U G E S , o r 0020720 R U L E S F I L E S f i l e 0020740 s \r o p t i o n = D E B U G l 0020760 o a d s D C O M o f L O O 0021000 P S F I L E S . o p t i o n = 0021020 D E M O l o a d s D C O M 0021040 f i l e s o f L O O P S , D 0021060 E M O a n d T R U C K I N , 0021100 \r \t a n d s e t s u p d 0021120 e m o s c r e e n a n d f 0021140 o n t s \r o p t i o n = L E E S 0021160 B U R G d o e s a d e m o 0021200 l o a d , a n d t h e n 0021220 r u n s f u n c t i o n \r \t L 0021240 E E S B U R G \r o p t i o n = S 0021260 A L E E S B U R G d o e s a 0021300 d e m o l o a d , a n d 0021320 r u n s S A L E E S B U R G . 0021340 \r M a k e s a s y s t e m 0021360 w i t h A L L n e e d e d 0021400 s t u f f a l r e a d y l 0021420 o a d e d . \r o p t i o n = S T 0021440 A N D A L O N E d o e s a 0021460 d e m o l o a d , a n d t 0021500 h e n r u n s f u n c t i o 0021520 n \r \t S T A N D A L O N E \r o p 0021540 t i o n = S O U R C E S , t h 0021560 e n l o a d s s o u r c e s 0021600 o f L O O P S F I L E S . \r 0021620 o p t i o n = K E R N E L , l 0021640 o a d s D C O M f i l e s 0021660 e x c l u d i n g R U L E S F 0021700 I L E S . \r I n a l l 0021720 a b o v e c a s e s , E X 0021740 C E P T o p t i o n = K E 0021760 R N E L , \r s e t s u 0022000 p t h e s t a n d a r d l 0022020 o o p s s c r e e n . \r o p t 0022040 i o n = T E S T E R , l o a d 0022060 s L o o p s T e s t e r f i 0022100 l e s . \r o p t i o n = ? , t 0022120 h e n L O A D L O O P S p r 0022140 i n t s t h i s m e s s a g 0022160 e . \r I f s y s o u t 0022200 F l g = T t h e n e n d s 0022220 w i t h a ( S Y S O U T ' 0022240 L O O P S . S Y S O U T ) " ) \r 0022260 L o o p s T e d i t Q u i t D 0022300 1 \r ( I 1 v a l u e I 0 0022320 s t r e a m ) \0 # \0 \0 \0 002 @ 0022340 A 005 \a 222 A 260 030 A d 004 ` \0 \0 360 226 g 0022360 \0 \0 \n \0 \0 206 o \0 \0 \0 \n \0 \0 \n \0 \0 0022400 020 \0 ( 4 0 Q T E D I T . Q U I 0022420 T 3 5 Q E R R O R 2 5 Q 0022440 C O E R C E T E X T O B J ) \r ( 0022460 2 2 Q S T R I N G P 1 5 Q 0022500 004 003 T E X T O B J T Y P E # ) \r 0022520 ( 3 2 Q " w r o n g t y p 0022540 e " ) \r N e w R e l e a s e D 0022560 1 \r ( P 4 M a x c R e l e a 0022600 s e C o m m d P 3 I n d i 0022620 g o C l e a n u p C o m m d P 0022640 2 s t a t u s P 1 s o 0022660 u r c e D i r P 0 i n d i 0022700 g o D i r I 2 d a t e I 0022720 1 m a x c P a s s I 0 0022740 i n d i g o P a s s F 5 T 0022760 T Y F 6 I n d i g o R e l 0023000 e a s e D i r F 7 R e l e 0023020 a s e F i l e s S p e c ) \0 330 0023040 005 003 \0 003 021 P 004 @ 251 o \0 \0 \0 \t \0 \0 0023060 b \0 277 A 251 o \0 \0 \0 \t \0 \0 b 002 277 B 0023100 253 \b \0 \0 k l \t \v \0 \0 b 004 277 V B o 0023120 \0 \0 \0 \v \0 \0 \t \0 \0 Y o \0 \0 \0 I \n 0023140 \0 \0 \t \0 \0 X o \0 \0 \0 I o \0 \0 \0 o 0023160 \0 \0 \0 o \0 \0 \0 \r 005 \0 \0 [ g \0 \0 h 0023200 K \v \0 \0 W 016 H \n \0 \0 Z d 263 % o \0 0023220 \0 \0 U \n \0 \0 277 H U \n \0 \0 277 U \t \0 0023240 \0 277 o \0 \0 \0 U \n \0 \0 277 U \t \0 \0 h 0023260 020 o \0 \0 \0 o \0 \0 \0 A o \0 \0 \0 o \0 0023300 \0 \0 o \0 \0 \0 o \0 \0 \0 \b \0 \0 @ o \0 0023320 \0 \0 o \0 \0 \0 I o \0 \0 \0 o \0 \0 \0 o 0023340 \0 \0 \0 l 003 \t \0 \0 o \0 \0 \0 \r 021 \0 \0 0023360 \ g \0 \0 h L \v \0 \0 h 020 \0 ( 3 2 4 0023400 Q C H A T 3 1 3 Q C O N C 0023420 A T 3 0 3 Q C H A R A C T E 0023440 R 2 5 0 Q U S E R N A M E 0023460 2 1 2 Q T E R P R I 2 0 5 Q 0023500 P R I N 1 1 7 4 Q T E R P 0023520 R I 1 6 7 Q P R I N 1 1 6 0023540 1 Q P R I N 1 1 4 5 Q C o 0023560 p y F i l e s U s i n g S p e c 0023600 s 1 3 7 Q C H A T 1 2 6 Q 0023620 C O N C A T 1 0 0 Q M K A 0023640 T O M 7 5 Q C O N C A T 6 0023660 4 Q M K A T O M 6 1 Q C O 0023700 N C A T 4 5 Q S U B S T R I 0023720 N G 3 7 Q G D A T E 2 7 Q 0023740 I N T T Y 1 3 Q I N T T Y 0023760 ) \r ( 3 1 7 Q M A X C 1 3 2 0024000 Q I N D I G O ) \r ( 3 0 7 Q 0024020 " l o g o u t \r " 2 7 6 Q " 0024040 l o g o u t \r " 2 7 2 Q " q 0024060 \r " 2 6 6 Q " * \r " 2 6 1 0024100 Q " a u t o m a t i c r e t 0024120 " 2 5 5 Q " \r " 2 4 5 Q 0024140 " l o g " 2 4 1 Q " p u 0024160 p f t p i n d i g o \r " 2 3 0024200 5 Q " d e l * . * \r " 2 3 0024220 1 Q " \r " 2 2 4 Q " C O N 0024240 N l o o p s " 2 2 0 Q " 0024260 1 \r " 2 0 1 Q " R E L E A S 0024300 E A B O R T E D ! ! " 1 5 5 0024320 Q " F i l e s n o t c o p 0024340 i e d p r o p e r l y t o : 0024360 " 1 2 2 Q " q \r " 1 1 6 0024400 Q " d e l * , \r c o n f \r \r 0024420 " 1 1 2 Q " \r " 1 0 5 Q 0024440 " d i r " 7 1 Q " { i n d 0024460 i g o } " 5 6 Q " > " 2 4 0024500 Q " E n t e r p a s s w o r 0024520 d f o r M a x c L o o p s 0024540 d i r e c t o r y : " 1 0 0024560 Q " E n t e r y o u r I n 0024600 d i g o p a s s w o r d : " 0024620 ) \r S A L E E S B U R G D 1 \r 0024640 ( P 0 F I L E F 1 L e 0024660 e s b u r g F l g F 2 L O 0024700 O P S C O U R S E D I R F 3 0024720 L I S P U S E R S D I R E C T 0024740 O R I E S F 4 U S E R N A 0024760 M E F 5 F O N T D I R E C 0025000 T O R I E S F 6 D E M O F 0025020 L G S E T U P F 7 F I L E 0025040 L S T F 1 0 Q N S . D E F 0025060 A U L T . P R I N T E R F 1 0025100 1 Q D I R E C T O R I E S ) 0025120 \0 Q 001 \t \0 \0 \b \0 \0 i c 002 g \0 \0 g 0025140 \0 \0 g \0 \0 \v \0 \0 g \0 \0 c 004 h c 006 0025160 d c \n d c 016 g \0 \0 c 020 g \0 \0 c \b 0025200 g \0 \0 \t \0 \0 o \0 \0 \0 215 d 001 021 001 \0 0025220 H g \0 \0 \n \0 \0 023 002 003 265 361 i c \f h 0025240 c 022 \b \0 \0 020 \0 ( 1 1 6 Q S e t 0025260 U p D e m o 1 0 0 Q L O A D 0025300 5 7 Q P R I N T E R M O D E 0025320 2 1 Q C H A N G E N A M E 0025340 2 F o r c e L o a d F o n t s 0025360 ) \r ( 7 5 Q P R O P 5 4 Q 0025400 I N T E R P R E S S 4 7 Q N 0025420 o t L o g g e d I n 4 2 Q L 0025440 I S P P R I N T 2 4 Q { F S 0025460 : } < L O O P S C O U R S E > 0025500 1 6 Q E V Q 1 3 Q F O N T 0025520 C O P Y 1 0 Q \ S E T . T T 0025540 Y I N B O L D F O N T ) \r ( 6 3 0025560 Q ( G A U G E S T R U C K I 0025600 N P T R U C K I N V T R U C 0025620 K I N D B T R U C K I N R L 0025640 O O P S D E M O ) ) \r S T A N D 0025660 A L O N E D 1 \r ( P 0 F I 0025700 L E I 0 n o P r o p F l g 0025720 F 1 S t a n d A l o n e F 0025740 l g F 2 L I S P U S E R S 0025760 D I R E C T O R I E S F 3 0026000 F O N T D I R E C T O R I E S 0026020 F 4 D I R E C T O R I E S 0026040 F 5 F I L E L S T F 6 0026060 N S . D E F A U L T . P R I N T 0026100 E R F 7 U S E R N A M E ) 0026120 \0 I 001 \a \0 001 \b \0 \0 i c 002 g \0 \0 0026140 g \0 \0 g \0 \0 \v \0 \0 h c 004 d c 006 d 0026160 c \n g \0 \0 c \f g \0 \0 c 016 g \0 \0 \t 0026200 \0 \0 @ 263 030 o \0 \0 \0 215 d 001 021 001 \0 H 0026220 g \0 \0 \n \0 \0 023 002 003 265 361 h c \b 020 \0 0026240 ( 7 6 Q L O A D 5 2 Q P R 0026260 I N T E R M O D E 2 1 Q C H 0026300 A N G E N A M E 2 F o r c e 0026320 L o a d F o n t s ) \r ( 7 3 Q 0026340 P R O P 4 7 Q I N T E R P R 0026360 E S S 4 2 Q N o t L o g g e 0026400 d I n 3 5 Q L I S P P R I N 0026420 T 1 6 Q E V Q 1 3 Q F O 0026440 N T C O P Y 1 0 Q \ S E T . 0026460 T T Y I N B O L D F O N T ) \r ( 0026500 6 1 Q ( G A U G E S T R U 0026520 C K I N P T R U C K I N V T 0026540 R U C K I N D B L O O P S D E 0026560 M O ) ) \r T E S T L O O P S D 0026600 1 \r ( I 0 S O U R C E S F L 0026620 G F 0 L T L O A D E D R E 0026640 S T ) \0 # \0 001 \0 001 @ 262 025 o \0 \0 0026660 \0 206 d 001 \t \0 \0 277 002 003 265 370 i c \0 205 0026700 g \0 \0 \t \0 \0 277 j \t \0 \0 020 \0 ( 4 0 0026720 Q T e s t F o r e v e r 3 3 0026740 Q L O A D 1 4 Q L O A D ) 0026760 \r ( 3 0 Q L T B A S I C . D C 0027000 O M ) \r ( 6 ( L T B A S I C 0027020 L T K E R L T D B L T C A S 0027040 E S ) ) \r T e s t e r S y s t e 0027060 m D 1 \r ( F 0 F I L E L S 0027100 T F 1 L e e s b u r g F l 0027120 g F 2 L O O P S C O U R S 0027140 E D I R F 3 U S E R N A M 0027160 E F 4 L I S P U S E R S D 0027200 I R E C T O R I E S F 5 D 0027220 E M O F L G S E T U P F 6 0027240 F O N T D I R E C T O R I E S 0027260 F 7 N S . D E F A U L T . P 0027300 R I N T E R F 1 0 Q D I R 0027320 E C T O R I E S ) \0 S \0 \t \0 \0 0027340 \b \0 \0 g \0 \0 \t \0 \0 h c \0 g \0 \0 \t 0027360 \0 \0 \b \0 \0 g \0 \0 \t \0 \0 i c 002 g \0 0027400 \0 g \0 \0 g \0 \0 \v \0 \0 g \0 \0 c 004 h 0027420 c \b d c \f g \0 \0 c 016 g \0 \0 c 006 g 0027440 \0 \0 \t \0 \0 i c \n h g \0 \0 h 032 032 c 0027460 020 020 \0 ( 1 0 4 Q P R I N T E R 0027500 M O D E 5 1 Q C H A N G E N 0027520 A M E 3 2 Q L O A D 2 4 Q 0027540 L o a d L T S y s t e m C I 0027560 2 1 Q L O A D 1 0 Q L O A 0027600 D 2 F o r c e L o a d F o n 0027620 t s ) \r ( 1 1 3 Q { F S : } < 0027640 L O O P S > 1 0 1 Q I N T E 0027660 R P R E S S 7 4 Q N o t L o 0027700 g g e d I n 6 7 Q L I S P P 0027720 R I N T 5 4 Q { F S : } < L 0027740 O O P S C O U R S E > 4 6 Q 0027760 E V Q 4 3 Q F O N T C O P Y 0030000 4 0 Q \ S E T . T T Y I N B 0030020 O L D F O N T 2 7 Q L T C A 0030040 S E S 1 6 Q L T B A S I C . 0030060 D C O M 5 { P H Y L U M } < 0030100 L I S P C O R E > S O U R C E S 0030120 > F I L E B R O W S E R . D C O 0030140 M ) \r N I L \r L O A D T R U C K 0030160 I N D 1 \r ( I 0 s o u r c 0030200 e F l g F 0 D I R E C T O 0030220 R I E S F 1 P L A Y E R S 0030240 D I R F 2 T R U C K I N D 0030260 I R F 3 P L A Y E R F I L 0030300 E S F 4 T R U C K I N F I 0030320 L E S F 5 L i s p U s e r 0030340 F i l e s F o r T r u c k i n ) 0030360 \0 _ \0 006 \0 001 g \0 \0 o \0 \0 \0 U 032 0030400 \n \0 \0 Q P 034 256 P 265 \b Q h 032 c \0 204 0030420 Q P 002 032 031 277 R P 034 256 P 265 \b R h 032 0030440 c \0 204 R P 002 032 031 277 @ 234 T 206 d 001 \t 0030460 \0 \0 277 002 003 265 370 204 T \t \0 \0 277 \b \0 \0 0030500 @ 234 S 206 d 001 \t \0 \0 277 002 003 265 370 203 S 0030520 \t \0 \0 h 020 \0 ( 1 3 3 Q D O F I 0030540 L E S L O A D 1 2 1 Q L O A 0030560 D 1 1 0 Q I n i t i a l i z 0030600 e T r u c k i n 1 0 4 Q D O 0030620 F I L E S L O A D 7 2 Q L O 0030640 A D 1 3 Q A P P L Y ) \r ( 2 0030660 F I L E S L O A D ) \r ( 6 ( 0030700 S Y S L O A D F R O M V A L 0030720 U E O F L I S P U S E R S D I 0030740 R E C T O R I E S ) ) \r L O A D 0030760 C O U R S E D 1 \r ( F 0 D 0031000 I R E C T O R I E S F 1 L 0031020 O O P S C O U R S E F I L E S D 0031040 I R F 2 L O O P S C O U R 0031060 S E F I L E S ) \0 027 \0 003 \0 \0 h 0031100 Q P 002 032 032 c \0 R 206 d 001 \t \0 \0 277 002 0031120 003 265 370 h 020 \0 ( 1 6 Q L O A D ) 0031140 \r N I L \r N I L \r U n M a r k C 0031160 h a n g e s D 1 \r ( P 2 I 0031200 T E M P 1 C O M P 0 0031220 C O M T Y P E I 0 F I L E 0031240 S F 3 N O T L I S T E D F 0031260 I L E S F 4 N O T C O M P 0031300 I L E D F I L E S F 5 O L 0031320 D C H A N G E S ) \0 5 003 003 \0 001 0031340 021 020 \0 h c 006 d c \b g \0 \0 @ \n \0 \0 0031360 260 037 d 001 021 021 002 I 001 X g \0 \0 360 255 I 0031400 207 d 001 Z H \n \0 \0 277 002 003 265 366 023 002 003 0031420 265 342 U 020 \0 ( 4 7 Q U N M A R K 0031440 A S C H A N G E D 1 7 Q M a 0031460 k e C h a n g e C o m s ) \r ( 3 0031500 4 Q * 1 3 Q O L D C H A N 0031520 G E S ) \r ( ) \r W A I T M S D 0031540 1 \r ( I 0 n u m M S ) \0 ' 0031560 \0 \0 \0 001 ` \0 \0 004 ` \0 \0 360 223 ` \0 \0 0031600 203 ` \0 \0 037 006 \0 \0 w @ ` \0 \0 332 366 d 0031620 g \0 \0 \n \0 \0 262 371 i 020 \0 ( 4 1 Q 0031640 T I M E R E X P I R E D ? ) \r ( 0031660 3 6 Q T I C K S 3 0 Q \ R 0031700 C L K M I L L I S E C O N D 2 0031720 3 Q F I X P 1 7 Q \ F I X 0031740 P 1 3 Q W a i t M S T i m e 0031760 r 6 \ F I X P 2 W a i t 0032000 M S T i m e r ) \r N I L \r W A I 0032020 T P A G E F N D 1 \r ( F 0 0032040 W A I T P A G E F L G ) \0 \0 0032060 001 \0 \0 ` \0 \0 310 \0 n \b \0 345 j 360 235 ` 0032100 \0 \0 310 \0 l @ 345 j 360 262 352 h 020 P 263 375 0032120 i 020 \0 N I L \r ( 1 6 Q \ E M . 0032140 K B D A D 2 2 \ E M . K B D 0032160 A D 2 ) \r N I L \r S e t N e t w 0032200 o r k D 1 \r ( P 0 e t h e 0032220 r H o s t N u m b e r F 1 0032240 N E T N U M B E R ) \0 001 001 \0 0032260 \0 021 020 \0 \b \0 \0 X d j 360 227 o \0 \0 \0 0032300 \t \0 \0 211 \b \0 \0 l \b \n \0 \0 c 002 h 020 0032320 \0 ( 3 2 Q R S H 2 5 Q E T 0032340 H E R H O S T N U M B E R 2 1 0032360 Q H E L P C H E C K 5 E T 0032400 H E R H O S T N U M B E R ) \r N 0032420 I L \r ( 1 6 Q " H e l p - - 0032440 T h e E T H E R H O S T N U 0032460 M B E R i s z e r o . L 0032500 O O P S u s e s t h i s n 0032520 u m b e r t o m a k e u n 0032540 i q u e i d e n t i f i e r s 0032560 . " ) \r D E D 1 \r ( I 0 L 0032600 ) \0 \r \0 \0 003 001 @ d 001 003 241 h 032 i 0032620 \n \0 \0 020 \0 ( 1 2 Q D E F I N E 0032640 ) \r N I L \r N I L \r F I L E A 0 0032660 0 1 4 D 1 \r ( N A M E E R R 0032700 O R S E T L ( 2 E R R O R 0032720 S E T . W 1 E R R O R S E T 0032740 . V 0 E R R O R S E T . U ) 0032760 F 0 A R G S F 1 M A 0033000 C R O Y ) \0 \n \0 002 \0 003 P 001 \t \0 0033020 \0 c 002 i 020 \0 ( 4 M A K E F I L 0033040 E ) \r N I L \r N I L \r F I L E 0033060 D 1 \r ( P 3 R E S E T S T A 0033100 T E P 2 M A C R O Y P 0033120 0 O L D V A L U E I 0 A 0033140 R G S F 4 R E S E T V A R 0033160 S L S T ) \0 ] 004 001 003 001 @ 002 262 037 0033200 @ 001 \t \0 \0 @ d 002 001 004 l 004 360 231 d 002 0033220 002 245 002 001 \t \0 \0 200 002 \n \0 \0 277 l \n \t 0033240 \0 \0 021 1 003 g \0 \0 H h 032 032 h 032 T 032 0033260 c \b Y o \0 \0 \0 g \0 \0 \n \0 \0 243 g \0 0033300 \0 273 I 002 c \b g \0 \0 I 001 001 002 \n \0 \0 0033320 K 223 \b \0 \0 020 J 020 \0 ( 1 3 0 Q E 0033340 R R O R ! 1 2 3 Q A P P L Y 0033360 1 0 0 Q F I L E A 0 0 1 4 0033400 4 5 Q R A D I X 3 7 Q / S 0033420 E T A T O M V A L 3 2 Q G E 0033440 T T O P V A L 1 0 Q F I L E 0033460 C O M S ) \r ( 1 1 4 Q R A D I 0033500 X 1 0 4 Q E R R O R 7 5 Q 0033520 I N T E R N A L 5 3 Q R A 0033540 D I X ) \r ( 7 2 Q ( D U M M Y 0033560 . F O R . E R R O R S E T ) ) \r 0033600 i / d D 1 \r ( I 0 i t e m 0033620 ) \0 006 \0 \0 \0 001 @ \t \0 \0 020 \0 ( 3 0033640 I N S P E C T / D A T A T Y P 0033660 E ) \r N I L \r N I L \r P P I A 0 0033700 0 1 5 D 1 \r ( N A M E E R R 0033720 O R S E T L ( 2 E R R O R 0033740 S E T . W 1 E R R O R S E T 0033760 . V 0 E R R O R S E T . U ) 0034000 P 0 F I E L D F 1 D 0034020 E C F 2 P O S F 3 I 0034040 N S T A N C E F 4 M A C R 0034060 O Y ) \0 Q 001 004 \0 003 o \0 \0 \0 \t \0 0034100 \0 277 Q \t \0 \0 260 1 d 001 021 001 \0 H g \0 0034120 \0 360 263 # R j \n \0 \0 277 H \t \0 \0 277 o 0034140 \0 \0 \0 \t \0 \0 277 H S Q \v \0 \0 h \t \0 0034160 \0 \n \0 \0 277 023 002 003 265 320 o \0 \0 \0 \t \0 0034200 \0 277 h \t \0 \0 c \b i 020 \0 ( 1 1 3 Q 0034220 T E R P R I 1 0 6 Q P R I 0034240 N 1 7 1 Q P R I N T D E F 0034260 6 6 Q P O S I T I O N 6 2 Q 0034300 R E C O R D A C C E S S 5 3 0034320 Q P R I N 1 4 3 Q P R I N 0034340 2 3 6 Q T A B 1 3 Q R E 0034360 C O R D F I E L D N A M E S 6 0034400 P R I N 1 ) \r ( 2 6 Q P E R 0034420 F O R M O P S ) \r ( 1 0 3 Q " 0034440 ] " 5 0 Q " = " 3 " 0034460 [ " ) \r P P I D 1 \r ( P 5 0034500 R E S E T S T A T E P 4 M 0034520 A C R O Y P 2 O L D V A L 0034540 U E P 1 D E C P 0 P 0034560 O S I 2 F I L E I 1 0034600 R E C O R D N A M E I 0 I 0034620 N S T A N C E F 6 R E S E 0034640 T V A R S L S T ) \0 m 006 001 \0 003 0034660 B \t \0 \0 k 330 A 265 \v @ d 003 221 001 202 \t 0034700 \0 \0 \t \0 \0 021 002 001 I 262 ? B \t \0 \0 021 0034720 1 005 g \0 \0 J h 032 032 h 032 V 032 c \f 273 0034740 o \0 \0 \0 g \0 \0 \n \0 \0 243 g \0 \0 275 K 0034760 002 c \f 277 g \0 \0 K 001 001 002 \n \0 \0 277 M 0035000 223 \b \0 \0 277 023 260 024 @ B \t \0 \0 h d d 0035020 B \r 006 \0 \0 277 B \t \0 \0 h 020 \0 ( 1 5 0035040 1 Q T E R P R I 1 4 4 Q P 0035060 R I N T D E F 1 3 4 Q P O S 0035100 I T I O N 1 2 3 Q E R R O R 0035120 ! 1 1 5 Q A P P L Y 7 1 Q 0035140 P P I A 0 0 1 5 3 6 Q O U 0035160 T P U T 2 4 Q R E C L O O K 0035200 2 1 Q T Y P E N A M E 3 0035220 P O S I T I O N ) \r ( 1 0 6 Q 0035240 O U T P U T 7 5 Q E R R O R 0035260 6 6 Q I N T E R N A L 4 4 0035300 Q O U T P U T ) \r ( 6 3 Q ( 0035320 D U M M Y . F O R . E R R O R S 0035340 E T ) ) \r P P R A 0 0 1 6 D 1 0035360 \r ( N A M E E R R O R S E T 0035400 L ( 2 E R R O R S E T . W 0035420 1 E R R O R S E T . V 0 E 0035440 R R O R S E T . U ) P 0 R 0035460 F 1 X F 2 M A C R O 0035500 Y ) \0 4 001 002 \0 003 Q d 003 263 ( h 032 0035520 260 $ d 001 021 001 \0 H \t \0 \0 H \t \0 \0 \n 0035540 \0 \0 265 \b H o \0 \0 \0 032 \t \0 \0 277 i \t 0035560 \0 \0 023 002 003 265 335 h c 004 i 020 \0 ( 5 0 0035600 Q T E R P R I 4 3 Q P R I 0035620 N T D E F 3 0 Q \ A P P E N 0035640 D 2 2 5 Q F I E L D L O O K 0035660 2 1 Q R E C L O O K ) \r N I 0035700 L \r ( 3 7 Q ( n o t f o u n 0035720 d ) ) \r P P R D 1 \r ( P 3 0035740 R E S E T S T A T E P 2 M 0035760 A C R O Y P 0 O L D V A L 0036000 U E I 0 X F 4 R E S 0036020 E T V A R S L S T ) \0 ; 004 001 003 0036040 001 i \t \0 \0 021 1 003 g \0 \0 H h 032 032 h 0036060 032 T 032 c \b Y o \0 \0 \0 g \0 \0 \n \0 \0 0036100 243 g \0 \0 273 I 002 c \b g \0 \0 I 001 001 002 0036120 \n \0 \0 K 223 \b \0 \0 020 J 020 \0 ( 6 6 Q 0036140 E R R O R ! 6 1 Q A P P L 0036160 Y 3 6 Q P P R A 0 0 1 6 3 0036200 O U T P U T ) \r ( 5 2 Q O U 0036220 T P U T 4 2 Q E R R O R 3 0036240 3 Q I N T E R N A L 1 1 Q 0036260 O U T P U T ) \r ( 3 0 Q ( D U 0036300 M M Y . F O R . E R R O R S E T 0036320 ) ) \r L O O P S D I R D 1 \r ( 0036340 I 0 S U B D I R ) \0 021 \0 \0 0036360 \0 001 g \0 \0 @ 265 005 g \0 \0 \n \0 \0 \t \0 0036400 \0 020 \0 ( 1 6 Q / C N D I R 1 0036420 3 Q P A C K * ) \r ( 1 0 Q S 0036440 O U R C E S 2 { I N D I G O 0036460 } < L O O P S > ) \r ( ) \r P R O 0036500 J E C T D I R D 1 \r ( I 0 0036520 s u b D i r e c t o r y ) \0 024 0036540 \0 \0 \0 001 g \0 \0 @ 265 005 g \0 \0 g \0 \0 0036560 \v \0 \0 \t \0 \0 020 \0 ( 2 1 Q / C N 0036600 D I R 1 6 Q C O N C A T ) \r 0036620 ( 1 3 Q > 1 0 Q L I S P 0036640 2 { I N D I G O } < K B V L S 0036660 I > ) \r ( ) \r ( P R E T T Y C O 0036700 M P R I N T L O A D L O O P S 0036720 C O M S ) \r ( R P A Q Q L O A 0036740 D L O O P S C O M S ( ( * C 0036760 o p y r i g h t ( c ) 1 9 8 0037000 2 b y X e r o x C o r p o 0037020 r a t i o n ) ( * L o o p s 0037040 D a t e i s s e t e a c h 0037060 t i m e o n e \r m a k e s 0037100 a n e w L O A D L O O P S 0037120 f i l e . T h i s m e a n 0037140 s t h a t o r d i n a r y 0037160 l o a d i n g ( L O A D L O O 0037200 P S ) w i l l g e t t h e 0037220 L o o p s D a t e f r o m 0037240 \r w h e n L O A D L O O P S 0037260 w a s m a d e . L O A D L O 0037300 O P S ( D E B U G ) s e t s 0037320 t h e d a t e w h e n l 0037340 o a d i n g . ) ( E ( S E T 0037360 Q L o o p s D a t e ( S U B 0037400 S T R I N G \r ( D A T E ) 1 0037420 9 ) ) ) ( F N S I N I T . 0037440 K B P A R C C o p y F i l e s 0037460 U s i n g S p e c s E n t e r 0037500 S y s E n t e r S y s F o r L 0037520 o o p s C o u r s e \r E n t e 0037540 r S y s F o r S t a n d A l o n 0037560 e E n t e r S y s F o r L e e 0037600 s b u r g F o r c e L o a d F 0037620 o n t s L E E S B U R G L O 0037640 A D D E M O L O A D L O O P S 0037660 L o o p s T e d i t Q u i t 0037700 \r N e w R e l e a s e S A L E 0037720 E S B U R G S T A N D A L O N 0037740 E T E S T L O O P S T e s t 0037760 e r S y s t e m L O A D T R U 0040000 C K I N L O A D C O U R S E 0040020 U n M a r k C h a n g e s W A 0040040 I T M S \r W A I T P A G E F N 0040060 ) ( V A R S D E F A U L T F 0040100 I L E S E R V E R I n d i g o 0040120 R e l e a s e D i r K E R N E 0040140 L L O O P S F I L E S L O O P 0040160 S C O U R S E D I R L O O P S 0040200 F I L E S \r S M A L L L O O P 0040220 S F I L E S T E S T C O M P I 0040240 L E D F I L E S T E S T F I L 0040260 E S T E S T S O U R C E F I L 0040300 E S R U L E S F I L E S R e 0040320 l e a s e F i l e s S p e c T 0040340 R U C K I N D I R \r T R U C K 0040360 I N F I L E S P L A Y E R F I 0040400 L E S P L A Y E R S D I R D 0040420 E M O D I R D E M O F I L E S 0040440 L O O P S C O U R S E D I R 0040460 L O O P S C O U R S E F I L E S 0040500 \r L O O P S C O U R S E F I L 0040520 E S D I R L i s p U s e r F i 0040540 l e s F o r L o o p s O p t i 0040560 o n a l L i s p u s e r F i l e 0040600 s L i s p U s e r F i l e s F 0040620 o r T r u c k i n L o o p s D 0040640 a t e \r L o o p s P a t c h F 0040660 i l e s ) ( * N o w s e t 0040700 L i s p f l a g s s t a n 0040720 d a r d l y f o r L o o p s 0040740 ) ( P ( I N I T . K B P A R 0040760 C ) ) ( G L O B A L V A R S 0041000 W a i t M S T i m e r \r \ F I 0041020 X P ) ( V A R S W A I T P A 0041040 G E F L G ( W a i t M S T i m 0041060 e r ( S E T U P T I M E R 0 0041100 ) ) ) ( * F u n c t i o n 0041120 w h i c h a l l o w s t h e 0041140 c o n t r o l k e y t o 0041160 \r s t o p s c r o l l i n g 0041200 o n t h e T T Y D I S P L A 0041220 Y S T R E A M ) ( A D V I S E 0041240 P A G E F U L L F N ) ( * 0041260 * T h e f u n c t i o n S 0041300 e t N e t w o r k m u s t b 0041320 e \r m o d i f i e d f o r 0041340 u s e o n a n y m a c h i 0041360 n e w h i c h w i l l n o 0041400 t r e s p o n d t o t h e 0041420 f u n c t i o n ( E T H E R 0041440 H O S T N U M B E R ) % . I 0041460 t i s \r c a l l e d b y 0041500 D B - I n i t U I w h i c h 0041520 i s c a l l e d e v e r y 0041540 t i m e t h e u s e r s t 0041560 a r t s u p . T h e v a r 0041600 i a b l e N E T N U M B E R 0041620 i s s e t b y \r S e t N e 0041640 t w o r k a n d u s e d i 0041660 n g e n e r a t i n g u n i 0041700 q u e i d s . I t i s s 0041720 e t h e r e t o 0 a s 0041740 a d e f a u l t . ) ( I N I 0041760 T V A R S ( N E T N U M B E R 0042000 \r 0 ) ( L e e s b u r g F l 0042020 g N I L ) ( S t a n d A l o 0042040 n e F l g N I L ) ) ( F N S 0042060 S e t N e t w o r k ) ( * 0042100 * S o m e u t i l i t y f 0042120 u n c t i o n s a n d m a c 0042140 r o s w e \r l i k e h a v 0042160 i n g a r o u n d ) ( F N S 0042200 D E F I L E i / d P P I 0042220 P P R L O O P S D I R P R 0042240 O J E C T D I R ) ( L I S P X 0042260 M A C R O S o k ) ( U S E R 0042300 M A C R O S S H O W D \r F V 0042320 ) ( D E C L A R E : D O N T 0042340 E V A L @ L O A D D O E V A L 0042360 @ C O M P I L E D O N T C O P 0042400 Y C O M P I L E R V A R S ( 0042420 A D D V A R S ( N L A M A P 0042440 P R F I L E D E ) ( N L A 0042460 M L ) \r ( L A M A ) ) ) ) ) \r 0042500 ( R P A Q Q D E F A U L T F I 0042520 L E S E R V E R I V Y ) \r ( R 0042540 P A Q Q I n d i g o R e l e a 0042560 s e D i r < l o o p s > r e l 0042600 e a s e > ) \r ( R P A Q Q K E 0042620 R N E L L O O P S F I L E S ( 0042640 L O A D L O O P S B L O C K L 0042660 O O K U P L O O P S S C R E E 0042700 N L O O P S S T R U C L O O 0042720 P S P R I N T L O O P S A C C 0042740 E S S L O O P S U I D \r L O 0042760 O P S A V L O O P S E D I T 0043000 L O O P S M E T H O D S L O O 0043020 P S K E R N E L L O O P S U T 0043040 I L I T Y L O O P S M I X I N 0043060 L O O P S D A T A B A S E L 0043100 O O P S I N S P E C T \r L O O 0043120 P S W I N D O W L O O P S B R 0043140 O W S E G A U G E S ) ) \r ( R 0043160 P A Q Q L O O P S C O U R S E 0043200 D I R " { I V Y } < L O O P S 0043220 C O U R S E > " ) \r ( R P A Q Q 0043240 L O O P S F I L E S ( L O A 0043260 D L O O P S B L O C K L O O K 0043300 U P L O O P S S C R E E N L 0043320 O O P S S T R U C L O O P S P 0043340 R I N T L O O P S A C C E S S 0043360 L O O P S U I D \r L O O P S 0043400 A V L O O P S E D I T L O O 0043420 P S M E T H O D S L O O P S K 0043440 E R N E L L O O P S U T I L I 0043460 T Y L O O P S M I X I N L O 0043500 O P S D A T A B A S E L O O P 0043520 S I N S P E C T \r L O O P S W 0043540 I N D O W L O O P S B R O W S 0043560 E L O O P S R U L E S L O O 0043600 P S R U L E S P L O O P S R U 0043620 L E S C L O O P S R U L E S D 0043640 G A U G E S ) ) \r ( R P A Q Q 0043660 S M A L L L O O P S F I L E S 0043700 ( L O A D L O O P S B L O C 0043720 K L O O K U P L O O P S S C R 0043740 E E N L O O P S S T R U C L 0043760 O O P S P R I N T L O O P S A 0044000 C C E S S L O O P S U I D \r 0044020 L O O P S A V L O O P S E D I 0044040 T L O O P S M E T H O D S L 0044060 O O P S K E R N E L L O O P S 0044100 U T I L I T Y L O O P S M I X 0044120 I N L O O P S I N S P E C T 0044140 L O O P S W I N D O W \r L O O 0044160 P S B R O W S E ) ) \r ( R P A Q 0044200 Q T E S T C O M P I L E D F I 0044220 L E S ( L T B A S I C L T B 0044240 C L S L T C A S E S L T D B 0044260 L T K E R L T L O A D ) ) \r 0044300 ( R P A Q Q T E S T F I L E S 0044320 ( L T B A S I C L T B C L S 0044340 L T C A S E S L T D B L T 0044360 K E R L T L O A D L T 1 . K 0044400 B ) ) \r ( R P A Q Q T E S T S 0044420 O U R C E F I L E S ( L T 1 . 0044440 K B ) ) \r ( R P A Q Q R U L E 0044460 S F I L E S ( L O O P S R U L 0044500 E S L O O P S R U L E S P L 0044520 O O P S R U L E S C L O O P S 0044540 R U L E S D ) ) \r ( R P A Q Q 0044560 R e l e a s e F i l e s S p e c 0044600 ( ( L O O P S F I L E S { i 0044620 n d i g o } < L O O P S > S O U 0044640 R C E S > B ) ( T R U C K I 0044660 N F I L E S \r { i n d i g o } 0044700 < l o o p s > t r u c k i n > m 0044720 u l t i > C ) ( P L A Y E R 0044740 F I L E S { i n d i g o } < l 0044760 o o p s > t r u c k i n > m u l 0045000 t i > B ) ( D E M O F I L E 0045020 S \r { i n d i g o } < L O O P 0045040 S > d e m o > B ) ( T E S T 0045060 S O U R C E F I L E S { i n d 0045100 i g o } < L O O P S > S O U R C 0045120 E S > S ) ( T E S T C O M P 0045140 I L E D F I L E S \r { i n d i 0045160 g o } < L O O P S > S O U R C E 0045200 S > B ) ) ) \r ( R P A Q Q T 0045220 R U C K I N D I R { I N D I G 0045240 O } < L O O P S > T R U C K I N 0045260 > M U L T I ) \r ( R P A Q Q T 0045300 R U C K I N F I L E S ( T R U 0045320 C K I N T R U C K I N M T R 0045340 U C K I N R T R U C K I N I 0045360 T R U C K I N D B T R U C K I 0045400 N P T R U C K I N V L O O P 0045420 S G A T E W A Y ) ) \r ( R P A Q 0045440 Q P L A Y E R F I L E S ( T 0045460 R A V E L E R P E D D L E R 0045500 P L A N N E R ) ) \r ( R P A Q Q 0045520 P L A Y E R S D I R { I N D 0045540 I G O } < L O O P S > T R U C K 0045560 I N > M U L T I ) \r ( R P A Q Q 0045600 D E M O D I R { I N D I G O 0045620 } < L O O P S > D E M O > ) \r ( 0045640 R P A Q Q D E M O F I L E S 0045660 ( L O O P S D E M O ) ) \r ( R P 0045700 A Q Q L O O P S C O U R S E D 0045720 I R " { I V Y } < L O O P S C 0045740 O U R S E > " ) \r ( R P A Q Q 0045760 L O O P S C O U R S E F I L E S 0046000 ( E X E R C I S E 1 S I M P 0046020 L E G T R A N S L A T E D E 0046040 M O S C R I P T ) ) \r ( R P A Q 0046060 Q L O O P S C O U R S E F I L 0046100 E S D I R { I N D I G O } < L 0046120 O O P S > C O U R S E > ) \r ( R 0046140 P A Q Q L i s p U s e r F i l 0046160 e s F o r L o o p s ( G R A P 0046200 H E R I C O N W T T Y H I 0046220 S T M E N U T M E N U I N M 0046240 E N U R E A D N U M B E R A 0046260 N I M A T E ) ) \r ( R P A Q Q 0046300 O p t i o n a l L i s p u s e r 0046320 F i l e s ( S I N G L E F I L 0046340 E I N D E X P A T C H U P B 0046360 R O W S E R ) ) \r ( R P A Q Q 0046400 L i s p U s e r F i l e s F o r 0046420 T r u c k i n ( E V A L S E R 0046440 V E R L L C O L O R C O L O 0046460 R ) ) \r ( R P A Q Q L o o p s 0046500 D a t e " 3 0 - A p r - 8 4 " 0046520 ) \r ( R P A Q Q L o o p s P a 0046540 t c h F i l e s N I L ) \r ( I 0046560 N I T . K B P A R C ) \r ( R P A 0046600 Q Q W A I T P A G E F L G N 0046620 I L ) \r ( R P A Q W a i t M S 0046640 T i m e r ( S E T U P T I M E 0046660 R 0 ) ) \r ( P U T P R O P S 0046700 P A G E F U L L F N R E A D V 0046720 I C E ( N I L ( B E F O R E 0046740 N I L ( C O N D ( ( W A I 0046760 T P A G E F N ) ( R E T U R N 0047000 T ) ) ) ) ) ) \r ( R E A D V I 0047020 S E P A G E F U L L F N ) \r ( 0047040 R P A Q ? N E T N U M B E R 0047060 0 ) \r ( R P A Q ? L e e s b u 0047100 r g F l g N I L ) \r ( R P A Q 0047120 ? S t a n d A l o n e F l g 0047140 N I L ) \r ( A D D T O V A R L 0047160 I S P X M A C R O S ( o k ( 0047200 R E T F R O M ( O R ( S T K 0047220 P O S ( Q U O T E U S E R E 0047240 X E C ) ) ( Q U O T E L I S 0047260 P X ) ) T T ) ) ) \r ( A D D 0047300 T O V A R E D I T M A C R O S 0047320 ( F V N I L ( E ( F R E 0047340 E V A R S ( % # % # ( O R R 0047360 ( U P 1 ) N I L ) ) T ) 0047400 ) ) ( S H O W D N I L U P 0047420 ( O R R ( ( E ( \r R E S E 0047440 T F O R M ( O U T P U T T ) 0047460 ( P R O G N ( P R I N T D E 0047500 F ( O R ( E D I T G E T D 0047520 ( % # % # 1 ) ( A N D ( C 0047540 D R L ) ( E D I T L 0 L 0047560 ( Q U O T E ( ! 0 ) ) ) ) ) 0047600 ( \r E R R O R ! ) ) N I L T 0047620 ) ( T E R P R I ) ) ) T ) ) 0047640 ( ( E ( Q U O T E S H O W 0047660 D ? ) ) ) ) ) ) \r ( A D D T O V 0047700 A R E D I T C O M S A S H O 0047720 W D F V ) \r ( P U T P R O P S 0047740 L O A D L O O P S C O P Y R 0047760 I G H T ( " X e r o x C o r 0050000 p o r a t i o n " 1 9 8 3 1 0050020 9 8 4 ) ) \r N I L \r 0050032