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