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