$ od -c -N 50000 [qv]<notecards>1.3K>LIBRARY>NCTABLETOP.DCOM!22
0000000 ( F I L E C R E A T E D " 2 8
0000020 - M a y - 8 7 1 2 : 2 0 : 4 4
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 > L I B R A R Y > N C
0000120 T A B L E T O P . ; 2 8 ) \r "
0000140 1 2 - N o v - 8 5 1 4 : 5 9 :
0000160 2 3 " t c o m p l ' d i n
0000200 " L O O P S / K O T O 2 1 - M
0000220 a y - 8 7 . . . " d a t e d
0000240 " 2 1 - M a y - 8 7 1 8 : 5
0000260 0 : 0 8 " ) \r ( F I L E C R E A
0000300 T E D " 2 8 - M a y - 8 7 1
0000320 2 : 1 8 : 5 5 " { Q V } < N O
0000340 T E C A R D S > 1 . 3 K > L I B
0000360 R A R Y > N C T A B L E T O P .
0000400 ; 2 8 2 5 2 3 4 c h a n g e
0000420 s t o : ( V A R S \r N C T
0000440 a b l e T o p . L i n k I c o n
0000460 B i t m a p N C T A B L E T O
0000500 P C O M S ) ( F N S N C T a
0000520 b l e T o p . B r i n g U p T a
0000540 b l e T o p N C T a b l e T o
0000560 p . C l o s e D o w n T a b l e
0000600 T o p \r N C T a b l e T o p .
0000620 R e m a k e T a b l e T o p N
0000640 C T a b l e T o p . R e c o m p
0000660 u t e T a b l e T o p N C T a
0000700 b l e T o p . C o m p u t e T a
0000720 b l e T o p \r N C T a b l e T
0000740 o p . R e m a k e T a b l e T o
0000760 p S e l e c t i n g N e w C a r
0001000 d s N C T a b l e T o p . A d
0001020 d O p e n E v e n t s E x p r
0001040 \r N C T a b l e T o p . N o t e
0001060 F i l e W h e n O p e n e d F n
0001100 N C T a b l e T o p . M a k e
0001120 O r U p d a t e N o t e F i l e
0001140 T a b l e T o p \r N C T a b l
0001160 e T o p . F i x N o t e F i l e
0001200 O p e r a t i o n s M e n u s
0001220 N C T a b l e T o p . C l o s e
0001240 N o t e F i l e S a v i n g T a
0001260 b l e T o p \r N C T a b l e T
0001300 o p . C l o s e S e s s i o n S
0001320 a v i n g T a b l e T o p s N
0001340 C T a b l e T o p . M a k e F n
0001360 N C T a b l e T o p . E d i t
0001400 F n N C T a b l e T o p . P u
0001420 t F n \r N C T a b l e T o p .
0001440 G e t F n N C T a b l e T o p
0001460 . A d d T a b l e T o p C a r d
0001500 N C A d d S t u b . T a b l e
0001520 T o p C a r d ) p r e v i o u
0001540 s d a t e : \r " 2 3 - A p r
0001560 - 8 7 2 1 : 3 9 : 4 9 " { Q
0001600 V } < N O T E C A R D S > 1 . 3
0001620 K > N E X T > L I B R A R Y > N
0001640 C T A B L E T O P . ; 3 ) \r N C
0001660 T a b l e T o p . B r i n g U p
0001700 T a b l e T o p D 1 \r ( P 6
0001720 W i n P 5 S h r u n k e
0001740 n W i n P o s P 4 R e g i
0001760 o n P 3 C a r d P 2
0002000 T a b l e T o p E n t r y P
0002020 1 $ $ A c t i v e F l g $ $
0002040 P 0 T a b l e T o p C a r d
0002060 I 0 T a b l e T o p C a r
0002100 d O r W i n d o w ) \0 ` \a \0 \0
0002120 001 @ \t \0 \0 021 001 \0 H \t \0 \0 021 001 001 I
0002140 244 H \t \0 \0 277 H \t \0 \0 260 : d 001 021 001
0002160 002 J 001 J 002 001 J 002 002 001 021 023 006 K \t \0
0002200 \0 262 L \t \0 \0 262 032 K L \n \0 \0 276 J
0002220 002 002 002 001 233 M \t \0 \0 226 N h M \v \0 \0
0002240 277 023 023 002 003 265 307 h I 244 H \t \0 \0 277 020
0002260 \0 ( 1 3 4 Q N C . D e a c t i
0002300 v a t e C a r d 1 1 6 Q S H
0002320 R I N K W 1 0 7 Q P O S I T
0002340 I O N P 7 4 Q N C P . O p e
0002360 n C a r d 6 5 Q R E G I O N
0002400 P 5 7 Q N C P . V a l i d C
0002420 a r d P 3 0 Q N C P . C a r
0002440 d S u b s t a n c e 2 3 Q N
0002460 C . G e t N o t e C a r d 1 2
0002500 Q N C . A c t i v e C a r d P
0002520 3 N C P . C o e r c e T o C
0002540 a r d ) \r N I L \r ( ) \r N C T a
0002560 b l e T o p . C l o s e D o w n
0002600 T a b l e T o p D 1 \r ( P 4
0002620 C a r d P 3 T a b l e T
0002640 o p E n t r y P 1 $ $ A c
0002660 t i v e F l g $ $ P 0 T a
0002700 b l e T o p C a r d I 0 T
0002720 a b l e T o p C a r d O r W i n
0002740 d o w ) \0 = 005 \0 \0 001 @ \t \0 \0 021
0002760 001 \0 H \t \0 \0 021 001 001 I 244 H \t \0 \0 277
0003000 H \t \0 \0 021 ! 004 J 003 265 \f 023 h I 244 H
0003020 \t \0 \0 277 020 001 [ 001 \ \t \0 \0 224 L \t \0
0003040 \0 277 J 002 Z 260 343 \0 ( 6 5 Q N C P
0003060 . C l o s e C a r d s 6 0 Q
0003100 N C P . V a l i d C a r d P 4
0003120 7 Q N C . D e a c t i v a t e
0003140 C a r d 3 0 Q N C P . C a r
0003160 d S u b s t a n c e 2 3 Q N
0003200 C . G e t N o t e C a r d 1 2
0003220 Q N C . A c t i v e C a r d P
0003240 3 N C P . C o e r c e T o C
0003260 a r d ) \r N I L \r ( ) \r N C T a
0003300 b l e T o p . R e m a k e T a b
0003320 l e T o p D 1 \r ( P 0 T a
0003340 b l e T o p C a r d I 1 L
0003360 i s t O f C a r d s I 0 T
0003400 a b l e T o p C a r d O r W i n
0003420 d o w ) \0 037 001 \0 \0 002 @ \t \0 \0 021
0003440 001 \0 H \t \0 \0 244 H \t \0 \0 277 H A \t \0
0003460 \0 \n \0 \0 H \t \0 \0 020 \0 ( 3 4 Q N
0003500 C . M a r k C a r d D i r t y
0003520 3 0 Q N C . S e t S u b s t a
0003540 n c e 2 5 Q N C T a b l e T
0003560 o p . C o m p u t e T a b l e T
0003600 o p 1 7 Q N C P . C a c h e
0003620 C a r d s 1 2 Q N C . A c t
0003640 i v e C a r d P 3 N C P . C
0003660 o e r c e T o C a r d ) \r N I L
0003700 \r ( ) \r N C T a b l e T o p . R
0003720 e c o m p u t e T a b l e T o p
0003740 D 1 \r ( P 6 C a r d P
0003760 5 T a b l e T o p E n t r y
0004000 P 0 T a b l e T o p C a r d
0004020 I 0 T a b l e T o p C a r
0004040 d O r W i n d o w ) \0 G \a \0 \0
0004060 001 @ \t \0 \0 021 001 \0 H \t \0 \0 244 H \t \0
0004100 \0 277 H d \t \0 \0 021 Q 006 I 003 265 017 J 022
0004120 \t \0 \0 \n \0 \0 H \t \0 \0 020 001 ] 001 ^ \t
0004140 \0 \0 231 N 274 K 265 \f L h 032 [ 272 I 002 Y
0004160 260 333 L & 273 260 370 \0 ( 6 0 Q N C P
0004200 . V a l i d C a r d P 5 0 Q
0004220 N C . M a r k C a r d D i r t y
0004240 4 4 Q N C . S e t S u b s t
0004260 a n c e 4 1 Q N C T a b l e
0004300 T o p . C o m p u t e T a b l e
0004320 T o p 2 5 Q N C . F e t c h
0004340 S u b s t a n c e 1 7 Q N C
0004360 P . C a c h e C a r d s 1 2 Q
0004400 N C . A c t i v e C a r d P
0004420 3 N C P . C o e r c e T o C a
0004440 r d ) \r N I L \r ( ) \r N C T a b
0004460 l e T o p . C o m p u t e T a b
0004500 l e T o p D 1 \r ( P 7 I c
0004520 o n W i n P 6 I c o n F o
0004540 r P 5 C a r d P 4 W
0004560 i n I 0 L i s t O f C a r
0004600 d s ) \0 b \b \0 \0 001 \b \0 \0 021 q \a
0004620 H 003 265 004 I 020 001 \ g \0 \0 \n \0 \0 ^ 265
0004640 003 L \t \0 \0 ] 262 ; M d @ 034 262 4 N 265
0004660 003 L \t \0 \0 311 006 N 221 L 217 L g \0 \0 \n
0004700 \0 \0 _ 016 \t \0 \0 264 \a O 016 \t \0 \0 N 264
0004720 003 i h 032 032 032 032 273 J 265 \r K h 032 Z Y
0004740 277 H 002 X 260 255 K & Z 260 367 \0 ( 1 0 3
0004760 Q W I N D O W P O S I T I O N
0005000 7 4 Q W I N D O W P 6 7 Q
0005020 G E T W I N D O W U S E R P R
0005040 O P 5 2 Q \ I N S U R E W I
0005060 N D O W 3 2 Q N C . C o e r
0005100 c e T o C a r d 2 3 Q G E T
0005120 W I N D O W U S E R P R O P 2
0005140 O P E N W I N D O W S ) \r ( 6
0005160 4 Q I C O N W I N D O W 2 0
0005200 Q I C O N F O R ) \r ( ) \r N C
0005220 T a b l e T o p . R e m a k e T
0005240 a b l e T o p S e l e c t i n g
0005260 N e w C a r d s D 1 \r ( P 1
0005300 L i s t O f C a r d s P 0
0005320 T a b l e T o p C a r d I
0005340 0 T a b l e T o p C a r d O r
0005360 W i n d o w ) \0 ( 002 \0 \0 001 @ \t
0005400 \0 \0 021 021 001 H \t \0 \0 h g \0 \0 o \0 \0
0005420 \0 i \r 005 \0 \0 Y d g \0 \0 360 221 h 020 H
0005440 I \n \0 \0 020 \0 ( 4 5 Q N C T a b
0005460 l e T o p . R e m a k e T a b l
0005500 e T o p 2 7 Q N C P . S e l
0005520 e c t C a r d s 1 2 Q N C P
0005540 . C a r d W i n d o w 3 N C
0005560 P . C o e r c e T o C a r d ) \r
0005600 ( 3 4 Q C A N C E L L E D 1
0005620 6 Q N C P . V a l i d C a r d
0005640 P ) \r ( 2 2 Q " C h o o s e
0005660 n e w c a r d s f o r r
0005700 e b u i l d i n g t a b l e
0005720 t o p . " ) \r N C T a b l e T o
0005740 p . A d d O p e n E v e n t s E
0005760 x p r D 1 \r ( P 4 S u b s
0006000 t a n c e P 3 O l d O p e
0006020 n E v e n t s E x p r P 1
0006040 O p e n E v e n t s C a r d W a
0006060 s C a c h e d F l g P 0 O
0006100 p e n E v e n t s C a r d I
0006120 0 N o t e F i l e ) \0 p 005 \0
0006140 \0 001 @ \t \0 \0 262 [ @ \t \0 \0 021 021 001 H
0006160 \t \0 \0 Y 244 H \t \0 \0 277 ` \0 \0 021 ! 004
0006200 J 003 265 # 023 ` \0 \0 H \t \0 \0 \n \0 \0 254
0006220 H ` \0 \0 H \t \0 \0 032 \n \0 \0 277 I 263 !
0006240 H \t \0 \0 020 001 [ H \t \0 \0 \ \n \0 \0 231
0006260 H K L \n \0 \0 \n \0 \0 277 J 002 Z 260 304 h
0006300 020 o \0 \0 \0 o \0 \0 \0 @ \n \0 \0 \n \0 \0
0006320 020 \0 ( 1 5 5 Q N C P . R e p o
0006340 r t E r r o r 1 5 2 Q C O N
0006360 C A T 1 2 6 Q N C P . C a r
0006400 d S u b s t a n c e 1 2 3 Q
0006420 R E M O V E 1 1 4 Q M E M B
0006440 E R 1 1 0 Q N C P . C a r d
0006460 S u b s t a n c e 1 0 1 Q N
0006500 C P . C l o s e C a r d s 7 1
0006520 Q N C P . C a r d S u b s t a
0006540 n c e 6 5 Q N C P . C a r d
0006560 S u b s t a n c e 5 4 Q M E
0006600 M B E R 5 1 Q N C P . C a r
0006620 d S u b s t a n c e 2 6 Q N
0006640 C P . C a c h e C a r d s 2 0
0006660 Q N C P . A c t i v e C a r d
0006700 P 1 1 Q N C P . G e t O p e
0006720 n E v e n t s C a r d 3 N C
0006740 P . O p e n N o t e F i l e P )
0006760 \r ( 6 1 Q N C T a b l e T o p
0007000 . O p e n E v e n t s E x p r
0007020 4 5 Q N C T a b l e T o p . O
0007040 p e n E v e n t s E x p r 3 2
0007060 Q N C T a b l e T o p . O l d
0007100 O p e n E v e n t s E x p r s )
0007120 \r ( 1 4 6 Q " C a n ' t a
0007140 d d O p e n E v e n t s e x
0007160 p r e s s i o n t o c l o s
0007200 e d n o t e f i l e : " 1
0007220 4 2 Q " N C T a b l e T o p .
0007240 A d d O p e n E v e n t s E x p
0007260 r " ) \r N C T a b l e T o p . N
0007300 o t e F i l e W h e n O p e n e
0007320 d F n D 1 \r ( P 0 T a b l
0007340 e T o p C a r d I 0 N o t
0007360 e F i l e ) \0 $ 001 \0 \0 001 g \0 \0
0007400 @ \n \0 \0 021 001 \0 H \t \0 \0 264 024 H \t \0
0007420 \0 244 H \t \0 \0 277 H \t \0 \0 H \t \0 \0 020
0007440 \0 ( 4 1 Q N C T a b l e T o p
0007460 . R e m a k e T a b l e T o p
0007500 3 5 Q N C T a b l e T o p . B
0007520 r i n g U p T a b l e T o p 3
0007540 0 Q N C P . C a c h e C a r d
0007560 s 2 3 Q N C . A c t i v e C
0007600 a r d P 1 5 Q N C P . V a l
0007620 i d C a r d P 6 N C P . L o
0007640 o k u p C a r d B y N a m e ) \r
0007660 ( 2 N o t e F i l e T a b l e
0007700 T o p ) \r ( ) \r N C T a b l e T
0007720 o p . M a k e O r U p d a t e N
0007740 o t e F i l e T a b l e T o p
0007760 D 1 \r ( P 7 O p e n C a r d
0010000 s P 6 T a b l e T o p C a
0010020 r d P 5 C a r d P 4
0010040 W i n I 0 N o t e F i l e
0010060 ) \0 o \b \0 \0 001 g \0 \0 @ \n \0 \0 \b
0010100 \0 \0 021 Q 005 H 003 265 024 I 022 021 002 \a N \t
0010120 \0 \0 262 8 N O 016 \n \0 \0 020 001 \ g \0 \0
0010140 \n \0 \0 265 003 L \t \0 \0 ] \t \0 \0 262 023 @
0010160 M \t \0 \0 360 231 M 273 J 265 \f K h 032 Z 271
0010200 H 002 X 260 303 K & 272 260 370 g \0 \0 @ g \0
0010220 \0 i o \0 \0 \0 h O 016 \r \a \0 \0 ^ g \0
0010240 \0 N \n \0 \0 020 \0 ( 1 5 4 Q N C P
0010260 . R e g i s t e r C a r d B y N
0010300 a m e 1 4 4 Q N C P . C r e
0010320 a t e C a r d 7 3 Q N C P .
0010340 C a r d N o t e F i l e 6 4 Q
0010360 N C P . V a l i d C a r d P
0010400 6 0 Q N C P . C a r d F r o m
0010420 W i n d o w 5 2 Q G E T W I
0010440 N D O W U S E R P R O P 4 1 Q
0010460 N C T a b l e T o p . R e m a
0010500 k e T a b l e T o p 3 1 Q N
0010520 C P . V a l i d C a r d P 1 1
0010540 Q O P E N W I N D O W S 6
0010560 N C P . L o o k u p C a r d B y
0010600 N a m e ) \r ( 1 5 0 Q N o t e
0010620 F i l e T a b l e T o p 1 3 0
0010640 Q N o t e F i l e T a b l e T
0010660 o p 1 2 4 Q T a b l e T o p
0010700 4 7 Q I C O N F O R 2 N
0010720 o t e F i l e T a b l e T o p )
0010740 \r ( 1 3 5 Q ( D o n ' t R e
0010760 q u i r e F i l i n g F l g T
0011000 ) ) \r N C T a b l e T o p . F i
0011020 x N o t e F i l e O p e r a t i
0011040 o n s M e n u s D 1 \r ( P 1
0011060 N o t e F i l e O p e r a t i
0011100 o n s C l o s e I t e m P 0
0011120 N o t e F i l e I c o n C l o
0011140 s e I t e m ) \0 = 002 \0 \0 \0 o \0
0011160 \0 \0 o \0 \0 \0 021 002 001 g \0 \0 H 002 ` \0
0011200 \0 \v \0 \0 g \0 \0 ` \0 \0 034 252 g \0 \0 `
0011220 \0 \0 032 027 \0 \0 277 \b \0 \0 g \0 \0 I 002 `
0011240 \0 \0 \v \0 \0 h 027 \0 \0 020 \0 ( 6 6 Q
0011260 P U T A S S O C 5 3 Q N C .
0011300 M a k e N o t e F i l e I c o n
0011320 O p e r a t i o n s M e n u s
0011340 2 5 Q P U T A S S O C ) \r ( 7
0011360 2 Q N C . N o t e F i l e O p
0011400 s M e n u 6 3 Q N C . N o t
0011420 e F i l e O p s I t e m s 5 6
0011440 Q % C l o s e % 4 7 Q
0011460 N C . N o t e F i l e I c o n O
0011500 p e n O p e r a t i o n s 4 3
0011520 Q N C . N o t e F i l e I c o
0011540 n O p e n O p e r a t i o n s
0011560 4 0 Q C l o s e % S a v i n
0011600 g % T a b l e T o p 3 3 Q
0011620 N C . N o t e F i l e I c o n O
0011640 p e n O p e r a t i o n s 3 0
0011660 Q C l o s e % S a v i n g %
0011700 T a b l e T o p 2 2 Q N C
0011720 . N o t e F i l e I c o n O p e
0011740 r a t i o n s M e n u I t e m s
0011760 1 5 Q C l o s e ) \r ( 7
0012000 ( % C l o s e % ( N C . D
0012020 o N o t e F i l e O p ( Q U O
0012040 T E C l o s e % N o t e F i
0012060 l e ) ) " C l o s e a n o
0012100 t e f i l e . " ( S U B I T E
0012120 M S ( C l o s e % w / o %
0012140 c o n f i r m ( N C . D o N o
0012160 t e F i l e O p ( Q U O T E
0012200 C l o s e % w / o % c o n f
0012220 i r m ) ) " C l o s e a n
0012240 o t e f i l e w / o a s k i
0012260 n g f o r u s e r c o n f
0012300 i r m b e f o r e c l o s i
0012320 n g o p e n c a r d s . " )
0012340 ( C l o s e % A l l ( N C
0012360 . C l o s e S e s s i o n ) "
0012400 C l o s e a l l c u r r e n
0012420 t l y o p e n N o t e F i l
0012440 e s " ) ( C l o s e % A l l
0012460 % w / o % c o n f i r m (
0012500 N C . C l o s e S e s s i o n
0012520 N I L T ) " C l o s e a l
0012540 l o p e n n o t e f i l e s
0012560 w / o a s k i n g f o r
0012600 u s e r c o n f i r m b e f
0012620 o r e c l o s i n g o p e n
0012640 c a r d s . " ) ( C l o s e
0012660 % S a v i n g % T a b l e T
0012700 o p ( N C . D o N o t e F i l
0012720 e O p ( F U N C T I O N N C
0012740 T a b l e T o p . C l o s e N o
0012760 t e F i l e S a v i n g T a b l
0013000 e T o p ) ) " C l o s e a
0013020 n o t e f i l e , s a v i n g
0013040 c u r r e n t l y o p e n
0013060 c a r d s i n a t a b l e
0013100 t o p . " ) ( C l o s e % A
0013120 l l % S a v i n g % T a b l
0013140 e T o p s ( N C T a b l e T o
0013160 p . C l o s e S e s s i o n S a
0013200 v i n g T a b l e T o p s ) "
0013220 C l o s e a l l o p e n n
0013240 o t e f i l e s s a v i n g
0013260 t h e i r t a b l e t o p s .
0013300 " ) ) ) 3 ( C l o s e N I
0013320 L " C l o s e s t h i s N
0013340 o t e F i l e . " ( S U B I T
0013360 E M S ( C l o s e % w / o %
0013400 c o n f i r m N I L " C l
0013420 o s e t h i s n o t e f i l
0013440 e , b u t d o n ' t a s k
0013460 f o r u s e r c o n f i r
0013500 m b e f o r e c l o s i n g
0013520 o p e n c a r d s . " ) (
0013540 C l o s e % S a v i n g % T
0013560 a b l e T o p N C T a b l e T
0013600 o p . C l o s e N o t e F i l e
0013620 S a v i n g T a b l e T o p "
0013640 C l o s e t h i s n o t e f
0013660 i l e , s a v i n g c u r r
0013700 e n t l y o p e n c a r d s
0013720 i n a t a b l e t o p . "
0013740 ) ) ) ) \r N C T a b l e T o p .
0013760 C l o s e N o t e F i l e S a v
0014000 i n g T a b l e T o p D 1 \r (
0014020 I 1 N o t e F i l e I c o n
0014040 W i n d o w I 0 N o t e F
0014060 i l e ) \0 021 \0 \0 \0 002 @ \t \0 \0 @
0014100 \t \0 \0 @ A h i \f \0 \0 020 \0 ( 1 6 Q
0014120 N C . C l o s e N o t e F i l
0014140 e 7 N C T a b l e T o p . A
0014160 d d O p e n E v e n t s E x p r
0014200 3 N C T a b l e T o p . M a
0014220 k e O r U p d a t e N o t e F i
0014240 l e T a b l e T o p ) \r N I L \r
0014260 ( ) \r N C T a b l e T o p . C l
0014300 o s e S e s s i o n S a v i n g
0014320 T a b l e T o p s A 0 0 0 1 D
0014340 1 \r ( I 1 K e y I 0 V
0014360 a l u e ) \0 024 \0 \0 \0 002 @ 004 ` \0
0014400 \0 360 264 \f @ \t \0 \0 264 006 @ \t \0 \0 020 \0
0014420 ( 2 1 Q N C T a b l e T o p .
0014440 C l o s e N o t e F i l e S a v
0014460 i n g T a b l e T o p 1 3 Q
0014500 N C . N o t e F i l e O p e n P
0014520 ) \r ( 4 004 003 N o t e F i l e T
0014540 Y P E # ) \r ( ) \r N C T a b l e
0014560 T o p . C l o s e S e s s i o n
0014600 S a v i n g T a b l e T o p s
0014620 D 1 \r ( F 0 N C . N o t e F
0014640 i l e s H a s h A r r a y ) \0
0014660 022 \0 001 \0 \0 P g \0 \0 \n \0 \0 h i o \0
0014700 \0 \0 \v \0 \0 020 \0 ( 1 7 Q N C . P
0014720 r i n t M s g 6 M A P H A S
0014740 H ) \r ( 3 N C T a b l e T o p
0014760 . C l o s e S e s s i o n S a v
0015000 i n g T a b l e T o p s A 0 0 0
0015020 1 ) \r ( 1 4 Q " D o n e c
0015040 l o s i n g a l l N o t e F
0015060 i l e s . " ) \r N C T a b l e T
0015100 o p . M a k e F n D 1 \r ( P
0015120 0 W i n d o w I 3 L i s
0015140 t O f C a r d s I 2 N o D
0015160 i s p l a y F l g I 1 T i
0015200 t l e I 0 T a b l e T o p
0015220 C a r d ) \0 ] 001 \0 \0 004 021 020 \0 B
0015240 263 ! @ A 265 006 o \0 \0 \0 \n \0 \0 X @ \t
0015260 \0 \0 \n \0 \0 277 H g \0 \0 g \0 \0 \v \0 \0
0015300 277 C 003 265 022 H h g \0 \0 o \0 \0 \0 i \r
0015320 005 \0 \0 b 006 g \0 \0 360 237 @ \t \0 \0 H \t
0015340 \0 \0 264 \a H \t \0 \0 h 020 @ C \t \0 \0 \n
0015360 \0 \0 B 221 @ 020 H 020 \0 ( 1 2 5 Q N
0015400 C . S e t S u b s t a n c e 1
0015420 2 2 Q N C T a b l e T o p . C
0015440 o m p u t e T a b l e T o p 1
0015460 1 3 Q C L O S E W 1 0 5 Q
0015500 W I N D O W P 1 0 1 Q N C .
0015520 D e a c t i v a t e C a r d 6
0015540 6 Q N C P . S e l e c t C a r
0015560 d s 4 3 Q W I N D O W A D D
0015600 P R O P 3 0 Q N C P . S e t
0015620 U p T i t l e B a r 2 5 Q N
0015640 C . R e t r i e v e T y p e 2
0015660 0 Q N C . M a k e N e w C a r
0015700 d W i n d o w ) \r ( 7 3 Q D O
0015720 N ' T 5 5 Q N C P . V a l i
0015740 d C a r d P 4 0 Q N C . G r
0015760 a p h C a r d S h r i n k F n
0016000 3 5 Q S H R I N K F N ) \r (
0016020 6 1 Q " C h o o s e c a r d
0016040 s f o r t a b l e t o p .
0016060 " 1 5 Q " U n t i t l e d "
0016100 ) \r N C T a b l e T o p . E d i
0016120 t F n D 1 \r ( P 0 W i n d
0016140 o w I 2 R e g i o n / P o
0016160 s i t i o n I 1 S u b s t
0016200 a n c e I 0 T a b l e T o
0016220 p C a r d ) \0 Q 002 \0 \0 003 021 001
0016240 @ \t \0 \0 X 265 ' @ d \t \0 \0 265 006 o \0
0016260 \0 \0 h i \f \0 \0 X @ \t \0 \0 \n \0 \0 277
0016300 H g \0 \0 g \0 \0 \v \0 \0 H 020 \t \0 \0 277
0016320 B 231 H @ B \n \0 \0 \n \0 \0 277 l 002 Y j
0016340 361 262 351 H \t \0 \0 277 I k 331 260 363 \0 ( 1
0016360 1 1 Q F L A S H W 7 5 Q S
0016400 H A P E W 7 2 Q N C . D e t
0016420 e r m i n e D i s p l a y R e g
0016440 i o n 6 1 Q T O T O P W 5
0016460 4 Q W I N D O W A D D P R O P
0016500 4 1 Q N C P . S e t U p T i
0016520 t l e B a r 3 6 Q N C . R e
0016540 t r i e v e T y p e 3 1 Q N
0016560 C . M a k e N e w C a r d W i n
0016600 d o w 1 6 Q N C . R e t r i
0016620 e v e T i t l e 6 N C . F e
0016640 t c h W i n d o w ) \r ( 5 1 Q
0016660 N C . G r a p h C a r d S h r i
0016700 n k F n 4 6 Q S H R I N K F
0016720 N ) \r ( 2 4 Q " U n t i t l
0016740 e d " ) \r N C T a b l e T o p .
0016760 P u t F n D 1 \r ( P 1 1 Q
0017000 C a r d P 1 0 Q S h r u n
0017020 k e n F l g P 7 S h r u n
0017040 k e n W i n P o s P 6 R e
0017060 g i o n P 5 C a r d P
0017100 4 T a b l e T o p E n t r y
0017120 P 3 N u m R e c o r d s P
0017140 2 S t a r t L o c P 1
0017160 S u b s t a n c e P 0 N o
0017200 t e F i l e I 1 S t r e a
0017220 m I 0 T a b l e T o p C a
0017240 r d ) 001 D \n \0 \0 002 @ \t \0 \0 @ \t
0017260 \0 \0 A \t \0 \0 j 021 004 003 A j ! 277 A j
0017300 ! 277 A j ! I 261 \0 365 d 001 021 001 004 L 001
0017320 L 002 001 L 002 002 001 L 002 002 002 001 021 024 \t M
0017340 \t \0 \0 242 261 \0 324 N \t \0 \0 242 261 \0 314 O
0017360 020 230 O 016 \t \0 \0 242 261 \0 300 A M 006 \0 \0
0017400 311 \0 \n \0 \0 277 A N 001 l \b \n \0 \0 l 377
0017420 345 ! 277 A N 001 l 377 345 ! 277 A N 002 001 l
0017440 \b \n \0 \0 l 377 345 ! 277 A N 002 001 l 377 345
0017460 ! 277 A N 002 002 001 l \b \n \0 \0 l 377 345 !
0017500 277 A N 002 002 001 l 377 345 ! 277 A N 002 002 002
0017520 001 l \b \n \0 \0 l 377 345 ! 277 A N 002 002 002
0017540 001 l 377 345 ! 277 A O 020 223 O 016 001 200 j l
0017560 \b \n \0 \0 l 377 345 ! 277 A O 020 223 O 016 001
0017600 200 j l 377 345 ! 277 A O 020 223 O 016 002 200 j
0017620 l \b \n \0 \0 l 377 345 ! 277 A O 020 223 O 016
0017640 002 200 j l 377 345 ! 277 A O 020 221 k 200 j l
0017660 377 345 ! 277 K k 324 273 023 023 002 003 265 003 202 261
0017700 377 \n A J \n \0 \0 A K l 020 \n \0 \0 l 377
0017720 345 ! 277 A K l \b \n \0 \0 l 377 345 ! 277 A
0017740 K l 377 345 ! A m 377 \n \0 \0 k 020 \0 ( 5
0017760 0 0 Q S E T F I L E P T R 4
0020000 5 7 Q R S H 4 4 3 Q R S H
0020020 4 3 4 Q S E T F I L E P T R
0020040 3 5 2 Q R S H 3 1 1 Q R
0020060 S H 2 5 3 Q R S H 2 2 1 Q
0020100 R S H 1 7 1 Q R S H 1 4
0020120 3 Q R S H 1 3 2 Q N C . W
0020140 r i t e U I D 1 1 4 Q P O S
0020160 I T I O N P 1 0 0 Q R E G I
0020200 O N P 7 0 Q N C P . V a l i
0020220 d C a r d P 1 3 Q G E T F I
0020240 L E P T R 7 N C P . C a r d
0020260 S u b s t a n c e 3 N C P .
0020300 C a r d N o t e F i l e ) \r ( 1
0020320 2 5 Q C a r d O b j e c t ) \r
0020340 ( ) \r N C T a b l e T o p . G e
0020360 t F n D 1 \r ( P 1 6 Q C a
0020400 r d P 1 5 Q S h r u n k e
0020420 n I n d i c a t o r P 1 4 Q
0020440 S h r u n k e n W i n P o s
0020460 P 1 3 Q R e g i o n P 1
0020500 2 Q U I D P 1 1 Q C a r
0020520 d P 1 0 Q R e g i o n P
0020540 7 U I D P 3 i P 1
0020560 N u m E n t r i e s P 0
0020600 N o t e F i l e I 3 V e r
0020620 s i o n N u m I 2 S t r e
0020640 a m I 1 L e n g t h I
0020660 0 T a b l e T o p C a r d )
0020700 \0 371 017 \0 \0 004 @ \t \0 \0 B l 020 347 B
0020720 l \b 347 B 324 324 021 002 001 C d j 360 262
0020740 W 277 I k 021 2 006 K J 363 263 J B \t \0 \0
0020760 B \t \0 \0 021 022 \t O 016 004 ` \0 \0 360 264 !
0021000 O 016 H \n \0 \0 _ 022 \t \0 \0 264 024 O 020 \t
0021020 \0 \0 264 \r O 022 O 020 h d h 032 032 032 032 022
0021040 276 M 265 \r N h 032 ] 274 K k 324 [ 260 273 N
0021060 & 275 260 367 L 020 k 360 262 v I k 021 2 006 K
0021100 J 363 263 j B \t \0 \0 B \t \0 \0 B l \b
0021120 347 B 324 B l \b 347 B 324 \n \0 \0 B
0021140 021 024 016 O 024 004 ` \0 \0 360 264 , O 024 H
0021160 \n \0 \0 _ 034 \t \0 \0 264 037 O 026 \t \0 \0 264
0021200 030 O 030 \t \0 \0 264 021 O 034 O 026 O 030 O 032
0021220 k 360 h 032 032 032 032 022 276 M 265 \r N h 032 ]
0021240 274 K k 324 [ 260 233 N & 275 260 367 L 020 o \0
0021260 \0 \0 o \0 \0 \0 C \n \0 \0 \n \0 \0 020 \0 (
0021300 3 6 6 Q N C P . R e p o r t E
0021320 r r o r 3 6 3 Q C O N C A T
0021340 2 7 7 Q P O S I T I O N P
0021360 2 7 0 Q R E G I O N P 2 6 1
0021400 Q N C . C a r d P 2 5 4 Q
0021420 N C . C a r d F r o m U I D 2
0021440 3 0 Q C R E A T E P O S I T I
0021460 O N 2 0 5 Q N C . R e a d R
0021500 e g i o n 2 0 1 Q N C . R e
0021520 a d U I D 1 1 3 Q R E G I O
0021540 N P 1 0 4 Q N C P . V a l i
0021560 d C a r d P 7 7 Q N C . C a
0021600 r d F r o m U I D 5 5 Q N C
0021620 . R e a d R e g i o n 5 1 Q
0021640 N C . R e a d U I D 3 N C P
0021660 . C a r d N o t e F i l e ) \r (
0021700 2 4 3 Q 004 003 U I D T Y P E #
0021720 6 6 Q 004 003 U I D T Y P E # ) \r
0021740 ( 3 5 7 Q " I m p r o p e r
0021760 s u b s t a n c e v e r s i
0022000 o n n u m : " 3 5 3 Q "
0022020 N C T a b l e T o p . G e t F n
0022040 " ) \r N C T a b l e T o p . A d
0022060 d T a b l e T o p C a r d D 1
0022100 \r N I L \0 1 \0 \0 \0 \0 g \0 \0 g \0
0022120 \0 o \0 \0 \0 o \0 \0 \0 o \0 \0 \0 o \0 \0
0022140 \0 o \0 \0 \0 g \0 \0 ` \0 \0 h 032 032 o \0
0022160 \0 \0 032 032 032 032 032 \f \0 \0 020 \0 ( 5 6 Q
0022200 N C . A d d C a r d T y p e )
0022220 \r ( 3 7 Q N C T a b l e T o p
0022240 . L i n k I c o n B i t m a p
0022260 3 4 Q L i n k I c o n A t t a
0022300 c h e d B i t M a p 5 N o t
0022320 e C a r d 2 T a b l e T o p
0022340 ) \r ( 4 6 Q ( ( M i d d l e
0022360 B u t t o n M e n u I t e m s
0022400 ( ( R e c o m p u t e % T a b
0022420 l e T o p ( F U N C T I O N
0022440 N C T a b l e T o p . R e c o m
0022460 p u t e T a b l e T o p ) " R
0022500 e c o m p u t e s t h i s t
0022520 a b l e t o p u s i n g c
0022540 u r r e n t c o n f i g u r a
0022560 t i o n o f i t s c a r d
0022600 s . " ( S U B I T E M S ( N
0022620 e w % C a r d s ( F U N C T
0022640 I O N N C T a b l e T o p . R
0022660 e m a k e T a b l e T o p S e l
0022700 e c t i n g N e w C a r d s )
0022720 " R e c o m p u t e t h i s
0022740 t a b l e t o p u s i n g
0022760 a n e w l i s t o f c a
0023000 r d s . " ) ) ) ( B r i n g %
0023020 U p % T a b l e T o p ( F
0023040 U N C T I O N N C T a b l e T
0023060 o p . B r i n g U p T a b l e T
0023100 o p ) " B r i n g u p t h
0023120 e t a b l e t o p c a r d
0023140 s i n p r o p e r l a y o
0023160 u t . " ) ( C l o s e % D o
0023200 w n % T a b l e T o p ( F U
0023220 N C T I O N N C T a b l e T o
0023240 p . C l o s e D o w n T a b l e
0023260 T o p ) " C l o s e a l l
0023300 c a r d s i n t h e t a b
0023320 l e t o p . " ) ) ) ) 3 1 Q
0023340 ( D e f a u l t W i d t h 2
0023360 2 6 Q ) 2 5 Q ( D e f a u l
0023400 t H e i g h t 5 0 Q ) 2 1 Q
0023420 ( D i s p l a y e d I n M e n
0023440 u F l g T ) 1 5 Q ( L i n
0023460 k A n c h o r M o d e s S u p p
0023500 o r t e d N I L ) 1 1 Q (
0023520 ( M a k e F n N C T a b l e T
0023540 o p . M a k e F n ) ( E d i t
0023560 F n N C T a b l e T o p . E d
0023600 i t F n ) ( G e t F n N C T
0023620 a b l e T o p . G e t F n ) (
0023640 P u t F n N C T a b l e T o p
0023660 . P u t F n ) ( Q u i t F n
0023700 N I L L ) ( D i r t y P F n
0023720 N I L L ) ( M a r k D i r t y
0023740 F n N I L L ) ) ) \r N C A d d
0023760 S t u b . T a b l e T o p C a r
0024000 d D 1 \r N I L \0 \0 \0 \0 \0 g
0024020 \0 \0 g \0 \0 g \0 \0 h o \0 \0 \0 g \0 \0
0024040 ` \0 \0 h 032 032 h 032 032 \r 005 \0 \0 020 \0 (
0024060 3 5 Q N C . A d d C a r d T y
0024100 p e S t u b ) \r ( 2 3 Q N C T
0024120 a b l e T o p . L i n k I c o n
0024140 B i t m a p 2 0 Q L i n k I
0024160 c o n A t t a c h e d B i t M a
0024200 p 1 0 Q N C T A B L E T O P
0024220 5 N o t e C a r d 2 T a
0024240 b l e T o p ) \r ( 1 5 Q ( D
0024260 i s p l a y e d I n M e n u F l
0024300 g T ) ) \r ( P R E T T Y C O M
0024320 P R I N T N C T A B L E T O P
0024340 C O M S ) \r ( R P A Q Q N C T
0024360 A B L E T O P C O M S ( ( *
0024400 * T a b l e t o p c a r d
0024420 s h a v e s u b s t a n c e
0024440 s c o n t a i n i n g c a r
0024460 d U I D s a n d s c r e e
0024500 n r e g i o n s . \r F o l l
0024520 o w i n g a l i n k t o
0024540 a t a b l e t o p b r i n g
0024560 s u p i t s c a r d i n
0024600 t h e s t o r e d r e g i
0024620 o n s . ) ( G L O B A L V A R
0024640 S \r N C T a b l e T o p . L i
0024660 n k I c o n B i t m a p N C T
0024700 a b l e T o p . O p e n E v e n
0024720 t s E x p r N C T a b l e T o
0024740 p . O l d O p e n E v e n t s E
0024760 x p r s ) ( V A R S ( \r N C
0025000 T a b l e T o p . O p e n E v e
0025020 n t s E x p r ( Q U O T E (
0025040 P R O G N ( N C . L o a d F i
0025060 l e F r o m D i r e c t o r i e
0025100 s ( Q U O T E N C T A B L E
0025120 T O P C A R D ) ) ( \r N C T a
0025140 b l e T o p . N o t e F i l e W
0025160 h e n O p e n e d F n N o t e
0025200 F i l e ) ) ) ) ( N C T a b l
0025220 e T o p . O l d O p e n E v e n
0025240 t s E x p r s ( Q U O T E (
0025260 ( P R O G N ( \r N C . L o a d
0025300 F i l e F r o m D i r e c t o r
0025320 i e s N C T A B L E T O P )
0025340 ( N C T a b l e T o p . N o t e
0025360 F i l e W h e n O p e n e d F n
0025400 N o t e F i l e ) ) ( P R O
0025420 G N ( F I L E S L O A D ( \r
0025440 F R O M N O T E C A R D S )
0025460 N C T A B L E T O P ) ( N C T
0025500 a b l e T o p . N o t e F i l e
0025520 W h e n O p e n e d F n N o t
0025540 e F i l e ) ) ) ) ) ) ( * *
0025560 T h e f o l l o w i n g \r
0025600 f u n c t i o n s a r e e x
0025620 p o r t e d , i . e . d o c
0025640 u m e n t e d a n d c a l l
0025660 a b l e f r o m o u t s i d
0025700 e . ) ( F N S N C T a b l e
0025720 T o p . B r i n g U p T a b l e
0025740 T o p \r N C T a b l e T o p .
0025760 C l o s e D o w n T a b l e T o
0026000 p N C T a b l e T o p . R e m
0026020 a k e T a b l e T o p N C T a
0026040 b l e T o p . R e c o m p u t e
0026060 T a b l e T o p ) ( * * T
0026100 h e r e s t a r e \r i n t
0026120 e r n a l . ) ( F N S N C T
0026140 a b l e T o p . C o m p u t e T
0026160 a b l e T o p N C T a b l e T
0026200 o p . R e m a k e T a b l e T o
0026220 p S e l e c t i n g N e w C a r
0026240 d s \r N C T a b l e T o p . A
0026260 d d O p e n E v e n t s E x p r
0026300 N C T a b l e T o p . N o t e
0026320 F i l e W h e n O p e n e d F n
0026340 N C T a b l e T o p . M a k e
0026360 O r U p d a t e N o t e F i l e
0026400 T a b l e T o p \r N C T a b l
0026420 e T o p . F i x N o t e F i l e
0026440 O p e r a t i o n s M e n u s
0026460 N C T a b l e T o p . C l o s e
0026500 N o t e F i l e S a v i n g T a
0026520 b l e T o p \r N C T a b l e T
0026540 o p . C l o s e S e s s i o n S
0026560 a v i n g T a b l e T o p s )
0026600 ( F N S N C T a b l e T o p .
0026620 M a k e F n N C T a b l e T o
0026640 p . E d i t F n N C T a b l e
0026660 T o p . P u t F n \r N C T a b
0026700 l e T o p . G e t F n ) ( F N
0026720 S N C T a b l e T o p . A d d
0026740 T a b l e T o p C a r d ) ( B
0026760 I T M A P S N C T a b l e T o
0027000 p . L i n k I c o n B i t m a p
0027020 ) ( R E C O R D S \r T a b l
0027040 e T o p E n t r y ) ( P ( N
0027060 C T a b l e T o p . A d d T a b
0027100 l e T o p C a r d ) ( P U T P
0027120 R O P ( Q U O T E T a b l e
0027140 T o p ) ( Q U O T E E x t r
0027160 a L i n k I c o n M e n u I t e
0027200 m s \r ) ( Q U O T E ( ( R u
0027220 n % T a b l e T o p ( F U N
0027240 C T I O N N C T a b l e T o p
0027260 . B r i n g U p T a b l e T o p
0027300 ) \r " B r i n g u p t h e
0027320 c a r d s i n d e s t i n
0027340 a t i o n ' s t a b l e t o
0027360 p . " ( S U B I T E M S ( C
0027400 l o s e % D o w n % T a b l
0027420 e T o p ( F U N C T I O N \r
0027440 N C T a b l e T o p . C l o s e
0027460 D o w n T a b l e T o p ) " C
0027500 l o s e t h e c a r d s i
0027520 n d e s t i n a t i o n ' s
0027540 t a b l e t o p . " ) ) ) ) )
0027560 ) ) ( F N S \r N C A d d S t
0027600 u b . T a b l e T o p C a r d )
0027620 ( * A d d a C l o s e S
0027640 a v i n g T a b l e T o p i t
0027660 e m t o t h e C l o s e
0027700 n o t e f i l e m e n u s . )
0027720 ( P ( \r N C T a b l e T o p
0027740 . F i x N o t e F i l e O p e r
0027760 a t i o n s M e n u s ) ) ) ) \r
0030000 ( R P A Q Q N C T a b l e T o
0030020 p . O p e n E v e n t s E x p r
0030040 ( P R O G N ( N C . L o a d
0030060 F i l e F r o m D i r e c t o r
0030100 i e s ( Q U O T E N C T A B
0030120 L E T O P C A R D ) ) ( \r N C
0030140 T a b l e T o p . N o t e F i l
0030160 e W h e n O p e n e d F n N o
0030200 t e F i l e ) ) ) \r ( R P A Q Q
0030220 N C T a b l e T o p . O l d O
0030240 p e n E v e n t s E x p r s (
0030260 ( P R O G N ( N C . L o a d F
0030300 i l e F r o m D i r e c t o r i
0030320 e s N C T A B L E T O P ) (
0030340 \r N C T a b l e T o p . N o t e
0030360 F i l e W h e n O p e n e d F n
0030400 N o t e F i l e ) ) ( P R O
0030420 G N ( F I L E S L O A D ( F
0030440 R O M N O T E C A R D S ) N
0030460 C T A B L E T O P ) ( \r N C T
0030500 a b l e T o p . N o t e F i l e
0030520 W h e n O p e n e d F n N o t
0030540 e F i l e ) ) ) ) \r ( R P A Q
0030560 N C T a b l e T o p . L i n k I
0030600 c o n B i t m a p ( R E A D B
0030620 I T M A P ) ) \r ( 2 1 1 8 "
0030640 O O O O O H @ @ " " H @ @ @ @
0030660 H @ @ " " H C O O N H @ @ "
0030700 " H F G L N H @ @ " " H N F D
0030720 N H @ @ " " I I N G J H @ @ "
0030740 " K I O O B H @ @ " " K O O
0030760 N B H @ @ " \r " J H @ B B H @
0031000 @ " " J H @ B B H @ @ " " J
0031020 H @ B B H @ @ " " J H @ B B H
0031040 @ @ " " J H @ B B H @ @ " "
0031060 J H @ B B H @ @ " " J @ @ B @
0031100 H @ @ " " J @ @ B @ H @ @ "
0031120 " H @ @ @ @ H @ @ " \r " O O O
0031140 O O H @ @ " ) \r ( R E C O R D
0031160 T a b l e T o p E n t r y ( C
0031200 a r d R e g i o n S h r u n
0031220 k e n W i n P o s S h r u n k
0031240 e n F l g ) ) \r ( N C T a b l e
0031260 T o p . A d d T a b l e T o p C
0031300 a r d ) \r ( P U T P R O P ( Q
0031320 U O T E T a b l e T o p ) (
0031340 Q U O T E E x t r a L i n k I
0031360 c o n M e n u I t e m s ) ( Q
0031400 U O T E ( ( R u n % T a b l
0031420 e T o p ( F U N C T I O N \r
0031440 N C T a b l e T o p . B r i n g
0031460 U p T a b l e T o p ) " B r i
0031500 n g u p t h e c a r d s
0031520 i n d e s t i n a t i o n ' s
0031540 t a b l e t o p . " ( S U
0031560 B I T E M S ( \r C l o s e %
0031600 D o w n % T a b l e T o p (
0031620 F U N C T I O N N C T a b l e
0031640 T o p . C l o s e D o w n T a b
0031660 l e T o p ) \r " C l o s e t
0031700 h e c a r d s i n d e s t
0031720 i n a t i o n ' s t a b l e
0031740 t o p . " ) ) ) ) ) ) \r ( N C T
0031760 a b l e T o p . F i x N o t e F
0032000 i l e O p e r a t i o n s M e n
0032020 u s ) \r ( P U T P R O P S N C
0032040 T A B L E T O P C O P Y R I G
0032060 H T ( " X e r o x C o r p o
0032100 r a t i o n " 1 9 8 7 ) ) \r N
0032120 I L \r
0032123