$ od -c -N 50000 [qv]<notecards>1.3K>NEXT>NCUTILITIES.DCOM!45
0000000 ( F I L E C R E A T E D " 1 1
0000020 - J u n - 8 7 1 6 : 4 1 : 1 6
0000040 " ( " c o m p i l e d o n
0000060 " { Q V } < N O T E C A R D S
0000100 > 1 . 3 K > N E X T > N C U T I
0000120 L I T I E S . ; 5 6 ) \r " 1 2
0000140 - N o v - 8 5 1 4 : 5 9 : 2 3
0000160 " r e c o m p i l e d c h a
0000200 n g e s : N C . I D F r o m N
0000220 u m b e r i n " L O O P S /
0000240 K O T O 1 7 - A p r - 8 7 .
0000260 . . " d a t e d \r " 1 7 - A
0000300 p r - 8 7 1 6 : 5 0 : 0 0 " )
0000320 \r ( F I L E C R E A T E D " 1
0000340 1 - J u n - 8 7 1 6 : 4 0 : 4
0000360 8 " { Q V } < N O T E C A R D
0000400 S > 1 . 3 K > N E X T > N C U T
0000420 I L I T I E S . ; 5 6 5 1 6 6
0000440 6 c h a n g e s t o : ( F
0000460 N S \r N C . I D F r o m N u m
0000500 b e r ) p r e v i o u s d a
0000520 t e : " 8 - J u n - 8 7 1
0000540 6 : 5 4 : 3 7 " { Q V } < N O
0000560 T E C A R D S > 1 . 3 K > N E X
0000600 T > N C U T I L I T I E S . ; 5
0000620 5 ) \r N C . C o e r c e T o C a
0000640 r d D 1 \r ( P 0 W i n d o
0000660 w I 0 C a r d I d e n t i
0000700 f i e r ) \0 F 001 \0 \0 001 021 020 \0 @
0000720 d 262 / \t \0 \0 221 @ 020 @ \t \0 \0 224 @ \t
0000740 \0 \0 020 @ \t \0 \0 262 032 @ g \0 \0 \n \0 \0
0000760 265 020 @ \t \0 \0 X \t \0 \0 264 006 H \t \0 \0
0001000 020 o \0 \0 \0 o \0 \0 \0 @ \n \0 \0 \n \0 \0
0001020 020 \0 ( 1 0 3 Q N C . R e p o r
0001040 t E r r o r 1 0 0 Q C O N C
0001060 A T 6 3 Q N C . C a r d F r
0001100 o m W i n d o w 5 5 Q W I N
0001120 D O W P 5 1 Q W I N D O W .
0001140 F R O M . T E D I T . T H I N G
0001160 4 3 Q S T R E A M P R O P
0001200 3 2 Q T E X T S T R E A M P
0001220 2 5 Q N C . C a r d F r o m W
0001240 i n d o w 2 0 Q W I N D O W
0001260 P 1 1 Q N C . C a r d P ) \r
0001300 ( 4 0 Q N o t e C a r d O b j
0001320 e c t ) \r ( 7 4 Q " A r g
0001340 n o t W i n d o w o r T e
0001360 x t S t r e a m o r C a r d
0001400 : " 7 0 Q " N C . C o
0001420 e r c e T o C a r d " ) \r N C
0001440 . C a r d F r o m W i n d o w
0001460 D 1 \r ( I 0 W i n d o w )
0001500 \0 \t \0 \0 \0 001 @ g \0 \0 \n \0 \0 020 \0 (
0001520 6 G E T W I N D O W U S E R P
0001540 R O P ) \r ( 3 N o t e C a r d
0001560 O b j e c t ) \r ( ) \r N C . L o
0001600 o k u p A u t o l o a d F n F i
0001620 l e D 1 \r ( L ( 0 A u t o
0001640 l o a d F n ) ) \0 \a \0 \0 \0 001 @
0001660 ` \0 \0 035 020 \0 N I L \r ( 3 N C .
0001700 A u t o l o a d a b l e F n s T
0001720 a b l e ) \r ( ) \r N C . S t o r
0001740 e A u t o l o a d F n F i l e
0001760 D 1 \r ( I 2 D i r e c t o r
0002000 i e s I 1 F i l e N a m e
0002020 I 0 A u t o l o a d F n )
0002040 \0 027 \0 \0 \0 003 @ ` \0 \0 037 d A 024 \0
0002060 277 d B 024 002 277 ` \0 \0 \v \0 \0 020 \0 ( 2
0002100 4 Q P U T H A S H ) \r ( 2 1 Q
0002120 N C . A u t o l o a d a b l e
0002140 F n s T a b l e 3 004 003 A u t
0002160 o l o a d F n E n t r y T Y P E
0002200 # ) \r ( ) \r N C . L o a d F i l
0002220 e F r o m D i r e c t o r i e s
0002240 A 0 0 0 1 D 1 \r ( N A M E E
0002260 R R O R S E T P 0 W i n d
0002300 o w F 1 T t y D i s p l a
0002320 y S t r e a m F 2 R E S E
0002340 T V A R S L S T F 3 Q u i
0002360 e t F l g F 4 F i l e N a
0002400 m e F 5 D i r e c t o r i
0002420 e s F 6 R E S E T Y ) \0
0002440 235 001 006 002 \0 Q i \n \0 \0 \t \0 \0 230 i c
0002460 006 277 o \0 \0 \0 211 g \0 \0 Q \t \0 \0 h 032
0002500 032 h h 032 032 R 032 c 004 277 S 225 o \0 \0 \0
0002520 260 037 g \0 \0 Q \t \0 \0 o \0 \0 \0 Q \t \0
0002540 \0 g \0 \0 g \0 \0 \v \0 \0 h 032 032 032 032 h
0002560 h 032 032 R 032 c 004 277 Q \t \0 \0 021 001 \0 S
0002600 263 H \t \0 \0 277 H \t \0 \0 277 o \0 \0 \0
0002620 H \n \0 \0 277 T H \n \0 \0 277 H \t \0 \0 277
0002640 g \0 \0 ` \0 \0 265 024 U T h 032 032 \n \0 \0
0002660 277 T \t \0 \0 022 c \f i 020 U \t \0 \0 032 260
0002700 352 \0 ( 2 3 0 Q \ A P P E N D 2
0002720 2 1 7 Q N C . F i x F i l e
0002740 D a t e s 2 1 2 Q A P P L Y
0002760 1 7 1 Q T E R P R I 1 6 4
0003000 Q P R I N 1 1 5 6 Q P R I
0003020 N 1 1 4 5 Q F L A S H W I N
0003040 D O W 1 4 0 Q C L E A R W
0003060 1 2 6 Q W F R O M D S 1 0 4
0003100 Q P U T W I N D O W P R O P
0003120 7 3 Q W F R O M D S 6 3 Q
0003140 W F R O M D S 3 0 Q W F R O
0003160 M D S 7 O P E N W P 4 W
0003200 F R O M D S ) \r ( 2 0 0 Q N C
0003220 . L O A D F L G 1 7 5 Q F I
0003240 L E S L O A D 1 0 1 Q N I L
0003260 L 7 6 Q P A G E F U L L F N
0003300 5 7 Q W I N D O W P R O P
0003320 2 4 Q C L O S E W ) \r ( 1 5
0003340 2 Q " A t t e m p t i n g t
0003360 o a u t o l o a d " 6 7 Q
0003400 ( Q U O T E P A G E F U L L
0003420 F N ) 5 2 Q ( N I L L ) 2
0003440 0 Q ( N I L L ) ) \r N C . L o
0003460 a d F i l e F r o m D i r e c t
0003500 o r i e s D 1 \r ( P 2 R E
0003520 S E T Z P 1 R E S E T Y
0003540 P 0 L I S P X H I S T I
0003560 2 Q u i e t F l g I 1 D
0003600 i r e c t o r i e s I 0 F
0003620 i l e N a m e F 3 L I S P
0003640 X H I S T F 4 R E S E T V
0003660 A R S L S T ) \0 @ 003 002 \0 003 A 265
0003700 \a g \0 \0 b 002 003 226 g \0 \0 A h 032 211 g
0003720 \0 \0 g \0 \0 A h 032 032 032 b 002 S 021 ! 002
0003740 T o \0 \0 \0 g \0 \0 \n \0 \0 221 h 202 g \0
0003760 \0 Z \n \0 \0 J 223 \b \0 \0 020 I 020 \0 ( 7
0004000 3 Q E R R O R ! 6 6 Q R E
0004020 S E T R E S T O R E 5 4 Q N
0004040 C . L o a d F i l e F r o m D i
0004060 r e c t o r i e s A 0 0 0 1 ) \r
0004100 ( 6 2 Q E R R O R 5 1 Q I
0004120 N T E R N A L 2 6 Q V A L U
0004140 E O F 2 3 Q F R O M 1 4 Q
0004160 F R O M 5 N O T E C A R D
0004200 S D I R E C T O R I E S ) \r (
0004220 4 6 Q ( N C . L o a d F i l e
0004240 F r o m D i r e c t o r i e s A
0004260 0 0 0 1 ) ) \r W W D 1 \r ( I
0004300 1 Y I 0 X ) \0 \a \0 \0 \0
0004320 002 @ A \n \0 \0 020 \0 ( 4 W H I C H
0004340 W ) \r N I L \r ( ) \r F L A S H W
0004360 D 1 \r ( I 3 S H A D E I
0004400 2 F L A S H I N T E R V A L
0004420 I 1 N I 0 W I N ? )
0004440 \0 \t \0 \0 \0 004 @ A B C \f \0 \0 020 \0
0004460 ( 6 F L A S H W I N D O W ) \r
0004500 N I L \r ( ) \r N A M E D - R E S
0004520 E T L S T D 1 \r ( P 2 R E
0004540 S E T Z P 1 R E S E T Y
0004560 P 0 L I S P X H I S T I
0004600 0 R E S E T X F 3 L I S
0004620 P X H I S T ) \0 , 003 001 003 001 S 021
0004640 ! 002 @ 001 \t \0 \0 @ 001 g \0 \0 @ 002 032 g
0004660 \0 \0 \n \0 \0 Y 221 h 202 g \0 \0 \n \0 \0 I
0004700 265 \a \b \0 \0 h 020 001 020 \0 ( 4 6 Q E
0004720 R R O R ! 4 0 Q N A M E D -
0004740 R E S E T R E S T O R E 2 6 Q
0004760 E R R O R S E T 1 0 Q S E
0005000 T ) \r ( 3 5 Q E R R O R 2 3
0005020 Q I N T E R N A L 1 5 Q P
0005040 R O G N ) \r ( ) \r N A M E D - R
0005060 E S E T S A V E D 1 \r ( P 1
0005100 R E S E T I T E M P 0 R
0005120 E S E T H A N D L E I 0 R
0005140 E S E T X ) \0 d 003 \0 003 001 @ 001 021
0005160 ! 002 @ 002 b \0 H @ d 001 262 ! 001 Z 224 J
0005200 3 \b 262 030 @ 001 @ 001 032 @ 001 @ 002 001 g \0
0005220 \0 \n \0 \0 \n \0 \0 277 260 - @ 002 237 @ 002 001
0005240 \t \0 \0 @ 001 \t \0 \0 h 032 032 260 032 @ d 001
0005260 001 g \0 \0 360 222 001 002 002 001 001 @ 001 \t \0 \0
0005300 h 032 032 h 032 Y H \t \0 \0 032 \n \0 \0 I 020
0005320 \0 ( 1 4 0 Q S E T 1 3 4 Q
0005340 E V A L 1 2 2 Q E V A L 7
0005360 2 Q E V A L 6 5 Q E V A L
0005400 5 1 Q S E T 4 6 Q E V A
0005420 L ) \r ( 1 0 6 Q S E T Q 4 3
0005440 Q I N T E R N A L ) \r ( ) \r N
0005460 A M E D - R E S E T R E S T O R
0005500 E D 1 \r ( P 2 O L D V A L
0005520 U E P 1 R E S E T Z P
0005540 0 V A R S L S T I 1 R E
0005560 S E T S T A T E I 0 R E S
0005600 E T H A N D L E ) \0 8 003 \0 \0 002
0005620 @ \t \0 \0 021 ! 002 H 265 \b @ \t \0 \0 h 020
0005640 001 271 H 002 270 I d 001 003 262 025 d 002 240 001 002
0005660 001 272 I 001 001 I 001 002 \n \0 \0 277 260 333 001 I
0005700 002 \n \0 \0 277 260 322 \0 ( 6 3 Q S E T
0005720 5 2 Q A P P L Y 1 5 Q S
0005740 E T 3 E V A L ) \r N I L \r (
0005760 ) \r N A M E D - R E S E T U N S
0006000 A V E D 1 \r ( P 1 I T E M
0006020 P 0 I T E M L I S T I
0006040 1 I T E M F O R M I 0 R
0006060 E S E T H A N D L E F 2 O
0006100 L D V A L U E ) \0 A 002 001 001 002 A
0006120 \t \0 \0 021 021 001 H 260 3 d 001 271 @ I @ \t
0006140 \0 \0 \n \0 \0 \n \0 \0 277 I d 001 003 262 025 d
0006160 002 240 001 002 001 c 004 277 I 001 001 I 001 002 \n \0
0006200 \0 205 001 I 002 \n \0 \0 277 002 003 265 316 h 020 \0
0006220 ( 7 0 Q S E T 6 1 Q A P P
0006240 L Y 3 0 Q S E T 2 5 Q D
0006260 R E M O V E 2 2 Q E V A L
0006300 3 E V A L ) \r N I L \r ( ) \r T
0006320 E D I T . L I S T . O F . O B J
0006340 E C T S A 0 0 0 1 D 1 \r ( I
0006360 3 O B L I 2 P C # I
0006400 1 P C I 0 C H # F 0
0006420 T E S T F N ) \0 2 \0 001 \0 004 A
0006440 d 262 . g \0 \0 360 263 ' A 006 \0 \0 311 016 264
0006460 P 233 A 006 \0 \0 311 016 k P 017 016 264 022 C
0006500 A 006 \0 \0 311 016 @ h 032 032 \n \0 \0 020 h 020
0006520 \0 ( 5 5 Q T C O N C ) \r ( 4 4
0006540 Q P I E C E 2 7 Q P I E C
0006560 E 1 5 Q P I E C E 6 L A
0006600 S T P I E C E ) \r ( ) \r T E D I
0006620 T . L I S T . O F . O B J E C T
0006640 S D 1 \r ( P 0 O B J L I S
0006660 T I 1 T E S T F N I 0
0006700 T E X T O B J ) \0 024 001 \0 \0 002
0006720 h \t \0 \0 021 001 \0 @ g \0 \0 H \v \0 \0 H
0006740 001 002 020 \0 ( 1 6 Q T E D I T . M
0006760 A P P I E C E S 3 T C O N C
0007000 ) \r ( 1 2 Q T E D I T . L I S
0007020 T . O F . O B J E C T S A 0 0 0
0007040 1 ) \r ( ) \r W I N D O W . F R O
0007060 M . T E D I T . T H I N G D 1
0007100 \r ( I 0 W ) \0 : \0 \0 \0 001 @
0007120 \t \0 \0 265 ! @ \t \0 \0 224 @ \t \0 \0 020 @
0007140 d 004 ` \0 \0 360 235 006 \0 \0 311 022 d 003 243 d
0007160 221 h 032 001 020 250 h o \0 \0 \0 \n \0 \0 020 @
0007200 o \0 \0 \0 \n \0 \0 020 \0 ( 6 7 Q E R
0007220 R O R 5 6 Q C R E A T E W
0007240 1 6 Q W I N D O W . O F . T E
0007260 X T S T R E A M 1 1 Q S T R
0007300 E A M P 3 W I N D O W P ) \r
0007320 ( 3 2 Q T E X T O B J 2 5 Q
0007340 004 003 T E X T O B J T Y P E # )
0007360 \r ( 6 4 Q " n o t a w i
0007400 n d o w . " 5 3 Q " E d i t
0007420 i n g W i n d o w " ) \r W I N
0007440 D O W . O F . T E X T S T R E A
0007460 M D 1 \r ( I 0 T E X T S T
0007500 R E A M ) \0 023 \0 \0 \0 001 @ \t \0 \0
0007520 006 \0 \0 311 022 d 003 243 d 221 h 032 001 020 \0 (
0007540 3 T E X T O B J ) \r ( 6 T E
0007560 X T O B J ) \r ( ) \r N C . A s k
0007600 Y e s O r N o A 0 0 0 2 D 1 \r
0007620 ( I 2 B u t t o n I 1
0007640 M e n u I 0 I t e m ) \0
0007660 035 \0 \0 \0 003 A \t \0 \0 \t \0 \0 \t \0 \0 311
0007700 . \t \0 \0 @ l \r \t \0 \0 \n \0 \0 \t \0 \0
0007720 020 \0 ( 3 2 Q B K S Y S B U F
0007740 2 7 Q C O N C A T 2 4 Q C
0007760 H A R A C T E R 1 6 Q T T Y
0010000 . P R O C E S S 1 1 Q \ I N
0010020 S U R E W I N D O W 6 M A I
0010040 N W I N D O W 3 W F R O M M
0010060 E N U ) \r N I L \r ( ) \r N C . A
0010100 s k Y e s O r N o D 1 \r ( P
0010120 2 P r o m p t W i n P 1
0010140 M e n u W i n d o w P 0 M
0010160 e n u I 6 D o n t C l e a
0010200 r A t E n d F l g I 5 D o
0010220 n t C l o s e A t E n d F l g
0010240 I 4 M a i n W i n d o w I
0010260 3 C l e a r F i r s t F l g
0010300 I 2 F i r s t T r y I
0010320 1 P r o m p t I 0 M s g
0010340 ) \0 301 006 \0 \0 \a 021 ` 005 D C @ \v \0
0010360 \0 Z ` \0 \0 037 d o \0 \0 \0 024 004 277 d g
0010400 \0 \0 024 026 277 g \0 \0 l 016 g \0 \0 \v \0 \0
0010420 273 d K 024 020 277 d k 024 030 277 d g \0 \0 024
0010440 277 d g \0 \0 024 034 277 j d n 177 377 d h
0010460 032 032 032 032 274 d L 024 \n 277 ] d 006 \0 \0 311
0010500 \n 002 002 002 l 024 030 277 M 006 \0 \0 311 \n 002 002
0010520 o \0 \0 \0 g \0 \0 l 016 g \0 \0 \v \0 \0 \n
0010540 \0 \0 l 002 326 030 277 X J d ` \0 \0 360 223 g
0010560 \0 \0 202 g \0 \0 g \0 \0 \f \0 \0 Y o \0 \0
0010600 \0 A B h D i F i \r \b \0 \0 H i \n \0
0010620 \0 277 I \t \0 \0 277 E 252 J ` \0 \0 360 244 J
0010640 \t \0 \0 277 \t \0 \0 020 \0 ( 2 7 6 Q N
0010660 C . Y e s P 2 7 2 Q C L O S
0010700 E W 2 5 5 Q D E T A C H W I
0010720 N D O W 2 5 0 Q D E L E T E
0010740 M E N U 2 4 3 Q N C . A s k
0010760 U s e r 2 2 3 Q A T T A C H
0011000 M E N U 1 7 1 Q S T R I N G
0011020 W I D T H 1 6 6 Q F O N T C
0011040 R E A T E 4 7 Q F O N T C R
0011060 E A T E 1 0 Q N C . P r i n
0011100 t M s g ) \r ( 2 6 4 Q P R O M
0011120 P T W I N D O W 2 2 0 Q L E
0011140 F T 2 1 5 Q T O P 2 1 1 Q
0011160 B O T T O M 2 0 4 Q P R O
0011200 M P T W I N D O W 1 6 3 Q B
0011220 O L D 1 5 6 Q H E L V E T I
0011240 C A 1 4 3 Q M E N U 1 2 6
0011260 Q M E N U 7 5 Q D E F A U
0011300 L T M E N U H E L D F N 6 6 Q
0011320 C L R P R O M P T 4 4 Q B
0011340 O L D 3 7 Q H E L V E T I C
0011360 A 3 1 Q N C . A s k Y e s O
0011400 r N o A 0 0 0 2 1 4 Q 004 003 M
0011420 E N U T Y P E # ) \r ( 2 3 0 Q
0011440 " " 1 5 3 Q " Y e s " 2
0011460 2 Q ( Y e s N o ) ) \r N C .
0011500 Y e s P D 1 \r ( I 0 A n s
0011520 w e r ) \0 . \0 \0 \0 001 @ \t \0 \0 d
0011540 g \0 \0 360 263 033 d g \0 \0 360 263 024 d g \0
0011560 \0 360 253 d g \0 \0 360 245 d g \0 \0 360 222 277
0011600 i 201 277 h 264 003 i 020 \0 ( 3 M K A T
0011620 O M ) \r ( 4 1 Q y e s 3 3 Q
0011640 Y E S 2 5 Q y 1 6 Q Y
0011660 7 Y e s ) \r ( ) \r F I L D I
0011700 R - E A R L I E S T D 1 \r ( I
0011720 0 F i l e S p e c ) \0 \t \0
0011740 \0 \0 001 @ g \0 \0 \n \0 \0 020 \0 ( 6 F
0011760 I L D I R - V E R S I O N ) \r (
0012000 3 E A R L I E S T ) \r ( ) \r F
0012020 I L D I R - V E R S I O N D 1
0012040 \r ( P 5 F i l e P 4 R
0012060 e s u l t s L i s t P 3 E
0012100 n t r y P 2 F i l e V e r
0012120 s i o n P 1 F i l e N a m
0012140 e P 0 L a t e s t F l a g
0012160 I 1 V e r s i o n I 0
0012200 F i l e S p e c ) \0 203 \t \0 \0
0012220 002 A g \0 \0 360 264 003 i 021 A 004 @ \t \0 \0
0012240 260 @ d 001 021 001 005 M \t \0 \0 Y g \0 \0 '
0012260 272 I g \0 \0 \n \0 \0 277 I \t \0 \0 Y L 026
0012300 [ 247 I J 032 L 032 \ 260 025 H 227 J d K 002
0012320 361 222 277 205 J K 002 375 361 223 K J 031 277 023 002
0012340 003 265 301 021 0 \b L \t \0 \0 260 # d 001 021 001
0012360 005 M 001 g \0 \0 M 002 \v \0 \0 022 276 O 016 265
0012400 \b N h 032 _ 020 201 N & _ 016 277 002 003 265 336
0012420 O 020 020 \0 ( 1 5 1 Q P A C K *
0012440 1 3 0 Q D R E V E R S E 5 3
0012460 Q P A C K F I L E N A M E 4
0012500 6 Q L I S T P U T 3 1 Q U
0012520 N P A C K F I L E N A M E 1 6
0012540 Q F I L D I R ) \r ( 1 4 4 Q
0012560 ; 4 3 Q V E R S I O N 3 5
0012600 Q V E R S I O N 3 L A T E
0012620 S T ) \r ( ) \r G E T M O U S E X
0012640 D 1 \r N I L \0 \b \0 \0 \0 \0 \b \0
0012660 \0 ` \0 \0 020 \0 ( 2 G E T M O U S
0012700 E S T A T E ) \r ( 5 L A S T M
0012720 O U S E X ) \r ( ) \r G E T M O U
0012740 S E Y D 1 \r N I L \0 \b \0 \0 \0
0012760 \0 \b \0 \0 ` \0 \0 020 \0 ( 2 G E T M
0013000 O U S E S T A T E ) \r ( 5 L A
0013020 S T M O U S E Y ) \r ( ) \r L O W
0013040 E R L E F T D 1 \r ( L ( 0
0013060 R e g i o n ) ) \0 \b \0 \0 \0 001 @
0013100 001 @ 002 001 032 020 \0 N I L \r N I L \r (
0013120 ) \r M B U T T O N . N E X T . F
0013140 I E L D . A S . T E X T . O R .
0013160 I M A G E O B J D 1 \r ( P 5
0013200 I m a g e O b j P 1 C H
0013220 N O I 1 C H # I 0 T
0013240 E X T O B J ) \0 u 006 \0 \0 002 @ A
0013260 \n \0 \0 264 n @ 006 \0 \0 311 034 006 \0 \0 311 006
0013300 @ \n \0 \0 @ 006 \0 \0 311 034 006 \0 \0 311 \f k
0013320 021 B 005 I H 363 263 $ @ 006 \0 \0 311 . \t
0013340 \0 \0 ] 265 003 210 274 K 265 \r L h 032 [ 272 I
0013360 k 324 Y 260 341 L & 273 260 367 J 022 001 265 $ @
0013400 006 \0 \0 311 034 006 \0 \0 k 317 024 \0 277 k j 360
0013420 h 360 @ 006 \0 \0 311 . @ 006 \0 \0 311 034 \n \0
0013440 \0 020 \0 ( 1 6 2 Q T E D I T . S
0013460 E L . A S . S T R I N G 6 3 Q
0013500 I M A G E O B J P 2 5 Q \
0013520 S E T U P G E T C H 4 M B U
0013540 T T O N . F I N D . N E X T . F
0013560 I E L D ) \r ( 1 5 5 Q T E X T
0013600 O B J 1 4 7 Q T E X T O B J
0013620 1 3 1 Q S E L E C T I O N
0013640 1 2 4 Q T E X T O B J 5 5 Q
0013660 T E X T O B J 3 6 Q S E L
0013700 E C T I O N 3 1 Q T E X T O
0013720 B J 1 7 Q S E L E C T I O N
0013740 1 2 Q T E X T O B J ) \r ( )
0013760 \r N C . A s k U s e r A 0 0 0 1
0014000 A 0 0 0 4 A 0 0 0 5 D 1 \r ( N
0014020 A M E E R R O R S E T F 0
0014040 P r o m p t F 1 F i r s
0014060 t T r y ) \0 $ \0 002 002 \0 P 265 006 o
0014100 \0 \0 \0 d 003 244 d 264 005 h 032 h d o \0 \0
0014120 \0 h d Q d 221 h 032 \r \a \0 \0 h 032 020 \0
0014140 ( 3 7 Q T T Y I N ) \r N I L \r
0014160 ( 2 4 Q ( S T R I N G N O
0014200 R A I S E ) 6 " " ) \r N C .
0014220 A s k U s e r A 0 0 0 1 A 0 0 0
0014240 4 D 1 \r ( N A M E E R R O R
0014260 S E T F 0 M A C R O Y )
0014300 \0 022 \0 001 002 \0 o \0 \0 \0 \t \0 \0 265 005 \b
0014320 \0 \0 001 c \0 i 020 \0 ( 1 3 Q E R R
0014340 O R ! 6 N C . A s k U s e r
0014360 A 0 0 0 1 A 0 0 0 4 A 0 0 0 5 )
0014400 \r N I L \r ( 3 ( N C . A s k
0014420 U s e r A 0 0 0 1 A 0 0 0 4 A 0
0014440 0 0 5 ) ) \r N C . A s k U s e r
0014460 A 0 0 0 1 D 1 \r ( N A M E E
0014500 R R O R S E T L ( 0 N I L
0014520 ) P 5 R E S E T S T A T E
0014540 P 4 M A C R O Y P 2
0014560 O L D V A L U E F 6 R E S
0014600 E T V A R S L S T F 7 T e
0014620 x t O b j F 1 0 Q A s k W
0014640 i n d o w F 1 1 Q M a i n
0014660 W i n d o w F 1 2 Q P r o
0014700 m p t F 1 3 Q D o n t C l
0014720 e a r A t E n d F l g F 1 4
0014740 Q D o n t C l o s e A t E n d
0014760 F l g F 1 5 Q C l e a r F
0015000 i r s t F l g F 1 6 Q M s
0015020 g F 1 7 Q F i r s t T r y
0015040 F 2 0 Q P R O M P T F O R
0015060 W O R D F l g F 2 1 Q R E
0015100 S E T Y ) 001 001 006 \f 002 \0 g \0 \0 W
0015120 020 W 022 W 026 W 030 h 032 032 032 032 032 W 022 W
0015140 032 W 034 \v \0 \0 c 020 h 032 032 V 032 c \f 277
0015160 g \0 \0 ` \0 \0 \t \0 \0 h 032 032 h 032 V 032
0015200 c \f 277 W 022 g \0 \0 \n \0 \0 c 016 262 ] g
0015220 \0 \0 W 016 g \0 \0 W 016 \t \0 \0 006 \0 \0 311
0015240 F g \0 \0 ' h 032 032 032 032 W 016 \t \0 \0 006
0015260 \0 \0 311 F 262 025 W 016 \t \0 \0 006 \0 \0 311 F
0015300 g \0 \0 i \v \0 \0 260 033 W 016 \t \0 \0 006 \0
0015320 \0 g \0 \0 i h 032 032 021 002 001 H I 024 F 277
0015340 I 022 h 032 032 V 032 c \f 277 W 262 037 ` \0
0015360 \0 \t \0 \0 277 W 024 W 036 o \0 \0 \0 W 020 h
0015400 d o \0 \0 \0 \r \a \0 \0 260 ? W 020 \t \0 \0
0015420 021 1 005 g \0 \0 J h 032 032 h 032 V 032 c \f
0015440 273 o \0 \0 \0 g \0 \0 \n \0 \0 243 g \0 \0 275
0015460 K 002 c \f 277 g \0 \0 K 001 001 002 \n \0 \0 277
0015500 M 223 \b \0 \0 200 L 022 c " i 020 \0 ( 3 7
0015520 0 Q E R R O R ! 3 6 2 Q A
0015540 P P L Y 3 3 6 Q N C . A s k
0015560 U s e r A 0 0 0 1 A 0 0 0 4 3
0015600 0 3 Q T T Y D I S P L A Y S T
0015620 R E A M 2 7 4 Q P R O M P T
0015640 F O R W O R D 2 4 7 Q T T Y
0015660 . P R O C E S S 2 0 1 Q T E
0015700 X T O B J 1 7 2 Q L I S T P
0015720 U T 1 5 6 Q T E X T O B J
0015740 1 4 2 Q T E X T O B J 1 1 7
0015760 Q T E X T O B J 7 6 Q G E
0016000 T W I N D O W U S E R P R O P
0016020 5 4 Q T T Y . P R O C E S S
0016040 3 1 Q N C . P r i n t M s g )
0016060 \r ( 3 5 3 Q T T Y D I S P L A
0016100 Y S T R E A M 3 4 2 Q E R R
0016120 O R 3 3 3 Q I N T E R N A L
0016140 3 1 1 Q T T Y D I S P L A Y
0016160 S T R E A M 2 4 4 Q \ R U N
0016200 N I N G . P R O C E S S 2 0 7
0016220 Q C O P Y B Y B K S Y S B U F
0016240 2 0 4 Q T E X T O B J 1 6
0016260 6 Q C O P Y B Y B K S Y S B U
0016300 F 1 6 1 Q T E X T O B J 1
0016320 4 5 Q T E X T O B J 1 2 7 Q
0016340 C O P Y B Y B K S Y S B U F
0016360 1 2 2 Q T E X T O B J 1 1 2
0016400 Q C O P Y B Y B K S Y S B U F
0016420 1 0 5 Q T E X T P R O P 7
0016440 3 Q T E X T O B J 5 1 Q \
0016460 R U N N I N G . P R O C E S S
0016500 4 6 Q T T Y . P R O C E S S
0016520 2 N C . A s k U s e r R e s e
0016540 t W i n d o w ) \r ( 3 3 0 Q
0016560 ( N C . A s k U s e r A 0 0 0 1
0016600 A 0 0 0 4 ) 2 7 0 Q ( 1 5 Q
0016620 ) 2 6 0 Q " T o t y p e
0016640 a ? , t y p e C T R L - V
0016660 f o l l o w e d b y a ?
0016700 . " ) \r N C . A s k U s e r D
0016720 1 \r ( P 4 R E S E T Z P
0016740 3 R E S E T Y P 2 L I S
0016760 P X H I S T P 1 T e x t O
0017000 b j P 0 A s k W i n d o w
0017020 I 7 P R O M P T F O R W O
0017040 R D F l g I 6 D o n t C l
0017060 e a r A t E n d F l g I 5
0017100 D o n t C l o s e A t E n d F l
0017120 g I 4 M a i n W i n d o w
0017140 I 3 C l e a r F i r s t F
0017160 l g I 2 F i r s t T r y
0017200 I 1 P r o m p t I 0 M
0017220 s g F 5 L I S P X H I S T
0017240 F 6 R E S E T V A R S L S
0017260 T ) \0 % 005 002 \0 \b 021 001 U 021 ! 004
0017300 V o \0 \0 \0 g \0 \0 \n \0 \0 221 h 202 g \0
0017320 \0 \ \n \0 \0 L 223 \b \0 \0 020 K 020 \0 ( 4
0017340 0 Q E R R O R ! 3 3 Q R E
0017360 S E T R E S T O R E 2 1 Q N
0017400 C . A s k U s e r A 0 0 0 1 ) \r
0017420 ( 2 7 Q E R R O R 1 6 Q I
0017440 N T E R N A L ) \r ( 1 3 Q (
0017460 N C . A s k U s e r A 0 0 0 1 )
0017500 ) \r N C . A s k U s e r R e s e
0017520 t W i n d o w D 1 \r ( I 3
0017540 D o n t C l o s e A t E n d F l
0017560 g I 2 D o n t C l e a r A
0017600 t E n d F l g I 1 M a i n
0017620 W i n d o w I 0 A s k W i
0017640 n d o w ) \0 026 \0 \0 \0 004 @ 227 @ g
0017660 \0 \0 \n \0 \0 277 B 265 \t A C h 360 \n \0 \0
0017700 020 \0 ( 2 3 Q N C . C l e a r M
0017720 s g 1 0 Q P U T W I N D O W
0017740 P R O P ) \r ( 5 P R O C E S S
0017760 ) \r ( ) \r N C . C l e a r M s g
0020000 A 0 0 0 1 D 1 \r ( N A M E E
0020020 R R O R S E T P 0 P r o m
0020040 p t W i n d o w F 1 M a i
0020060 n W i n d o w F 2 C l o s
0020100 e P r o m p t W i n d o w F l g
0020120 F 3 R E S E T Y ) \0 206 001
0020140 003 002 \0 ` \0 \0 h i \v \0 \0 277 021 020 \0 Q
0020160 \t \0 \0 262 m Q \t \0 \0 262 Z Q h d i \f
0020200 \0 \0 X \t \0 \0 224 H \t \0 \0 277 H g \0 \0
0020220 \n \0 \0 277 H g \0 \0 \n \0 \0 277 H g \0 \0
0020240 j \v \0 \0 277 Q g \0 \0 \n \0 \0 277 R 264 5
0020260 H g \0 \0 \n \0 \0 277 Q g \0 \0 H Q g \0
0020300 \0 \n \0 \0 026 \v \0 \0 277 H \t \0 \0 277 H \t
0020320 \0 \0 217 Q \t \0 \0 277 R 264 \n Q \t \0 \0 202
0020340 \b \0 \0 022 c 006 i 020 \0 ( 1 7 7 Q C
0020360 L R P R O M P T 1 7 3 Q C L
0020400 O S E W 1 6 3 Q C L E A R W
0020420 1 5 6 Q R E M O V E W I N D
0020440 O W 1 5 1 Q F R E E A T T A
0020460 C H E D W I N D O W 1 4 4 Q
0020500 W I N D O W D E L P R O P 1 4
0020520 0 Q G E T W I N D O W U S E R
0020540 P R O P 1 2 3 Q P U T W I N
0020560 D O W P R O P 1 1 0 Q P U T
0020600 W I N D O W P R O P 1 0 0 Q
0020620 P U T W I N D O W P R O P 6 7
0020640 Q P U T W I N D O W P R O P
0020660 5 7 Q P U T W I N D O W P R O
0020700 P 4 7 Q C L E A R W 4 2 Q
0020720 O P E N W P 3 6 Q N C . G
0020740 E T P R O M P T W I N D O W 2
0020760 5 Q N C . N o t e C a r d s W
0021000 i n d o w P 1 7 Q W I N D O
0021020 W P 7 O B T A I N . M O N I
0021040 T O R L O C K ) \r ( 1 3 5 Q O
0021060 t h e r P r o m p t W i n d o w
0021100 s 1 3 0 Q O t h e r P r o m
0021120 p t W i n d o w s 1 2 0 Q P
0021140 r o m p t W i n d o w P r o c e
0021160 s s 1 0 5 Q P r o m p t W i
0021200 n d o w L a s t N o t C R 7 4
0021220 Q O l d M a x W i d t h 6 4
0021240 Q L a s t L i n e L e n g t h
0021260 5 4 Q M a x L i n e W i d t
0021300 h 2 N C . P r o m p t W i n
0021320 d o w M o n i t o r L o c k ) \r
0021340 ( ) \r N C . C l e a r M s g D
0021360 1 \r ( P 2 R E S E T Z P
0021400 1 R E S E T Y P 0 L I S
0021420 P X H I S T I 1 C l o s e
0021440 P r o m p t W i n d o w F l g
0021460 I 0 M a i n W i n d o w F
0021500 3 L I S P X H I S T F 4
0021520 R E S E T V A R S L S T ) \0
0021540 " 003 002 \0 002 S 021 ! 002 T o \0 \0 \0 g \0
0021560 \0 \n \0 \0 221 h 202 g \0 \0 Z \n \0 \0 J 223
0021600 \b \0 \0 020 I 020 \0 ( 3 5 Q E R R O
0021620 R ! 3 0 Q R E S E T R E S T
0021640 O R E 1 6 Q N C . C l e a r
0021660 M s g A 0 0 0 1 ) \r ( 2 4 Q E
0021700 R R O R 1 3 Q I N T E R N A
0021720 L ) \r ( 1 0 Q ( N C . C l e
0021740 a r M s g A 0 0 0 1 ) ) \r N C .
0021760 G r e y C a r d D 1 \r ( P 0
0022000 W i n d o w I 0 C a r d
0022020 ) \0 % 001 \0 \0 001 @ \t \0 \0 021 001 \0 H
0022040 \t \0 \0 262 027 h d d H h d d d g \0 \0
0022060 g \0 \0 ` \0 \0 \r \v \0 \0 i 020 \0 ( 4 1
0022100 Q B K B I T B L T 1 2 Q W
0022120 I N D O W P 3 N C . F e t c
0022140 h W i n d o w ) \r ( 3 5 Q G R
0022160 A Y S H A D E 3 2 Q P A I N
0022200 T 2 7 Q T E X T U R E ) \r (
0022220 ) \r N C . I D F r o m N u m b e
0022240 r D 1 \r ( I 0 N u m b e r
0022260 ) \0 024 \0 \0 \0 001 g \0 \0 k l \a @ \t
0022300 \0 \0 331 \v \0 \0 @ \n \0 \0 020 \0 ( 2 1 Q
0022320 P A C K * 1 5 Q S U B A T
0022340 O M 1 1 Q N C H A R S ) \r (
0022360 2 N C 0 0 0 0 0 ) \r ( ) \r N C
0022400 . M o v e W i n d o w O n t o S
0022420 c r e e n D 1 \r ( P 5 N e
0022440 w T o p P 4 N e w L e f t
0022460 P 3 O l d B o t t o m P
0022500 2 O l d T o p P 1 N e
0022520 w W i n d o w R e g i o n P
0022540 0 O l d W i n d o w R e g i o
0022560 n I 0 W i n d o w ) \0 310
0022600 006 \0 \0 001 021 ` 005 @ \t \0 \0 264 003 202 261 \0
0022620 274 ` \0 \0 @ \t \0 \0 X \n \0 \0 222 261 \0 254
0022640 H \t \0 \0 Y 002 001 I 002 002 002 001 k 331 330 272
0022660 I 001 I 002 002 001 k 331 330 ` \0 \0 001 ` \0 \0
0022700 002 002 001 k 331 330 363 262 030 I ` \0 \0 001 ` \0
0022720 \0 002 002 001 k 331 330 I 002 002 001 325 030 001 274 j
0022740 L 265 004 I 001 363 223 I j 030 277 j I 002 001 [
0022760 363 234 I 002 j 030 277 J K \t \0 \0 324 ] 200 M
0023000 265 \r I 002 001 I 002 002 002 001 k 331 330 ` \0 \0
0023020 002 001 ` \0 \0 002 002 002 001 k 331 330 363 262 033 I
0023040 002 ` \0 \0 002 001 ` \0 \0 002 002 002 001 k 331 330
0023060 I 002 002 002 001 325 030 277 @ I 001 H 001 325 I 002
0023100 001 H 002 001 325 032 \n \0 \0 h 020 \0 ( 3 0 4
0023120 Q R E L M O V E W 1 6 7 Q
0023140 M I N U S 3 7 Q C O P Y 2
0023160 7 Q S U B R E G I O N P 2 3
0023200 Q W I N D O W R E G I O N 6
0023220 W I N D O W P ) \r ( 2 4 4 Q
0023240 W H O L E D I S P L A Y 2 3 7
0023260 Q W H O L E D I S P L A Y 2
0023300 2 0 Q W H O L E D I S P L A Y
0023320 2 1 3 Q W H O L E D I S P L
0023340 A Y 1 1 4 Q W H O L E D I S
0023360 P L A Y 1 1 0 Q W H O L E D
0023400 I S P L A Y 7 3 Q W H O L E
0023420 D I S P L A Y 6 7 Q W H O L
0023440 E D I S P L A Y 1 7 Q W H O
0023460 L E D I S P L A Y ) \r ( ) \r N C
0023500 . N o t D a u g h t e r P D 1
0023520 \r ( P 5 C a r d P 3 D
0023540 e s t i n a t i o n C a r d P
0023560 2 L i n k P 0 T o L i
0023600 n k s I 3 C h e c k e d C
0023620 a r d L i s t I 2 L i n k
0023640 P r e d i c a t e I 1 C a
0023660 n d i d a t e C a r d I 0
0023700 S t a r t C a r d ) \0 ^ 006 \0 \0
0023720 004 021 020 \0 B 245 g \0 \0 b 004 277 @ \t \0 \0
0023740 X @ C 032 b 006 H 021 ! 003 I 003 265 004 i 020
0023760 001 Z 006 \0 \0 311 004 273 C 021 021 005 L 003 265 034
0024000 i 022 262 ' J k B 017 016 262 A K 360 250 K
0024020 A B C \f \0 \0 263 023 h 020 001 ] K \n \0 \0
0024040 222 h 260 337 L 002 \ 260 326 I 002 Y 260 277 \0 (
0024060 1 1 6 Q N C . S a m e C a r d
0024100 P 1 0 4 Q N C . N o t D a u
0024120 g h t e r P 1 6 Q N C . R e
0024140 t r i e v e T o L i n k s ) \r (
0024160 4 3 Q L i n k 7 T R U E )
0024200 \r ( ) \r N C . M a r k e r M a t
0024220 c h e s C a r d P D 1 \r ( I
0024240 1 C a r d I 0 M a r k e
0024260 r I m a g e O b j e c t ) \0 !
0024300 \0 \0 \0 002 @ \t \0 \0 264 033 @ g \0 \0 \n \0
0024320 \0 A i \n \0 \0 224 o \0 \0 \0 203 o \0 \0 \0
0024340 \n \0 \0 020 \0 ( 3 6 Q S T R E Q U
0024360 A L 2 1 Q N C . F i l e B o
0024400 x P 1 4 Q I M A G E O B J P
0024420 R O P 3 N C . P l a c e M a
0024440 r k e r P ) \r ( 1 1 Q O B J E
0024460 C T D A T U M ) \r ( 3 3 Q "
0024500 N o t e C a r d s " 2 6 Q
0024520 " F i l e B o x e s " ) \r N C
0024540 . P l a c e M a r k e r P D 1
0024560 \r ( I 0 I m a g e O b j e c
0024600 t ) \0 017 \0 \0 \0 001 @ d 231 g \0 \0 \n
0024620 \0 \0 g \0 \0 360 020 \0 ( 1 0 Q I M A
0024640 G E O B J P R O P ) \r ( 1 3 Q
0024660 N C . P l a c e M a r k e r P u
0024700 t F n 5 P U T F N ) \r ( ) \r
0024720 N C . R e p o r t E r r o r D
0024740 1 \r ( I 1 M s g I 0 F
0024760 r o m F u n c t i o n F 0
0025000 H E L P F L A G ) \0 4 \0 001 \0 002
0025020 P 264 1 ` \0 \0 262 032 ` \0 \0 \t \0 \0 \b \0
0025040 \0 o \0 \0 \0 \t \0 \0 A \t \0 \0 \b \0 \0 020
0025060 i d @ \t \0 \0 h d A h 032 l 006 g \0 \0
0025100 017 016 020 \0 ( 4 5 Q M K A T O M
0025120 3 6 Q E R R O R ! 3 3 Q P
0025140 R O M P T P R I N T 2 7 Q P
0025160 R O M P T P R I N T 2 0 Q C
0025200 L R P R O M P T 1 5 Q F L A
0025220 S H W ) \r ( 5 7 Q B R E A K 1
0025240 1 2 Q P R O M P T W I N D O
0025260 W 5 \ N C . N o B r e a k I
0025300 n R e p o r t E r r o r ) \r (
0025320 2 4 Q " N o t e C a r d s E
0025340 r r o r " ) \r N C . P r i n t M
0025360 s g A 0 0 0 1 D 1 \r ( N A M E
0025400 E R R O R S E T L ( 0 N
0025420 I L ) P 1 M s g F 5
0025440 P r o m p t W i n F 6 R E
0025460 S E T V A R S L S T F 7 N
0025500 o t e C a r d W i n F l g F
0025520 1 0 Q R E S E T Y F 1 1 Q
0025540 M s g s ) \0 } 005 005 002 \0 W 016 263
0025560 023 g \0 \0 U \t \0 \0 h 032 032 h 032 V 032 c
0025600 \f 277 g \0 \0 ` \0 \0 U \n \0 \0 U h 032 032
0025620 032 h h 032 032 V 032 c \f 277 g \0 \0 l 002 \n
0025640 \0 \0 224 U \t \0 \0 277 n 003 350 U \n \0 \0 277
0025660 U 245 i d \n \0 \0 277 W 022 l 003 021 2 004 I
0025700 H 363 263 ! g \0 \0 I \n \0 \0 U \n \0 \0 274
0025720 K 265 \r L h 032 [ 272 I k 324 Y 260 344 L &
0025740 273 260 367 J 022 c 020 i 020 \0 ( 1 4 1 Q
0025760 P R I N 1 1 3 5 Q A R G 1
0026000 1 1 Q B R E A K 1 1 0 1 Q
0026020 L I N E L E N G T H 7 1 Q C
0026040 L E A R W 6 4 Q A R G 3 6
0026060 Q D S P F O N T 1 2 Q T T
0026100 Y D I S P L A Y S T R E A M ) \r
0026120 ( 1 3 1 Q M s g s 5 7 Q M
0026140 s g s 3 2 Q N C . P r i n t
0026160 M s g F o n t 2 7 Q D S P F
0026200 O N T 6 T T Y D I S P L A Y
0026220 S T R E A M ) \r ( ) \r N C . P r
0026240 i n t M s g D 1 \r ( P 2 4 Q
0026260 R E S E T Z P 2 3 Q R E
0026300 S E T Y P 2 2 Q L I S P X
0026320 H I S T P 2 1 Q C h a r
0026340 P 1 5 Q O r i g i n a l S t
0026360 r i n g P 1 4 Q C o p y S
0026400 t r i n g P 1 3 Q L a s t
0026420 C R P 1 2 Q C t r P 1
0026440 0 Q L a s t N o t C R P 7
0026460 M s g P 5 M a x W i d t
0026500 h P 4 W i n d o w P 3
0026520 C a c h e d S t r e a m P
0026540 2 P r o m p t W i n P 1
0026560 N o t e C a r d W i n F l g P
0026600 0 M s g s F 2 5 Q L I
0026620 S P X H I S T F 2 6 Q R E
0026640 S E T V A R S L S T ) 001 231 025 002
0026660 002 \0 e 021 001 \0 021 P 005 @ \ g \0 \0 H l
0026700 003 L 264 \r A 247 L g \0 \0 \n \0 \0 200 h 021
0026720 023 \t O 016 N 363 222 261 \0 312 O 022 O 016 a o
0026740 \0 \0 \0 \n \0 \0 225 j h 032 261 \0 250 k j O
0026760 016 a k \n \0 \0 O 016 a k \n \0 \0 021 D 021
0027000 O 030 \t \0 \0 _ " 265 2 O 024 O 026 \n \0 \0
0027020 263 { O 020 265 003 j O 032 O 026 k 330 O 024 k
0027040 331 \v \0 \0 265 006 o \0 \0 \0 ` \0 \0 \n \0 \0
0027060 324 O 034 032 _ 034 001 260 U l \r \t \0 \0 360 262
0027100 : O 020 265 003 j O 032 O 026 k 330 O 024 k 331
0027120 \v \0 \0 265 006 o \0 \0 \0 ` \0 \0 \n \0 \0 324
0027140 O 024 _ 026 277 j _ 020 277 _ 277 O 036 265 025
0027160 O h 032 _ 036 _ 034 277 O 024 k 324 _ 024 277
0027200 261 377 200 O & _ 036 277 260 360 h _ 020 277 O
0027220 034 022 \n \0 \0 _ 022 277 O 016 k 324 _ 016 261 377
0027240 6 L 265 # O 022 022 265 003 j \n \0 \0 ] H l
0027260 002 361 242 261 \0 225 L \t \0 \0 271 L \t \0 \0 257
0027300 ` \0 \0 260 032 g \0 \0 O 020 \v \0 \0 277 260 326
0027320 I 231 L h d d i \r 005 \0 \0 200 L Z 264 020
0027340 A 232 J g \0 \0 n 001 , \v \0 \0 277 J g \0
0027360 \0 M J g \0 \0 \n \0 \0 265 005 n 001 , \n \0
0027400 \0 ] \v \0 \0 277 I 262 036 L J \t \0 \0 233 M
0027420 J g \0 \0 \n \0 \0 \n \0 \0 200 M \n \0 \0 272
0027440 L \t \0 \0 277 W * 021 ! 024 W , o \0 \0 \0
0027460 g \0 \0 \n \0 \0 221 h 202 g \0 \0 _ ( \n \0
0027500 \0 277 O ( 222 \b \0 \0 J 020 \0 ( 6 2 5 Q
0027520 E R R O R ! 6 1 6 Q R E S
0027540 E T R E S T O R E 6 0 3 Q N
0027560 C . P r i n t M s g A 0 0 0 1
0027600 5 6 1 Q N C . M o v e W i n d
0027620 o w O n t o S c r e e n 5 5 4
0027640 Q N C . A t t a c h P r o m p
0027660 t W i n d o w 5 4 7 Q M A X
0027700 5 4 4 Q G E T W I N D O W P
0027720 R O P 5 3 3 Q O P E N W P
0027740 5 2 2 Q P U T W I N D O W P R
0027760 O P 5 1 6 Q M A X 5 0 6 Q
0030000 G E T W I N D O W U S E R P R
0030020 O P 4 7 1 Q P U T W I N D O
0030040 W P R O P 4 5 0 Q N C . A t
0030060 t a c h P r o m p t W i n d o w
0030100 4 3 2 Q P U T W I N D O W P
0030120 R O P 4 1 4 Q W I N D O W P
0030140 4 0 7 Q N C . N o t e C a r
0030160 d s W i n d o w P 3 7 2 Q A
0030200 P P L Y 3 4 2 Q \ N C O N C
0030220 2 2 5 4 Q S T R I N G W I D
0030240 T H 2 4 0 Q S U B S T R I N
0030260 G 2 1 3 Q C H A R A C T E R
0030300 1 7 5 Q S T R I N G W I D T
0030320 H 1 6 1 Q S U B S T R I N G
0030340 1 3 5 Q E Q P 1 2 2 Q G
0030360 N C 1 1 2 Q S U B S T R I N
0030400 G 1 0 3 Q S U B S T R I N G
0030420 6 3 Q S T R E Q U A L 3 2
0030440 Q G E T W I N D O W U S E R P
0030460 R O P ) \r ( 6 1 1 Q E R R O R
0030500 6 0 0 Q I N T E R N A L 5
0030520 4 1 Q W I D T H 5 0 3 Q O
0030540 l d M a x W i d t h 4 7 6 Q
0030560 O l d M a x W i d t h 4 6 3 Q
0030600 O l d M a x W i d t h 4 2 5
0030620 Q P r o m p t W i n d o w L a
0030640 s t N o t C R 4 2 0 Q P R O
0030660 M P T W I N D O W 2 5 1 Q N
0030700 C . P r i n t M s g F o n t 1
0030720 7 2 Q N C . P r i n t M s g F
0030740 o n t 2 7 Q P r o m p t W i
0030760 n d o w L a s t N o t C R 1 3
0031000 Q M A X ) \r ( 5 7 5 Q ( N
0031020 C . P r i n t M s g A 0 0 0 1 )
0031040 2 4 6 Q " " 1 6 7 Q " "
0031060 6 0 Q " " ) \r D F I R S T R
0031100 E M O V E D 1 \r ( L ( 1 L
0031120 0 X ) ) \0 % 002 \0 \0 002 A 021 021
0031140 001 H 271 @ A 001 360 222 A 002 020 I 003 264 016 @
0031160 I 002 001 360 226 I d 002 002 031 A 020 I 002 Y 260
0031200 355 \0 N I L \r N I L \r ( ) \r N C .
0031220 H o l d T T Y P r o c e s s D
0031240 1 \r N I L \0 022 \0 \0 \0 \0 o \0 \0 \0
0031260 g \0 \0 g \0 \0 \v \0 \0 \t \0 \0 020 \0 ( 1
0031300 7 Q T T Y . P R O C E S S 1
0031320 4 Q A D D . P R O C E S S ) \r
0031340 ( 1 1 Q T t y H o l d e r 6
0031360 N A M E ) \r ( 3 ( P R O G
0031400 N ( W A I T . F O R . T T Y )
0031420 ( w h i l e ( T T Y . P R O
0031440 C E S S P ) d o ( B L O C K
0031460 ) ) ) ) \r N C . G e t S h r u n
0031500 k e n W i n D 1 \r ( P 0 W
0031520 i n d o w I 0 C a r d O r
0031540 W i n d o w ) \0 % 001 \0 \0 001 @ \t
0031560 \0 \0 265 \f @ \t \0 \0 264 006 @ \t \0 \0 021 001
0031600 \0 H \t \0 \0 264 \f H g \0 \0 \n \0 \0 \t \0
0031620 \0 020 \0 ( 4 2 Q O P E N W P 3
0031640 7 Q G E T W I N D O W U S E R
0031660 P R O P 2 6 Q W I N D O W P
0031700 1 7 Q N C . F e t c h W i n
0031720 d o w 1 1 Q N C . C a r d P
0031740 3 W I N D O W P ) \r ( 3 4 Q
0031760 I C O N W I N D O W ) \r ( ) \r
0032000 N C . C o e r c e T o N o t e F
0032020 i l e S t r e a m D 1 \r ( P
0032040 0 \ N F I 0 C a r d O r
0032060 N o t e F i l e O r S t r e a m
0032100 ) \0 > 002 \0 \0 001 @ \t \0 \0 265 8 @ d
0032120 004 ` \0 \0 360 263 * 004 ` \0 \0 360 264 ( @ 006
0032140 \0 \0 311 002 021 021 001 H d 004 ` \0 \0 360 256 264
0032160 017 @ 006 \0 \0 H \t \0 \0 Y 024 002 277 I 022 006
0032200 \0 \0 311 002 020 \0 ( 6 0 Q N C . N o
0032220 t e F i l e F r o m N o t e F i
0032240 l e U I D 3 S T R E A M P )
0032260 \r ( 7 1 Q N o t e F i l e 5
0032300 4 Q C a r d O b j e c t 4 4
0032320 Q 004 003 N o t e F i l e T Y P E
0032340 # 3 1 Q C a r d O b j e c t
0032360 2 2 Q 004 003 C a r d O b j e c
0032400 t T Y P E # 1 3 Q 004 003 N o t
0032420 e F i l e T Y P E # ) \r ( ) \r N
0032440 C . D r a w I n n e r B o x D
0032460 1 \r ( P 1 4 Q I n n e r T o
0032500 p P 1 3 Q I n n e r R i g
0032520 h t P 1 2 Q I n n e r B o
0032540 t t o m P 1 1 Q C e n t e
0032560 r T o p P 1 0 Q C e n t e
0032600 r R i g h t P 7 C e n t e
0032620 r B o t t o m P 6 C e n t
0032640 e r L e f t P 5 T o p P
0032660 4 R i g h t P 3 O f f
0032700 s e t P 2 H a l f B o r d
0032720 e r W i d t h P 1 T r u e
0032740 H e i g h t P 0 T r u e W
0032760 i d t h I 1 1 Q S c a l e
0033000 d I c o n H e i g h t I 1 0
0033020 Q S c a l e d I c o n W i d t
0033040 h I 7 S k i p L e f t E d
0033060 g e F l g I 6 I m a g e S
0033100 t r e a m I 5 O p e r a t
0033120 i o n I 4 L i n e W i d t
0033140 h I 3 H e i g h t I 2
0033160 W i d t h I 1 B o t t o
0033200 m I 0 L e f t ) 001 002 \r \0
0033220 \0 \n B j 363 264 003 202 261 \0 372 C j 363 264 003
0033240 202 261 \0 361 B k 331 C k 331 D o \0 \0 \0 326
0033260 j 330 D k 345 j 360 222 m 377 200 j 021 $ 005 @
0033300 H 324 \ A I 324 ] @ J K 324 324 A J 324 L
0033320 J 325 M J 325 A D 324 L D 325 M D 325 021 \a
0033340 \f D k 345 j 360 226 O 016 k 331 _ 016 277 G 016
0033360 262 l G 020 262 > @ O 016 L O 016 D E F \r
0033400 \a \0 \0 O 020 O 024 O 020 M D E F \r \a \0
0033420 \0 O 026 O 022 @ G 020 324 O 022 D E F \r \a
0033440 \0 \0 N M G 022 325 N O 024 D E F \r \a \0
0033460 \0 020 @ O 016 L O 016 D E F \r \a \0 \0 O
0033500 020 O 024 O 020 M D E F \r \a \0 \0 O 026 O
0033520 022 @ O 022 D E F \r \a \0 \0 020 @ O 016 L
0033540 O 016 D E F \r \a \0 \0 O 020 O 024 O 020 M
0033560 D E F \r \a \0 \0 O 026 O 022 @ O 022 D E
0033600 F \r \a \0 \0 N O 030 N O 024 D E F \r \a
0033620 \0 \0 020 \0 ( 3 7 7 Q D R A W L I
0033640 N E 3 6 2 Q D R A W L I N E
0033660 3 4 4 Q D R A W L I N E 3
0033700 2 6 Q D R A W L I N E 3 1 0
0033720 Q D R A W L I N E 2 7 2 Q
0033740 D R A W L I N E 2 5 4 Q D R
0033760 A W L I N E 2 3 6 Q D R A W
0034000 L I N E 2 1 7 Q D R A W L I
0034020 N E 1 7 6 Q D R A W L I N E
0034040 1 6 0 Q D R A W L I N E ) \r
0034060 N I L \r ( 3 4 Q . 5 ) \r N C
0034100 . U n i o n L i s t s O f L i n
0034120 k s D 1 \r ( P 6 L i n k 2
0034140 P 4 L i n k 1 I 1 L
0034160 i n k s L i s t 2 I 0 L i
0034200 n k s L i s t 1 ) \0 V \a \0 \0 002
0034220 A \t \0 \0 @ \t \0 \0 363 227 A @ b 002 277 b
0034240 \0 277 A @ 021 A 004 H 003 265 \b I 022 \n \0 \0
0034260 020 001 274 A 021 021 006 M 003 265 024 h 022 251 L 273
0034300 J 265 037 K h 032 Z 271 H 002 X 260 335 001 276 L
0034320 N \n \0 \0 225 N 265 346 i 260 343 M 002 ] 260 332
0034340 K & 272 260 345 \0 ( 1 0 3 Q N C . S
0034360 a m e L i n k P 3 7 Q \ A P
0034400 P E N D 2 7 L E N G T H 3
0034420 L E N G T H ) \r N I L \r ( ) \r
0034440 N C . P a r s e S t r i n g D
0034460 1 \r ( P 4 S t r i n g L i s
0034500 t P 3 S u b S t r i n g
0034520 P 2 C h a r s P t r P 1
0034540 S p a c e s P t r P 0 S
0034560 t r i n g L e n g t h I 0
0034600 S t r i n g ) \0 o 005 \0 \0 001 @ 005
0034620 \a 262 i 021 P 004 @ \t \0 \0 X k Y d Z d
0034640 H 361 263 S @ I \n \0 \0 g \0 \0 360 226 I d
0034660 H 361 262 : 277 @ J I k 331 \v \0 \0 [ 265 )
0034700 I 272 @ J \n \0 \0 g \0 \0 360 246 J d H 361
0034720 262 ! 277 @ I J k 331 \v \0 \0 [ 265 006 J Y
0034740 260 300 L 032 274 260 371 L 032 274 260 326 k 330 271 260
0034760 265 k 330 260 316 L \t \0 \0 020 @ 020 \0 ( 1 5
0035000 2 Q R E V E R S E 1 1 4 Q
0035020 S U B S T R I N G 7 0 Q N T
0035040 H C H A R 5 6 Q S U B S T R
0035060 I N G 3 2 Q N T H C H A R
0035100 1 3 Q N C H A R S ) \r ( 7 3 Q
0035120 % 3 5 Q % ) \r ( ) \r N
0035140 C . A p p e n d S t r i n g T o
0035160 S t r e a m D 1 \r ( I 2 B
0035200 o l d F l g I 1 S t r i n
0035220 g I 0 S t r e a m ) \0 0
0035240 \0 \0 \0 003 @ A @ \t \0 \0 006 \0 \0 311 002 k
0035260 330 @ \t \0 \0 006 \0 \0 311 F g \0 \0 ' g \0
0035300 \0 B 223 g \0 \0 202 g \0 \0 \v \0 \0 i \r 005
0035320 \0 \0 020 \0 ( 5 5 Q T E D I T . I
0035340 N S E R T 5 0 Q F O N T C O
0035360 P Y 2 0 Q T E X T O B J 5
0035400 T E X T O B J ) \r ( 4 5 Q M
0035420 R R 4 1 Q B R R 3 4 Q F
0035440 A C E 3 0 Q F O N T 2 3 Q
0035460 T E X T O B J 1 0 Q T E X
0035500 T O B J ) \r ( ) \r N C . C o e r
0035520 c e T o I n t e r e s t e d W i
0035540 n d o w D 1 \r ( P 3 \ N F
0035560 P 1 N o t e F i l e P
0035600 0 C a r d I 0 W i n O r
0035620 C a r d O r N o t e F i l e )
0035640 \0 q 004 \0 \0 001 021 0 002 @ \t \0 \0 221 @ 020
0035660 @ d 004 ` \0 \0 360 230 \t \0 \0 \t \0 \0 265 W
0035700 @ \t \0 \0 245 @ \t \0 \0 262 024 @ \t \0 \0 X
0035720 \t \0 \0 230 H \t \0 \0 \t \0 \0 265 : H \t \0
0035740 \0 262 . H 006 \0 \0 311 002 021 001 003 K d 004 `
0035760 \0 \0 360 256 264 017 H 006 \0 \0 K \t \0 \0 Z 024
0036000 002 277 J 022 Y 230 I \t \0 \0 \t \0 \0 265 \b `
0036020 \0 \0 \t \0 \0 020 \0 ( 1 5 6 Q O P E
0036040 N W P 1 4 6 Q O P E N W P
0036060 1 4 3 Q N C P . N o t e F i l
0036100 e I c o n W i n d o w 1 2 7 Q
0036120 N C . N o t e F i l e F r o m
0036140 N o t e F i l e U I D 7 2 Q
0036160 N C . C a r d P 6 4 Q O P E
0036200 N W P 6 1 Q N C . F e t c h
0036220 W i n d o w 5 4 Q N C . C a
0036240 r d P 5 0 Q N C . C o e r c
0036260 e T o C a r d 4 2 Q T E X T
0036300 S T R E A M P 3 5 Q N C . C
0036320 a r d P 2 7 Q O P E N W P
0036340 2 4 Q N C P . N o t e F i l e
0036360 I c o n W i n d o w 6 O P E
0036400 N W P ) \r ( 1 5 3 Q N C . N o
0036420 t e C a r d s I c o n W i n d o
0036440 w 1 2 3 Q C a r d O b j e c
0036460 t 1 1 3 Q 004 003 N o t e F i l
0036500 e T Y P E # 1 0 0 Q C a r d
0036520 O b j e c t 1 7 Q 004 003 N o t
0036540 e F i l e T Y P E # ) \r ( ) \r (
0036560 P R E T T Y C O M P R I N T N
0036600 C U T I L I T I E S C O M S ) \r
0036620 ( R P A Q Q N C U T I L I T I
0036640 E S C O M S ( ( * * U T I
0036660 L I T I E S ) ( G L O B A L V
0036700 A R S W H O L E D I S P L A Y
0036720 N C . O f f S c r e e n P o s
0036740 i t i o n \r \ N C . N o B r e
0036760 a k I n R e p o r t E r r o r )
0037000 ( V A R S ( \ N C . N o B r
0037020 e a k I n R e p o r t E r r o r
0037040 ) ( N C . O f f S c r e e n P
0037060 o s i t i o n ( Q U O T E (
0037100 1 5 0 0 . 1 5 0 0 ) ) \r ) )
0037120 ( * * C o e r c i n g f
0037140 u n c t i o n s ) ( F N S N
0037160 C . C o e r c e T o C a r d N
0037200 C . C a r d F r o m W i n d o w
0037220 ) ( * * A u t o l o a d
0037240 e r ) ( R E C O R D S \r A u
0037260 t o l o a d F n E n t r y ) (
0037300 G L O B A L V A R S N C . A u
0037320 t o l o a d a b l e F n s T a b
0037340 l e N C . A u t o l o a d F n
0037360 T a b l e S i z e ) ( V A R S
0037400 ( \r N C . A u t o l o a d F n
0037420 T a b l e S i z e 2 0 0 ) (
0037440 N C . A u t o l o a d a b l e F
0037460 n s T a b l e ( H A S H A R R
0037500 A Y N C . A u t o l o a d F n
0037520 T a b l e S i z e ) ) ) ( F N
0037540 S \r N C . L o o k u p A u t o
0037560 l o a d F n F i l e N C . S t
0037600 o r e A u t o l o a d F n F i l
0037620 e N C . L o a d F i l e F r o
0037640 m D i r e c t o r i e s ) ( M
0037660 A C R O S \r N C . A c t i v a
0037700 t e C a r d A n d D o N C . A
0037720 u t o l o a d A p p l y N C .
0037740 A u t o l o a d A p p l y * )
0037760 ( P ( N C . S t o r e A u t o
0040000 l o a d F n F i l e ( F U N C
0040020 T I O N \r N C . C o n v e r t
0040040 N o t e F i l e V e r s i o n 2
0040060 T o 3 ) ( Q U O T E N C C O
0040100 N V E R T V E R S I O N 2 T O 3
0040120 ) ( Q U O T E N O T E C A R
0040140 D S D I R E C T O R I E S ) ) )
0040160 ( * * \r S h o r t h a n d
0040200 w i n d o w f n s ) ( F N
0040220 S W W F L A S H W ) ( *
0040240 * O t h e r s t u f f ) (
0040260 G L O B A L V A R S N C . P r
0040300 i n t M s g F o n t ) ( I N I
0040320 T V A R S ( \r N C . P r i n t
0040340 M s g F o n t ( F O N T C R E
0040360 A T E ( Q U O T E H E L V E
0040400 T I C A ) 1 0 ) ) ) ( M A C
0040420 R O S N C . W i t h T o p W i
0040440 n d o w s U n a t t a c h e d )
0040460 ( M A C R O S \r A B O R T .
0040500 P R O T E C T N A M E D - R E
0040520 S E T L S T N A M E D - R E S
0040540 E T S A V E N A M E D - R E S
0040560 E T U N S A V E ) ( F N S N
0040600 A M E D - R E S E T L S T N A
0040620 M E D - R E S E T S A V E \r N
0040640 A M E D - R E S E T R E S T O R
0040660 E N A M E D - R E S E T U N S
0040700 A V E ) ( F N S T E D I T .
0040720 L I S T . O F . O B J E C T S
0040740 W I N D O W . F R O M . T E D I
0040760 T . T H I N G \r W I N D O W .
0041000 O F . T E X T S T R E A M N C
0041020 . A s k Y e s O r N o N C . Y
0041040 e s P F I L D I R - E A R L I
0041060 E S T F I L D I R - V E R S I
0041100 O N G E T M O U S E X G E T
0041120 M O U S E Y \r L O W E R L E F
0041140 T M B U T T O N . N E X T . F
0041160 I E L D . A S . T E X T . O R .
0041200 I M A G E O B J N C . A s k U
0041220 s e r N C . A s k U s e r R e
0041240 s e t W i n d o w N C . C l e
0041260 a r M s g \r N C . G r e y C a
0041300 r d N C . I D F r o m N u m b
0041320 e r N C . M o v e W i n d o w
0041340 O n t o S c r e e n N C . N o
0041360 t D a u g h t e r P N C . M a
0041400 r k e r M a t c h e s C a r d P
0041420 \r N C . P l a c e M a r k e r
0041440 P N C . R e p o r t E r r o r
0041460 N C . P r i n t M s g D F I
0041500 R S T R E M O V E N C . H o l
0041520 d T T Y P r o c e s s N C . G
0041540 e t S h r u n k e n W i n \r N
0041560 C . C o e r c e T o N o t e F i
0041600 l e S t r e a m N C . D r a w
0041620 I n n e r B o x N C . U n i o
0041640 n L i s t s O f L i n k s N C
0041660 . P a r s e S t r i n g N C .
0041700 A p p e n d S t r i n g T o S t
0041720 r e a m \r N C . C o e r c e T
0041740 o I n t e r e s t e d W i n d o
0041760 w ) ( D E C L A R E : D O N
0042000 T E V A L @ L O A D D O E V A
0042020 L @ C O M P I L E D O N T C O
0042040 P Y C O M P I L E R V A R S
0042060 ( A D D V A R S ( \r N L A M A
0042100 N A M E D - R E S E T S A V E
0042120 N A M E D - R E S E T L S T )
0042140 ( N L A M L N A M E D - R E
0042160 S E T U N S A V E ) ( L A M A
0042200 N C . P r i n t M s g ) ) ) )
0042220 ) \r ( R P A Q Q \ N C . N o B
0042240 r e a k I n R e p o r t E r r o
0042260 r N I L ) \r ( R P A Q Q N C
0042300 . O f f S c r e e n P o s i t i
0042320 o n ( 1 5 0 0 . 1 5 0 0 )
0042340 ) \r ( D A T A T Y P E A u t o
0042360 l o a d F n E n t r y ( F i l
0042400 e N a m e D i r e c t o r i e
0042420 s ) ) \r ( / D E C L A R E D A T
0042440 A T Y P E ( Q U O T E A u t
0042460 o l o a d F n E n t r y ) ( Q
0042500 U O T E ( P O I N T E R P O
0042520 I N T E R ) ) ( Q U O T E (
0042540 ( A u t o l o a d F n E n t r y
0042560 0 P O I N T E R \r ) ( A u
0042600 t o l o a d F n E n t r y 2
0042620 P O I N T E R ) ) ) ( Q U O T
0042640 E 4 ) ) \r ( R P A Q Q N C .
0042660 A u t o l o a d F n T a b l e S
0042700 i z e 2 0 0 ) \r ( R P A Q N
0042720 C . A u t o l o a d a b l e F n
0042740 s T a b l e ( H A S H A R R A
0042760 Y N C . A u t o l o a d F n T
0043000 a b l e S i z e ) ) \r ( D E F M
0043020 A C R O N C . A c t i v a t e
0043040 C a r d A n d D o ( C a r d
0043060 & R E S T F o r m s ) ( *
0043100 * r h t 1 0 / 1 5 / 8 6 :
0043120 T h i s w r i t t e n b y
0043140 M a r k M . I c h a n g e d
0043160 \r s l i g h t l y s o a s
0043200 t o a c c e p t a l i s
0043220 t o f F o r m s r a t h e
0043240 r t h a n a s i n g l e t
0043260 o n . ) ( * * r h t & p m
0043300 i 1 1 / 2 4 : C h a n g e d
0043320 n a m e o f \r l o c a l v
0043340 a r . ) ( B Q U O T E ( L E
0043360 T ( ( $ $ A c t i v e F l g $
0043400 $ ( N C . A c t i v e C a r d
0043420 P , C a r d ) ) ) ( O R
0043440 $ $ A c t i v e F l g $ $ ( N
0043460 C . G e t N o t e C a r d , \r
0043500 C a r d ) ) ( P R O G 1 (
0043520 P R O G N , @ F o r m s )
0043540 ( O R $ $ A c t i v e F l g $
0043560 $ ( N C . D e a c t i v a t e
0043600 C a r d , C a r d ) ) ) ) )
0043620 ) \r ( D E F M A C R O N C . A
0043640 u t o l o a d A p p l y ( F n
0043660 A r g s ) ( * * L i k e
0043700 N C . A u t o l o a d A p p l
0043720 y * e x c e p t t a k e s
0043740 s i n g l e A r g s a r g u
0043760 m e n t \r r a t h e r t h a
0044000 n s p r e a d . ) ( B Q U O
0044020 T E ( i f ( G E T D , F
0044040 n ) t h e n ( A P P L Y ,
0044060 F n , A r g s ) e l s e
0044100 ( L E T ( ( A u t o l o a d
0044120 F n E n t r y ( \r N C . L o o
0044140 k u p A u t o l o a d F n F i l
0044160 e , F n ) ) F i l e N a m
0044200 e ) ( i f A u t o l o a d F
0044220 n E n t r y t h e n ( N C .
0044240 L o a d F i l e F r o m D i r e
0044260 c t o r i e s ( S E T Q \r F
0044300 i l e N a m e ( f e t c h (
0044320 A u t o l o a d F n E n t r y
0044340 F i l e N a m e ) o f A u t
0044360 o l o a d F n E n t r y ) ) (
0044400 f e t c h ( A u t o l o a d F
0044420 n E n t r y D i r e c t o r i
0044440 e s ) \r o f A u t o l o a d
0044460 F n E n t r y ) ) ( i f ( G
0044500 E T D , F n ) t h e n (
0044520 A P P L Y , F n , A r g
0044540 s ) e l s e ( N C . R e p o
0044560 r t E r r o r " N C . A u t o
0044600 l o a d A p p l y " \r ( C O N
0044620 C A T " L o a d e d f i l e
0044640 " F i l e N a m e " , b
0044660 u t s t i l l n o d e f i
0044700 n i t i o n o f " , F n
0044720 ) ) ) e l s e ( N C . R e p
0044740 o r t E r r o r \r " N C . A u
0044760 t o l o a d A p p l y " ( C O
0045000 N C A T " N o d e f i n i t
0045020 i o n o f " , F n "
0045040 i n t a b l e o f a u t o
0045060 l o a d a b l e f u n c t i o
0045100 n s . " ) ) ) ) ) ) ) \r ( D E F
0045120 M A C R O N C . A u t o l o a
0045140 d A p p l y * ( F n & R E S
0045160 T a r g s ) ( * * F i r
0045200 s t a r g i s n a m e o
0045220 f f u n c t i o n t o a p
0045240 p l y . R e s t a r e \r a
0045260 r g s . T h e f n n a m e
0045300 s h o u l d b e i n t h
0045320 e g l o b a l t a b l e w
0045340 i t h a n a c c o m p a n y
0045360 i n g f i l e t o a u t o
0045400 l o a d f r o m . ) ( B Q U
0045420 O T E ( \r i f ( G E T D ,
0045440 F n ) t h e n ( A P P L Y
0045460 * , F n , @ a r g s )
0045500 e l s e ( L E T ( ( A u t o
0045520 l o a d F n E n t r y ( N C .
0045540 L o o k u p A u t o l o a d F n
0045560 F i l e , F n ) ) \r F i l
0045600 e N a m e ) ( i f A u t o l
0045620 o a d F n E n t r y t h e n
0045640 ( N C . L o a d F i l e F r o m
0045660 D i r e c t o r i e s ( S E T
0045700 Q F i l e N a m e ( f e t c
0045720 h ( A u t o l o a d F n E n t
0045740 r y \r F i l e N a m e ) o f
0045760 A u t o l o a d F n E n t r y
0046000 ) ) ( f e t c h ( A u t o l
0046020 o a d F n E n t r y D i r e c
0046040 t o r i e s ) o f A u t o l
0046060 o a d F n E n t r y ) ) ( i f
0046100 ( G E T D , \r F n ) t h
0046120 e n ( A P P L Y * , F n
0046140 , @ a r g s ) e l s e ( N
0046160 C . R e p o r t E r r o r " N
0046200 C . A u t o l o a d A p p l y *
0046220 " ( C O N C A T " L o a d e
0046240 d f i l e " \r F i l e N a
0046260 m e " , b u t s t i l l
0046300 n o d e f i n i t i o n o f
0046320 " , F n ) ) ) e l s e
0046340 ( N C . R e p o r t E r r o r
0046360 " N C . A u t o l o a d A p p l
0046400 y * " ( C O N C A T \r " N o
0046420 d e f i n i t i o n o f "
0046440 , F n " i n t a b l e
0046460 o f a u t o l o a d a b l e
0046500 f u n c t i o n s . " ) ) ) )
0046520 ) ) ) \r ( N C . S t o r e A u t
0046540 o l o a d F n F i l e ( F U N
0046560 C T I O N N C . C o n v e r t
0046600 N o t e F i l e V e r s i o n 2
0046620 T o 3 ) ( Q U O T E N C C O
0046640 N V E R T V E R S I O N 2 T O 3
0046660 ) ( Q U O T E \r N O T E C A
0046700 R D S D I R E C T O R I E S ) )
0046720 \r ( R P A Q ? N C . P r i n t
0046740 M s g F o n t ( F O N T C R E
0046760 A T E ( Q U O T E H E L V E
0047000 T I C A ) 1 0 ) ) \r ( D E F M
0047020 A C R O N C . W i t h T o p W
0047040 i n d o w s U n a t t a c h e d
0047060 ( M a i n W i n d o w & B O
0047100 D Y F o r m s ) ( * * R
0047120 u n F o r m s a f t e r t
0047140 e m p o r a r i l y \r d e t a
0047160 c h i n g w i n d o w s a t
0047200 t a c h e d t o t o p o f
0047220 M a i n W i n d o w . T h i
0047240 s c o d e w a s o r i g i
0047260 n a l l y i n F r a n k ' s
0047300 \r N C . A t t a c h N o t e F
0047320 i l e N a m e f u n c t i o n
0047340 , b u t f o u n d t o b
0047360 e m o r e g e n e r a l l y
0047400 u s e f u l . ) ( B Q U O T
0047420 E ( R E S E T L S T ( R E S
0047440 E T S A V E \r N I L ( B Q U
0047460 O T E ( , ( F U N C T I O N
0047500 ( L A M B D A ( D e s c r i
0047520 p t i o n L i s t ) ( * R e
0047540 a t t a c h w i n d o w s a
0047560 c c o r d i n g t o i n f o
0047600 r m a t i o n i n a \r d e
0047620 s c r i p t i o n l i s t . )
0047640 ( f o r w i n d o w D e s c
0047660 r i p t i o n i n D e s c r
0047700 i p t i o n L i s t d o ( A
0047720 T T A C H W I N D O W ( C A R
0047740 w i n d o w D e s c r i p t i
0047760 o n ) \r , M a i n W i n d o
0050000 w ( C A A D R w i n d o w D
0050020 e s c r i p t i o n ) ( C D A
0050040 D R w i n d o w D e s c r i p
0050060 t i o n ) ) ( W I N D O W P R
0050100 O P ( C A R w i n d o w D e
0050120 s c r i p t i o n ) \r ( Q U O
0050140 T E P A S S T O M A I N C O M
0050160 S ) ( C A D D R w i n d o w
0050200 D e s c r i p t i o n ) ) ) ) )
0050220 , ( b i n d W A f o r
0050240 w i n d o w i n ( A T T A C
0050260 H E D W I N D O W S , \r M a
0050300 i n W i n d o w ) w h e n (
0050320 E Q ( Q U O T E T O P ) (
0050340 C A R ( S E T Q W A ( W I
0050360 N D O W P R O P w i n d o w
0050400 ( Q U O T E W H E R E A T T A
0050420 C H E D ) ) ) ) ) c o l l e c
0050440 t ( * \r D e t a c h a t t
0050460 a c h e d w i n d o w s a t
0050500 t h e t o p o f t h e
0050520 m a i n w i n d o w a n d
0050540 r e t u i r n a l i s t d
0050560 e s c r i b i n g t h e i r
0050600 a t t a c h m e n t . \r ) ( P
0050620 R O G 1 ( L I S T w i n d o
0050640 w W A ( W I N D O W P R O P
0050660 w i n d o w ( Q U O T E P
0050700 A S S T O M A I N C O M S ) ) )
0050720 ( D E T A C H W I N D O W w
0050740 i n d o w ) ) ) ) ) ) , @ \r
0050760 F o r m s ) ) ) \r ( D E F M A C
0051000 R O A B O R T . P R O T E C T
0051020 ( M A I N - F O R M C L E A
0051040 N U P - F O R M ) ( B Q U O T
0051060 E ( R E S E T L S T ( R E S
0051100 E T S A V E N I L ( Q U O T
0051120 E ( A N D \r R E S E T S T A
0051140 T E , C L E A N U P - F O R
0051160 M ) ) ) , M A I N - F O R M
0051200 ) ) ) \r ( P U T P R O P S N A
0051220 M E D - R E S E T L S T M A C
0051240 R O ( ( X . Y ) ( P R O
0051260 G ( R E S E T Y R E S E T Z
0051300 ( L I S P X H I S T L I S P
0051320 X H I S T ) ) ( \r N A M E D -
0051340 R E S E T R E S T O R E ( Q U
0051360 O T E X ) ( S E T Q R E S
0051400 E T Z ( C O N D ( ( X N L S
0051420 E T Q ( S E T Q R E S E T Y
0051440 ( P R O G N . Y ) ) I N
0051460 T E R N A L ) N I L ) ( T
0051500 \r ( Q U O T E E R R O R ) ) )
0051520 ) ) ( R E T U R N ( C O N D
0051540 ( R E S E T Z ( E R R O R !
0051560 ) ) ( T R E S E T Y ) ) ) )
0051600 ) ) \r ( D E F M A C R O N A M
0051620 E D - R E S E T S A V E ( R E
0051640 S E T H A N D L E & R E S T
0051660 F O R M S ) ( B Q U O T E (
0051700 L E T ( R E S E T I T E M )
0051720 ( S E T Q , R E S E T H A N
0051740 D L E ( C O N S \r ( S E T Q
0051760 R E S E T I T E M , ( C O
0052000 N D ( ( A N D ( A T O M (
0052020 C A R F O R M S ) ) ( C A R
0052040 F O R M S ) ) ( S U B P A I
0052060 R ( Q U O T E ( V A R V A
0052100 L ) ) ( C D R X ) ( \r Q U
0052120 O T E ( P R O G 1 ( C O N S
0052140 ( Q U O T E V A R ) ( C O
0052160 N S ( S T K S C A N ( Q U O
0052200 T E V A R ) ) ( E V A L (
0052220 Q U O T E V A R ) ) ) ) ( S
0052240 E T ( Q U O T E V A R ) V
0052260 A L ) ) \r ) ) ) ( ( C D R F
0052300 O R M S ) ( B Q U O T E ( L
0052320 I S T , ( C A D R F O R M
0052340 S ) , ( C A R F O R M S )
0052360 ) ) ) ( T ( B Q U O T E (
0052400 L I S T ( L I S T ( Q U O T
0052420 E , ( C O N D ( \r ( E Q
0052440 ( C A A R F O R M S ) ( Q U
0052460 O T E S E T Q ) ) ( C A R
0052500 ( C A D D A R F O R M S ) ) )
0052520 ( T ( C A A R F O R M S )
0052540 ) ) ) , ( C A R F O R M S
0052560 ) ) ) ) ) ) ) , \r R E S E T
0052600 H A N D L E ) ) R E S E T I T
0052620 E M ) ) ) \r ( D E F M A C R O
0052640 N A M E D - R E S E T U N S A V
0052660 E ( R E S E T H A N D L E I
0052700 T E M F O R M ) ( B Q U O T E
0052720 ( L E T ( ( I T E M L I S T
0052740 , I T E M F O R M ) ) ( f
0052760 o r I T E M i n \r I T E M
0053000 L I S T d o ( S E T R E S
0053020 E T H A N D L E ( D R E M O V
0053040 E I T E M , R E S E T H A
0053060 N D L E ) ) ( C O N D ( ( L
0053100 I S T P ( C A R I T E M ) )
0053120 ( S E T Q O L D V A L U E
0053140 ( \r C O N D ( ( C D R I T E
0053160 M ) ( C A D R I T E M ) )
0053200 ( T ( C A D A R I T E M ) )
0053220 ) ) ( A P P L Y ( C A A R
0053240 I T E M ) ( C D A R I T E M
0053260 ) ) ) ( T ( S E T ( C A R
0053300 I T E M ) ( \r C D R I T E
0053320 M ) ) ) ) ) ) ) ) \r ( P U T P R
0053340 O P S N C U T I L I T I E S
0053360 C O P Y R I G H T ( " X e r o
0053400 x C o r p o r a t i o n " 1
0053420 9 8 4 1 9 8 5 1 9 8 6 1 9
0053440 8 7 ) ) \r N I L \r
0053451