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