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