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