$ od -c -N 50000 [eris]<Lisp>JCAI>library>RS232LOGIN.DCOM!1
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