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