$ od -c -N 50000 [eris]<Lisp>INTERMEZZO>LIBRARY>NEW>READNUMBER.DCOM!1
0000000 ( F I L E C R E A T E D " 2 7
0000020 - A u g - 8 5 1 4 : 4 8 : 2 8
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < L I S P C O R
0000100 E > L I B R A R Y > R E A D N U
0000120 M B E R . ; 1 1 ) \r " 1 9 - M
0000140 a r - 8 5 1 4 : 3 4 : 1 7 "
0000160 r e c o m p i l e d c h a n g
0000200 e s : R N U M B E R N U M B
0000220 E R P A D . R E A D C R E A T
0000240 E . N U M B E R P A D . R E A D
0000260 E R \r B R E A K . M S G . I N
0000300 T O . L I N E S N U M B E R .
0000320 R E A D E R . H A N D L E R N
0000340 U M B E R P A D . H E L D F N
0000360 i n " I N T E R L I S P - D
0000400 1 6 - A p r - 8 5 . . . " d
0000420 a t e d \r " 1 6 - A p r - 8 5
0000440 1 3 : 0 2 : 1 5 " ) \r ( F I L
0000460 E C R E A T E D " 2 7 - A u g
0000500 - 8 5 1 4 : 4 8 : 0 2 " { E
0000520 R I S } < L I S P C O R E > L I
0000540 B R A R Y > R E A D N U M B E R
0000560 . ; 1 1 1 6 9 5 6 c h a n g
0000600 e s t o : ( F N S \r B R E
0000620 A K . M S G . I N T O . L I N E
0000640 S N U M B E R P A D . H E L D
0000660 F N R N U M B E R N U M B E
0000700 R . R E A D E R . H A N D L E R
0000720 N U M B E R P A D . R E A D
0000740 \r C R E A T E . N U M B E R P A
0000760 D . R E A D E R ) p r e v i o
0001000 u s d a t e : " 2 1 - M a y
0001020 - 8 5 2 0 : 5 4 : 5 8 " { E
0001040 R I S } < L I S P C O R E > L I
0001060 B R A R Y > R E A D N U M B E R
0001100 . ; 8 ) \r \ N U M B E R P A D .
0001120 R E A D E R . C L O S E F N D
0001140 1 \r ( I 0 W I N D O W ) \0
0001160 \f \0 \0 \0 001 @ g \0 \0 g \0 \0 \v \0 \0 020
0001200 \0 ( 1 1 Q P U T W I N D O W P
0001220 R O P ) \r ( 6 A B O R T 3
0001240 F I N I S H E D F L G ) \r ( ) \r
0001260 \ R E A D N U M B E R . F L A S
0001300 H A R E A D 1 \r ( I 4 W I
0001320 N I 3 H G H T I 2 W
0001340 D T H I 1 B T M I 0
0001360 L F T ) \0 1 \0 \0 \0 005 h d d D @
0001400 A B C g \0 \0 g \0 \0 n 377 377 \r \v \0 \0
0001420 l < \t \0 \0 h d d D @ A B C g \0 \0
0001440 g \0 \0 n 377 377 \r \v \0 \0 020 \0 ( 5 6 Q
0001460 B K B I T B L T 3 1 Q D I
0001500 S M I S S 2 4 Q B K B I T B
0001520 L T ) \r ( 4 7 Q I N V E R T
0001540 4 4 Q T E X T U R E 1 5 Q
0001560 I N V E R T 1 2 Q T E X T U
0001600 R E ) \r N I L \r R N U M B E R
0001620 D 1 \r ( I 5 F L O A T I N G
0001640 P T F L G I 4 I N C L U D
0001660 E A B O R T F L G I 3 D I
0001700 G I T F O N T I 2 M S G F
0001720 O N T I 1 P O S I T I O N
0001740 I 0 M S G ) \0 017 \0 \0 \0 006
0001760 @ A B C D E \r 006 \0 \0 \t \0 \0 020 \0 (
0002000 1 4 Q N U M B E R P A D . R E
0002020 A D 1 1 Q C R E A T E . N U
0002040 M B E R P A D . R E A D E R ) \r
0002060 N I L \r ( ) \r N U M B E R P A D
0002100 . R E A D A 0 0 0 1 D 1 \r ( N
0002120 A M E E R R O R S E T P 0
0002140 F I N I S H V A L F 1 N
0002160 U M B E R P A D / R E A D E R
0002200 F 2 R E S E T V A R S L S T
0002220 F 3 R E S E T Y ) \0 i 001
0002240 003 002 \0 g \0 \0 Q h 032 032 Q \t \0 \0 h 032
0002260 032 R 032 c 004 277 Q \t \0 \0 277 021 020 \0 Q g
0002300 \0 \0 \n \0 \0 X 254 Q \t \0 \0 277 l d \t \0
0002320 \0 277 260 354 Q g \0 \0 g \0 \0 \v \0 \0 277 H
0002340 g \0 \0 360 262 033 g \0 \0 Q g \0 \0 \n \0 \0
0002360 001 006 \0 \0 311 004 \n \0 \0 264 \r \b \0 \0 206 Q
0002400 g \0 \0 \n \0 \0 022 c 006 i 020 \0 ( 1 4 2
0002420 Q G E T W I N D O W U S E R P
0002440 R O P 1 3 2 Q E R R O R !
0002460 1 2 5 Q M E M B E R 1 1 4 Q
0002500 G E T W I N D O W U S E R P R
0002520 O P 7 2 Q W I N D O W D E L
0002540 P R O P 5 5 Q D I S M I S S
0002560 4 7 Q T O T O P W 4 1 Q
0002600 P U T W I N D O W P R O P 2 6
0002620 Q D I S P L A Y / N U M B E R
0002640 / R E A D E R / T O T A L 1 2
0002660 Q O P E N W ) \r ( 1 3 7 Q T
0002700 O T A L 1 2 0 Q M E N U 1
0002720 1 1 Q M E N U 1 0 5 Q %
0002740 7 7 Q A B O R T 6 7 Q \
0002760 N U M B E R P A D . R E A D E R
0003000 . C L O S E F N 6 4 Q C L O
0003020 S E F N 3 6 Q F I N I S H E
0003040 D F L G 2 C L O S E W ) \r (
0003060 ) \r N U M B E R P A D . R E A D
0003100 D 1 \r ( P 2 R E S E T Z
0003120 P 1 R E S E T Y P 0 L
0003140 I S P X H I S T I 0 N U M
0003160 B E R P A D / R E A D E R F
0003200 3 L I S P X H I S T F 4
0003220 R E S E T V A R S L S T ) \0 >
0003240 003 002 \0 001 @ g \0 \0 j \v \0 \0 \b \0 \0 @
0003260 g \0 \0 \n \0 \0 @ g \0 \0 g \0 \0 \v \0 \0
0003300 S 021 ! 002 T o \0 \0 \0 g \0 \0 \n \0 \0 221
0003320 h 202 g \0 \0 Z \n \0 \0 J 223 \b \0 \0 020 I
0003340 020 \0 ( 7 1 Q E R R O R ! 6 4
0003360 Q R E S E T R E S T O R E 5
0003400 2 Q N U M B E R P A D . R E A
0003420 D A 0 0 0 1 3 3 Q W I N D O
0003440 W A D D P R O P 2 1 Q P U T
0003460 W I N D O W P R O P 1 2 Q S
0003500 P A W N . M O U S E 7 P U T
0003520 W I N D O W P R O P ) \r ( 6 0 Q
0003540 E R R O R 4 7 Q I N T E R
0003560 N A L 3 0 Q \ N U M B E R P
0003600 A D . R E A D E R . C L O S E F
0003620 N 2 5 Q C L O S E F N 1 6
0003640 Q F I N I S H E D F L G 3
0003660 T O T A L ) \r ( 4 4 Q ( N U
0003700 M B E R P A D . R E A D A 0 0 0
0003720 1 ) ) \r C R E A T E . N U M B E
0003740 R P A D . R E A D E R A 0 0 0 1
0003760 D 1 \r ( N A M E E R R O R S
0004000 E T P 1 5 Q L I N E P
0004020 1 2 Q M S G L I N E S P 1
0004040 1 Q F O N T H E I G H T P
0004060 1 0 Q T O T A L W I D T H P
0004100 7 N U M B E R P A D P 6
0004120 T O T A L R E G I O N P 5
0004140 P A D L E F T P 4 R E A
0004160 D E R W I D T H P 3 W I N
0004200 P 2 M S G F O N T P 1
0004220 D I G I T F O N T P 0 N
0004240 U M B E R / R E A D E R / M A X
0004260 D I G I T S F 1 6 Q F L O
0004300 A T I N G P T F L G F 1 7 Q
0004320 M S G F 2 0 Q D I G I T
0004340 F O N T F 2 1 Q M A C R O
0004360 Y F 2 2 Q M S G F O N T
0004400 F 2 3 Q I N C L U D E A B O
0004420 R T F L G F 2 4 Q R N U M
0004440 B E R . A B O R T . B I T M A P
0004460 F 2 5 Q R N U M B E R . C
0004500 L E A R . B I T M A P F 2 6
0004520 Q W P O S I T I O N ) 001 240 016
0004540 \t 002 \0 W 034 222 l \b 201 l 006 W 265 \b `
0004560 \0 \0 \t \0 \0 W $ 265 \b ` \0 \0 \t \0 \0 021
0004600 243 \f ` \0 \0 037 g \0 \0 W & 262 037 J \t \0
0004620 \0 _ 022 l \n 361 235 l 024 O 022 361 227 W ( W
0004640 * h 032 032 210 o \0 \0 \0 203 o \0 \0 \0 o \0
0004660 \0 \0 W 034 224 o \0 \0 \0 203 o \0 \0 \0 o \0
0004700 \0 \0 \n \0 \0 \n \0 \0 \n \0 \0 032 _ 026 277 d
0004720 O 026 024 004 277 d l 003 024 \b 277 d i 024 \f 277
0004740 d I 024 020 277 d g \0 \0 024 034 277 d g \0 \0
0004760 024 026 277 d l 002 024 032 277 d g \0 \0 024 277
0005000 j d n 177 377 d h 032 032 032 032 _ 030 277 d O
0005020 030 024 \n 277 d 006 \0 \0 311 \n 002 002 002 I \t \0
0005040 \0 l 002 330 030 277 _ 016 277 W , H k 330 l 0
0005060 I \n \0 \0 332 _ 020 l \f 330 ] O 016 \t \0 \0
0005100 006 \0 \0 310 004 330 \ \t \0 \0 W 036 265 . j O
0005120 016 \t \0 \0 006 \0 \0 310 003 330 \t \0 \0 \v \0 \0
0005140 h d i \f \0 \0 273 W 036 262 7 J K \n \0 \0
0005160 277 K \t \0 \0 277 O 024 260 % J L \v \0 \0 _
0005200 024 \t \0 \0 J \t \0 \0 332 260 306 d 001 021 001 \r
0005220 O 032 K \n \0 \0 277 K \t \0 \0 023 002 003 265 355
0005240 K \t \0 \0 277 O 016 K M j 032 \v \0 \0 277 K
0005260 g \0 \0 l 006 O 016 \t \0 \0 006 \0 \0 310 003 l
0005300 002 333 O 020 I \t \0 \0 h 032 032 032 032 ^ \v \0
0005320 \0 277 N K l 002 \v \0 \0 277 I K \n \0 \0 277
0005340 K g \0 \0 j \v \0 \0 277 K g \0 \0 H \v \0
0005360 \0 277 K \t \0 \0 277 K \t \0 \0 277 K 022 c "
0005400 i 020 \0 ( 6 2 7 Q C L O S E W
0005420 6 2 2 Q D I S P L A Y / N U M
0005440 B E R / R E A D E R / T O T A L
0005460 6 1 5 Q P U T W I N D O W P
0005500 R O P 6 0 4 Q P U T W I N D
0005520 O W P R O P 5 7 3 Q D S P F
0005540 O N T 5 6 5 Q \ R E A D N U
0005560 M B E R . O U T L I N E R E G I
0005600 O N 5 5 5 Q P U T W I N D O
0005620 W P R O P 5 4 4 Q F O N T H
0005640 E I G H T 5 2 6 Q C H E C K
0005660 / M E N U / I M A G E 5 1 2 Q
0005700 A D D M E N U 5 0 0 Q O P
0005720 E N W 4 6 7 Q T E R P R I
0005740 4 6 2 Q P R I N 3 4 4 4 Q
0005760 F O N T H E I G H T 4 4 0 Q
0006000 L E N G T H 4 3 3 Q B R E A
0006020 K . M S G . I N T O . L I N E S
0006040 4 2 1 Q M O V E T O U P P E
0006060 R L E F T 4 1 4 Q D S P F O
0006100 N T 4 0 2 Q C R E A T E W
0006120 3 7 4 Q R E G I O N O N S C R
0006140 E E N 3 7 1 Q H E I G H T I
0006160 F W I N D O W 3 6 0 Q C H E
0006200 C K / M E N U / I M A G E 3 4
0006220 6 Q W I D T H I F W I N D O W
0006240 3 3 4 Q C H E C K / M E N U
0006260 / I M A G E 3 2 0 Q C H A R
0006300 W I D T H 2 7 5 Q F O N T H
0006320 E I G H T 1 4 7 Q \ A P P E
0006340 N D 2 1 4 4 Q \ A P P E N D
0006360 2 1 4 1 Q \ A P P E N D 2
0006400 5 5 Q F O N T H E I G H T 3
0006420 3 Q F O N T C R E A T E 2 1
0006440 Q F O N T C R E A T E ) \r ( 6
0006460 1 1 Q M A X D I G I T S 6 0
0006500 0 Q T O T A L 5 3 1 Q B I
0006520 T M A P 5 1 7 Q T O T A L R
0006540 E G 3 6 3 Q B I T M A P 3
0006560 3 7 Q B I T M A P 2 6 4 Q
0006600 M E N U 2 3 1 Q C L R P R O
0006620 M P T 2 1 4 Q N U M B E R .
0006640 R E A D E R . H A N D L E R 2
0006660 0 5 Q N U M B E R P A D . H E
0006700 L D F N 4 5 Q - 4 1 Q 004
0006720 003 M E N U T Y P E # 3 0 Q D
0006740 E F A U L T F O N T 1 6 Q B
0006760 O L D F O N T ) \r ( 1 3 6 Q
0007000 ( 0 o k ) 1 3 2 Q ( b s )
0007020 1 2 5 Q ( % . ) 1 1 6 Q
0007040 ( 1 2 3 4 5 6 7 1
0007060 0 Q 1 1 Q ) 1 1 2 Q ( %
0007100 c l r ) 1 0 5 Q ( a b t
0007120 c l r ) ) \r C R E A T E . N U M
0007140 B E R P A D . R E A D E R D 1
0007160 \r ( P 3 R E S E T S T A T E
0007200 P 2 M A C R O Y P 0
0007220 O L D V A L U E I 5 F L O
0007240 A T I N G P T F L G I 4 I
0007260 N C L U D E A B O R T F L G I
0007300 3 D I G I T F O N T I 2
0007320 M S G F O N T I 1 W P O
0007340 S I T I O N I 0 M S G F
0007360 4 R E S E T V A R S L S T )
0007400 \0 < 004 001 \0 006 l \n \t \0 \0 021 1 003 g
0007420 \0 \0 H h 032 032 h 032 T 032 c \b Y o \0 \0
0007440 \0 g \0 \0 \n \0 \0 243 g \0 \0 273 I 002 c \b
0007460 g \0 \0 I 001 001 002 \n \0 \0 K 223 \b \0 \0 020
0007500 J 020 \0 ( 6 7 Q E R R O R ! 6
0007520 2 Q A P P L Y 3 7 Q C R E
0007540 A T E . N U M B E R P A D . R E
0007560 A D E R A 0 0 0 1 4 R A D I
0007600 X ) \r ( 5 3 Q R A D I X 4 3
0007620 Q E R R O R 3 4 Q I N T E
0007640 R N A L 1 2 Q R A D I X ) \r
0007660 ( 3 1 Q ( C R E A T E . N U
0007700 M B E R P A D . R E A D E R A 0
0007720 0 0 1 ) ) \r B R E A K . M S G .
0007740 I N T O . L I N E S D 1 \r ( P
0007760 1 2 Q N L P 1 0 Q I
0010000 P 6 C H A R C O D E P 5
0010020 C H A R W I D T H P 4 S
0010040 T R L S T P 3 L A S T S P
0010060 A C E P 2 B E G I N P
0010100 1 T H I S L I N E P 0 M
0010120 S G S T R I 2 W I D T H
0010140 I 1 F O N T I 0 M S G
0010160 ) \0 333 \v \0 \0 003 @ d 003 232 \t \0 \0 l
0010200 002 m 376 \v \0 \0 202 \t \0 \0 j k 021 C 006 H
0010220 \t \0 \0 k 021 002 \b O 020 O 016 363 262 031 O 020
0010240 k 331 J 363 235 L H J m 377 \v \0 \0 h 032 \n
0010260 \0 \0 \ L 020 H O 020 ) ^ A \n \0 \0 275 I
0010300 M 330 Y B 363 242 261 \0 201 N l 360 262 035 L
0010320 H J O 020 k 331 \v \0 \0 h 032 \n \0 \0 274 j
0010340 271 O 020 k 330 272 h 273 260 V K 262 > L H J
0010360 K k 331 \v \0 \0 h 032 \n \0 \0 274 K k 330 272
0010400 j 271 O 020 K k 330 021 002 \n O 024 O 022 363 263
0010420 025 H O 024 ) A \n \0 \0 I 330 271 O 024 k 324
0010440 _ 024 260 352 023 h 273 260 027 L H J O 020 k 331
0010460 \v \0 \0 h 032 \n \0 \0 274 O 020 272 M 271 O 020
0010500 k 324 _ 020 261 377 U N l 360 262 363 O 020 [
0010520 260 360 \0 ( 2 7 7 Q \ N C O N C 2
0010540 2 7 2 Q S U B S T R I N G
0010560 2 4 0 Q C H A R W I D T H 2
0010600 0 2 Q \ N C O N C 2 1 7 5 Q
0010620 S U B S T R I N G 1 4 5 Q
0010640 \ N C O N C 2 1 4 0 Q S U B
0010660 S T R I N G 1 0 5 Q C H A R
0010700 W I D T H 7 1 Q \ N C O N C
0010720 2 6 4 Q S U B S T R I N G
0010740 3 2 Q N C H A R S 2 1 Q M
0010760 K S T R I N G 1 5 Q S U B S
0011000 T R I N G 6 M K S T R I N G
0011020 ) \r N I L \r ( ) \r R E G I O N O
0011040 N S C R E E N D 1 \r ( P 1
0011060 B O T T O M P 0 L E F T
0011100 I 2 H E I G H T I 1 W
0011120 I D T H I 0 P O S ) \0 Q
0011140 004 \0 \0 003 021 @ 003 @ \t \0 \0 225 @ 001 270 @
0011160 002 212 \b \0 \0 277 ` \0 \0 270 ` \0 \0 271 H A
0011200 330 ` \0 \0 361 235 ` \0 \0 A 331 272 j J 361 241
0011220 J 200 j 270 I B 330 n 003 ( 361 235 n 003 ( B
0011240 331 273 j K 361 241 K 200 j 271 H I A B h 032
0011260 032 032 032 020 \0 ( 2 0 Q G E T M O U
0011300 S E S T A T E 6 P O S I T I
0011320 O N P ) \r ( 4 4 Q S C R E E N
0011340 W I D T H 3 7 Q S C R E E N
0011360 W I D T H 3 0 Q L A S T M O
0011400 U S E Y 2 4 Q L A S T M O U
0011420 S E X ) \r N I L \r D I S P L A Y
0011440 / N U M B E R / R E A D E R / T
0011460 O T A L A 0 0 0 1 D 1 \r ( N A
0011500 M E E R R O R S E T L ( 2
0011520 E R R O R S E T . W 1 E R
0011540 R O R S E T . V 0 E R R O R
0011560 S E T . U ) F 0 W I N F
0011600 1 T O T A L R E G F 2
0011620 M A C R O Y ) \0 021 \0 003 \0 003 P g
0011640 \0 \0 \n \0 \0 Q P \v \0 \0 c 004 i 020 \0 (
0011660 1 3 Q C E N T E R P R I N T I
0011700 N R E G I O N 6 G E T W I N
0011720 D O W U S E R P R O P ) \r ( 3
0011740 T O T A L ) \r ( ) \r D I S P L A
0011760 Y / N U M B E R / R E A D E R /
0012000 T O T A L D 1 \r ( P 4 R E
0012020 S E T S T A T E P 3 M A C
0012040 R O Y P 1 O L D V A L U E
0012060 P 0 T O T A L R E G I
0012100 0 W I N F 5 R E S E T V
0012120 A R S L S T ) \0 Q 005 001 \0 001 @ g
0012140 \0 \0 \n \0 \0 021 001 \0 H j g \0 \0 @ \f \0
0012160 \0 l \n \t \0 \0 021 1 004 g \0 \0 I h 032 032
0012200 h 032 U 032 c \n 272 o \0 \0 \0 g \0 \0 \n \0
0012220 \0 243 g \0 \0 274 J 002 c \n 277 g \0 \0 J 001
0012240 001 002 \n \0 \0 277 L 264 006 \b \0 \0 h 020 \0 (
0012260 1 1 5 Q E R R O R ! 1 0 6 Q
0012300 A P P L Y 6 2 Q D I S P L
0012320 A Y / N U M B E R / R E A D E R
0012340 / T O T A L A 0 0 0 1 2 7 Q
0012360 R A D I X 2 2 Q D S P F I L
0012400 L 6 G E T W I N D O W U S E
0012420 R P R O P ) \r ( 7 7 Q R A D I
0012440 X 6 6 Q E R R O R 5 7 Q
0012460 I N T E R N A L 3 5 Q R A D
0012500 I X 1 6 Q R E P L A C E 3
0012520 T O T A L R E G ) \r ( 5 4 Q
0012540 ( D U M M Y . F O R . E R R O
0012560 R S E T ) ) \r N U M B E R . R E
0012600 A D E R . H A N D L E R D 1 \r
0012620 ( P 2 P O W E R P 1 T
0012640 O T A L P 0 W I N I 2
0012660 B U T T O N I 1 M E N U
0012700 I 0 D I G I T F 6 R
0012720 N U M B E R . A B O R T . B I T
0012740 M A P F 7 R N U M B E R .
0012760 C L E A R . B I T M A P ) 001 020
0013000 006 002 \0 003 A \t \0 \0 021 ! 002 H g \0 \0 \n
0013020 \0 \0 Y H g \0 \0 @ d g \0 \0 360 227 277 I
0013040 l \n 333 261 \0 347 g \0 \0 360 226 I \t \0 \0 261
0013060 \0 333 @ d g \0 \0 360 224 277 I 261 \0 317 g \0
0013100 \0 360 237 H g \0 \0 k \v \0 \0 277 I 006 \0 \0
0013120 261 \0 272 @ d g \0 \0 360 232 277 H g \0 \0 i
0013140 \v \0 \0 h 020 V 360 250 @ d g \0 \0 360 262 025
0013160 277 H g \0 \0 \n \0 \0 277 H g \0 \0 i \v \0
0013200 \0 h 020 W 016 360 245 @ g \0 \0 360 232 H g \0
0013220 \0 \n \0 \0 277 j 260 t H g \0 \0 \n \0 \0 I
0013240 \t \0 \0 \t \0 \0 360 236 j d n 003 350 d H \r
0013260 005 \0 \0 277 I 260 U H g \0 \0 \n \0 \0 Z 262
0013300 : H g \0 \0 J k 330 \v \0 \0 277 J k o \0
0013320 \0 \0 021 003 005 L K 363 254 M o \0 \0 \0 352 275
0013340 L k 324 \ 260 362 M 022 272 j I 363 246 I @ J
0013360 326 324 260 030 I @ J 326 217 j I 363 246 I l \n
0013400 326 @ 324 205 I l \n 326 @ 325 \v \0 \0 H \t \0
0013420 \0 h 020 \0 ( 4 1 4 Q D I S P L A
0013440 Y / N U M B E R / R E A D E R /
0013460 T O T A L 4 1 0 Q P U T W I
0013500 N D O W P R O P 3 0 6 Q P U
0013520 T W I N D O W P R O P 2 7 1 Q
0013540 G E T W I N D O W U S E R P R
0013560 O P 2 5 6 Q \ R E A D N U M
0013600 B E R . F L A S H A R E A 2 4
0013620 1 Q N C H A R S 2 3 6 Q A
0013640 B S 2 3 2 Q G E T W I N D O
0013660 W U S E R P R O P 2 1 7 Q P
0013700 U T W I N D O W P R O P 1 7 4
0013720 Q P U T W I N D O W P R O P
0013740 1 6 3 Q P U T W I N D O W P R
0013760 O P 1 3 6 Q P U T W I N D O
0014000 W P R O P 1 0 6 Q P U T W I
0014020 N D O W P R O P 5 2 Q M I N
0014040 U S 1 5 Q G E T W I N D O W
0014060 U S E R P R O P 3 W F R O M
0014100 M E N U ) \r ( 3 0 0 Q D E C I
0014120 M A L P O W E R 2 6 6 Q D E
0014140 C I M A L P O W E R 2 2 7 Q
0014160 M A X D I G I T S 2 1 4 Q D
0014200 E C I M A L P O W E R 2 0 6 Q
0014220 c l r 1 7 0 Q F I N I S H
0014240 E D F L G 1 6 0 Q T O T A L
0014260 1 5 0 Q a b t 1 3 2 Q F
0014300 I N I S H E D F L G 1 2 3 Q
0014320 o k 1 1 3 Q F L O A T P 1
0014340 0 2 Q D E C I M A L P O W E R
0014360 7 4 Q % . 6 2 Q % 4
0014400 4 Q - 2 7 Q b s 2 2 Q
0014420 T O T A L 1 2 Q T O T A L )
0014440 \r ( 3 3 1 Q . 1 3 1 5 Q
0014460 1 . 0 ) \r N U M B E R P A D . H
0014500 E L D F N D 1 \r ( I 2 B U
0014520 T T O N I 1 M E N U I
0014540 0 I T E M F 0 R N U M B
0014560 E R . A B O R T . B I T M A P
0014600 F 1 R N U M B E R . C L E A
0014620 R . B I T M A P ) \0 z \0 002 \0 003
0014640 @ d g \0 \0 360 226 277 o \0 \0 \0 260 i g \0
0014660 \0 360 225 o \0 \0 \0 260 ^ @ d g \0 \0 360 226
0014700 277 o \0 \0 \0 260 P g \0 \0 360 225 o \0 \0 \0
0014720 260 E @ d g \0 \0 360 226 277 o \0 \0 \0 260 7
0014740 g \0 \0 360 225 o \0 \0 \0 260 , @ d g \0 \0
0014760 360 226 277 o \0 \0 \0 260 036 P 360 225 o \0 \0 \0
0015000 260 025 @ d Q 360 225 277 o \0 \0 \0 207 003 244 o
0015020 \0 \0 \0 200 h \t \0 \0 020 \0 ( 1 6 7 Q
0015040 P R O M P T P R I N T ) \r ( 1 1
0015060 7 Q % 1 0 2 Q % . 6 6
0015100 Q - 5 1 Q a b t 3 5 Q
0015120 c l r 2 0 Q o k 4 b s )
0015140 \r ( 1 6 2 Q " W i l l p u
0015160 t t h i s d i g i t o n
0015200 t h e r i g h t o f t h e
0015220 t o t a l . " 1 5 3 Q " W
0015240 i l l r e s e t t h e t o
0015260 t a l t o 0 " 1 3 7 Q "
0015300 w i l l a b o r t t h i s
0015320 q u e s t i o n . " 1 2 6 Q
0015340 " d o e s n ' t d o a n y t
0015360 h i n g . " 1 1 0 Q " w i l
0015400 l e n t e r a d e c i m a
0015420 l p o i n t . " 7 5 Q "
0015440 w i l l c h a n g e t h e
0015460 s i g n o f t h e t o t a
0015500 l " 5 7 Q " w i l l a b o
0015520 r t t h i s q u e s t i o n
0015540 . " 4 4 Q " W i l l r e s
0015560 e t t h e t o t a l t o
0015600 0 " 2 6 Q " I n d i c a t e
0015620 s t h a t y o u a r e t
0015640 h r o u g h e n t e r i n g
0015660 t h e n u m b e r . " 1 3 Q
0015700 " W i l l e r a s e t h e
0015720 l a s t d i g i t e n t e
0015740 r e d . " ) \r \ R E A D N U M B
0015760 E R . O U T L I N E R E G I O N
0016000 D 1 \r ( P 0 N I 2 O
0016020 U T L I N E S I Z E I 1 W
0016040 I N I 0 R E G ) \0 _ 001 \0
0016060 \0 003 B d 005 001 241 005 002 265 004 l 002 021 001 \0
0016100 h d d A @ 001 H 331 @ 002 001 H 331 @ 002 002
0016120 001 H l 002 332 330 @ 002 002 002 001 H l 002 332 330
0016140 g \0 \0 g \0 \0 n 377 377 \r \v \0 \0 h d d
0016160 A @ 001 @ 002 001 @ 002 002 001 @ 002 002 002 001 g
0016200 \0 \0 g \0 \0 h A \n \0 \0 \r \v \0 \0 h 020
0016220 \0 ( 1 3 3 Q B K B I T B L T
0016240 1 2 7 Q D S P T E X T U R E
0016260 7 2 Q B K B I T B L T ) \r ( 1
0016300 2 2 Q R E P L A C E 1 1 7 Q
0016320 T E X T U R E 6 3 Q R E P
0016340 L A C E 6 0 Q T E X T U R E
0016360 ) \r N I L \r ( P R E T T Y C O M
0016400 P R I N T R E A D N U M B E R
0016420 C O M S ) \r ( R P A Q Q R E A
0016440 D N U M B E R C O M S ( ( F N
0016460 S \ N U M B E R P A D . R E A
0016500 D E R . C L O S E F N \ R E A
0016520 D N U M B E R . F L A S H A R E
0016540 A R N U M B E R N U M B E R
0016560 P A D . R E A D \r C R E A T E
0016600 . N U M B E R P A D . R E A D E
0016620 R B R E A K . M S G . I N T O
0016640 . L I N E S R E G I O N O N S
0016660 C R E E N D I S P L A Y / N U
0016700 M B E R / R E A D E R / T O T A
0016720 L \r N U M B E R . R E A D E R
0016740 . H A N D L E R N U M B E R P
0016760 A D . H E L D F N \ R E A D N
0017000 U M B E R . O U T L I N E R E G
0017020 I O N ) ( U G L Y V A R S R
0017040 N U M B E R . C L E A R . B I T
0017060 M A P \r R N U M B E R . A B O
0017100 R T . B I T M A P ) ) ) \r ( R E
0017120 A D V A R S R N U M B E R . C
0017140 L E A R . B I T M A P R N U M
0017160 B E R . A B O R T . B I T M A P
0017200 ) \r ( { ( R E A D B I T M A P
0017220 ) ( 1 4 1 4 " G J @ @ "
0017240 " D J C L " " D B B D " " D
0017260 B C L " " D J B @ " " G K K
0017300 L " " @ @ @ @ " " @ @ @ @ "
0017320 " @ G K L " " @ D J D " "
0017340 @ G K L " \r " @ D J H " " @
0017360 D J D " " @ @ @ @ " ) } {
0017400 ( R E A D B I T M A P ) ( 1
0017420 4 1 4 " G K L @ " " D J D
0017440 @ " " D K L @ " " G J D @ "
0017460 " D J D @ " " D K L @ " "
0017500 @ @ @ @ " " @ @ C H " \r " G
0017520 K M @ " " D J E @ " " D K M
0017540 @ " " D J I @ " " G J M @ "
0017560 " @ @ @ @ " ) } ) \r ( P U T
0017600 P R O P S R E A D N U M B E R
0017620 C O P Y R I G H T ( " X e r
0017640 o x C o r p o r a t i o n "
0017660 1 9 8 2 1 9 8 3 1 9 8 4 1
0017700 9 8 5 ) ) \r N I L \r
0017712