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