$ od -c -N 50000 [eris]<Lisp>Harmony>Library>RS232LOGIN.DCOM!3 0000000 ( F I L E C R E A T E D " 1 1 0000020 - J a n - 8 5 2 3 : 2 1 : 0 9 0000040 " ( " c o m p i l e d o n 0000060 " { E R I S } < L I S P C O R 0000100 E > L I B R A R Y > R S 2 3 2 L 0000120 O G I N . ; 9 ) \r " 6 - J a 0000140 n - 8 5 0 5 : 1 1 : 1 0 " r 0000160 e c o m p i l e d c h a n g e 0000200 s : R S 2 3 2 L O G I N i n 0000220 " I N T E R L I S P - D 1 1 0000240 - J a n - 8 5 . . . " d a t 0000260 e d \r " 1 1 - J a n - 8 5 2 0000300 1 : 2 4 : 0 8 " ) \r ( F I L E C 0000320 R E A T E D " 1 1 - J a n - 8 0000340 5 2 3 : 2 0 : 3 0 " { E R I 0000360 S } < L I S P C O R E > L I B R 0000400 A R Y > R S 2 3 2 L O G I N . ; 0000420 9 1 7 3 5 0 c h a n g e s 0000440 t o : ( V A R S \r R S 2 3 2 0000460 L O G I N C O M S ) ( F N S 0000500 R S 2 3 2 L O G I N ) p r e v 0000520 i o u s d a t e : " 5 - O 0000540 c t - 8 4 0 0 : 2 5 : 3 1 " 0000560 \r { E R I S } < L I S P C O R E 0000600 > L I B R A R Y > R S 2 3 2 L O 0000620 G I N . ; 8 ) \r R S 2 3 2 . P R 0000640 O M P T & L O G I N D 1 \r ( P 0000660 1 H O S T . S Y S T E M T Y 0000700 P E P 0 H O S T I 0 0000720 T y p e S c r i p t S t r e a m 0000740 F 2 N E T W O R K O S T Y 0000760 P E S ) \0 265 002 001 \0 001 021 001 ` \0 0001000 \0 \t \0 \0 277 \b \0 \0 222 261 \0 207 ` \0 \0 \t 0001020 \0 \0 277 n 002 \0 \t \0 \0 277 o \0 \0 \0 ` \0 0001040 \0 g \0 \0 ` \0 \0 h g \0 \0 \r 006 \0 \0 \t 0001060 \0 \0 X 263 X l 002 \t \0 \0 260 312 H ` \0 \0 0001100 \n \0 \0 265 \a H R \n \0 \0 002 Y 263 S ` \0 0001120 \0 \t \0 \0 277 n 002 \0 \t \0 \0 277 o \0 \0 \0 0001140 h g \0 \0 ` \0 \0 h g \0 \0 \r 006 \0 \0 \t 0001160 \0 \0 Y 265 \b l 002 \t \0 \0 216 ` \0 \0 \n \0 0001200 \0 263 023 o \0 \0 \0 \t \0 \0 277 \b \0 \0 262 256 0001220 g \0 \0 020 H I 032 ` \0 \0 032 027 \0 \0 277 H 0001240 h d I @ ` \0 \0 g \0 \0 \r \a \0 \0 020 \0 0001260 ( 2 6 2 Q R S 2 3 2 L O G I N 0001300 2 2 2 Q \ R S 2 3 2 L O G I 0001320 N . C H E C K S T O P 2 1 6 Q 0001340 H E L P 2 0 5 Q A S S O C 0001360 1 7 6 Q R I N G B E L L S 0001400 1 6 6 Q M K A T O M 1 6 3 Q 0001420 P R O M P T F O R W O R D 1 0001440 3 7 Q \ R S 2 3 2 I N S U R E 0001460 . L I N E B U F F E R 1 3 0 Q 0001500 F R E S H L I N E 1 1 6 Q 0001520 A S S O C 1 0 7 Q A S S O C 0001540 7 6 Q R I N G B E L L S 6 0001560 6 Q M K A T O M 6 3 Q P R 0001600 O M P T F O R W O R D 3 5 Q 0001620 \ R S 2 3 2 I N S U R E . L I N 0001640 E B U F F E R 2 6 Q F R E S 0001660 H L I N E 1 4 Q \ R S 2 3 2 0001700 L O G I N . C H E C K S T O P 0001720 1 0 Q D S P R E S E T ) \r ( 2 0001740 5 6 Q T T Y 2 5 3 Q P R O 0001760 M P T W I N D O W 2 4 2 Q R 0002000 S 2 3 2 O S T Y P E S 2 3 6 Q 0002020 R S 2 3 2 O S T Y P E S 2 2 0002040 7 Q S t o p L o g i n 2 0 2 0002060 Q R S 2 3 2 L O G I N S Y S T 0002100 E M T Y P E I N F O 1 5 7 Q 0002120 T T Y 1 5 3 Q P R O M P T W 0002140 I N D O W 1 5 0 Q \ R S 2 3 0002160 2 . P & L . F I N D G O O D N A 0002200 M E S 1 2 5 Q P R O M P T W 0002220 I N D O W 1 0 4 Q R S 2 3 2 0002240 O S T Y P E S 5 7 Q T T Y 0002260 5 3 Q P R O M P T W I N D O W 0002300 5 0 Q \ R S 2 3 2 . P & L . 0002320 F I N D G O O D N A M E S 4 5 0002340 Q \ R S 2 3 2 L O G I N . L A 0002360 S T H O S T N A M E 2 3 Q P 0002400 R O M P T W I N D O W 5 P R 0002420 O M P T W I N D O W ) \r ( 2 1 0002440 3 Q " S o r r y , I d o n 0002460 ' t k n o w t h a t S Y S 0002500 T E M T Y P E ; t y p e O 0002520 K t o t r y a g a i n . \r 0002540 " 1 4 4 Q " H o s t S Y S 0002560 T E M T Y P E = " 4 2 Q 0002600 " { L o g i n t h r u R S 2 0002620 3 2 } H o s t n a m e : " ) 0002640 \r R S 2 3 2 L O G I N D 1 \r ( 0002660 P 2 0 Q P R E V I O U S C H 0002700 A R P 1 7 Q C P 1 2 Q 0002720 P A G E P A T T E R N P 1 0002740 1 Q P A G E S I Z E P 1 0 0002760 Q M E S S A G E P 7 C H 0003000 A R P 6 5 S E C S . t i c 0003020 s P 5 3 S E C S . t i c s 0003040 P 4 W I N D O W P 3 0003060 H o s t ' s A t t n C h a r P 0003100 2 L o g i n N a m e P 1 0003120 P W H a s h E n t r y P 0 0003140 H S T I 6 U R G E N C Y 0003160 . O P T I O N I 5 P R O M 0003200 P T F O R W O R D s t r e a m 0003220 I 4 T y p e S c r i p t S t 0003240 r e a m I 3 H o s t S Y S 0003260 T E M T Y P E I 2 P A S S 0003300 W O R D I 1 U s e r N a m 0003320 e I 0 H O S T F 2 5 Q 0003340 N E T W O R K O S T Y P E S ) 0003360 003 h 025 001 \0 \a ` \0 \0 003 246 g \0 \0 \t 0003400 \0 \0 277 D d 004 ` \0 \0 360 262 024 g \0 \0 \n 0003420 \0 \0 263 G D o \0 \0 \0 \n \0 \0 260 < 245 i 0003440 \t \0 \0 260 3 D d g \0 \0 360 223 277 h 260 ( 0003460 \t \0 \0 252 D \t \0 \0 245 D d i 360 226 277 D 0003500 \t \0 \0 260 023 004 l 004 360 227 D g \0 \0 \n \0 0003520 \0 203 D \t \0 \0 b \b 277 C 003 001 g \0 \0 360 0003540 263 @ 021 020 \0 C ` \0 \0 \n \0 \0 002 X 265 / 0003560 @ 262 " @ ` \0 \0 \n \0 \0 265 \b @ W * \n 0003600 \0 \0 002 X 232 H ` \0 \0 \n \0 \0 002 X 265 017 0003620 @ 265 D o \0 \0 \0 C \n \0 \0 277 H b 006 023 0003640 B 262 024 B 005 \a 255 B 004 l 004 360 264 006 B \t 0003660 \0 \0 b 004 277 F 243 i b \f 277 @ d 223 ` \0 0003700 \0 035 003 001 h d i \v \0 \0 021 002 002 \b \0 \0 0003720 262 024 h 260 m ` \0 \0 \n \0 \0 002 X 262 266 h 0003740 b \0 260 271 A 263 6 I 001 b 002 263 0 E \t \0 0003760 \0 277 @ 234 o \0 \0 \0 @ o \0 \0 \0 \v \0 \0 0004000 203 o \0 \0 \0 J h E h F \r 006 \0 \0 \t \0 0004020 \0 b 002 277 \b \0 \0 222 h 260 ' B 223 I 002 263 0004040 I 002 225 I 002 \t \0 \0 216 o \0 \0 \0 h d 0004060 E g \0 \0 F \r 006 \0 \0 b 004 222 @ 265 x i 0004100 022 264 003 202 261 001 037 C 002 001 D \t \0 \0 264 006 0004120 D \t \0 \0 ` \0 \0 l 003 332 ` \0 \0 l 005 332 0004140 021 t \r C 002 002 002 002 001 d 005 001 241 005 002 265 0004160 003 j d n 002 \0 361 243 277 n 002 \0 \t \0 \0 277 0004200 L 224 L \t \0 \0 277 g \0 \0 \t \0 \0 277 o \0 0004220 \0 \0 _ 026 d 002 263 035 o \0 \0 \0 o \0 \0 \0 0004240 o \0 \0 \0 n 377 377 \v \0 \0 \n \0 \0 030 i 031 0004260 277 O 026 001 216 A B \v \0 \0 277 260 204 d 001 \t 0004300 \0 \0 277 002 003 265 370 k _ 032 l 006 363 222 261 \0 0004320 213 \b \0 \0 231 g \0 \0 \t \0 \0 g \0 \0 020 K 0004340 235 D 225 D K \n \0 \0 277 K i \n \0 \0 277 ` 0004360 \0 \0 004 l 002 360 223 ` \0 \0 202 l 002 037 006 \0 0004400 \0 w N 366 _ 030 277 O 030 g \0 \0 \n \0 \0 263 0004420 ? ` \0 \0 231 ` \0 \0 262 ! \b \0 \0 260 033 ` 0004440 \0 \0 233 ` \0 \0 310 \0 n 200 x 345 j 360 204 n 0004460 200 \0 t 361 243 \b \0 \0 277 ` \0 \0 ` \0 \0 360 0004500 247 ` \0 \0 ` \0 \0 302 200 h _ 016 262 273 O 016 0004520 263 O 032 k 324 261 377 r O 016 263 025 D 265 006 0004540 g \0 \0 020 g \0 \0 \t \0 \0 \n \0 \0 277 260 362 0004560 \b \0 \0 277 N h D L \f \0 \0 263 365 \b \0 \0 0004600 222 261 377 T C 002 002 001 021 a 024 O 034 310 003 k 0004620 331 _ $ 277 O 034 311 \0 _ & 277 O $ O 034 310 0004640 002 330 _ " 277 O 034 312 \0 C j 360 h 360 _ ( 0004660 277 O $ k 330 _ $ O " 361 263 i O ( 227 O 0004700 & O $ 320 310 \0 204 O & O $ 302 _ 036 d l 0004720 230 360 226 277 A \t \0 \0 260 C l 231 360 262 9 \b 0004740 \0 \0 277 O l \r 360 246 O l 033 360 262 036 0004760 M i D L \f \0 \0 _ 020 277 o \0 \0 \0 O 020 0005000 h d d d ` \0 \0 \r \a \0 \0 200 i 235 B 233 0005020 B i \n \0 \0 204 O 036 \t \0 \0 277 O 036 _ 0005040 277 260 220 023 \b \0 \0 222 261 376 255 \b \0 \0 277 N 0005060 h D L \f \0 \0 224 \b \0 \0 260 364 \b \0 \0 222 0005100 261 376 225 @ 027 \0 \0 277 C 027 \0 \0 277 g \0 \0 0005120 \t \0 \0 277 L d 225 C M \v \0 \0 h 020 \0 ( 0005140 1 5 4 4 Q \ R S 2 3 2 L O G I 0005160 N . S E N D P A G E S I Z E 1 0005200 5 3 3 Q R S 2 3 2 C L E A R B 0005220 U F F E R 1 5 0 7 Q \ R S 2 0005240 3 2 L O G I N . C H E C K S T O 0005260 P 1 5 0 2 Q \ R S 2 3 2 . C 0005300 H E C K U A R T 1 4 7 6 Q \ 0005320 R S 2 3 2 L O G I N . M S G D A 0005340 L L Y 1 4 6 6 Q R S 2 3 2 F 0005360 O R C E O U T P U T 1 4 5 7 Q 0005400 \ R S 2 3 2 L O G I N . C H E 0005420 C K S T O P 1 4 4 3 Q R S 2 0005440 3 2 W R I T E B Y T E 1 4 3 5 0005460 Q R S 2 3 2 W R I T E S T R I 0005500 N G 1 4 2 3 Q S T R P O S 0005520 1 3 7 7 Q \ R S 2 3 2 L O G I 0005540 N . M S G D A L L Y 1 3 5 2 Q 0005560 R S 2 3 2 F O R C E O U T P U 0005600 T 1 3 4 0 Q R S 2 3 2 W R I 0005620 T E S T R I N G 1 2 1 0 Q \ 0005640 R S 2 3 2 L O G I N . C H E C K 0005660 S T O P 1 2 0 3 Q \ R S 2 3 0005700 2 L O G I N . M S G D A L L Y 0005720 1 1 7 3 Q \ R S 2 3 2 . C H E 0005740 C K U A R T 1 1 6 5 Q \ R S 0005760 2 3 2 B O U T S T R I N G 1 1 0006000 6 2 Q M K S T R I N G 1 1 0 0006020 0 Q \ R S 2 3 2 . P R O C E S 0006040 S I N T E R R U P T 1 0 4 5 Q 0006060 \ R S 2 3 2 C . P R O C E S S 0006100 I N T E R R U P T 1 0 2 7 Q 0006120 T I M E R E X P I R E D ? 7 6 0006140 6 Q R S 2 3 2 W R I T E B Y T 0006160 E 7 6 0 Q B O U T 7 4 3 Q 0006200 R S 2 3 2 C L E A R B U F F E 0006220 R 7 3 4 Q \ R S 2 3 2 L O G 0006240 I N . C H E C K S T O P 7 1 2 0006260 Q \ F R E S H E N U P F N 7 0006300 0 2 Q S E T P A S S W O R D 0006320 6 6 5 Q \ A P P E N D 2 6 6 0006340 2 Q \ O N P A T H S . C C O D 0006360 E 6 2 5 Q R S 2 3 2 C L E A 0006400 R B U F F E R 6 1 6 Q T O T 0006420 O P W 6 0 7 Q \ R S 2 3 2 I 0006440 N S U R E . L I N E B U F F E R 0006460 5 3 4 Q W F R O M D S 5 2 0006500 6 Q D I S P L A Y S T R E A M 0006520 P 5 0 1 Q P R O M P T F O R 0006540 W O R D 4 6 1 Q \ D E C R Y 0006560 P T . P W D 4 3 7 Q \ R S 2 0006600 3 2 L O G I N . C H E C K S T O 0006620 P 4 3 1 Q M K A T O M 4 2 0006640 6 Q P R O M P T F O R W O R D 0006660 4 1 0 Q C O N C A T 3 7 1 0006700 Q F R E S H L I N E 3 4 3 Q 0006720 A S S O C 3 3 0 Q \ R S 2 0006740 3 2 L O G I N . C H E C K S T O 0006760 P 3 2 2 Q U S E R N A M E 0007000 2 7 2 Q M K S T R I N G 2 4 0007020 3 Q E R R O R 2 2 4 Q A S 0007040 S O C 2 1 2 Q A S S O C 2 0007060 0 2 Q A S S O C 1 6 4 Q A 0007100 S S O C 1 3 6 Q \ I L L E G 0007120 A L . A R G 1 3 1 Q O P E N 0007140 S T R E A M 1 1 3 Q G E T S 0007160 T R E A M 1 0 0 Q D I S P L 0007200 A Y S T R E A M P 7 3 Q W I 0007220 N D O W P 5 3 Q G E T S T R 0007240 E A M 4 4 Q E R R O R 3 2 0007260 Q O P E N P 1 2 Q E R R O 0007300 R ) \r ( 1 5 3 0 Q I N P U T 0007320 1 5 2 4 Q \ R S 2 3 2 L O G I 0007340 N . L A S T H O S T S Y S T E M 0007360 T Y P E 1 5 1 7 Q \ R S 2 3 0007400 2 L O G I N . L A S T H O S T N 0007420 A M E 1 4 1 7 Q U P P E R C 0007440 A S E A R R A Y 1 1 5 7 Q N 0007460 o R e s p o n s e F r o m H o s 0007500 t 1 1 5 3 Q N o R e s p o n 0007520 s e F r o m H o s t 1 1 1 7 Q 0007540 \ R S 2 3 2 I R I N G . R E A 0007560 D 1 1 1 4 Q \ R S 2 3 2 I R 0007600 I N G B U F 1 1 0 7 Q \ R S 0007620 2 3 2 I R I N G . W R I T E 1 0007640 1 0 4 Q \ R S 2 3 2 I R I N G 0007660 . R E A D 1 0 5 6 Q \ D L i 0007700 o n T T Y I n L o c 1 0 5 2 Q 0007720 \ R S 2 3 2 D L i o n ? 1 0 0007740 4 0 Q \ R S 2 3 2 B A C K G R 0007760 O U N D E R R O R S T A T U S 0010000 1 0 3 4 Q \ R S 2 3 2 D L i o 0010020 n R S 2 3 2 C ? 1 0 2 4 Q T 0010040 I C K S 1 0 1 1 Q F I X P 0010060 1 0 0 2 Q \ R S 2 3 2 L O G I 0010100 N . T I M E R 7 7 2 Q \ R S 0010120 2 3 2 L O G I N . T I M E R 7 0010140 4 6 Q S t o p L o g i n 7 4 0010160 0 Q B O T H 6 2 2 Q B O T 0010200 H 5 4 5 Q \ R C L K S E C O 0010220 N D 5 3 7 Q \ R C L K S E C 0010240 O N D 4 7 4 Q * 3 4 0 Q 0010260 R S 2 3 2 L O G I N S Y S T E M 0010300 T Y P E I N F O 3 1 1 Q L O 0010320 G I N P A S S W O R D S 2 2 1 0010340 Q R S 2 3 2 L O G I N S Y S T 0010360 E M T Y P E I N F O 1 7 7 Q 0010400 R S 2 3 2 O S T Y P E S 1 6 1 0010420 Q R S 2 3 2 L O G I N S Y S T 0010440 E M T Y P E I N F O 1 4 7 Q 0010460 L O G I N S Y S T E M T Y P E 0010500 1 2 6 Q O U T P U T 6 2 Q 0010520 N O N E 2 7 Q O U T P U T 0010540 2 1 Q 004 003 S T R E A M T Y P E 0010560 # 7 R S 2 3 2 N o t I n i t 0010600 i a l i z e d 2 R S 2 3 2 I 0010620 N I T ) \r ( 1 4 0 6 Q " P A 0010640 S S W O R D " 6 5 4 Q ( \ R 0010660 S 2 3 2 I N S U R E . L I N E B 0010700 U F F E R C H C O N 1 N C H 0010720 A R S C H A R C O D E P D S 0010740 P B A C K U P E R R O R \ L 0010760 I S P E R R O R \ I L L E G A 0011000 L . A R G R A I D B L O C K 0011020 \ C L O C K 0 H E L P \ D 0011040 A Y T I M E 0 \ I L L E G A L 0011060 . A R G S H O U L D N T \ G 0011100 E T B A S E S T R I N G D I S 0011120 M I S S C L O C K 0 \ S T O 0011140 P S C R O L L ? B I T M A P C 0011160 R E A T E D S P B A C K C O L 0011200 O R F O N T C R E A T E \ S 0011220 H O W C A R E T C R E A T E W 0011240 O P E N W M K S T R I N G 0011260 E R R O R X \ R U N . P R O C 0011300 E S S \ C a n o n i c a l i z 0011320 e T i m e r U n i t s \ M A P 0011340 C H A R S M E N U M A C H I 0011360 N E T Y P E P L A Y T U N E 0011400 F L A S H W I N D O W R E T F 0011420 R O M S T K P O S E R R O R 0011440 ! \ C R E A T E . T T Y D I S 0011460 P L A Y S T R E A M \ D S P P 0011500 R I N T C R / L F \ B L T C H 0011520 A R \ C A R E T . D O W N \ 0011540 G E T S T R E A M ) 6 5 0 Q 0011560 ( \ R S 2 3 2 L O G I N . C H E 0011600 C K S T O P \ R S 2 3 2 B O U 0011620 T S T R I N G R S 2 3 2 W R I 0011640 T E S T R I N G \ D S P P R I 0011660 N T C H A R R S 2 3 2 W R I T 0011700 E B Y T E R S 2 3 2 R E A D B 0011720 Y T E R S 2 3 2 R E A D S T R 0011740 I N G R S 2 3 2 F O R C E O U 0011760 T P U T \ R S 2 3 2 L O G I N 0012000 . M S G D A L L Y S T R P O S 0012020 ) 6 4 4 Q ( \ R S 2 3 2 I N 0012040 S U R E . L I N E B U F F E R 0012060 \ D S P P R I N T C R / L F \ 0012100 B L T C H A R \ G E T S T R E 0012120 A M \ C A R E T . D O W N ) 0012140 6 3 2 Q ( N I L ) 4 6 6 Q 0012160 " ( p a s s w o r d ) " 4 1 0012200 5 Q " L o g i n I D : " 4 0012220 0 5 Q " : " 4 0 0 Q " L o 0012240 g i n I D f o r " 2 3 7 0012260 Q " W e r e a l l y m u s 0012300 t k n o w w h a t t h e 0012320 H o s t S Y S T E M T Y P E i 0012340 s " 4 1 Q " N o t o p e n 0012360 f o r o u t p u t " ) \r \ R 0012400 S 2 3 2 L O G I N . C H E C K S 0012420 T O P D 1 \r N I L \0 037 \0 \0 \0 0012440 \0 \b \0 \0 264 032 ` \0 \0 g \0 \0 360 264 021 ` 0012460 \0 \0 \t \0 \0 g \0 \0 h 027 \0 \0 277 360 020 \0 0012500 ( 2 3 Q M E N U 2 \ R S 2 0012520 3 2 C H E C K . B L O C K ) \r ( 0012540 3 2 Q \ R S 2 3 2 C H A T . M 0012560 E N U S I G N A L 2 6 Q S t 0012600 o p L o g i n 2 0 Q \ R S 2 0012620 3 2 C H A T M E N U 1 2 Q M 0012640 E N U 7 \ R S 2 3 2 C H A T 0012660 . M E N U S I G N A L ) \r ( ) \r 0012700 \ R S 2 3 2 L O G I N . M S G D 0012720 A L L Y D 1 \r ( P 5 C P 0012740 4 J P 3 I P 1 O 0012760 P O S P 0 M E S S A G E 0013000 I 3 W I N D O W P I 2 0013020 T y p e S c r i p t S t r e a m 0013040 I 1 F O R C E T R U N C 7 0013060 ? I 0 W A I T ? . t i c s 0013100 F 6 \ R S 2 3 2 C H A T . 0013120 I g n o r e C h a r c o d e s ) 0013140 \0 232 006 001 \0 004 n 002 \0 \t \0 \0 h d d 0013160 @ d 005 001 241 005 002 265 005 ` \0 \0 g \0 \0 ` 0013200 \0 \0 \r 006 \0 \0 021 001 \0 \b \0 \0 262 026 g \0 0013220 \0 \t \0 \0 021 001 001 I g \0 \0 i \v \0 \0 023 0013240 260 ^ H 005 \a 264 \t H 310 002 j 360 221 h 020 A 0013260 256 ` \0 \0 262 > ` \0 \0 002 001 l \a 361 262 4 0013300 H 310 002 k j 021 023 005 K J 361 263 " H K ) 0013320 l 177 345 275 C 224 M l \n 360 253 M V 034 247 H 0013340 L k 330 \ M + 277 K k 330 [ 260 336 H L 315 0013360 002 023 B 004 ` \0 \0 360 224 B H \n \0 \0 H 020 0013400 \0 ( 2 2 6 Q \ R S 2 3 2 B O U 0013420 T S T R I N G 6 7 Q R E T F 0013440 R O M 5 4 Q S T K P O S 4 0013460 4 Q \ R S 2 3 2 L O G I N . C 0013500 H E C K S T O P 3 6 Q R S 2 0013520 3 2 R E A D S T R I N G 5 \ 0013540 R S 2 3 2 I N S U R E . L I N E 0013560 B U F F E R ) \r ( 2 1 7 Q 004 003 0013600 S T R E A M T Y P E # 1 2 1 Q 0013620 R S 2 3 2 I N I T 1 1 4 Q 0013640 \ R S 2 3 2 C H A T 7 ? 6 3 Q 0013660 S t o p L o g i n 5 1 Q R 0013700 S 2 3 2 L O G I N 3 2 Q \ R 0013720 S 2 3 2 S T R P T R 2 7 Q T 0013740 I C K S 2 4 Q \ R C L K S E 0013760 C O N D ) \r ( ) \r \ R S 2 3 2 L 0014000 O G I N . S E N D P A G E S I Z 0014020 E A 0 0 0 1 D 1 \r ( N A M E 0014040 E R R O R S E T L ( 2 E R 0014060 R O R S E T . W 1 E R R O R 0014100 S E T . V 0 E R R O R S E T 0014120 . U ) P 1 X F 5 P A 0014140 G E S I Z E F 6 P A G E P 0014160 A T T E R N F 7 M A C R O 0014200 Y ) \0 J 005 003 \0 003 V 021 A 004 H 310 003 0014220 273 H 311 \0 274 K H 310 002 k 331 330 Z 277 K J 0014240 361 263 + L K d k 330 273 302 Y d l 230 360 245 0014260 d l 231 360 262 023 l 230 360 222 U 002 200 U 001 \t 0014300 \0 \0 \t \0 \0 260 330 \t \0 \0 260 323 023 h c 016 0014320 i 020 \0 ( 1 0 0 Q R S 2 3 2 W R 0014340 I T E B Y T E 7 3 Q R S 2 3 0014360 2 W R I T E S T R I N G 7 0 Q 0014400 M K S T R I N G ) \r N I L \r ( 0014420 ) \r \ R S 2 3 2 L O G I N . S E 0014440 N D P A G E S I Z E D 1 \r ( P 0014460 7 R E S E T S T A T E P 0014500 6 M A C R O Y P 4 O L D 0014520 V A L U E P 3 M S G P 0014540 2 O U T S T R M P 1 P A 0014560 G E P A T T E R N P 0 P A 0014600 G E S I Z E I 2 D A L L Y 0014620 . t i c s I 1 H o s t S Y 0014640 S T E M T Y P E I 0 W I N 0014660 D O W F 1 0 Q R E S E T V 0014700 A R S L S T ) \0 212 \b 001 \0 003 @ g 0014720 \0 \0 \n \0 \0 A 002 002 002 001 @ \t \0 \0 021 023 0014740 003 H 264 ^ I 264 [ g \0 \0 \t \0 \0 277 A 002 0014760 001 [ 265 O l \n \t \0 \0 021 1 \a g \0 \0 L 0015000 h 032 032 h 032 W 020 032 c 020 275 o \0 \0 \0 g 0015020 \0 \0 \n \0 \0 245 g \0 \0 _ 016 277 M 002 c 020 0015040 277 g \0 \0 M 001 001 002 \n \0 \0 277 O 016 223 \b 0015060 \0 \0 277 023 \b \0 \0 277 h d J i \f \0 \0 h 0015100 020 i \n \0 \0 277 B h J i \f \0 \0 277 g \0 0015120 \0 \t \0 \0 277 260 237 \0 ( 2 0 5 Q R S 0015140 2 3 2 C L E A R B U F F E R 1 0015160 7 6 Q \ R S 2 3 2 L O G I N . 0015200 M S G D A L L Y 1 6 6 Q R S 0015220 2 3 2 W R I T E B Y T E 1 6 0 0015240 Q \ R S 2 3 2 L O G I N . M S 0015260 G D A L L Y 1 5 0 Q R S 2 3 0015300 2 F O R C E O U T P U T 1 4 3 0015320 Q E R R O R ! 1 3 4 Q A P 0015340 P L Y 1 0 6 Q \ R S 2 3 2 L 0015360 O G I N . S E N D P A G E S I Z 0015400 E A 0 0 0 1 5 2 Q R A D I X 0015420 3 6 Q R S 2 3 2 C L E A R B 0015440 U F F E R 1 7 Q G E T S T R 0015460 E A M 6 G E T W I N D O W U 0015500 S E R P R O P ) \r ( 2 0 2 Q I 0015520 N P U T 1 2 5 Q R A D I X 0015540 1 1 2 Q E R R O R 1 0 3 Q 0015560 I N T E R N A L 6 0 Q R A D 0015600 I X 3 3 Q I N P U T 3 P 0015620 A G E S I Z E ) \r ( 1 0 0 Q 0015640 ( D U M M Y . F O R . E R R O R 0015660 S E T ) ) \r \ R S 2 3 2 . P & L 0015700 . F I N D G O O D N A M E S D 0015720 1 \r ( P 4 X I 0 M S G 0015740 ) \0 W 005 \0 \0 001 021 @ 003 @ o \0 \0 \0 0015760 \n \0 \0 224 ` \0 \0 260 : ` \0 \0 260 5 d 001 0016000 021 001 004 L 001 274 o \0 \0 \0 [ d 002 254 o \0 0016020 \0 \0 i \n \0 \0 030 i 031 277 K 001 L \n \0 \0 0016040 264 005 L h 032 022 X 003 226 I 265 \f H Z Y 277 0016060 002 003 265 314 J 020 \t \0 \0 Y H 031 260 363 \0 ( 0016100 1 2 0 Q L A S T 6 7 Q S T 0016120 R P O S L 5 5 Q M A K E B I 0016140 T T A B L E 1 2 Q S T R E Q 0016160 U A L ) \r ( 2 3 Q R S 2 3 2 L 0016200 O G I N S Y S T E M T Y P E I N 0016220 F O 1 6 Q R S 2 3 2 O S T Y 0016240 P E S ) \r ( 5 1 Q ( 5 5 Q ) 0016260 4 1 Q ( N I L ) 7 " { L 0016300 o g i n t h r u R S 2 3 2 } 0016320 H o s t n a m e = " ) \r ( 0016340 P R E T T Y C O M P R I N T R 0016360 S 2 3 2 L O G I N C O M S ) \r ( 0016400 R P A Q Q R S 2 3 2 L O G I N 0016420 C O M S ( ( F I L E S ( S Y 0016440 S L O A D ) R S 2 3 2 ) ( * 0016460 L O G I N f a c i l i t i e 0016500 s ) ( D E C L A R E : E V A 0016520 L @ C O M P I L E D O N T C O 0016540 P Y ( P \r ( O R ( G E T M 0016560 A C R O P R O P ( Q U O T E 0016600 R S 2 3 2 I N I T I A L I Z E C 0016620 H E C K ) C O M P I L E R M A 0016640 C R O P R O P S ) ( L O A D F 0016660 R O M ( Q U O T E R S 2 3 2 0016700 ) ) ) ) ) ( \r R E C O R D S 0016720 L O G I N S Y S T E M T Y P E ) 0016740 ( V A R S R S 2 3 2 O S T Y 0016760 P E S R S 2 3 2 L O G I N S Y 0017000 S T E M T Y P E I N F O ) ( F 0017020 N S R S 2 3 2 . P R O M P T & 0017040 L O G I N \r R S 2 3 2 L O G I 0017060 N \ R S 2 3 2 L O G I N . C H 0017100 E C K S T O P \ R S 2 3 2 L O 0017120 G I N . M S G D A L L Y \ R S 0017140 2 3 2 L O G I N . S E N D P A G 0017160 E S I Z E \r \ R S 2 3 2 . P & 0017200 L . F I N D G O O D N A M E S ) 0017220 ( I N I T V A R S ( \ R S 2 0017240 3 2 L O G I N . L A S T H O S T 0017260 N A M E N I L ) ( \ R S 2 3 0017300 2 L O G I N . L A S T H O S T S 0017320 Y S T E M T Y P E N I L \r ) 0017340 ( \ R S 2 3 2 L O G I N . T I M 0017360 E R ( S E T U P T I M E R 0 0017400 ) ) ( \ R S 2 3 2 S T R P T R 0017420 ( A L L O C S T R I N G 0 ) 0017440 ) ) ( G L O B A L V A R S R 0017460 S 2 3 2 O S T Y P E S \r R S 2 0017500 3 2 L O G I N S Y S T E M T Y P 0017520 E I N F O \ R S 2 3 2 L O G I 0017540 N . L A S T H O S T N A M E \ 0017560 R S 2 3 2 L O G I N . L A S T H 0017600 O S T S Y S T E M T Y P E \ R 0017620 S 2 3 2 L O G I N . T I M E R 0017640 \r \ R S 2 3 2 S T R P T R ) ( 0017660 I N I T V A R S ( \ R S 2 3 2 0017700 C H A T 7 ? T ) ( \ R S 2 3 0017720 2 C H A T . E O L s e q u e n c 0017740 e " \r " ) ( \ R S 2 3 2 C H 0017760 A T . N E W L I N E C H A R ( 0020000 C H A R C O D E L F ) ) ( \ 0020020 R S 2 3 2 C H A T . I g n o r e 0020040 C h a r c o d e s ( L I S T 0020060 ( C H A R C O D E N U L L ) ) 0020100 ) ) ( \r G L O B A L V A R S 0020120 \ R S 2 3 2 C H A T 7 ? ) ( S 0020140 P E C V A R S \ R S 2 3 2 C H 0020160 A T . N E W L I N E C H A R \ 0020200 R S 2 3 2 C H A T . E O L s e q 0020220 u e n c e \r \ R S 2 3 2 C H A 0020240 T . I g n o r e C h a r c o d e 0020260 s ) ) ) \r ( F I L E S L O A D 0020300 ( S Y S L O A D ) R S 2 3 2 ) 0020320 \r ( T Y P E R E C O R D L O G 0020340 I N S Y S T E M T Y P E ( A T 0020360 T N C H A R L O G I N P A T T 0020400 E R N P A G E S I Z E P A T T 0020420 E R N M I N I M A L L I N E B 0020440 U F F E R S I Z E ) ) \r ( R P A 0020460 Q Q R S 2 3 2 O S T Y P E S 0020500 ( ( M A X C . T E N E X ) 0020520 ( S U M E X - A I M . T O P 0020540 S 2 0 ) ( S U M E X . T O 0020560 P S 2 0 ) ( N I L . T E N 0020600 E X ) ) ) \r ( R P A Q Q R S 2 0020620 3 2 L O G I N S Y S T E M T Y P 0020640 E I N F O ( ( T E N E X L O 0020660 G I N S Y S T E M T Y P E 3 0020700 " L O G I N 230 231 \r \r " " L 0020720 E N G T H 231 \r W I D T H 230 \r 0020740 " 5 1 2 ) ( T O P S 2 0 L 0020760 O G I N S Y S T E M T Y P E 3 0021000 " L O G I N 230 033 231 \r " " T 0021020 E R M I N A L W I D T H 230 \r 0021040 T E R M I N A L L E N G T H 0021060 231 \r " 5 1 2 ) ( V M S L O 0021100 G I N S Y S T E M T Y P E 1 3 0021120 " 230 \r 231 \r " " S E T T E R 0021140 M I N A L / W I D T H = 230 / P A 0021160 G E = 231 \r " 5 1 2 ) ( U N I 0021200 X L O G I N S Y S T E M T Y P 0021220 E 1 3 " 230 \r 231 \r " N I L 0021240 5 1 2 ) ( W A I T S L O G I 0021260 N S Y S T E M T Y P E 3 " L 0021300 O G I N 230 \r 231 \r " N I L 1 0021320 5 3 6 ) ( I T S L O G I N S 0021340 Y S T E M T Y P E 2 6 " : L 0021360 O G I N 230 \r 231 \r " " : T C T 0021400 Y P L I N E L E N G T H 230 0021420 P A G E S I Z E 231 \r " 5 1 2 0021440 ) ( T O P S 1 0 L O G I N S 0021460 Y S T E M T Y P E 3 " L O G 0021500 I N 230 \r 231 \r " N I L 5 1 2 0021520 ) ) ) \r ( R P A Q ? \ R S 2 3 0021540 2 L O G I N . L A S T H O S T N 0021560 A M E N I L ) \r ( R P A Q ? 0021600 \ R S 2 3 2 L O G I N . L A S T 0021620 H O S T S Y S T E M T Y P E N 0021640 I L ) \r ( R P A Q ? \ R S 2 3 0021660 2 L O G I N . T I M E R ( S E 0021700 T U P T I M E R 0 ) ) \r ( R P 0021720 A Q ? \ R S 2 3 2 S T R P T R 0021740 ( A L L O C S T R I N G 0 ) 0021760 ) \r ( R P A Q ? \ R S 2 3 2 C 0022000 H A T 7 ? T ) \r ( R P A Q ? 0022020 \ R S 2 3 2 C H A T . E O L s e 0022040 q u e n c e " \r " ) \r ( R P A 0022060 Q ? \ R S 2 3 2 C H A T . N E 0022100 W L I N E C H A R ( C H A R C 0022120 O D E L F ) ) \r ( R P A Q ? 0022140 \ R S 2 3 2 C H A T . I g n o r 0022160 e C h a r c o d e s ( L I S T 0022200 ( C H A R C O D E N U L L ) 0022220 ) ) \r ( P U T P R O P S R S 2 0022240 3 2 L O G I N C O P Y R I G H 0022260 T ( " X e r o x C o r p o r 0022300 a t i o n " 1 9 8 3 1 9 8 4 0022320 1 9 8 5 ) ) \r N I L \r 0022334