$ od -c -N 50000 [qv]<notecards>1.3lnext>RGPATCH084.LCOM!3
0000000 ( D E F I N E - F I L E - I N F
0000020 O 036 P A C K A G E " I L "
0000040 036 R E A D T A B L E " I N T E
0000060 R L I S P " 036 B A S E 1 0 )
0000100 \r ( F I L E C R E A T E D " 1
0000120 4 - J u n - 8 8 1 4 : 4 8 : 2
0000140 9 " ( " c o m p i l e d o n
0000160 " { Q V } < N O T E C A R D
0000200 S > 1 . 3 L N E X T > R G P A T
0000220 C H 0 8 4 . ; 3 ) \r " 2 7 - A
0000240 p r - 8 7 1 6 : 4 8 : 4 9 "
0000260 b r e c o m p i l e d c h a n
0000300 g e s % : N C . C l e a r M s
0000320 g N o w N C . C l e a r M s g
0000340 W a i t e r N C . Z a p P r o
0000360 m p t W i n d o w W a i t e r
0000400 \r N C . C l e a r M s g N C P
0000420 . C l e a r M s g i n " X e
0000440 r o x L i s p 3 1 - M a r -
0000460 8 8 . . . " d a t e d " 3
0000500 1 - M a r - 8 8 0 1 : 4 3 : 1
0000520 5 " ) \r ( F I L E C R E A T E D
0000540 " 1 4 - J u n - 8 8 1 4 : 4
0000560 7 : 0 9 " { Q V } < N O T E C
0000600 A R D S > 1 . 3 L N E X T > R G
0000620 P A T C H 0 8 4 . ; 3 8 1 2 3
0000640 c h a n g e s t o % : ( V
0000660 A R S \r R G P A T C H 0 8 4 C
0000700 O M S ) ( F N S N C P . C l
0000720 e a r M s g N C . Z a p P r o
0000740 m p t W i n d o w W a i t e r
0000760 N C . C l e a r M s g N C . C
0001000 l e a r M s g N o w \r N C . C
0001020 l e a r M s g W a i t e r ) p
0001040 r e v i o u s d a t e % : "
0001060 1 1 - J u n - 8 8 2 0 : 0 3 :
0001100 5 0 " { Q V } < N O T E C A R
0001120 D S > 1 . 3 L N E X T > R G P A
0001140 T C H 0 8 4 . ; 1 ) \r N C . C l
0001160 e a r M s g N o w : D 4 \r ( P
0001200 0 P r o m p t W i n d o w
0001220 I 1 C l o s e P r o m p t W
0001240 i n d o w F l g I 0 M a i
0001260 n W i n d o w ) \0 v 001 \0 \0 002 021
0001300 020 \0 @ \t \0 \0 262 j @ \t \0 \0 262 X @ h
0001320 d i \f \0 \0 X d \t \0 \0 224 H \t \0 \0 277
0001340 H g \0 \0 h \v \0 \0 H g \0 \0 h \v \0 \0
0001360 H g \0 \0 j \v \0 \0 @ g \0 \0 h \v \0 \0
0001400 A 264 . H g \0 \0 h \v \0 \0 @ g \0 \0 H
0001420 @ g \0 \0 \n \0 \0 026 \v \0 \0 H \t \0 \0 H
0001440 \t \0 \0 020 @ \t \0 \0 A 264 006 @ \t \0 \0 020
0001460 \b \0 \0 020 \0 ( 1 1 5 C L R P R O
0001500 M P T 1 1 1 C L O S E W 1
0001520 0 4 C L E A R W 9 9 R E M
0001540 O V E W I N D O W 9 5 F R E
0001560 E A T T A C H E D W I N D O W
0001600 9 1 W I N D O W D E L P R O P
0001620 8 7 G E T W I N D O W U S E
0001640 R P R O P 7 5 P U T W I N D
0001660 O W P R O P 6 4 P U T W I N
0001700 D O W P R O P 5 6 P U T W I
0001720 N D O W P R O P 4 8 P U T W
0001740 I N D O W P R O P 4 0 P U T
0001760 W I N D O W P R O P 3 1 C L
0002000 E A R W 2 6 O P E N W P 2
0002020 1 N C . G E T P R O M P T W I
0002040 N D O W 1 2 N C . N o t e C
0002060 a r d s W i n d o w P 6 W I
0002100 N D O W P ) \r ( 8 4 O t h e r
0002120 P r o m p t W i n d o w s 7 9
0002140 O t h e r P r o m p t W i n d
0002160 o w s 7 1 P r o m p t W i n
0002200 d o w P r o c e s s 6 0 P r
0002220 o m p t W i n d o w L a s t N o
0002240 t C R 5 2 O l d M a x W i d
0002260 t h 4 4 L a s t L i n e L e
0002300 n g t h 3 6 M a x L i n e W
0002320 i d t h ) \r ( ) \r N C . C l e a
0002340 r M s g W a i t e r A 0 0 0 1
0002360 : D 4 \r ( N A M E S I : : * U
0002400 N W I N D - P R O T E C T * I
0002420 0 S I : : * C L E A N U P -
0002440 F O R M S * F 0 W i n d o
0002460 w F 1 C l o s e P r o m p
0002500 t W i n d o w F l g ) \0 a \0 002
0002520 \0 001 ` \0 \0 h g \0 \0 \v \0 \0 P g \0 \0
0002540 \n \0 \0 \t \0 \0 263 032 ` \0 \0 P g \0 \0 \n
0002560 \0 \0 P g \0 \0 \n \0 \0 i \f \0 \0 277 260 336
0002600 P g \0 \0 g \0 \0 \v \0 \0 P g \0 \0 h \v
0002620 \0 \0 P g \0 \0 h \v \0 \0 P g \0 \0 h \v
0002640 \0 \0 P g \0 \0 h \v \0 \0 c 002 P Q \n \0
0002660 \0 020 \0 ( 9 4 N C . C l e a r M
0002700 s g N o w 8 7 P U T W I N D
0002720 O W P R O P 7 9 P U T W I N
0002740 D O W P R O P 7 1 P U T W I
0002760 N D O W P R O P 6 3 P U T W
0003000 I N D O W P R O P 5 5 W I N
0003020 D O W D E L P R O P 4 2 M O
0003040 N I T O R . A W A I T . E V E N
0003060 T 3 8 G E T W I N D O W U S
0003100 E R P R O P 3 1 G E T W I N
0003120 D O W U S E R P R O P 1 9 T
0003140 I M E R E X P I R E D ? 1 6
0003160 G E T W I N D O W U S E R P R O
0003200 P 9 O B T A I N . M O N I T
0003220 O R L O C K ) \r ( 8 3 C l o s
0003240 e P r o m p t W i n d o w F l g
0003260 7 5 C l e a r P r o m p t W
0003300 i n d o w P r o c e s s 6 7
0003320 C l e a r M s g T i m e r 5 9
0003340 C l e a r M s g E v e n t 5
0003360 2 N C . Z a p P r o m p t W i
0003400 n d o w W a i t e r 4 9 C L
0003420 O S E F N 3 5 C l e a r M s
0003440 g T i m e r 2 8 C l e a r M
0003460 s g E v e n t 2 4 N C . P r
0003500 o m p t W i n d o w M o n i t o
0003520 r L o c k 1 3 C l e a r M s
0003540 g T i m e r 6 W I T H . M O
0003560 N I T O R 2 N C . P r o m p
0003600 t W i n d o w M o n i t o r L o
0003620 c k ) \r ( ) \r N C . C l e a r M
0003640 s g W a i t e r : D 4 \r ( P
0003660 3 S I : : * R E S E T F O R M
0003700 S * P 2 S I : : * L O C K
0003720 E D - M O N I T O R * P 1
0003740 C l o s e P r o m p t W i n d o
0003760 w F l g P 0 W a k e u p T
0004000 i m e I 0 W i n d o w )
0004020 \0 025 004 \0 \0 001 021 @ 003 g \0 \0 \t \0 \0 \t
0004040 \0 \0 \b \0 \0 277 \t \0 \0 020 \0 ( 1 8 C
0004060 L : V A L U E S - L I S T 1 4
0004100 S I : : M O N I T O R - U N W
0004120 I N D 1 1 \ M V L I S T 8
0004140 N C . C l e a r M s g W a i t
0004160 e r A 0 0 0 1 ) \r ( 5 S I : :
0004200 M O N I T O R - U N W I N D ) \r
0004220 ( ) \r N C . Z a p P r o m p t W
0004240 i n d o w W a i t e r A 0 0 0 1
0004260 : D 4 \r ( N A M E S I : : *
0004300 U N W I N D - P R O T E C T *
0004320 P 0 P r o m p t W i n d o w
0004340 W a i t e r I 0 S I : : *
0004360 C L E A N U P - F O R M S * F
0004400 1 W i n d o w ) \0 * 001 001 \0
0004420 001 ` \0 \0 h g \0 \0 \v \0 \0 Q g \0 \0 \n
0004440 \0 \0 021 001 \0 Q g \0 \0 g \0 \0 \v \0 \0 H
0004460 \t \0 \0 264 006 H \t \0 \0 020 \0 ( 3 9 D
0004500 E L . P R O C E S S 3 3 P R
0004520 O C E S S P 2 9 W I N D O W
0004540 D E L P R O P 1 6 G E T W I
0004560 N D O W U S E R P R O P 9 O
0004600 B T A I N . M O N I T O R L O C
0004620 K ) \r ( 2 6 N C . Z a p P r o
0004640 m p t W i n d o w W a i t e r
0004660 2 3 C L O S E F N 1 3 C l
0004700 e a r P r o m p t W i n d o w P
0004720 r o c e s s 6 W I T H . M O
0004740 N I T O R 2 N C . P r o m p
0004760 t W i n d o w M o n i t o r L o
0005000 c k ) \r ( ) \r N C . Z a p P r o
0005020 m p t W i n d o w W a i t e r
0005040 : D 4 \r ( P 1 S I : : * R E
0005060 S E T F O R M S * P 0 S I
0005100 : : * L O C K E D - M O N I T O
0005120 R * I 0 W i n d o w ) \0
0005140 025 002 \0 \0 001 021 001 g \0 \0 \t \0 \0 \t \0
0005160 \0 \b \0 \0 277 \t \0 \0 020 \0 ( 1 8 C L
0005200 : V A L U E S - L I S T 1 4
0005220 S I : : M O N I T O R - U N W I
0005240 N D 1 1 \ M V L I S T 8
0005260 N C . Z a p P r o m p t W i n d
0005300 o w W a i t e r A 0 0 0 1 ) \r (
0005320 5 S I : : M O N I T O R - U N
0005340 W I N D ) \r ( ) \r N C . C l e a
0005360 r M s g A 0 0 0 1 : D 4 \r ( N
0005400 A M E S I : : * U N W I N D -
0005420 P R O T E C T * I 0 S I :
0005440 : * C L E A N U P - F O R M S *
0005460 F 1 M a i n W i n d o w
0005500 F 2 W a i t M s e c s F
0005520 3 C l o s e P r o m p t W i n
0005540 d o w F l g ) \0 220 001 003 \0 001 ` \0
0005560 \0 h g \0 \0 \v \0 \0 Q \t \0 \0 245 \b \0 \0
0005600 c 002 277 R 255 Q g \0 \0 \n \0 \0 245 Q S \n
0005620 \0 \0 020 Q g \0 \0 S 265 \t Q g \0 \0 \n \0
0005640 \0 \v \0 \0 R 3 020 262 $ Q g \0 \0 Q g \0
0005660 \0 \n \0 \0 021 001 \0 H 303 \0 \0 221 H 202 l 002
0005700 037 022 \t \0 \0 R 366 \v \0 \0 277 Q g \0 \0 \n
0005720 \0 \0 263 ) Q g \0 \0 d \t \0 \0 \v \0 \0 Q
0005740 g \0 \0 g \0 \0 \v \0 \0 Q g \0 \0 g \0 \0
0005760 Q h 032 032 \t \0 \0 \v \0 \0 020 h 020 \0 ( 1
0006000 3 9 P U T W I N D O W P R O P
0006020 1 3 6 A D D . P R O C E S S
0006040 1 2 2 W I N D O W A D D P R
0006060 O P 1 1 2 P U T W I N D O W
0006100 P R O P 1 0 9 C R E A T E .
0006120 E V E N T 9 9 G E T W I N D
0006140 O W U S E R P R O P 9 1 P U
0006160 T W I N D O W P R O P 8 6 \
0006200 C L O C K 0 6 9 G E T W I N
0006220 D O W U S E R P R O P 5 3 P
0006240 U T W I N D O W P R O P 5 0
0006260 G E T W I N D O W U S E R P R O
0006300 P 3 5 N C . C l e a r M s g
0006320 N o w 2 9 G E T W I N D O W
0006340 U S E R P R O P 1 7 G E T P
0006360 R O M P T W I N D O W 1 3 W
0006400 I N D O W P 9 O B T A I N .
0006420 M O N I T O R L O C K ) \r ( 1 2
0006440 9 N C . C l e a r M s g W a i
0006460 t e r 1 2 6 C l e a r P r o
0006500 m p t W i n d o w P r o c e s s
0006520 1 1 9 N C . Z a p P r o m p
0006540 t W i n d o w W a i t e r 1 1
0006560 6 C L O S E F N 1 0 5 C l
0006600 e a r M s g E v e n t 9 6 C
0006620 l e a r P r o m p t W i n d o w
0006640 P r o c e s s 7 6 F I X P
0006660 6 6 C l e a r M s g T i m e r
0006700 6 2 C l e a r M s g T i m e
0006720 r 4 7 C l o s e P r o m p t
0006740 W i n d o w F l g 4 0 C l o
0006760 s e P r o m p t W i n d o w F l
0007000 g 2 6 C l e a r P r o m p t
0007020 W i n d o w P r o c e s s 6
0007040 W I T H . M O N I T O R 2 N
0007060 C . P r o m p t W i n d o w M o
0007100 n i t o r L o c k ) \r ( ) \r N C
0007120 . C l e a r M s g : D 4 \r ( P
0007140 1 S I : : * R E S E T F O R
0007160 M S * P 0 S I : : * L O C
0007200 K E D - M O N I T O R * I 2
0007220 W a i t M s e c s I 1 C
0007240 l o s e P r o m p t W i n d o w
0007260 F l g I 0 M a i n W i n d
0007300 o w ) \0 025 002 \0 \0 003 021 001 g \0 \0
0007320 \t \0 \0 \t \0 \0 \b \0 \0 277 \t \0 \0 020 \0 (
0007340 1 8 C L : V A L U E S - L I S
0007360 T 1 4 S I : : M O N I T O R
0007400 - U N W I N D 1 1 \ M V L I
0007420 S T 8 N C . C l e a r M s g
0007440 A 0 0 0 1 ) \r ( 5 S I : : M O
0007460 N I T O R - U N W I N D ) \r ( )
0007500 \r N C P . C l e a r M s g : D
0007520 4 \r ( I 2 W a i t M s e c s
0007540 I 1 C l o s e P r o m p t
0007560 W i n F l g I 0 W i n d o
0007600 w ) \0 \b \0 \0 \0 003 @ A B \v \0 \0 020
0007620 \0 ( 5 N C . C l e a r M s g )
0007640 \r N I L \r ( ) \r ( P R E T T Y C
0007660 O M P R I N T R G P A T C H 0
0007700 8 4 C O M S ) \r ( R P A Q Q R
0007720 G P A T C H 0 8 4 C O M S ( (
0007740 * ; ; \r " r g 6 / 1 0 / 8
0007760 8 : n e w f e a t u r e f
0010000 o r I D E . N C . C l e a
0010020 r M s g h a s W a i t M s e
0010040 c s a r g , w i n d o w w
0010060 i l l n o t c l e a r b e
0010100 f o r e s p e c i f i e d d
0010120 e l a y . S u b s e q u e n
0010140 t c a l l s o v e r r i d e
0010160 p r e v i o u s o n e s " \r
0010200 ) ( * ; ; " n e w f o r
0010220 N C U T I L I T I E S " ) (
0010240 F N S N C . C l e a r M s g N
0010260 o w N C . C l e a r M s g W a
0010300 i t e r N C . Z a p P r o m p
0010320 t W i n d o w W a i t e r ) (
0010340 * ; ; \r " c h a n g e s t
0010360 o N C U T I L I T I E S " )
0010400 ( F N S N C . C l e a r M s g
0010420 ) ( * ; ; " c h a n g e s
0010440 t o N C P R O G I N T " )
0010460 ( F N S N C P . C l e a r M s
0010500 g ) ) ) \r ( P U T P R O P S R
0010520 G P A T C H 0 8 4 C O P Y R I
0010540 G H T ( " X e r o x C o r p
0010560 o r a t i o n " 1 9 8 8 ) ) \r
0010600 N I L \r
0010604