$ od -c -N 50000 [phylum]<LISPUSERS>Lyric>irisstream!1
0000000 ( D E F I N E - F I L E - I N F
0000020 O 247 R E A D T A B L E " I N
0000040 T E R L I S P " 247 P A C K A G
0000060 E " I N T E R L I S P " ) \r 006
0000100 001 ( F I L E C R E A T E D "
0000120 4 - F e b - 8 7 1 9 : 4 8 : 5
0000140 7 " 006 004 { E R I S } < I R I S
0000160 > N E X T > I R I S S T R E A M
0000200 . ; 1 0 006 001 6 8 5 6 6 \r \r
0000220 c h a n g e s t o
0000240 % : ( R E C O R D S I R I
0000260 S D A T A ) \r
0000300 ( F N S
0000320 O P E N I R I S S T R E A M C
0000340 L E A R I R I S D R A W B I T
0000360 M A P T R Y G R A P H E R \
0000400 F O N T C R E A T E . I R I S
0000420 \r
0000440 \ O U T C H
0000460 A R F N . I R I S \ I R I S S
0000500 T R E A M I N I T \ I R I S .
0000520 A S S U R E . C O L O R \ L O
0000540 O K U P R G B B O X S C R E E
0000560 N \r
0000600 I R I S
0000620 . C O N S . O B J N O I R I S
0000640 B I T M A P F I L L P O L Y G
0000660 O N I N S T A L L . O B J F O
0000700 N T \ C L O S E F . I R I S
0000720 R \r
0000740 S P P I
0000760 N P U T S T R E A M \ B A C K
0001000 C O L O R . I R I S \ B I T B
0001020 L T . I R I S \ B L T S H A D
0001040 E . I R I S \r
0001060
0001100 \ F O N T S A V A I L A B L E
0001120 . I R I S \ L E F T M A R G I
0001140 N . I R I S \ R E S E T . I R
0001160 I S \r
0001200 \ P S
0001220 P L I N E . T O . B E Z I E R .
0001240 G E O M E T R Y \ S C A L E .
0001260 I R I S \ S C A L E . S P L I
0001300 N E . B Y . D E R I V S \r
0001320
0001340 \ S T R I N G W I
0001360 D T H . I R I S \ T E R P R I
0001400 . I R I S \ F O N T . I R I S
0001420 \ C R E A T E C H A R S E T .
0001440 I R I S \r
0001460 \
0001500 I R I S S E T F O N T B A S E
0001520 \ I R I S F O N T B A S E \ C
0001540 H A N G E C H A R S E T . I R I
0001560 S \ C H A R W I D T H . I R I
0001600 S \r
0001620 \ C L I
0001640 P P I N G R E G I O N . I R I S
0001660 \ C L O S E F N . I R I S \
0001700 C O L O R . I R I S \ D R A W
0001720 C I R C L E . I R I S \r
0001740
0001760 \ D R A W C U R V E
0002000 . I R I S \ D R A W L I N E .
0002020 I R I S \ C O N V E R T L I N
0002040 E S T Y L E . I R I S \ M O V
0002060 E T O . I R I S \r
0002100
0002120 \ X P O S I T I O N . I R
0002140 I S \ Y P O S I T I O N . I R
0002160 I S \ F I L L C I R C L E . I
0002200 R I S \ D R A W E L L I P S E
0002220 . I R I S \r
0002240
0002260 \ F I L L P O L Y G O N . I R I
0002300 S \ I R I S . B I T B L T \
0002320 D R A W P O L Y G O N . I R I S
0002340 A L I G N ) \r
0002360 ( V A R
0002400 S I R I S S T R E A M C O M S
0002420 \ B E Z I E R B A S I S . I R
0002440 I S ) \r \r p r e v i
0002460 o u s d a t e % : " 1 6 - J
0002500 a n - 8 7 1 8 : 1 4 : 1 1 "
0002520 { E R I S } < I R I S > N E X T
0002540 > I R I S S T R E A M . ; 5 ) \r
0002560 \r \r ( P R E T T Y C O M P R I N
0002600 T I R I S S T R E A M C O M S
0002620 ) \r \r ( R P A Q Q 006 002 I R I S
0002640 S T R E A M C O M S 006 001 \r
0002660 ( ( F I L E S S F F
0002700 O N T C O L O R I R I S L I
0002720 B I R I S I O I R I S N E T
0002740 ) \r [ A D D V A
0002760 R S ( I M A G E S T R E A M T
0003000 Y P E S ( I R I S ( O P E N
0003020 S T R E A M O P E N I R I S S
0003040 T R E A M ) \r
0003060
*
0003120 ( F O N T C R E A T E \ F O N
0003140 T C R E A T E . I R I S ) \r
0003160
*
0003220 ( F O N T S A V A
0003240 I L A B L E \ F O N T S A V A
0003260 I L A B L E . I R I S ) \r
0003300
*
0003340 ( C R E A T E C H A
0003360 R S E T \ C R E A T E C H A R
0003400 S E T . I R I S ] \r
0003420 ( G L O B A L V A R S \ I
0003440 R I S . V E R B O S E I R I S
0003460 N S H O S T N U M B E R \ I R
0003500 I S . D E B U G \ B E Z I E R
0003520 B A S I S . I R I S \ I R I S
0003540 C O L O R M A P C A C H E \r
0003560 \ I
0003600 R I S . V E R S I O N \ I R I
0003620 S S T R E A M I R I S C O N N
0003640 \ I V . H I G H O B J N O \
0003660 I R I S . B I T P L A N E S ) \r
0003700 ( I N I T V A R
0003720 S ( \ I R I S . V E R B O S E
0003740 T ) \r
0003760 ( \ I R I S S T R E A M S
0004000 N I L ) \r
0004020 ( \ I R I S . V E R S
0004040 I O N ' G L 2 ) \r
0004060 ( I R I S F O
0004100 N T D I R E C T O R I E S ' {
0004120 E R I S } < I R I S > S F > ) \r
0004140 (
0004160 \ C H A R S E G M E N T S . I R
0004200 I S 1 0 ) \r
0004220 ( \ I R I S . B I T
0004240 P L A N E S 4 ) \r
0004260 ( I R I S F O
0004300 N T F A M I L I E S ' ( G A C
0004320 H A T I M E S R O M A N ) ) \r
0004340 (
0004360 I R I S F O N T R O T A T I O N
0004400 S ' ( 0 ) ) \r
0004420 ( I R I S F O N T
0004440 S I Z E S ' ( 8 1 0 1 2
0004460 1 4 1 8 2 4 ) ) \r
0004500 ( \ I R I S
0004520 . D E B U G N I L ) \r
0004540 ( I R I S
0004560 N S H O S T N U M B E R " 0 #
0004600 4 0 0 0 . 1 2 0 0 0 . 4 1 5 0 4
0004620 # 0 " ) \r
0004640 ( \ I V . H I G H O B J
0004660 N O 1 0 0 0 0 0 ) ) \r
0004700 ( V A R S \ B E Z I E
0004720 R B A S I S . I R I S \ I R I
0004740 S . V E R B O S E \ B E Z I E
0004760 R B A S I S . I R I S \ I R I
0005000 S C O L O R M A P C A C H E \
0005020 I R I S . V E R S I O N ) \r
0005040 ( C O N S T A N T S
0005060 I R I S . Y A X I S I R I S
0005100 . Z A X I S ) \r
0005120 ( F N S B O X S C R E E N C
0005140 L E A R I R I S D R A W B I T
0005160 M A P I R I S . C O N S . O B
0005200 J N O I R I S B I T M A P I
0005220 N S T A L L . O B J F O N T O
0005240 P E N I R I S S T R E A M \r
0005260 \ C L O
0005300 S E F . I R I S R S P P I N
0005320 P U T S T R E A M T R Y G R A
0005340 P H E R \ B A C K C O L O R .
0005360 I R I S \ B I T B L T . I R I
0005400 S \ B L T S H A D E . I R I S
0005420 \r \
0005440 F O N T C R E A T E . I R I S
0005460 \ F O N T S A V A I L A B L E .
0005500 I R I S \ L E F T M A R G I N
0005520 . I R I S \ R E S E T . I R I
0005540 S \ L O O K U P R G B \r
0005560 \ P S P L
0005600 I N E . T O . B E Z I E R . G E
0005620 O M E T R Y \ S C A L E . I R
0005640 I S \ S C A L E . S P L I N E
0005660 . B Y . D E R I V S \ T E R P
0005700 R I . I R I S \ F O N T . I R
0005720 I S \r
0005740 \ C R E A T E C H A R S E T .
0005760 I R I S \ I R I S S E T F O N
0006000 T B A S E \ I R I S F O N T B
0006020 A S E \ C H A N G E C H A R S
0006040 E T . I R I S \ C H A R W I D
0006060 T H . I R I S \r
0006100 \ O U T C H A R F N
0006120 . I R I S \ C L I P P I N G R
0006140 E G I O N . I R I S \ C L O S
0006160 E F N . I R I S \ C O L O R .
0006200 I R I S \ I R I S . A S S U R
0006220 E . C O L O R \r
0006240 \ D R A W C I R C L
0006260 E . I R I S \ D R A W C U R V
0006300 E . I R I S \ D R A W L I N E
0006320 . I R I S \ C O N V E R T L I
0006340 N E S T Y L E . I R I S \ I R
0006360 I S S T R E A M I N I T \r
0006400 \ M O V E
0006420 T O . I R I S \ X P O S I T I
0006440 O N . I R I S \ Y P O S I T I
0006460 O N . I R I S \ F I L L C I R
0006500 C L E . I R I S \ D R A W E L
0006520 L I P S E . I R I S \r
0006540 \ F I L L P O
0006560 L Y G O N . I R I S \ I R I S
0006600 . B I T B L T \ D R A W P O L
0006620 Y G O N . I R I S A L I G N )
0006640 \r \r \r 006 006 ( *
0006660 ; ; ; " t e s t f u n c t i
0006700 o n s " ) 006 001 \r \r
0006720 ( R E C O R D S B E Z I E R
0006740 I R I S D A T A I R I S S T
0006760 R E A M S P L I N E ) \r
0007000 ( C O N S T A N T S
0007020 ( \ A L T L I N E S T Y L E . I
0007040 R I S 1 ) \r
0007060 ( \ I R I S . I T A
0007100 L I C S . R O T A T I O N - 1
0007120 0 0 ) \r
0007140 ( \ P R I M A R Y L I N E
0007160 S T L E . I R I S 0 ) \r
0007200 ( \ I R
0007220 I S . B O L D . L I N E W I D T
0007240 H 2 ) ) \r [ P
0007260 ( \ I R I S S T R E A M I N I
0007300 T ) \r ( S
0007320 E T F O N T C L A S S C O M P O
0007340 N E N T D E F A U L T F O N T
0007360 ' I R I S ' ( G A C H A 1
0007400 2 ] \r [ A D D V
0007420 A R S ( D E F A U L T P R I N
0007440 T I N G H O S T ( I R I S I
0007460 r i s ) ) \r
0007500 ( P R I N T E R T Y P
0007520 E S ( I R I S ( C A N P R I
0007540 N T ( I R I S ) ) \r
0007560
0007600 ( B
0007620 I T M A P F I L E ( I R I S B
0007640 I T M A P F I L E B I T M A
0007660 P S C A L E F A C T O R R E
0007700 G I O N R O T A T I O N \r
0007720
*
0010000 T I T L E ] \r
0010020 ( P ( P U T P R O P
0010040 ' I r i s ' P R I N T E R T Y
0010060 P E ' I R I S ) ) \r
0010100 ( P R O P P R I N T E R
0010120 T Y P E I r i s ) \r
0010140 ( F U N C T I O N S W I
0010160 T H . I R I S . A T T R ) ) ) \r
0010200 ( F I L E S L O A D S F F O N
0010220 T C O L O R I R I S L I B
0010240 I R I S I O I R I S N E T ) \r
0010260 \r ( A D D T O V A R 006 002 I M A
0010300 G E S T R E A M T Y P E S 006 001
0010320 ( I R I S ( O P E N S T R E A
0010340 M O P E N I R I S S T R E A M
0010360 ) \r
0010400
0010420 ( F O N T C R E A T E \
0010440 F O N T C R E A T E . I R I S )
0010460 \r
0010500
0010520 ( F O N T S A V A I L A B L
0010540 E \ F O N T S A V A I L A B L
0010560 E . I R I S ) \r
0010600
0010620 ( C R E A T E
0010640 C H A R S E T \ C R E A T E C
0010660 H A R S E T . I R I S ) ) ) \r (
0010700 D E C L A R E % : D O E V A L
0010720 @ C O M P I L E D O N T C O P
0010740 Y \r \r ( G L O B A L V A R S \
0010760 I R I S . V E R B O S E I R I
0011000 S N S H O S T N U M B E R \ I
0011020 R I S . D E B U G \ B E Z I E
0011040 R B A S I S . I R I S \ I R I
0011060 S C O L O R M A P C A C H E \r
0011100 \ I R I S . V E R
0011120 S I O N \ I R I S S T R E A M
0011140 I R I S C O N N \ I V . H I
0011160 G H O B J N O \ I R I S . B I
0011200 T P L A N E S ) \r ) \r \r ( R P A
0011220 Q ? 006 002 \ I R I S . V E R B O
0011240 S E 006 001 T ) \r \r ( R P A Q ?
0011260 006 002 \ I R I S S T R E A M S 006 001
0011300 N I L ) \r \r ( R P A Q ? 006 002
0011320 \ I R I S . V E R S I O N 006 001
0011340 ' G L 2 ) \r \r ( R P A Q ? 006 002
0011360 I R I S F O N T D I R E C T O R
0011400 I E S 006 001 ' { E R I S } < I R
0011420 I S > S F > ) \r \r ( R P A Q ?
0011440 006 002 \ C H A R S E G M E N T S .
0011460 I R I S 006 001 1 0 ) \r \r ( R P A
0011500 Q ? 006 002 \ I R I S . B I T P L
0011520 A N E S 006 001 4 ) \r \r ( R P A Q
0011540 ? 006 002 I R I S F O N T F A M I
0011560 L I E S 006 001 ' ( G A C H A T
0011600 I M E S R O M A N ) ) \r \r ( R P
0011620 A Q ? 006 002 I R I S F O N T R O
0011640 T A T I O N S 006 001 ' ( 0 ) ) \r
0011660 \r ( R P A Q ? 006 002 I R I S F O
0011700 N T S I Z E S 006 001 ' ( 8 1 0
0011720 1 2 1 4 1 8 2 4 ) ) \r \r
0011740 ( R P A Q ? 006 002 \ I R I S . D
0011760 E B U G 006 001 N I L ) \r \r ( R P
0012000 A Q ? 006 002 I R I S N S H O S T
0012020 N U M B E R 006 001 " 0 # 4 0 0 0
0012040 . 1 2 0 0 0 . 4 1 5 0 4 # 0 " )
0012060 \r \r ( R P A Q ? 006 002 \ I V . H
0012100 I G H O B J N O 006 001 1 0 0 0 0
0012120 0 ) \r \r ( R P A Q Q 006 002 \ B E
0012140 Z I E R B A S I S . I R I S 006 001
0012160 ( ( - 1 . 0 3 . 0 - 3 . 0
0012200 1 . 0 ) \r
0012220
0012240 ( 3 . 0 - 6 . 0 3 . 0 0 .
0012260 0 ) \r
0012300 ( - 3
0012320 . 0 3 . 0 0 . 0 0 . 0 ) \r
0012340
0012360 ( 1 . 0 0
0012400 . 0 0 . 0 0 . 0 ) ) ) \r \r (
0012420 R P A Q Q 006 002 \ I R I S . V E
0012440 R B O S E 006 001 T ) \r \r ( R P A
0012460 Q Q 006 002 \ B E Z I E R B A S I
0012500 S . I R I S 006 001 ( ( - 1 . 0
0012520 3 . 0 - 3 . 0 1 . 0 ) \r
0012540
0012560 ( 3 . 0 - 6 .
0012600 0 3 . 0 0 . 0 ) \r
0012620
0012640 ( - 3 . 0 3 . 0 0
0012660 . 0 0 . 0 ) \r
0012700
0012720 ( 1 . 0 0 . 0 0 . 0 0
0012740 . 0 ) ) ) \r \r ( R P A Q Q 006 002
0012760 \ I R I S C O L O R M A P C A C
0013000 H E 006 001 ( ( ( 0 0 0 ) .
0013020 0 ) \r
0013040 (
0013060 ( 2 5 5 2 5 5 2 5 5 ) .
0013100 7 ) \r
0013120 ( (
0013140 0 2 5 5 0 ) . 2 ) \r
0013160
0013200 ( ( 0 0 2
0013220 5 5 ) . 4 ) \r
0013240
0013260 ( ( 2 5 5 0 0 ) .
0013300 1 ) \r
0013320 (
0013340 ( 2 5 5 2 5 5 0 ) . 3 )
0013360 \r
0013400 ( ( 2 5
0013420 5 0 2 5 5 ) . 5 ) \r
0013440
0013460 ( ( 0 2 5 5
0013500 2 5 5 ) . 6 ) ) ) \r \r ( R
0013520 P A Q Q 006 002 \ I R I S . V E R
0013540 S I O N 006 001 G L 2 ) \r ( D E C
0013560 L A R E % : E V A L @ C O M P
0013600 I L E \r \r ( R P A Q Q 006 002 I
0013620 R I S . Y A X I S 006 001 8 9 ) \r
0013640 \r ( R P A Q Q 006 002 I R I S . Z
0013660 A X I S 006 001 9 0 ) \r \r ( C O N
0013700 S T A N T S I R I S . Y A X I
0013720 S I R I S . Z A X I S ) \r ) \r
0013740 ( D E F I N E Q \r \r ( 006 004 B O X
0013760 S C R E E N 006 001 \r [ L A M B
0014000 D A N I L 006 006 006 001
0014020
*
0014060 006 006 ( * g
0014100 b n " 8 - N o v - 8 5 1 6
0014120 : 5 6 " ) 006 001 \r
0014140 \r 006 006 (
0014160 * * d r a w a b o x a
0014200 r o u n d t h e s c r e e n
0014220 ) 006 001 \r \r ( D R A W L I
0014240 N E 0 0 ( S U B 1 S C R
0014260 E E N W I D T H ) \r
0014300 0 N I L N I L \
0014320 I R I S S T R E A M ) \r
0014340 ( D R A W T O ( S U B 1 S C
0014360 R E E N W I D T H ) \r
0014400 ( S U B 1 S C R E
0014420 E N H E I G H T ) \r
0014440 N I L N I L \ I R
0014460 I S S T R E A M ) \r ( D
0014500 R A W T O 0 ( S U B 1 S C
0014520 R E E N H E I G H T ) \r
0014540 N I L N I L \
0014560 I R I S S T R E A M ) \r
0014600 ( D R A W T O 0 0 N I L
0014620 N I L \ I R I S S T R E A M )
0014640 \r ( F L U S H O U T P U
0014660 T I R I S C O N N ] ) \r \r ( 006
0014700 004 C L E A R I R I S 006 001 \r [
0014720 L A M B D A ( I R I S - C O N
0014740 N E C T I O N I R I S S T R E
0014760 A M ) 006 006 006 001
0015000 006 006
0015020 ( * ; " E d i t e d 2 -
0015040 F e b - 8 7 2 3 : 3 6 b y
0015060 g b n " ) 006 001 \r ( O R
0015100 I R I S S T R E A M ( S E T Q
0015120 I R I S S T R E A M \ I R I
0015140 S S T R E A M ) ) \r [ O
0015160 R I R I S - C O N N E C T I O
0015200 N ( S E T Q I R I S - C O N
0015220 N E C T I O N ( 006 002 f e t c h
0015240 006 001 S P P O U T S T R E A M
0015260 006 002 o f 006 001 ( 006 002 f e t c h 006
0015300 001 I R I S D A T A 006 002 o f 006
0015320 001 \ I R I S S T R E A M ] \r
0015340 ( I R I S . S I N G L E B
0015360 U F F E R I R I S - C O N N E
0015400 C T I O N ) \r ( I R I S
0015420 . G C O N F I G I R I S - C O
0015440 N N E C T I O N ) \r ( D
0015460 S P C L I P P I N G R E G I O N
0015500 W H O L E S C R E E N I R I
0015520 S S T R E A M ) \r ( I R
0015540 I S . O R T H O 0 S C R E E
0015560 N W I D T H 0 S C R E E N H
0015600 E I G H T - 1 0 0 0 1 0 0 0
0015620 I R I S - C O N N E C T I O N
0015640 ) \r ( D S P C O L O R
0015660 ' W H I T E I R I S S T R E A
0015700 M ) \r ( I R I S . L I N
0015720 E W I D T H 1 I R I S - C O
0015740 N N E C T I O N )
0015760
0016000 006 006 ( * ; " I R I S . R E S
0016020 E T L S 0 I R I S C O N N "
0016040 ) 006 001 \r
0016060
*
0016140 006 006 ( * ; \r 006 001
0016160
*
0016220 006 006 " m a k e t h e I R I
0016240 S n o t r e s e t t h e
0016260 l i n e s t y l e b e t w e
0016300 e n c u r v e s e g m e n t
0016320 s " ) 006 001 \r ( I R I S .
0016340 C U R S O F F I R I S - C O N
0016360 N E C T I O N ) \r ( I R
0016400 I S . C L E A R I R I S - C O
0016420 N N E C T I O N ) \r ( D
0016440 S P C O L O R ' B L U E I R
0016460 I S S T R E A M ) \r ( S
0016500 E L E C T Q \ I R I S . V E R
0016520 S I O N \r ( G L
0016540 2 ( I R I S . C U R V E P R E
0016560 C I S I O N \ C H A R S E G M
0016600 E N T S . I R I S I R I S - C
0016620 O N N E C T I O N ) \r
0016640 ( I R I S . D E
0016660 F B A S I S 1 \ B E Z I E R
0016700 B A S I S . I R I S I R I S -
0016720 C O N N E C T I O N ) \r
0016740 ( I R I S . C
0016760 U R V E B A S I S 1 I R I S
0017000 - C O N N E C T I O N ) ) \r
0017020 ( G L 1 ) \r
0017040 ( E R R O R " U n k n
0017060 o w n v e r s i o n o f I
0017100 R I S : " \ I R I S . V E R
0017120 S I O N ) ) \r ( D S P R
0017140 E S E T I R I S S T R E A M )
0017160 \r ( S P P . F O R C E O
0017200 U T P U T I R I S - C O N N E
0017220 C T I O N ] ) \r \r ( 006 004 D R A W
0017240 B I T M A P 006 001 \r [ L A M B
0017260 D A ( B I T M A P S O U R C
0017300 E L E F T S O U R C E B O T T
0017320 O M O U T P U T S T R E A M
0017340 D E S T I N A T I O N L E F T
0017360 D E S T I N A T I O N B O T T O
0017400 M W I D T H H E I G H T \r
0017420
0017440 ) 006 006 006 001
0017460
*
0017520 006 006 ( * ; " E d i t e d
0017540 2 - F e b - 8 7 2 3 : 3 7 b
0017560 y g b n " ) 006 001 \r ( L
0017600 E T ( ( D E S T B O T T O M
0017620 ( O R D E S T I N A T I O N B
0017640 O T T O M ( D S P Y P O S I T
0017660 I O N N I L O U T P U T S T
0017700 R E A M ) ) ) \r
0017720 ( D E S T L E F T ( O R
0017740 D E S T I N A T I O N L E F T
0017760 ( D S P X P O S I T I O N N I
0020000 L O U T P U T S T R E A M ) )
0020020 ) \r ( W I D
0020040 T H ( O R W I D T H ( B I
0020060 T M A P W I D T H B I T M A P
0020100 ) ) ) \r ( H
0020120 E I G H T ( O R H E I G H T
0020140 ( B I T M A P H E I G H T B
0020160 I T M A P ) ) ) \r
0020200 ( S B O T T O M ( O R
0020220 S O U R C E B O T T O M 0 ) )
0020240 \r ( S L E F
0020260 T ( O R S O U R C E L E F T
0020300 0 ) ) \r R
0020320 O W ) \r [ 006 002
0020340 f o r 006 001 Y 006 002 f r o m 006 001
0020360 S O U R C E B O T T O M 006 002
0020400 t o 006 001 ( I P L U S S O U R
0020420 C E B O T T O M H E I G H T )
0020440 006 002 a s 006 001 Y B A S E 006 002
0020460 f r o m 006 001 0 \r
0020500 006 002 d o 006 001 ( S E T
0020520 Q R O W ( I P L U S D E S
0020540 T B O T T O M Y B A S E ) )
0020560 \r \r
0020600 006 006 ( * i f t h
0020620 e r e i s a p i x e l s
0020640 e t o n t h e r o w , i
0020660 t i s b e t t e r t o s
0020700 e t t h e r o w o u t s i
0020720 d e t h e \r 006 001
0020740 006 006 l o o p ) 006 001 \r \r
0020760 ( 006
0021000 002 b i n d 006 001 ( S T A T E _
0021020 ' S K I P 0 S ) \r
0021040 S
0021060 T A R T E N D 006 002 f o r 006 001
0021100 X 006 002 f r o m 006 001 S L E F
0021120 T 006 002 t o 006 001 ( I P L U S
0021140 S L E F T W I D T H ) 006 002 a
0021160 s 006 001 B A S E 006 002 f r o m 006
0021200 001 0 \r
0021220 006 002 d o 006 001 ( S E
0021240 L E C T Q S T A T E \r
0021260
0021300 ( S K I P 0 S ( 006 002
0021320 i f 006 001 ( I E Q P 0 ( B I
0021340 T M A P B I T B I T M A P X
0021360 Y ) ) \r
0021400
0021420 006 002 t h e n
0021440 006 001
0021460 006 006 ( * s k i p p
0021500 i n g z e r o s , f o u n d
0021520 a z e r o , s o d o \r
0021540 006 001
0021560
*
0021620 006
0021640 006 n o t h i n g ) 006 001 \r
0021660
*
0021720 N I L \r
0021740
0021760 006 002 e
0022000 l s e 006 001
0022020 006 006 ( *
0022040 s t a r t a r u n . ) 006 001 \r
0022060
*
0022120 ( S E T Q S T
0022140 A R T B A S E ) \r
0022160
*
0022220 ( S E T Q E N D B A S E
0022240 ) \r
0022260
0022300 ( S E T Q
0022320 S T A T E ' C O L L E C T 1 S
0022340 ) ) ) \r
0022360 ( C O
0022400 L L E C T 1 S ( 006 002 i f 006 001
0022420 ( I L E S S P E N D ( 006 002 a
0022440 d d 006 001 E N D ( B I T M A P
0022460 B I T B I T M A P X Y ) )
0022500 ) \r
0022520
0022540 006 002 t h e n
0022560 006 001 \r \r
0022600 006 006 ( * c o
0022620 l l e c t i n g 1 ' s , f o
0022640 u n d o n e . T h e t e s
0022660 t a l r e a d y i n c r e m
0022700 e n t e d E N D , s o d o
0022720 n o t h i n g ) 006 001 \r \r
0022740
*
0023000 N I L \r
0023020
*
0023060 006 002 e l s e 006 001 ( D R
0023100 A W L I N E ( I P L U S D E
0023120 S T L E F T S T A R T ) \r
0023140
*
0023220 R O W \r
0023240
*
0023300 ( I P L U S D E S
0023320 T L E F T E N D ) \r
0023340
*
0023400 R O W
0023420 1 N I L O U T P U T S T R
0023440 E A M ) \r
0023460
*
0023520 ( S E T Q S T A T E ' S K I
0023540 P 0 S ) ) ) \r
0023560
0023600 ( S H O U L D N T " U n k n o
0023620 w n s t a t e : " S T A T
0023640 E ) ) \r
0023660 006 002 f i n a l l y 006
0023700 001 ( 006 002 i f 006 001 ( E Q S T
0023720 A T E ' C O L L E C T 1 S ) \r
0023740
0023760 006 002
0024000 t h e n 006 001 ( D R A W L I N E
0024020 ( I P L U S D E S T L E F T
0024040 S T A R T ) \r
0024060
*
0024120 R O W \r
0024140
*
0024200 ( I P L U S D E S T L E F T
0024220 E N D ) \r
0024240
0024260 R
0024300 O W 1 N I L O U T P U T S
0024320 T R E A M ] \r
0024340 ( M O V E T O D E S T L E F T
0024360 D E S T B O T T O M O U T P
0024400 U T S T R E A M ] ) \r \r ( 006 004 I
0024420 R I S . C O N S . O B J N O 006 001
0024440 \r [ L A M B D A N I L 006 006
0024460 006 001
0024500
*
0024540 006 006 ( * g b n " 1 5 - N
0024560 o v - 8 5 1 5 : 4 1 " ) 006 001 \r
0024600 ( 006 002 a d d 006 001 \ I V
0024620 . H I G H O B J N O 1 ] ) \r \r
0024640 ( 006 004 I R I S B I T M A P 006 001 \r
0024660 [ L A M B D A ( F I L E
0024700 B I T M A P S C A L E F A C T
0024720 O R R E G I O N R O T A T I
0024740 O N T I T L E ) 006 006 006 001
0024760 006 006 ( * g b n " 2 4 - O c
0025000 t - 8 5 1 6 : 5 1 " ) 006 001 \r
0025020 ( L E T [ ( I R I S S T
0025040 R E A M ( O P E N I M A G E S
0025060 T R E A M ' { L P T } I r i s
0025100 . I R I S ' I R I S ] \r
0025120 ( B I T B L T B I
0025140 T M A P ( 006 002 f e t c h 006 001
0025160 ( R E G I O N L E F T ) 006 002
0025200 o f 006 001 R E G I O N ) \r
0025220 ( 006 002
0025240 f e t c h 006 001 ( R E G I O N
0025260 B O T T O M ) 006 002 o f 006 001 R
0025300 E G I O N ) \r
0025320 I R I S S T R E A
0025340 M \r
0025360 ( D S P X P O S I T I O N
0025400 N I L I R I S S T R E A M ) \r
0025420
0025440 ( D S P Y P O S I T I O N N I
0025460 L I R I S S T R E A M ) \r
0025500 ( 006
0025520 002 f e t c h 006 001 ( R E G I O N
0025540 W I D T H ) 006 002 o f 006 001 R
0025560 E G I O N ) \r
0025600 ( 006 002 f e t c h 006
0025620 001 ( R E G I O N H E I G H T
0025640 ) 006 002 o f 006 001 R E G I O N ]
0025660 ) \r \r ( 006 004 I N S T A L L . O B
0025700 J F O N T 006 001 \r [ L A M B D
0025720 A ( F A M I L Y C H A R S E
0025740 T L O W C H A R C O D E H I
0025760 G H E S T C H A R C O D E S C
0026000 A L E I R I S S T R E A M C
0026020 S I N F O ) 006 006 006 001 \r
0026040
*
0026120 006 006 ( * g b n
0026140 " 1 2 - N o v - 8 5 1 9 : 1
0026160 7 " ) 006 001 \r
0026200 \r 006 006 ( *
0026220 * t a k e s a f o n t i
0026240 n S F f o r m a t t h a t
0026260 i s a l r e a d y i n c
0026300 o r e , i e , p a r t o f
0026320 t h e v a l u e \r 006 001
0026340 006 006 o f \ S P
0026360 L I N E F O N T S I N C O R E ,
0026400 a n d i n s t a l l s i t
0026420 o n t h e i r i s c o n
0026440 n e c t e d t o S T R E A M
0026460 . \r 006 001 006 006
0026500 C h a r a c t e r s i n t h
0026520 e f o n t w h i c h a r e
0026540 n i l a r e n o t d o w
0026560 n l o a d e d ) 006 001 \r
0026600 \r
0026620 006 006 ( * * n o t e t h a t
0026640 t h i s f n i s c a l l
0026660 e d b y t h e f o n t c r
0026700 e a t e m e t h o d f o r
0026720 t h e i r i s , e v e n \r
0026740 006 001 006 006 w h
0026760 e n t h e f o n t h a s
0027000 a l r e a d y b e e n d o w
0027020 n l o a d e d . \r 006 001
0027040 006 006 T h i s f n l
0027060 o o k s u p i n t h e s
0027100 t r e a m a n d j u s t r
0027120 e t u r n s t h e o l d c
0027140 a c h e d i n f o f r o m
0027160 t h e \r 006 001
0027200 006 006 o r i g i n a l d o w n
0027220 l o a d i n g . ) 006 001 \r \r
0027240 ( 006 002 i f 006 001 \ I R I S . D
0027260 E B U G \r 006 002 t
0027300 h e n 006 001 ( S E T Q L O W C
0027320 H A R C O D E 9 7 ) \r
0027340 ( S E T Q H
0027360 I G H E S T C H A R C O D E 1
0027400 0 1 ) \r 006 002 e l s e
0027420 006 001 ( S E T Q L O W C H A R
0027440 C O D E ( O R L O W C H A R
0027460 C O D E 1 ) ) \r
0027500 ( S E T Q H I G H E S
0027520 T C H A R C O D E ( O R H I
0027540 G H E S T C H A R C O D E 2 5
0027560 5 ) ) ) \r ( P R O G (
0027600 ( F O N T A R R A Y ( \ L O O
0027620 K U P S P L I N E F O N T F A
0027640 M I L Y C H A R S E T ) ) \r
0027660 ( I R I S D
0027700 A T A ( 006 002 f e t c h 006 001 I
0027720 R I S D A T A 006 002 o f 006 001 I
0027740 R I S S T R E A M ) ) \r
0027760 ( M A X H E I G H
0030000 T 0 ) \r
0030020 S P A C E W I D T H O B J #
0030040 F O N T B A S E C H A R D E S
0030060 C W I D T H A R R A Y S T R
0030100 E A M ) \r (
0030120 S E T Q S T R E A M ( 006 002 f
0030140 e t c h 006 001 S P P O U T S T R
0030160 E A M 006 002 o f 006 001 I R I S D
0030200 A T A ) ) \r
0030220 ( 006 002 i f 006 001 ( N O T F O N
0030240 T A R R A Y ) \r
0030260 006 002 t h e n 006 001 (
0030300 E R R O R " C h a r s e t f
0030320 o r s p l i n e f o n t n
0030340 o t i n c o r e : " ( L I
0030360 S T F A M I L Y C H A R S E
0030400 T ) ) ) \r (
0030420 006 002 i f 006 001 ( S E T Q F O N
0030440 T B A S E ( 006 002 \ I R I S F O
0030460 N T B A S E 006 001 F A M I L Y
0030500 C H A R S E T I R I S D A T A
0030520 ) ) \r
0030540 006 002 t h e n 006 001 \r
0030560 \r
0030600 006 006 ( * t h e f o n t h a
0030620 s a l r e a d y b e e n d
0030640 o w n l o a d e d , j u s t
0030660 r e t u r n t h e c a c h e
0030700 d i n f o ) 006 001 \r \r
0030720 ( 006
0030740 002 i f 006 001 \ I R I S . D E B U
0030760 G \r
0031000 006 002 t h e n 006
0031020 001 ( S H O U L D N T " f o n
0031040 t b e i n g r e d e f i n e
0031060 d " ) ) \r
0031100 ( R E T U R N
0031120 F O N T B A S E ) \r
0031140 006 002 e l s e 006 001 (
0031160 S E T Q F O N T B A S E ( 006
0031200 002 a d d 006 001 ( 006 002 f e t c h 006
0031220 001 H I F O N T # 006 002 o f 006 001
0031240 I R I S D A T A ) \r
0031260
*
0031320 2 5 6 ) ) \r
0031340 ( S E T Q W I D
0031360 T H A R R A Y ( \ C R E A T E
0031400 C S I N F O E L E M E N T ) ) )
0031420 \r ( 006 002 i f
0031440 006 001 \ I R I S . V E R B O S E
0031460 \r 006
0031500 002 t h e n 006 001 ( P R O M P T P
0031520 R I N T " I n s t a l l i n g
0031540 f o n t o n I R I S : "
0031560 F A M I L Y ) ) \r
0031600 ( 006 002 i f 006 001 ( Z E R
0031620 O P ( I R I S . I S O B J 0
0031640 S T R E A M ) ) \r
0031660 006 002 t h e n 006 001
0031700 ( I R I S . M A K E O B J 0
0031720 S T R E A M ) \r
0031740 ( I R I
0031760 S . C U R S O F F S T R E A M
0032000 ) \r
0032020 ( I R I S . C L O S E
0032040 O B J S T R E A M ) ) \r
0032060 \r
0032100 006 006 ( * c h a r a c t e r
0032120 0 o f t h e f o n t i
0032140 s a l w a y s d e f i n e d
0032160 o n t h e I R I S a s
0032200 t h e w a y o f t e l l i
0032220 n g \r 006 001
0032240 006 006 i f t h i s c h a r s e
0032260 t h a s b e e n d o w n l
0032300 o a d e d . ) 006 001 \r
0032320
*
0032400 006 006 ( * N O T
0032420 A N Y M O R E ) 006 001 \r
0032440 [ 006 002 f o r 006 001 I
0032460 006 002 f r o m 006 001 L O W C H A
0032500 R C O D E 006 002 t o 006 001 H I G
0032520 H E S T C H A R C O D E \r
0032540 006 002 d o 006 001
0032560 ( S E T Q C H A R D E S C
0032600 ( E L T F O N T A R R A Y I
0032620 ) ) \r
0032640 ( 006 002 i f 006 001 C H A R D
0032660 E S C \r
0032700 006 002 t h e n 006 001
0032720 ( I R I S . M A K E O B J (
0032740 S E T Q O B J # ( I P L U S
0032760 F O N T B A S E I ) ) \r
0033000
0033020 S T
0033040 R E A M ) \r
0033060 (
0033100 S F D R A W C H A R D E S C
0033120 N I L 0 0 S C A L E I R
0033140 I S S T R E A M ) \r
0033160 \r
0033200 006 006 ( * T h e s c a l e i
0033220 s a l w a y s o n e w h e
0033240 n c a l l e d f o r t h e
0033260 i r i s , b e c a u s e t
0033300 h e p r i n t c h a r \r 006 001
0033320 006 006 m e t h
0033340 o d m a k e s t h e I R I
0033360 S s c a l e t h e c h a r
0033400 a c t e r a n y w a y ) 006 001 \r
0033420 \r
0033440 ( I R I S .
0033460 C L O S E O B J S T R E A M )
0033500 \r
0033520 ( 006 002 A L I
0033540 G N 006 001 )
0033560
0033600 006 006 ( * C O N S I S T E N
0033620 C Y C H E C K ) 006 001 \r
0033640
0033660 ( 006 002 i f 006 001 ( Z E
0033700 R O P ( I R I S . I S O B J
0033720 O B J # S T R E A M ) ) \r
0033740
0033760 006 002 t h e
0034000 n 006 001 ( E R R O R ' \r
0034020 " ( O
0034040 B J E C T F O N T C H A R A
0034060 C T E R I S U N D E F I N E
0034100 D D I R E C T L Y A F T E R
0034120 D E F I N I N G I N S I D E
0034140 I N S T A L L . O B J F O N T
0034160 ) " \r
0034200
0034220 ) \r
0034240
0034260 006 002 e l s e 006
0034300 001 ( P R I N T O U T P R O M
0034320 P T W I N D O W ( C H A R A C
0034340 T E R I ] \r
0034360 ( I R I S . G F L U S H S T
0034400 R E A M ) \r
0034420 ( 006 002 A L I G N 006 001 ) \r
0034440 ( 006 002 \ I R I S S E
0034460 T F O N T B A S E 006 001 F A M I
0034500 L Y C H A R S E T I R I S D
0034520 A T A F O N T B A S E ) \r
0034540 ( S E T Q O B
0034560 J # ( I P L U S F O N T B A
0034600 S E ( C H A R C O D E S P A
0034620 C E ) ) ) \r
0034640 ( 006 002 i f 006 001 ( Z E R O P (
0034660 I R I S . I S O B J O B J #
0034700 S T R E A M ) ) \r
0034720 006 002 t h e n 006 001
0034740
*
0035000 006 006 ( * i
0035020 n s t a l l a f a k e s p
0035040 a c e c h a r i f t h e r
0035060 e \r 006 001
0035100
*
0035160 006 006 i s n ' t o n e ) 006 001
0035200 \r
0035220 ( S E T Q S P A C E W
0035240 I D T H ( \ F G E T W I D T H
0035260 W I D T H A R R A Y ( O R
0035300 H I G H E S T C H A R C O D E
0035320 1 2 7 ) ) ) \r
0035340 ( I R I S .
0035360 M A K E O B J O B J # S T R
0035400 E A M ) \r
0035420 ( M O V E T O
0035440 S P A C E W I D T H 0 I R I
0035460 S S T R E A M ) \r
0035500 ( I R I
0035520 S . C L O S E O B J S T R E A
0035540 M ) \r
0035560 ( \ F S E T W I D T
0035600 H W I D T H A R R A Y ( C H
0035620 A R C O D E S P A C E ) \r
0035640
0035660 S P A C E W I D
0035700 T H ) ) \r (
0035720 R E T U R N ( L I S T F A M
0035740 I L Y F O N T B A S E W I D
0035760 T H A R R A Y M A X H E I G H
0036000 T ] ) \r \r ( 006 004 O P E N I R I S
0036020 S T R E A M 006 001 \r [ L A M B
0036040 D A ( N S H O S T N U M B E R
0036060 O P T I O N S ) 006 006 006 001
0036100
0036120 006 006 ( * ;
0036140 " E d i t e d 4 - F e b -
0036160 8 7 1 9 : 0 5 b y g b n "
0036200 ) 006 001 \r \r
0036220 006 006 ( * *
0036240 o p e n s a s t r e a m t
0036260 o a n i r i s w o r k s t
0036300 a t i o n ) 006 001 \r \r ( 006
0036320 002 D E C L A R E 006 001 ( G L O B
0036340 A L V A R S \ I R I S I M A G
0036360 E O P S ) ) \r ( P R O G
0036400 ( ( I R I S D A T A ( 006 002 c
0036420 r e a t e 006 001 I R I S D A T A
0036440 ) ) \r ( H
0036460 O S T ( O R N S H O S T N U
0036500 M B E R I R I S N S H O S T N
0036520 U M B E R ) ) \r
0036540 ( I R I S S T R E A M (
0036560 O P E N S T R E A M ' { N O D
0036600 I R C O R E } I R I S . S C R A
0036620 T C H ' O U T P U T ' N E W
0036640 8 ' B I N A R Y ) ) \r
0036660 T E M P C O N N
0036700 ) \r ( 006 002 i
0036720 f 006 001 ( N O T H O S T ) \r
0036740 006 002 t
0036760 h e n 006 001 ( E R R O R " I R
0037000 I S N S H O S T N U M B E R m
0037020 u s t b e s u p p l i e d "
0037040 ) ) \r ( 006 002
0037060 i f 006 001 [ A N D ( N O T (
0037100 E Q M E M B ' R E C O N N E C
0037120 T O P T I O N S ) ) \r
0037140 (
0037160 S P P . O P E N P I R I S C O
0037200 N N ) \r
0037220 ( O R ( N U L L
0037240 H O S T ) \r
0037260 ( S
0037300 E L E C T Q ( T Y P E N A M E
0037320 H O S T ) \r
0037340
0037360 ( N S A D D R E S S ( E Q
0037400 U A L ( 006 002 f e t c h 006 001 (
0037420 N S A D D R E S S N S H O S T
0037440 N U M B E R ) 006 002 o f 006 001 H
0037460 O S T ) \r
0037500
*
0037540 ( 006 002 f e t c h 006 001 ( N S
0037560 A D D R E S S N S H O S T N U
0037600 M B E R ) 006 002 o f 006 001 ( S P
0037620 P . D E S T A D D R E S S \r
0037640
*
0037740 I
0037760 R I S C O N N ) ) ) ) \r
0040000
0040020 ( L I S T P ( E
0040040 Q U A L H O S T ( 006 002 f e t
0040060 c h 006 001 ( N S A D D R E S S
0040100 N S H O S T N U M B E R ) 006 002
0040120 o f 006 001 ( S P P . D E S T A D
0040140 D R E S S \r
0040160
*
0040260 I R I S C O N N
0040300 ) ) ) ) \r
0040320
0040340 ( L I T A T O M ( E Q ' L P
0040360 T ( L I S T G E T ( U N P A
0040400 C K F I L E N A M E H O S T )
0040420 \r
0040440
*
0040500 ' H O S T ) ) ) \r
0040520
0040540 ( N I L L ] \r
0040560 006 002
0040600 t h e n 006 001 \r
0040620 \r 006 006 (
0040640 * t h e r e i s s t i l l
0040660 a s t r e a m o p e n t
0040700 o t h e i r i s . \r 006 001
0040720 006 006 J u s t u
0040740 s e t h a t , s i n c e o
0040760 n e c a n h a v e a t m
0041000 o s t a s i n g l e s t r
0041020 e a m o p e n t o t h e
0041040 i r i s ) 006 001 \r \r
0041060 ( R E T
0041100 U R N \ I R I S S T R E A M )
0041120 \r 006 002 e
0041140 l s e 006 001 ( 006 002 i f 006 001 [ A
0041160 N D ( T Y P E N A M E P H O
0041200 S T ' L I T A T O M ) \r
0041220
0041240 ( E Q ' L P T
0041260 ( L I S T G E T ( U N P A C K
0041300 F I L E N A M E H O S T ) \r
0041320
*
0041360 ' H O S T ] \r
0041400
0041420 006 002 t h e n 006 001 \r
0041440 \r
0041460 006 006 ( * * T h i s
0041500 i s j u s t a r e q u e s
0041520 t t o h a r d c o p y w h
0041540 e n t h e r e i s n o o
0041560 p e n s t r e a m ) 006 001 \r \r
0041600
0041620 ( S E T Q H
0041640 O S T N I L ) ) \r
0041660 ( 006 002 i f
0041700 006 001 ( N O T ( S E T Q T E
0041720 M P C O N N ( O P E N . I R I
0041740 S C O N N H O S T ) ) ) \r
0041760
0042000 006 002 t h e n 006 001 ( E R R
0042020 O R " I r i s d i d n o t
0042040 r e s p o n d t o c o n n
0042060 e c t i o n a t t e m p t "
0042100 H O S T ) ) ) \r
0042120
*
0042200 006 006 ( * r e p l a c
0042220 e ( S T R E A M U S E R C L
0042240 O S E A B L E ) o f \r 006 001
0042260
*
0042340 006 006 I R
0042360 I S S T R E A M w i t h N I
0042400 L ) 006 001 \r (
0042420 S T R E A M A D D P R O P I R
0042440 I S S T R E A M ' B E F O R E
0042460 C L O S E ' \ C L O S E F . I
0042500 R I S ) \r (
0042520 006 002 r e p l a c e 006 001 ( S T R
0042540 E A M O U T C H A R F N ) 006
0042560 002 o f 006 001 I R I S S T R E A M
0042600 006 002 w i t h 006 001 ( F U N C T
0042620 I O N \ O U T C H A R F N . I
0042640 R I S ) ) \r
0042660 ( 006 002 r e p l a c e 006 001 ( I R
0042700 I S S T R E A M I M A G E O P
0042720 S ) 006 002 o f 006 001 I R I S S T
0042740 R E A M 006 002 w i t h 006 001 \ I
0042760 R I S I M A G E O P S ) \r
0043000 ( 006 002 r e p l a c
0043020 e 006 001 ( I R I S S T R E A M
0043040 I R I S D A T A ) 006 002 o f 006 001
0043060 I R I S S T R E A M 006 002 w i
0043100 t h 006 001 I R I S D A T A ) \r
0043120 ( 006 002 r e p l
0043140 a c e 006 001 ( I R I S D A T A
0043160 S P P I N S T R E A M ) 006 002 o
0043200 f 006 001 I R I S D A T A 006 002 w
0043220 i t h 006 001 T E M P C O N N ) \r
0043240 ( 006 002 r e p
0043260 l a c e 006 001 ( I R I S D A T A
0043300 S P P O U T S T R E A M ) 006
0043320 002 o f 006 001 I R I S D A T A 006
0043340 002 w i t h 006 001 ( S P P O U T P
0043360 U T S T R E A M T E M P C O N
0043400 N ) ) \r ( 006
0043420 002 r e p l a c e 006 001 ( I R I S
0043440 D A T A I R I S C O L O R M A
0043460 P C A C H E ) 006 002 o f 006 001 I
0043500 R I S D A T A 006 002 w i t h 006 001
0043520 \ I R I S C O L O R M A P C A
0043540 C H E ) \r
0043560
*
0043640 006 006 ( * r e p l a c e (
0043660 I R I S D A T A I R I S C O L
0043700 O R M A P ) o f \r 006 001
0043720
*
0044000 006 006 I R I S
0044020 D A T A w i t h ( C O L O R
0044040 M A P C R E A T E N I L \r 006
0044060 001
0044100
*
0044140 006 006
0044160 \ I R I S . B I T P L A N E S )
0044200 ) 006 001 \r ( 006
0044220 002 r e p l a c e 006 001 ( I R I S
0044240 D A T A I R I S C H A R S E T
0044260 ) 006 002 o f 006 001 I R I S D A T
0044300 A 006 002 w i t h 006 001 - 1 ) \r
0044320 ( 006 002 r e p l
0044340 a c e 006 001 ( I R I S D A T A
0044360 I R I S P A G E ) 006 002 o f 006 001
0044400 I R I S D A T A 006 002 w i t h
0044420 006 001 ( C O P Y W H O L E S C
0044440 R E E N ) ) \r
0044460 ( S E T Q I R I S C O N N
0044500 ( 006 002 f e t c h 006 001 S P P O U
0044520 T S T R E A M 006 002 o f 006 001 I
0044540 R I S D A T A ) ) \r
0044560 ( I R I S . G I N I T
0044600 I R I S C O N N ) \r
0044620 ( 006 002 C L E A R I R I S
0044640 006 001 I R I S C O N N I R I S
0044660 S T R E A M ) \r
0044700 ( R E T U R N ( S E T Q
0044720 \ I R I S S T R E A M I R I S
0044740 S T R E A M ] ) \r \r ( 006 004 \ C L
0044760 O S E F . I R I S 006 001 \r [ L
0045000 A M B D A ( I R I S S T R E A
0045020 M ) 006 006 006 001
0045040
0045060 006 006 (
0045100 * g b n " 2 5 - O c t - 8 5
0045120 1 7 : 1 8 " ) 006 001 \r
0045140 \r
0045160 006 006 ( * * t h i s f n i
0045200 s i n s t a l l e d o n t
0045220 h e s t r e a m a s a s
0045240 t r e a m p r o p . \r 006 001
0045260 006 006 I t f l u s
0045300 h s t h e o u t p u t t o
0045320 t h e s t r e a m , b u t
0045340 d o e s n o t c l o s e
0045360 i t ) 006 001 \r \r ( F O R C
0045400 E O U T P U T ( 006 002 f e t c h
0045420 006 001 S P P O U T S T R E A M
0045440 006 002 o f 006 001 ( 006 002 f e t c h 006
0045460 001 I R I S D A T A 006 002 o f 006
0045500 001 I R I S S T R E A M ) ) ) \r
0045520 ( R E T F R O M ' C L
0045540 O S E F N I L ] ) \r \r ( 006 004 R
0045560 006 001 \r [ L A M B D A N I L
0045600 006 006 006 001
0045620
*
0045660 006 006 ( * g b n " 2 1
0045700 - J u n - 8 5 0 3 : 5 7 " ) 006
0045720 001 \r ( 006 002 O P E N I R I
0045740 S S T R E A M 006 001 N I L ' (
0045760 D O N T C O N N E C T ] ) \r \r (
0046000 006 004 S P P I N P U T S T R E A M
0046020 006 001 \r [ L A M B D A ( O U
0046040 T P U T S T R E A M ) 006 006 006 001
0046060
*
0046120 006 006 ( * g b n " 1 7
0046140 - J u n - 8 5 1 7 : 4 0 " ) 006
0046160 001 \r ( P R O G ( ( C O
0046200 N ( 006 002 f e t c h 006 001 ( S T
0046220 R E A M F 1 ) 006 002 o f 006 001
0046240 O U T P U T S T R E A M ) ) ) \r
0046260 ( 006 002 i f 006
0046300 001 C O N \r
0046320 006 002 t h e n 006 001 ( R E
0046340 T U R N ( 006 002 f e t c h 006 001
0046360 ( S P P C O N S P P I N P U T
0046400 S T R E A M ) 006 002 o f 006 001 C
0046420 O N ] ) \r \r ( 006 004 T R Y G R A P
0046440 H E R 006 001 \r [ L A M B D A
0046460 ( D O N T S E T U P ? ) 006 006 006 001
0046500
*
0046540 006 006 ( * ; " E
0046560 d i t e d 2 - F e b - 8 7
0046600 2 3 : 4 3 b y g b n " ) 006 001
0046620 \r \r 006 006 ( * ; ; ; " j u s t
0046640 a h a c k t o t r y t
0046660 o d r a w a g r a p h e r
0046700 g r a p h " ) 006 001 \r \r 006 006 ( *
0046720 ; ; ; " c o m m e n t " ) 006
0046740 001 \r \r ( P R O G ( G )
0046760 \r [ S E T Q
0047000 G ( L A Y O U T S E X P R
0047020 ' ( s t u ( w x y x x x ) \r
0047040
*
0047100 ( x y z z y ) ) N I
0047120 L N I L ( F O N T C R E A T
0047140 E ' G A C H A 2 0 N I L
0047160 N I L ' I R I S ] \r
0047200 ( 006 002 I F 006 001 ( N O
0047220 T D O N T S E T U P ? ) \r
0047240 006 002 T H
0047260 E N 006 001 ( I R I S . G R E S E
0047300 T ) \r
0047320 ( I R I S . S I N G
0047340 L E B U F F E R )
0047360
0047400 006 006 ( * ; " ( I R I S . D O
0047420 U B L E B U F F E R ) " ) 006 001 \r
0047440
0047460 ( I R I S . G C O N F I G
0047500 ) \r
0047520 ( I R I S . P E R S P
0047540 E C T I V E 1 2 0 1 - 1 0
0047560 0 0 1 0 0 0 ) \r
0047600 ( I R I
0047620 S . L O O K A T 0 0 3 0 0
0047640 0 0 0 0 0 0 ) \r
0047660 (
0047700 I R I S . L I N E W I D T H 2
0047720 ) \r
0047740 ( C L E A R ' B L U
0047760 E ) \r
0050000 ( I R I S . C O L O
0050020 R ' W H I T E ) ) \r
0050040 ( D I S P L A Y G R A
0050060 P H G \ I R I S S T R E A M
0050100 ) \r ( R E T
0050120 U R N ] ) \r \r ( 006 004 \ B A C K C
0050140 O L O R . I R I S 006 001 \r [ L
0050160 A M B D A ( S T R E A M C O
0050200 L O R ) 006 006 006 001
0050220
0050240 006 006 (
0050260 * ; " E d i t e d 1 6 - J
0050300 a n - 8 7 1 3 : 5 8 b y g
0050320 b n " ) 006 001 \r ( 006 002 I F
0050340 006 001 C O L O R \r
0050360 006 002 T H E N 006 001 ( 006 002 R E P
0050400 L A C E 006 001 ( I R I S D A T A
0050420 B A C K C O L O R ) 006 002 O F
0050440 006 001 ( 006 002 F E T C H 006 001 I R
0050460 I S D A T A 006 002 O F 006 001 S T
0050500 R E A M ) 006 002 W I T H 006 001 C
0050520 O L O R ) \r 006 002 E L
0050540 S E 006 001 ( 006 002 F E T C H 006 001
0050560 ( I R I S D A T A B A C K C O
0050600 L O R ) 006 002 O F 006 001 ( 006 002 F
0050620 E T C H 006 001 I R I S D A T A
0050640 006 002 O F 006 001 S T R E A M ] ) \r
0050660 \r ( 006 004 \ B I T B L T . I R I S
0050700 006 001 \r [ L A M B D A ( S O
0050720 U R C E B I T M A P S O U R C
0050740 E L E F T S O U R C E B O T T
0050760 O M D E S T I N A T I O N D
0051000 E S T I N A T I O N L E F T D
0051020 E S T I N A T I O N B O T T O M
0051040 W I D T H \r
0051060 H E I G H T
0051100 S O U R C E T Y P E O P E R A
0051120 T I O N T E X T U R E C L I
0051140 P P I N G R E G I O N C L I P
0051160 P E D S O U R C E L E F T \r
0051200
0051220 C L I P P E D S O U R C E B O T
0051240 T O M ) 006 006 006 001
0051260
0051300 006 006 ( * g b n " 1 2 - N o v
0051320 - 8 5 1 4 : 3 5 " ) 006 001 \r
0051340 \r
0051360 006 006 ( * * p r o d u c
0051400 e s a | 3 - d | b i t m a
0051420 p c o m p o s e d o f l i
0051440 n e s ) 006 001 \r \r ( 006 002 i
0051460 f 006 001 ( N O T ( E Q ( I M
0051500 A G E S T R E A M T Y P E D E
0051520 S T I N A T I O N ) \r
0051540 ' I R I
0051560 S ) ) \r 006 002 t h
0051600 e n 006 001 ( E R R O R " D e s
0051620 t i n a t i o n n o t I R I
0051640 S s t r e a m : " D E S T
0051660 I N A T I O N ) ) \r ( 006
0051700 002 D R A W B I T M A P 006 001 S O
0051720 U R C E B I T M A P S O U R C
0051740 E L E F T S O U R C E B O T T
0051760 O M D E S T I N A T I O N D
0052000 E S T I N A T I O N L E F T D
0052020 E S T I N A T I O N B O T T O M
0052040 \r W I D
0052060 T H H E I G H T ) \r (
0052100 F L U S H O U T P U T ( 006 002 f
0052120 e t c h 006 001 S P P O U T S T R
0052140 E A M 006 002 o f 006 001 ( 006 002 f e
0052160 t c h 006 001 I R I S D A T A 006
0052200 002 o f 006 001 \ I R I S S T R E A
0052220 M ] ) \r \r ( 006 004 \ B L T S H A D
0052240 E . I R I S 006 001 \r [ L A M B
0052260 D A ( T E X T U R E I R I S
0052300 S T R E A M D E S T I N A T I
0052320 O N L E F T D E S T I N A T I
0052340 O N B O T T O M W I D T H H
0052360 E I G H T O P E R A T I O N
0052400 C L I P P I N G R E G I O N \r
0052420
0052440 ) 006 006 006 001
0052460
*
0052520 006 006 ( * ; " E d i t e d 1
0052540 6 - J a n - 8 7 1 5 : 0 0 b
0052560 y g b n " ) 006 001 \r
0052600
*
0052660 006 006 ( * ; \r 006
0052700 001
0052720
*
0052760 006 006 " s h o u l d
0053000 n o t a f f e c t a n y t
0053020 h i n g , s o d o a w i
0053040 t h a t t r " ) 006 001 \r
0053060 ( L E T * ( ( I R I S D A T A
0053100 ( 006 002 f e t c h 006 001 I R I S
0053120 D A T A 006 002 o f 006 001 I R I S
0053140 S T R E A M ) ) \r
0053160 ( S P P O U T ( 006 002 f
0053200 e t c h 006 001 ( I R I S D A T A
0053220 S P P O U T S T R E A M ) 006
0053240 002 o f 006 001 I R I S D A T A ) )
0053260 ) \r ( W I T
0053300 H . I R I S . A T T R ( I R I
0053320 S . P O L F 2 4 ( L I S T
0053340 ( C R E A T E P O S I T I O N
0053360 D E S T I N A T I O N L E F T
0053400 D E S T I N A T I O N B O T T O
0053420 M ) \r
0053440
*
0053500 ( C R E A T E P O S I T I O N
0053520 ( I P L U S D E S T I N A T
0053540 I O N L E F T W I D T H ) \r
0053560
*
0053640 D E S T I N A T I O N B
0053660 O T T O M ) \r
0053700
*
0053740 ( C R E A T E P O S I
0053760 T I O N ( I P L U S D E S T
0054000 I N A T I O N L E F T W I D T
0054020 H ) \r
0054040
*
0054100 ( I P L U S D
0054120 E S T I N A T I O N B O T T O M
0054140 H E I G H T ) ) \r
0054160
*
0054220 ( C R E A T E P
0054240 O S I T I O N D E S T I N A T
0054260 I O N L E F T ( I P L U S \r
0054300
*
0054420 D E S T I N A T I O N B
0054440 O T T O M \r
0054460
*
0054560 H E I G
0054600 H T ) ) ) \r
0054620
0054640 S P P O U T ) \r
0054660
0054700 I R I S S T R E A M S P P O U
0054720 T : C O L O R T E X T U R E
0054740 ) \r ( F O R
0054760 C E O U T P U T S P P O U T ]
0055000 ) \r \r ( 006 004 \ F O N T C R E A T
0055020 E . I R I S 006 001 \r [ L A M B
0055040 D A ( F A M I L Y S I Z E
0055060 F A C E R O T A T I O N D E
0055100 V I C E C H A R S E T ) 006 006 006
0055120 001 006 006 ( * ;
0055140 " E d i t e d 2 - F e b -
0055160 8 7 2 3 : 4 4 b y g b n "
0055200 ) 006 001 \r \r 006 006 ( * ; ; ; " T
0055220 h i s f u n c t i o n r e a
0055240 d s i n t h e s p l i n e
0055260 d e f i n i t i o n f o r
0055300 a f o n t , b u t d o e s
0055320 n o t i n s t a l l i t
0055340 o n t h e i r i s . T h
0055360 e i n s t a l l a t i o n i
0055400 s d o n e o n a d e m a
0055420 n d b a s i s o n t h e
0055440 I R I S , c h a r s e t b y
0055460 c h a r s e t . " ) 006 001 \r \r
0055500 ( P R O G ( W I D T H S
0055520 ( S C A L E 1 ) \r
0055540 F O N T
0055560 D E S C C S I N F O ) \r
0055600 \r
0055620 006 006 ( * ; ; " s i n c e
0055640 a s p l i n e f o n t c
0055660 a n b e a n y s i z e ,
0055700 w e m u s t g u a r a n t e
0055720 e t h a t r e l a t i v e
0055740 s i z e s a r e g u a r a n
0055760 t e e d , i . e . a 1 0
0056000 p o i n t f o n t i s t
0056020 w i c e a s b i g a s a
0056040 5 p o i n t f o n t " ) 006
0056060 001 \r \r ( S E
0056100 T Q S C A L E 1 ) \r \r 006 006 (
0056120 * ; ; ; " t h e w i d t h
0056140 a r r a y s , t h e h e i
0056160 g h t , a s c e n t , e t c
0056200 a r e a l l s c a l e d "
0056220 ) 006 001 \r \r (
0056240 S E T Q F O N T D E S C ( 006
0056260 002 c r e a t e 006 001 F O N T D E
0056300 S C R I P T O R \r
0056320
0056340 F O N T D E V
0056360 I C E _ ' I R I S \r
0056400
0056420 F O N T
0056440 F A M I L Y _ F A M I L Y \r
0056460
*
0056520 F O N T S I Z E _ S I Z E \r
0056540
*
0056600 F O N T F A C E _ F A C E \r
0056620
*
0056660 R O T A T I O N _ R O T A T
0056700 I O N ) ) 006 006 (
0056720 * ; " C H E C K W H A T
0056740 F O N T S C A L E M E A N S "
0056760 ) 006 001 \r ( S
0057000 E T Q C S I N F O ( \ G E T
0057020 C H A R S E T I N F O 0 F O
0057040 N T D E S C T ) ) \r
0057060 ( 006 002 i f 006 001 ( N O
0057100 T C S I N F O ) \r
0057120 006 002 t h e n 006 001
0057140 ( R E T U R N N I L ) )
0057160
0057200 006 006 ( *
0057220 ; \r 006 001
0057240
*
0057300 006 006 " t h i s w i l l
0057320 c a l l t h e c r e a t e
0057340 c h a r s e t m e t h o d f
0057360 o r t h e I R I S " ) 006 001 \r
0057400 [ S E T Q
0057420 S C A L E ( 006 002 r e p l a c e
0057440 006 001 O T H E R D E V I C E F O
0057460 N T P R O P S 006 002 o f 006 001 F
0057500 O N T D E S C \r
0057520
0057540 006 002 w i t h 006 001 ( Q U O T I
0057560 E N T ( F L O A T S I Z E )
0057600 \r
0057620
0057640 ( I P L U S ( 006 002
0057660 f e t c h 006 001 ( C H A R S E T
0057700 I N F O C H A R S E T A S C E
0057720 N T ) 006 002 o f 006 001 C S I N F
0057740 O ) \r
0057760
0060000 (
0060020 006 002 f e t c h 006 001 ( C H A R S
0060040 E T I N F O C H A R S E T D E
0060060 S C E N T ) 006 002 o f 006 001 C S
0060100 I N F O ] \r
0060120 ( S E T Q W I D T H S ( 006 002
0060140 f e t c h 006 001 ( C H A R S E T
0060160 I N F O W I D T H S ) 006 002 o
0060200 f 006 001 C S I N F O ) ) \r
0060220 [ 006 002 f o r 006 001
0060240 I 006 002 f r o m 006 001 0 006 002 t
0060260 o 006 001 \ M A X T H I N C H A R
0060300 006 002 D O 006 001 ( \ F S E T W I
0060320 D T H W I D T H S I ( F I
0060340 X ( T I M E S ( \ F G E T W
0060360 I D T H W I D T H S I ) \r
0060400
*
0060500 S C A L E
0060520 ] \r ( 006 002 r
0060540 e p l a c e 006 001 \ S F H e i g
0060560 h t 006 002 o f 006 001 F O N T D E
0060600 S C 006 002 w i t h 006 001 S I Z E
0060620 ) \r [ 006 002 r
0060640 e p l a c e 006 001 \ S F A s c e
0060660 n t 006 002 o f 006 001 F O N T D E
0060700 S C 006 002 w i t h 006 001 ( F I X
0060720 ( T I M E S S C A L E ( 006
0060740 002 f e t c h 006 001 ( C H A R S E
0060760 T I N F O C H A R S E T A S C
0061000 E N T ) \r
0061020
*
0061100 006 002 o f 006 001 C
0061120 S I N F O ] \r
0061140 [ 006 002 r e p l a c e 006 001 \ S
0061160 F D e s c e n t 006 002 o f 006 001
0061200 F O N T D E S C 006 002 w i t h 006
0061220 001 ( F I X ( T I M E S S C
0061240 A L E ( 006 002 f e t c h 006 001 (
0061260 C H A R S E T I N F O C H A R
0061300 S E T D E S C E N T ) \r
0061320
*
0061420 006 002 o f 006 001 C S I N F O ] \r
0061440
*
0061520 006 006 ( *
0061540 ; \r 006 001
0061560
0061600 006 006 " O T H E R D E V I C
0061620 E F O N T P R O P S i s u s
0061640 e d t o h i d e t h e s
0061660 c a l e o f t h e f o n t
0061700 o n t h e i r i s " ) 006 001
0061720 \r ( R E T U
0061740 R N F O N T D E S C ] ) \r \r (
0061760 006 004 \ F O N T S A V A I L A B L
0062000 E . I R I S 006 001 \r [ L A M B
0062020 D A ( F A M I L Y P S I Z E
0062040 F A C E R O T A T I O N D
0062060 E V I C E ) 006 006 006 001
0062100 006 006 ( * g
0062120 b n " 1 3 - N o v - 8 5 1 2
0062140 : 0 6 " ) 006 001 \r
0062160 \r 006 006 (
0062200 * * r e t u r n s a l i
0062220 s t o f t h e f o r m (
0062240 f a m i l y s i z e f a c e
0062260 r o t a t i o n I R I S )
0062300 f o r a n y f o n t \r 006 001
0062320 006 006 m a t c
0062340 h i n g t h e s p e c s .
0062360 * i s u s e d a s w i l
0062400 d c a r d . ) 006 001 \r \r (
0062420 006 002 D E C L A R E 006 001 ( G L O
0062440 B A L V A R S I R I S F O N T
0062460 D I R E C T O R I E S ) )
0062500 006 006 ( *
0062520 N o r m a l i z e f a c e )
0062540 006 001 \r ( L E T [ ( F A
0062560 M I L I E S ( 006 002 i f 006 001 (
0062600 M E M B F A M I L Y I R I S
0062620 F O N T F A M I L I E S ) \r
0062640
0062660 006 002 t h e n 006 001 F
0062700 A M I L Y \r
0062720 006 002 e l
0062740 s e 006 001 N I L ) ) \r
0062760 ( S I Z E S ( S E L
0063000 E C T Q P S I Z E \r
0063020
0063040 ( * I R I S F O N T S I Z E S
0063060 ) \r
0063100 ( P R O G 1 P S
0063120 I Z E ) ) ) \r
0063140 [ F A C E S ( S E L E C T Q
0063160 F A C E \r
0063200 ( * ' (
0063220 ( M E D I U M R E G U L A R
0063240 R E G U L A R ) \r
0063260
0063300 ( M E D I U M I T A L I
0063320 C R E G U L A R ) \r
0063340
0063360 ( B O L D R E G U L
0063400 A R R E G U L A R ) \r
0063420
0063440 ( B O L D I T A L
0063460 I C R E G U L A R ) ) ) \r
0063500
0063520 ( P R O G 1 ( L I S T
0063540 ( \ F O N T F A C E F A C E ]
0063560 \r ( R O T A
0063600 T I O N S ( S E L E C T Q R
0063620 O T A T I O N \r
0063640
0063660 ( * I R I S F O N T R O T A
0063700 T I O N S ) \r
0063720
0063740 ( P R O G 1 R O T A T I O N ]
0063760 \r ( 006 002 f o r
0064000 006 001 F F A M I L Y 006 002 i n s
0064020 i d e 006 001 F A M I L I E S \r
0064040 006 002 j o i
0064060 n 006 001 ( 006 002 f o r 006 001 S S I
0064100 Z E 006 002 i n s i d e 006 001 S I
0064120 Z E S \r
0064140 006 002 j o i n 006 001
0064160 ( 006 002 f o r 006 001 F F A C E
0064200 006 002 i n 006 001 F A C E S 006 002 j
0064220 o i n 006 001 ( 006 002 f o r 006 001 R
0064240 R O T A T I O N 006 002 i n s i d
0064260 e 006 001 R O T A T I O N S \r
0064300
*
0064360 006 002 c o l l e c t 006 001 (
0064400 L I S T F F A M I L Y S S I
0064420 Z E F F A C E R R O T A T I
0064440 O N \r
0064460
*
0064540 ' I R I S ] ) \r \r (
0064560 006 004 \ L E F T M A R G I N . I R
0064600 I S 006 001 \r [ L A M B D A (
0064620 M A R G I N S T R E A M ) 006 006
0064640 006 001
0064660
0064700 006 006 ( * g b n "
0064720 8 - N o v - 8 5 1 7 : 3 3 "
0064740 ) 006 001 \r ( O R 0 ( 006
0064760 002 i f 006 001 M A R G I N \r
0065000 006 002 t h e
0065020 n 006 001 ( 006 002 r e p l a c e 006 001
0065040 L E F T 006 002 o f 006 001 ( 006 002
0065060 f e t c h 006 001 I R I S P A G E
0065100 006 002 O F 006 001 ( 006 002 f e t c h
0065120 006 001 I R I S D A T A 006 002 o f
0065140 006 001 S T R E A M ) ) 006 002 w i
0065160 t h 006 001 M A R G I N ) \r
0065200 006 002 e l s e 006
0065220 001 ( 006 002 f e t c h 006 001 L E F
0065240 T 006 002 o f 006 001 ( 006 002 f e t c
0065260 h 006 001 I R I S P A G E 006 002 O
0065300 F 006 001 ( 006 002 f e t c h 006 001 I
0065320 R I S D A T A 006 002 o f 006 001 S
0065340 T R E A M ] ) \r \r ( 006 004 \ R E S
0065360 E T . I R I S 006 001 \r [ L A M
0065400 B D A ( I R I S S T R E A M )
0065420 006 006 006 001
0065440
0065460 006 006 ( *
0065500 g b n " 1 3 - N o v - 8 5 0
0065520 0 : 4 6 " ) 006 001 \r ( M O
0065540 V E T O ( D S P L E F T M A R
0065560 G I N N I L I R I S S T R E
0065600 A M ) \r (
0065620 I D I F F E R E N C E ( 006 002 f
0065640 e t c h 006 001 T O P 006 002 o f 006
0065660 001 ( D S P C L I P P I N G R E
0065700 G I O N N I L I R I S S T R
0065720 E A M ) ) \r
0065740 ( F O N T P R O
0065760 P ( D S P F O N T N I L I
0066000 R I S S T R E A M ) \r
0066020
0066040 ' H E I G H T ) ) \r
0066060 I R I S S T R
0066100 E A M ] ) \r \r ( 006 004 \ L O O K U
0066120 P R G B 006 001 \r [ L A M B D A
0066140 ( R G B I R I S D A T A ) 006
0066160 006 006 001
0066200
0066220 006 006 ( * ; "
0066240 E d i t e d 2 - F e b - 8 7
0066260 2 0 : 3 7 b y g b n " ) 006
0066300 001 \r \r 006 006 ( * ; ; ; \r 006 001 006
0066320 006 " r e t u r n s t h e c o
0066340 l o r m a p i n d e x w h o
0066360 s e v a l u e i s R G B .
0066400 R e t u r n s t h e c
0066420 l o s e s t f o u n d a n d
0066440 c a c h e s t h a t v a l
0066460 u e . " ) 006 001 \r \r 006 006 ( * ; ;
0066500 ; " S i n c e t h e c o l
0066520 o r m a p c o d e i s s o
0066540 f l a k e y , t h e i r i
0066560 s n o w r e l i e s o n l
0066600 y o n t h e c a c h e i
0066620 n t h e s t r e a m . N o
0066640 t v e r y e f f i c i e n t
0066660 . " ) 006 001 \r \r ( L E T *
0066700 ( ( C A C H E ( 006 002 F E T C
0066720 H 006 001 I R I S C O L O R M A P
0066740 C A C H E 006 002 O F 006 001 I R I
0066760 S D A T A ) ) \r
0067000 ( I N D E X ( S A S S O
0067020 C R G B C A C H E ) ) ) \r
0067040 ( 006 002 I F 006 001
0067060 I N D E X \r
0067100 006 002 T H E N 006 001 ( C
0067120 D R I N D E X ) \r
0067140 006 002 E L S E 006 001 \r
0067160 \r
0067200 006 006 ( * ; ; " d i
0067220 d n ' t f i n d e x a c t l
0067240 y t h e r i g h t i n d e
0067260 x . N o w l o o k t h r
0067300 o u g h t h e c a c h e .
0067320 F o r c l o s e n e s s i
0067340 n t h e c o l o r s p a c
0067360 e , w e u s e c a r t e s
0067400 i a n d i f f e r e n c e o
0067420 f t h e r g b ' s . " ) 006 001
0067440 \r \r
0067460 [ S E T Q I N D E X (
0067500 C D R ( 006 002 F O R 006 001 P A I
0067520 R 006 002 I N 006 001 C A C H E \r
0067540
*
0067600 006 002 S M A L L E S T 006 001
0067620 ( C L : F L E T [ ( A B S D
0067640 I F ( X Y ) \r
0067660
*
0067740 ( I A B S ( I
0067760 D I F F E R E N C E X Y ] \r
0070000
*
0070060 ( A P P L Y # ' +
0070100 ( C L : M A P C A R # ' A B S
0070120 D I F R G B ( C A R P A I
0070140 R ] \r
0070160 ( 006 002 R E P L A C E 006 001
0070200 I R I S C O L O R M A P C A C
0070220 H E 006 002 O F 006 001 I R I S D A
0070240 T A 006 002 W I T H 006 001 ( C L :
0070260 A C O N S R G B I N D E X
0070300 C A C H E ) ) \r
0070320 I N D E X ] )
0070340 \r \r ( 006 004 \ P S P L I N E . T O
0070360 . B E Z I E R . G E O M E T R Y
0070400 006 001 \r [ L A M B D A ( S P
0070420 L I N E K N O T # ) 006 006 006 001
0070440
*
0070500 006 006 ( * g b n " 7
0070520 - J u l - 8 5 2 0 : 4 9 " ) 006
0070540 001 \r \r
0070560 006 006 ( * * r e
0070600 t u r n s a b e z i e r g
0070620 e o m e t r y m a t r i x f
0070640 r o m t h e s p l i n e f
0070660 o r k n o t K N O T # . \r 006
0070700 001 006 006 ( c o
0070720 m p a r e w i t h S F . D E
0070740 R I V S . T O . B E Z I E R w
0070760 h i c h d o e s t h e s a
0071000 m e t h i n g f o r a S
0071020 F s p l i n e \r 006 001
0071040 006 006 d e s c r i p t
0071060 i o n ) ) 006 001 \r
0071100 \r 006 006 (
0071120 * * t h e d e r i v a t i
0071140 v e s m u s t a l r e a d y
0071160 b e s c a l e d b y t h
0071200 e F a c t o r i a l s ) 006 001 \r
0071220 \r
0071240 006 006 ( * * s h o u
0071260 l d n o t c r e a t e t h
0071300 e B E Z I E R ) 006 001 \r \r
0071320 ( P R O G [ ( B E Z ( 006 002
0071340 c r e a t e 006 001 B E Z I E R \r
0071360
0071400 B 0 X _ ( E L
0071420 T ( 006 002 f e t c h 006 001 S P L
0071440 I N E X 006 002 o f 006 001 S P L I
0071460 N E ) \r
0071500
0071520 K N O T # ) \r
0071540
0071560 B 0 Y _ ( E L T (
0071600 006 002 f e t c h 006 001 S P L I N E
0071620 Y 006 002 o f 006 001 S P L I N E )
0071640 \r
0071660
0071700 K N O T # ] \r
0071720 ( 006 002 r e p l a c e 006 001
0071740 B 1 X 006 002 o f 006 001 B E Z
0071760 006 002 w i t h 006 001 ( P L U S (
0072000 006 002 f f e t c h 006 001 B 0 X 006
0072020 002 o f 006 001 B E Z ) \r
0072040
*
0072100 ( Q U O T I E N T ( E
0072120 L T ( 006 002 f f e t c h 006 001 S
0072140 P L I N E D X 006 002 o f 006 001 S
0072160 P L I N E ) \r
0072200
*
0072240 K
0072260 N O T # ) \r
0072300
*
0072340 3 ) ) ) \r
0072360 ( 006 002 r e p l a c e 006
0072400 001 B 1 Y 006 002 o f 006 001 B E Z
0072420 006 002 w i t h 006 001 ( P L U S
0072440 ( 006 002 f f e t c h 006 001 B 0 Y
0072460 006 002 o f 006 001 B E Z ) \r
0072500
*
0072540 ( Q U O T I E N T (
0072560 E L T ( 006 002 f f e t c h 006 001
0072600 S P L I N E D Y 006 002 o f 006 001
0072620 S P L I N E ) \r
0072640
*
0072720 K N O T # ) \r
0072740
*
0073000 3 ) ) ) \r
0073020 ( 006 002 r e p l a c e
0073040 006 001 B 2 X 006 002 o f 006 001 B E
0073060 Z 006 002 w i t h 006 001 ( P L U S
0073100 ( 006 002 f f e t c h 006 001 B 1 X
0073120 006 002 o f 006 001 B E Z ) \r
0073140
*
0073200 ( Q U O T I E N T
0073220 ( P L U S ( E L T ( 006 002 f f
0073240 e t c h 006 001 S P L I N E D X
0073260 006 002 o f 006 001 S P L I N E ) \r
0073300
*
0073360 K N O
0073400 T # ) \r
0073420
*
0073460 ( E L
0073500 T ( 006 002 f f e t c h 006 001 S P
0073520 L I N E D D X 006 002 o f 006 001 S
0073540 P L I N E ) \r
0073560
*
0073640 K N O T # ) ) \r
0073660
*
0073720 3 ) )
0073740 ) \r ( 006 002 r
0073760 e p l a c e 006 001 B 2 Y 006 002 o
0074000 f 006 001 B E Z 006 002 w i t h 006 001
0074020 ( P L U S ( 006 002 f f e t c h
0074040 006 001 B 1 Y 006 002 o f 006 001 B E
0074060 Z ) \r
0074100
0074120 ( Q U O
0074140 T I E N T ( P L U S ( E L T
0074160 ( 006 002 f f e t c h 006 001 S P L
0074200 I N E D Y 006 002 o f 006 001 S P L
0074220 I N E ) \r
0074240
*
0074320 K N O T # ) \r
0074340
*
0074420 ( E L T ( 006 002 f f e t c
0074440 h 006 001 S P L I N E D D Y 006 002
0074460 o f 006 001 S P L I N E ) \r
0074500
*
0074560 K N O T #
0074600 ) ) \r
0074620
*
0074660 3 ) ) ) \r
0074700 ( 006 002 r e p l a c e 006 001 B
0074720 3 X 006 002 o f 006 001 B E Z 006 002
0074740 w i t h 006 001 ( P L U S ( 006 002
0074760 f f e t c h 006 001 B 0 X 006 002 o
0075000 f 006 001 B E Z ) \r
0075020
*
0075060 ( E L T ( 006 002 f f e t c h
0075100 006 001 S P L I N E D X 006 002 o f
0075120 006 001 S P L I N E ) \r
0075140
*
0075200 K N O T # ) \r
0075220
*
0075260 ( E L T ( 006
0075300 002 f f e t c h 006 001 S P L I N E
0075320 D D X 006 002 o f 006 001 S P L I N
0075340 E ) \r
0075360
*
0075420 K N O T # ) \r
0075440
*
0075500 ( E L T ( 006 002 f f e t c h 006
0075520 001 S P L I N E D D D X 006 002 o
0075540 f 006 001 S P L I N E ) \r
0075560
*
0075620 K N O T # )
0075640 ) ) \r ( 006 002
0075660 r e p l a c e 006 001 B 3 Y 006 002
0075700 o f 006 001 B E Z 006 002 w i t h 006
0075720 001 ( P L U S ( 006 002 f f e t c
0075740 h 006 001 B 0 Y 006 002 o f 006 001 B
0075760 E Z ) \r
0076000
0076020 ( E L
0076040 T ( 006 002 f e t c h 006 001 S P L
0076060 I N E D Y 006 002 o f 006 001 S P L
0076100 I N E ) \r
0076120
*
0076160 K N O T # ) \r
0076200
*
0076240 ( E L T ( 006 002 f f e t c
0076260 h 006 001 S P L I N E D D Y 006 002
0076300 o f 006 001 S P L I N E ) \r
0076320
*
0076360 K N O T #
0076400 ) \r
0076420
0076440 ( E L T
0076460 ( 006 002 f f e t c h 006 001 S P L I
0076500 N E D D D Y 006 002 o f 006 001 S P
0076520 L I N E ) \r
0076540
*
0076600 K N O T # ) ) ) \r
0076620 ( R E T U R N B
0076640 E Z ] ) \r \r ( 006 004 \ S C A L E .
0076660 I R I S 006 001 \r [ L A M B D A
0076700 ( S T R E A M S C A L E ) 006
0076720 006 006 001
0076740
0076760 006 006 ( * g b n
0077000 " 2 4 - J u n - 8 5 1 8 : 5
0077020 0 " ) 006 001 \r ( 006 002 i f 006
0077040 001 ( N O T S C A L E ) \r
0077060 006 002 t h e n 006 001 1
0077100 \r 006 002 e l s e 006 001
0077120 ( E R R O R ] ) \r \r ( 006 004 \ S C
0077140 A L E . S P L I N E . B Y . D E
0077160 R I V S 006 001 \r [ L A M B D A
0077200 ( S P L I N E ) 006 006 006 001
0077220
*
0077260 006 006 ( * g b n
0077300 " 8 - J u l - 8 5 1 7 : 2
0077320 0 " ) 006 001 \r
0077340 \r 006 006 ( *
0077360 * F o r t h e f o r m u
0077400 s e d b y \ P S P L I N E .
0077420 T O . B E Z I E R . G E O M E T
0077440 R Y , t h e d e r i v s c
0077460 a n a l l b e \r 006 001
0077500 006 006 p r e m u l t
0077520 i p l i e d b y t h e f a
0077540 c t o r i a l c o e f f i c i
0077560 e n t s , r a t h e r t h a
0077600 n r e p e a t e d l y m u l
0077620 t i p l y i n g \r 006 001
0077640 006 006 t h e m i n )
0077660 006 001 \r \r ( 006 002 b i n d 006
0077700 001 ( D D X _ ( 006 002 f e t c
0077720 h 006 001 S P L I N E D D X 006 002
0077740 o f 006 001 S P L I N E ) ) \r
0077760 ( D D Y _ (
0100000 006 002 f e t c h 006 001 S P L I N E
0100020 D D Y 006 002 o f 006 001 S P L I N
0100040 E ) ) \r ( D
0100060 D D X _ ( 006 002 f e t c h 006 001
0100100 S P L I N E D D D X 006 002 o f
0100120 006 001 S P L I N E ) ) \r
0100140 ( D D D Y _ ( 006
0100160 002 f e t c h 006 001 S P L I N E D
0100200 D D Y 006 002 o f 006 001 S P L I N
0100220 E ) ) 006 002 f o r 006 001 I 006 002
0100240 f r o m 006 001 1 006 002 t o 006 001
0100260 ( 006 002 f e t c h 006 001 % # K N O
0100300 T S 006 002 o f 006 001 S P L I N E
0100320 ) \r 006 002 d o 006 001
0100340 ( S E T A D D X I ( F Q U
0100360 O T I E N T ( E L T D D X
0100400 I ) \r
0100420
0100440 2 . 0 ) ) \r
0100460 ( S E T A D D Y I ( F Q U
0100500 O T I E N T ( E L T D D Y
0100520 I ) \r
0100540
0100560 2 . 0 ) ) \r
0100600 ( S E T A D D D X I ( F Q
0100620 U O T I E N T ( E L T D D D
0100640 X I ) \r
0100660
0100700 6 . 0 ) ) \r
0100720 ( S E T A D D D Y I
0100740 ( F Q U O T I E N T ( E L T
0100760 D D D Y I ) \r
0101000
0101020 6 . 0 ] ) \r \r ( 006 004
0101040 \ T E R P R I . I R I S 006 001 \r
0101060 [ L A M B D A ( S T R E A M
0101100 ) 006 006 006 001
0101120
*
0101160 006 006 ( * g b n " 1 2 - N o v
0101200 - 8 5 1 4 : 3 7 " ) 006 001 \r
0101220 ( M O V E T O ( D S P L E
0101240 F T M A R G I N N I L S T R
0101260 E A M ) \r
0101300 ( I D I F F E R E N C E ( D S
0101320 P Y P O S I T I O N N I L S
0101340 T R E A M ) \r
0101360 ( F O N T P R
0101400 O P ( D S P F O N T N I L
0101420 S T R E A M ) \r
0101440
0101460 ' H E I G H T ) ) \r
0101500 S T R E A M ) \r
0101520 ( 006 002 i f 006 001 ( I L E S S
0101540 P ( D S P Y P O S I T I O N
0101560 N I L S T R E A M ) \r
0101600 0 ) \r
0101620 006 002 t h e n 006 001 (
0101640 D S P R E S E T S T R E A M )
0101660 ) \r ( F L U S H O U T P
0101700 U T ( 006 002 f e t c h 006 001 S P
0101720 P O U T S T R E A M 006 002 o f 006
0101740 001 ( 006 002 f e t c h 006 001 I R I
0101760 S D A T A 006 002 o f 006 001 S T R
0102000 E A M ] ) \r \r ( 006 004 \ F O N T .
0102020 I R I S 006 001 \r [ L A M B D A
0102040 ( I R I S S T R E A M F O N
0102060 T D E S C ) 006 006 006 001
0102100
0102120 006 006 ( * g b n
0102140 " 2 9 - O c t - 8 5 1 5 : 2
0102160 5 " ) 006 001 \r ( 006 002 i f 006
0102200 001 F O N T D E S C \r
0102220 006 002 t h e n 006 001 ( L E T
0102240 ( ( I R I S D A T A ( 006 002 f
0102260 e t c h 006 001 I R I S D A T A
0102300 006 002 o f 006 001 I R I S S T R E A
0102320 M ) ) ) \r
0102340 [ 006 002 i f 006 001 [
0102360 N O T ( A N D ( 006 002 t y p e
0102400 ? 006 001 F O N T D E S C R I P T
0102420 O R F O N T D E S C ) \r
0102440
0102460 ( E Q
0102500 ' I R I S ( 006 002 f e t c h 006
0102520 001 F O N T D E V I C E 006 002 o
0102540 f 006 001 F O N T D E S C ] \r
0102560
0102600 006 002 t h e n 006 001 ( S E
0102620 T Q F O N T D E S C ( \ C O
0102640 E R C E F O N T D E S C F O N
0102660 T D E S C ' I R I S ] \r
0102700
*
0102760 006 006 ( * u
0103000 s e r s u p p l i e d a f
0103020 o n t s o i n s t a l l i
0103040 t ) 006 001 \r
0103060 ( 006 002 r e p l a c
0103100 e 006 001 ( I R I S D A T A C U
0103120 R R E N T F O N T D E S C ) 006
0103140 002 o f 006 001 I R I S D A T A 006
0103160 002 w i t h 006 001 F O N T D E S C
0103200 ) \r
0103220 ( 006 002 \ C H A N G E C H
0103240 A R S E T . I R I S 006 001 I R I
0103260 S S T R E A M 0 )
0103300 006 006 ( * t h i s v a l
0103320 i d a t e s t h e c a c h e
0103340 s f o r \r 006 001
0103360
*
0103440 006 006 f o n t b a s e
0103460 , c u r r e n t c h a r s e
0103500 t , e t c . ) 006 001 \r
0103520 F O N
0103540 T D E S C ) \r 006 002 e
0103560 l s e 006 001 ( 006 002 f e t c h 006 001
0103600 C U R R E N T F O N T D E S C
0103620 006 002 o f 006 001 ( 006 002 f e t c h
0103640 006 001 I R I S D A T A 006 002 o f
0103660 006 001 I R I S S T R E A M ] ) \r
0103700 \r ( 006 004 \ C R E A T E C H A R S
0103720 E T . I R I S 006 001 \r [ L A M
0103740 B D A ( F A M I L Y S I Z E
0103760 F A C E R O T A T I O N D
0104000 E V I C E C H A R S E T F O
0104020 N T D E S C N O S L U G ? ) 006
0104040 006 006 001 \r
0104060
*
0104140 006 006 ( * ; " E d i t e d
0104160 1 6 - J a n - 8 7 1 6 : 4 3
0104200 b y g b n " ) 006 001 \r \r 006 006 ( *
0104220 ; ; ; " T h i s f u n c t
0104240 i o n r e a d s i n t h e
0104260 s p l i n e d e f i n i t i
0104300 o n f o r a C H A R S E T
0104320 b u t d o e s n o t i n
0104340 s t a l l i t o n t h e
0104360 i r i s . T h e i n s t a
0104400 l l a t i o n i s d o n e
0104420 o n a d e m a n d b a s i
0104440 s o n t h e I R I S , c
0104460 h a r s e t b y c h a r s e
0104500 t . " ) 006 001 \r \r ( P R O
0104520 G ( ( F O N T A R R A Y ( \
0104540 L O O K U P S P L I N E F O N T
0104560 F A M I L Y C H A R S E T )
0104600 ) \r ( M A
0104620 X H E I G H T 1 ) \r
0104640 W I D T H S C S I
0104660 N F O F O N T A R R A Y S C
0104700 A L E F I L E S ) \r
0104720 ( 006 002 i f 006 001 ( N O
0104740 T F O N T A R R A Y ) \r
0104760 006 002 t h e
0105000 n 006 001
0105020
0105040 006 006
0105060 ( * ; \r 006 001
0105100
*
0105160 006 006 " w e h a v e n
0105200 ' t e v e n r e a d t h i
0105220 s i n t o c o r e . " ) 006 001
0105240 \r
0105260 ( S E T Q F I L E S
0105300 ( D I R E C T O R Y ( P A C K
0105320 * I R I S F O N T D I R E C T
0105340 O R I E S F A M I L Y ' * .
0105360 * S F ) \r
0105400
0105420 ' C O L L
0105440 E C T ) ) \r
0105460 \r 006 006 ( *
0105500 ; ; " T H I S M E T H O D
0105520 O F F I N D I N G T H E
0105540 F I L E S W I L L N E E D
0105560 T O B E U P G R A D E D I
0105600 F W E G E T S P L I N E
0105620 D E F I N I T I O N S F O R
0105640 N S C H A R A C T E R S " ) 006
0105660 001 \r \r
0105700 ( 006 002 i f 006 001 ( N
0105720 O T F I L E S ) \r
0105740
0105760 006 002 t h e n 006 001 \r
0106000 \r
0106020 006 006 ( * ; ; " i f y o u
0106040 c a n ' t f i n d t h e f
0106060 i l e t h e n j u s t r e
0106100 t u r n N I L t o c r e a
0106120 t e c h a r s e t w h o w i
0106140 l l e i t h e r r e p o r t
0106160 t h e e r r o r o r b u
0106200 i l d a s l u g c h a r s
0106220 e t " ) 006 001 \r \r
0106240
0106260 ( R E T U R N ( 006 002 i
0106300 f 006 001 N O S L U G ? \r
0106320
*
0106360 006 002 t h e n 006 001
0106400 006 006 (
0106420 * ; \r 006 001
0106440 006 006 " i f y o u c a n ' t
0106460 f i n d t h e f i l e t h
0106500 e n j u s t r e t u r n N
0106520 I L t o c r e a t e c h a r
0106540 s e t w h o w i l l r e p
0106560 o r t t h e e r r o r " ) 006
0106600 001 \r
0106620
0106640 N
0106660 I L \r
0106700
0106720 006 002 e l s e 006
0106740 001
0106760 006 006 ( * ; \r 006 001
0107000
0107020 006
0107040 006 " t h i s w i l l g u a r
0107060 a n t e e t h a t a l l t
0107100 h e c h a r s i n t h e
0107120 c h a r s e t h a v e 0 w
0107140 i d t h " ) 006 001 \r
0107160
*
0107220 ( \ B U I L D S L U G C
0107240 S I N F O 0 0 0 ) ) ) \r
0107260
0107300 006 002 e l s e 006 001 ( 006 002
0107320 i f 006 001 \ I R I S . V E R B O
0107340 S E \r
0107360
0107400 006 002 t h e n 006 001 ( P R O M P
0107420 T P R I N T " R e a d i n g
0107440 t h e f o l l o w i n g s p
0107460 l i n e f o n t f i l e s :
0107500 " F I L E S ) ) \r
0107520
0107540 ( 006 002 i f 006 001 \ I R
0107560 I S . D E B U G \r
0107600
0107620 006 002 t h e n 006 001
0107640 ( R E A D . S P L I N E . F O N
0107660 T ( C A R F I L E S ) \r
0107700
*
0107740 F A M I L Y C
0107760 H A R S E T ) \r
0110000
0110020 006 002 e l s e 006 001 ( R E
0110040 A D . S P L I N E . F O N T F
0110060 I L E S F A M I L Y C H A R
0110100 S E T ) ) ) \r
0110120
*
0110200 006 006 ( * ; " n o w
0110220 s e e i f i t r e a l l
0110240 y w o r k e d " ) 006 001 \r
0110260
0110300 ( 006 002 i f 006 001 ( N O T ( S E
0110320 T Q F O N T A R R A Y ( \ L
0110340 O O K U P S P L I N E F O N T
0110360 F A M I L Y C H A R S E T ) )
0110400 ) \r
0110420 006 002 t h e n 006
0110440 001
0110460
0110500 006 006 ( * ; \r 006 001
0110520
*
0110560 006 006 "
0110600 w e j u s t l o s t h o r
0110620 r i b l y , s o d i e w i
0110640 t h a n i n c o n s i s t e
0110660 n c y " ) 006 001 \r
0110700
0110720 ( S H O U L D N T " I
0110740 n s i d e \ F O N T C R E A T
0110760 E . I R I S , s o m e S F F
0111000 O N T S w e r e f o u n d ,
0111020 b u t r e a d i n g t h e
0111040 m d i d n o t p r o d u c
0111060 e a n e n t r y i n \ S
0111100 P L I N E F O N T S I N C O R E
0111120 " \r
0111140
0111160 ) ) )
0111200 006
0111220 006 ( * ; \r 006 001 006 006 " w e
0111240 h a v e t h e F A M I L Y /
0111260 C H A R S E T e n t r i e s ,
0111300 n o w s e e i f t h e r
0111320 e i s a f o n t d e s c
0111340 r i p t o r r e a d y m a d
0111360 e f o r t h i s s i z e "
0111400 ) 006 001 \r \r
0111420 006 006 ( * ; ;
0111440 " s i n c e a s p l i n e
0111460 f o n t c a n b e a n y
0111500 s i z e , w e m u s t g
0111520 u a r a n t e e t h a t r e
0111540 l a t i v e s i z e s a r e
0111560 g u a r a n t e e d , i . e
0111600 . a 1 0 p o i n t f o
0111620 n t i s t w i c e a s b
0111640 i g a s a 5 p o i n t
0111660 f o n t " ) 006 001 \r \r
0111700 ( S E T Q C S I N F O
0111720 ( 006 002 c r e a t e 006 001 C H A
0111740 R S E T I N F O ) ) \r
0111760 ( S E T Q W I D T H
0112000 S ( 006 002 f e t c h 006 001 ( C H
0112020 A R S E T I N F O W I D T H S
0112040 ) 006 002 o f 006 001 C S I N F O )
0112060 ) \r ( 006 002 b
0112100 i n d 006 001 C H A R D E S C 006
0112120 002 f o r 006 001 I 006 002 f r o m 006
0112140 001 1 006 002 t o 006 001 \ M A X T
0112160 H I N C H A R \r
0112200 006 002 d o 006 001 ( S E T
0112220 Q C H A R D E S C ( E L T
0112240 F O N T A R R A Y I ) ) \r
0112260 \r
0112300 006 006 ( * ; ; " I f
0112320 t h e r e i s n o d e s c
0112340 r i p t i o n f o r a c h
0112360 a r a c t e r , s e t i t s
0112400 w i d t h t o z e r o ,
0112420 s o t h a t d s p p r i n t
0112440 c h a r c a n r e c o g n i
0112460 z e n o t t o c a l l t
0112500 h i s c h a r a c t e r . " )
0112520 006 001 \r \r
0112540 ( 006 002 i f 006 001 C H A R
0112560 D E S C \r
0112600 006 002 t h e n 006
0112620 001 ( \ F S E T W I D T H W I
0112640 D T H S I ( 006 002 f e t c h 006
0112660 001 X W I D T H 006 002 o f 006 001
0112700 ( 006 002 f e t c h 006 001 S F . W I
0112720 D T H 006 002 o f 006 001 C H A R D
0112740 E S C ) ) ) \r
0112760
0113000 [ S E T Q M A X H E I G H T
0113020 ( I M A X M A X H E I G H T
0113040 ( 006 002 f e t c h 006 001 Y F I D U
0113060 C I A L \r
0113100
*
0113160 006 002 o f 006 001 ( 006 002 f e t c h
0113200 006 001 F I D U C I A L 006 002 o f
0113220 006 001 C H A R D E S C ] \r
0113240 006
0113260 002 e l s e 006 001 ( \ F S E T W I
0113300 D T H W I D T H S I 0 ) )
0113320 ) \r ( 006 002 r
0113340 e p l a c e 006 001 ( C H A R S E
0113360 T I N F O C H A R S E T A S C
0113400 E N T ) 006 002 o f 006 001 C S I N
0113420 F O 006 002 w i t h 006 001 ( F I X
0113440 ( T I M E S 0 . 7 M A X H
0113460 E I G H T ) ) ) \r
0113500 ( 006 002 r e p l a c e 006 001
0113520 ( C H A R S E T I N F O C H A
0113540 R S E T D E S C E N T ) 006 002 o
0113560 f 006 001 C S I N F O 006 002 w i t
0113600 h 006 001 ( F I X ( T I M E S
0113620 0 . 3 M A X H E I G H T ) ) )
0113640 \r \r
0113660 006 006 ( * ; ; " I
0113700 t d o e s n ' t l o o k l
0113720 i k e t h i s s c a l e j
0113740 u n k i s u s e d a n y m
0113760 o r e . g b n J a n 1 7
0114000 / 8 7 " ) 006 001 \r \r
0114020 [ 006 002 i f 006 001 ( S E T Q
0114040 S C A L E ( 006 002 f e t c h 006
0114060 001 O T H E R D E V I C E F O N
0114100 T P R O P S 006 002 o f 006 001 F O
0114120 N T D E S C ) ) \r
0114140 006 002 t h e n 006 001
0114160 \r \r
0114200 006 006 ( * ; ; " t
0114220 h i s f o n t d e s c r i p t
0114240 o r h a s a l r e a d y b
0114260 u i l d c h a r a c t e r s
0114300 e t s , a n d h a s d e t
0114320 e r m i n e d i t s s c a l
0114340 e . S o s c a l e t h e
0114360 w i d t h s i n t h i s
0114400 c h a r a c t e r s e t .
0114420 F o r t h e f i r s t c h
0114440 a r a c t e r s e t , t h i
0114460 s i s d o n e i n \ f o
0114500 n t c r e a t e . i r i s " ) 006
0114520 001 \r \r
0114540 ( 006 002 f o r 006 001 I
0114560 006 002 f r o m 006 001 0 006 002 t o
0114600 006 001 \ M A X T H I N C H A R
0114620 006 002 d o 006 001 ( \ F S E T W I D
0114640 T H W I D T H S I \r
0114660
*
0114740 ( F I X ( T I M
0114760 E S ( \ F G E T W I D T H W
0115000 I D T H S I ) \r
0115020
*
0115120 S C A L E ] \r
0115140 ( R E T U R N C S I N F O ]
0115160 ) \r \r ( 006 004 \ I R I S S E T F O
0115200 N T B A S E 006 001 \r [ L A M B
0115220 D A ( F A M I L Y C H A R S
0115240 E T I R I S D A T A F O N T
0115260 B A S E ) 006 006 006 001
0115300 006 006 ( * g
0115320 b n " 1 8 - O c t - 8 5 1 6
0115340 : 1 5 " ) 006 001 \r ( P U T
0115360 A S S O C ( C O N S F A M I
0115400 L Y C H A R S E T ) \r
0115420 F O N T B A S E \r
0115440 ( 006 002 f e
0115460 t c h 006 001 F O N T S I N I R I
0115500 S 006 002 o f 006 001 I R I S D A T
0115520 A ] ) \r \r ( 006 004 \ I R I S F O N
0115540 T B A S E 006 001 \r [ L A M B D
0115560 A ( F A M I L Y C H A R S E
0115600 T I R I S D A T A ) 006 006 006 001
0115620
0115640 006 006 ( * g b
0115660 n " 1 8 - O c t - 8 5 1 6 :
0115700 1 5 " ) 006 001 \r ( C D R
0115720 ( S A S S O C ( C O N S F A
0115740 M I L Y C H A R S E T ) \r
0115760 ( 006
0116000 002 f e t c h 006 001 F O N T S I N
0116020 I R I S 006 002 o f 006 001 I R I S
0116040 D A T A ] ) \r \r ( 006 004 \ C H A N
0116060 G E C H A R S E T . I R I S 006 001
0116100 \r [ L A M B D A ( I R I S
0116120 S T R E A M C H A R S E T ) 006
0116140 006 006 001
0116160
0116200 006 006 ( * g b n " 1 8 - O
0116220 c t - 8 5 1 6 : 1 6 " ) 006 001 \r
0116240 \r
0116260 006 006 ( * * c a l l
0116300 e d w h e n a c h a r a c
0116320 t e r i s a b o u t t o
0116340 b e p r i n t e d w h i c h
0116360 i s i n a d i f f e r e
0116400 n t \r 006 001
0116420 006 006 c h a r s e t t h a n t
0116440 h e c u r r e n t o n e . )
0116460 006 001 \r \r ( L E T ( ( I
0116500 R I S D A T A ( 006 002 f e t c h
0116520 006 001 I R I S D A T A 006 002 o f
0116540 006 001 I R I S S T R E A M ) ) \r
0116560 C S I N F O
0116600 B A S E F O N T D E S C ) \r
0116620 ( S E T Q F
0116640 O N T D E S C ( 006 002 f e t c h
0116660 006 001 C U R R E N T F O N T D E
0116700 S C 006 002 o f 006 001 I R I S D A
0116720 T A ) ) \r [ 006
0116740 002 r e p l a c e 006 001 ( I R I S
0116760 D A T A I R I S W I D T H S C
0117000 A C H E ) 006 002 o f 006 001 I R I
0117020 S D A T A 006 002 w i t h 006 001 (
0117040 006 002 f e t c h 006 001 ( C H A R S
0117060 E T I N F O W I D T H S ) \r
0117100
*
0117200 006 002 o f 006 001 ( S E T Q C S I
0117220 N F O ( \ G E T C H A R S E T
0117240 I N F O \r
0117260
*
0117360 C H A R S E T F
0117400 O N T D E S C ] \r
0117420 ( S E T Q B A S E ( 006 002
0117440 \ I R I S F O N T B A S E 006 001
0117460 ( 006 002 f e t c h 006 001 F O N T F
0117500 A M I L Y 006 002 o f 006 001 F O N
0117520 T D E S C ) \r
0117540
0117560 C H A R S E T I R I S D A
0117600 T A ) ) \r ( 006
0117620 002 i f 006 001 ( N O T B A S E )
0117640 \r 006 002
0117660 t h e n 006 001 \r
0117700 \r 006 006 (
0117720 * t h i s s t r e a m h a
0117740 s n e v e r s e e n t h i
0117760 s c h a r s e t b e f o r e
0120000 s o i n s t a l l i t o
0120020 n t h e I R I S . ) 006 001 \r \r
0120040
0120060 ( 006 002 I N S T A L L . O B J
0120100 F O N T 006 001 ( 006 002 f e t c h 006
0120120 001 F O N T F A M I L Y 006 002 o
0120140 f 006 001 F O N T D E S C ) \r
0120160
0120200 C H A R S E T N
0120220 I L N I L N I L I R I S S
0120240 T R E A M C S I N F O ) \r
0120260
0120300 ( S E T Q B A S E ( 006 002 \ I
0120320 R I S F O N T B A S E 006 001 ( 006
0120340 002 f e t c h 006 001 F O N T F A M
0120360 I L Y 006 002 o f 006 001 F O N T D
0120400 E S C ) \r
0120420
0120440 C H A R S E T
0120460 I R I S D A T A ) ) ) \r
0120500 ( 006 002 r e p l a c e
0120520 006 001 ( I R I S D A T A C U R
0120540 R E N T F O N T B A S E ) 006 002
0120560 o f 006 001 I R I S D A T A 006 002
0120600 w i t h 006 001 B A S E ) \r
0120620 ( 006 002 r e p l a c e
0120640 006 001 ( I R I S D A T A I R I
0120660 S C H A R S E T ) 006 002 o f 006 001
0120700 I R I S D A T A 006 002 w i t h
0120720 006 001 C H A R S E T ] ) \r \r ( 006
0120740 004 \ C H A R W I D T H . I R I S
0120760 006 001 \r [ L A M B D A ( C H
0121000 A R C O D E F O N T ) 006 006 006 001
0121020
*
0121060 006 006 ( * g b n " 1 8
0121100 - O c t - 8 5 1 9 : 1 1 " ) 006
0121120 001 \r ( F I X ( T I M E
0121140 S ( 006 002 f e t c h 006 001 O T H
0121160 E R D E V I C E F O N T P R O P
0121200 S 006 002 o f 006 001 F O N T ) \r
0121220 (
0121240 \ F G E T C H A R W I D T H F
0121260 O N T C H A R C O D E ] ) \r \r
0121300 ( 006 004 \ O U T C H A R F N . I R
0121320 I S 006 001 \r [ L A M B D A (
0121340 I R I S S T R E A M C H A R C
0121360 O D E ) 006 006 006 001
0121400
0121420 006 006 ( * ; " E d
0121440 i t e d 2 - F e b - 8 7 2
0121460 3 : 4 6 b y g b n " ) 006 001 \r
0121500 ( L E T * ( ( I R I S
0121520 D A T A ( 006 002 f e t c h 006 001
0121540 I R I S D A T A 006 002 o f 006 001
0121560 I R I S S T R E A M ) ) \r
0121600 ( S P P O U T
0121620 ( 006 002 f e t c h 006 001 S P P O U
0121640 T S T R E A M 006 002 o f 006 001 I
0121660 R I S D A T A ) ) \r
0121700 O B J N O \r
0121720 ( F O N T D E S C
0121740 ( 006 002 f e t c h 006 001 C U R R E
0121760 N T F O N T D E S C 006 002 o f 006
0122000 001 I R I S D A T A ) ) \r
0122020 P U S H E D A T
0122040 T R I B U T E S S C A L E ) \r
0122060 ( 006 002 i f 006
0122100 001 ( N O T F O N T D E S C )
0122120 \r 006
0122140 002 t h e n 006 001
0122160
*
0122220 006 006 ( * ; \r 006 001
0122240 006 006 " t h
0122260 i s i s s o t h a t t h
0122300 e s t r e a m c a n b e
0122320 o p e n e d w i t h o u t t
0122340 h e e x p e n s i v e f o n
0122360 t c r e a t e o p e r a t i
0122400 o n " ) 006 001 \r
0122420 ( S E T Q
0122440 F O N T D E S C ( D S P F O N
0122460 T ( F O N T C R E A T E ' G
0122500 A C H A 1 2 N I L N I L
0122520 ' I R I S ) \r
0122540
*
0122600 I R I S S T R E A M ) ) ) \r
0122620 ( 006 002 i f 006 001
0122640 ( N E Q ( 006 002 f e t c h 006 001
0122660 ( I R I S D A T A I R I S C H
0122700 A R S E T ) 006 002 o f 006 001 I R
0122720 I S D A T A ) \r
0122740 ( \ C H A
0122760 R S E T C H A R C O D E ) ) \r
0123000 006 002
0123020 t h e n 006 001 ( 006 002 \ C H A N G
0123040 E C H A R S E T . I R I S 006 001
0123060 I R I S S T R E A M ( \ C H A
0123100 R S E T C H A R C O D E ) ) )
0123120 \r ( S E T Q
0123140 O B J N O ( I P L U S ( 006
0123160 002 f e t c h 006 001 C U R R E N T
0123200 F O N T B A S E 006 002 o f 006 001
0123220 I R I S D A T A ) \r
0123240
0123260 C H A R C O D E )
0123300 ) \r ( C O N
0123320 D \r (
0123340 ( E Q C H A R C O D E ( C H
0123360 A R C O D E E O L ) ) \r
0123400 ( 006 002 \ T
0123420 E R P R I . I R I S 006 001 I R I
0123440 S S T R E A M ) ) \r
0123460 ( ( N I L L )
0123500
*
0123540 006 006 ( * ; \r 006
0123560 001
0123600
*
0123640 006 006 " Z E
0123660 R O P ( I R I S . I S O B J
0123700 C U R R E N T F O N T B A S E
0123720 S P P O U T ) " ) 006 001 \r
0123740 \r
0123760 006 006 ( * ; ; " t h i s c
0124000 h a r a c t e r s e t h a s
0124020 n o t b e e n i n s t a l
0124040 l e d o n t h e I R I S .
0124060 c h a r a c t e r z e r o
0124100 i s d e f i n e d f o r
0124120 e v e r y c h a r s e t t h
0124140 a t i s i n s t a l l e d .
0124160 " ) 006 001 \r \r
0124200 ( S H O U L D N T " \
0124220 C H A N G E C H A R S E T . I R
0124240 I S h a s n o t g u a r a
0124260 n t e e d t h a t c h a r
0124300 0 i s d e f i n e d . O
0124320 b j = " \r
0124340 O B J
0124360 N O ) ) \r
0124400 ( ( Z E R O P ( \ F G E T
0124420 W I D T H ( 006 002 f e t c h 006 001
0124440 ( I R I S D A T A I R I S W
0124460 I D T H S C A C H E ) 006 002 o f
0124500 006 001 I R I S D A T A ) \r
0124520
0124540 ( \ C H A R 8
0124560 C O D E C H A R C O D E ) ) )
0124600 006 006 ( * ;
0124620 \r 006 001
0124640
*
0124700 006 006 " t h
0124720 e c h a r a c t e r i s n
0124740 o t d e f i n e d . d o n
0124760 ' t c a l l i t " ) 006 001 \r
0125000 N I L
0125020 ) \r (
0125040 T ( I R I S . P U S H M A T R
0125060 I X S P P O U T ) \r
0125100 ( I R I S
0125120 . T R A N S L A T E ( D S P X
0125140 P O S I T I O N N I L I R I
0125160 S S T R E A M ) \r
0125200
0125220 ( D S P Y P O S I T I O N N I
0125240 L I R I S S T R E A M ) \r
0125260
0125300 0 S P P O U T ) \r
0125320 (
0125340 I R I S . S C A L E ( S E T Q
0125360 S C A L E ( 006 002 f e t c h 006
0125400 001 O T H E R D E V I C E F O N
0125420 T P R O P S 006 002 o f 006 001 F O
0125440 N T D E S C ) ) \r
0125460
0125500 S C A L E S C A L E S P P O
0125520 U T ) \r
0125540 ( 006 002 i f 006 001 ( E Q
0125560 ( C A R ( 006 002 f e t c h 006 001
0125600 F O N T F A C E 006 002 o f 006 001
0125620 F O N T D E S C ) ) \r
0125640
0125660 ' B O L D ) \r
0125700 006 002
0125720 t h e n 006 001 ( S E T Q P U S
0125740 H E D A T T R I B U T E S T )
0125760 \r
0126000 ( I R I S .
0126020 P U S H A T T R I B U T E S S
0126040 P P O U T ) \r
0126060
0126100 ( I R I S . L I N E W I D T H
0126120 \ I R I S . B O L D . L I N E W
0126140 I D T H S P P O U T ) ) \r
0126160 ( 006
0126200 002 i f 006 001 ( E Q ( C A D R
0126220 ( 006 002 f e t c h 006 001 F O N T F
0126240 A C E 006 002 o f 006 001 F O N T D
0126260 E S C ) ) \r
0126300 ' I
0126320 T A L I C ) \r
0126340 006 002 t h e
0126360 n 006 001
0126400
0126420 006 006 ( * ; "
0126440 f a k e i t a l i c s w i t
0126460 h a r o t a t i o n " ) 006 001
0126500 \r
0126520 ( I R I S .
0126540 R O T A T E \ I R I S . I T A
0126560 L I C S . R O T A T I O N I R
0126600 I S . Z A X I S S P P O U T )
0126620 ) \r
0126640 ( 006 002 i f 006 001 P U S H E D
0126660 A T T R I B U T E S \r
0126700 006
0126720 002 t h e n 006 001 ( I R I S . P O
0126740 P A T T R I B U T E S S P P O
0126760 U T ) ) \r
0127000 ( I R I S . C A L L O
0127020 B J O B J N O S P P O U T )
0127040 \r
0127060 ( I R I S . P O P M A T R I X
0127100 S P P O U T ) \r
0127120 ( R E L M O V
0127140 E T O ( F I X ( \ F G E T W
0127160 I D T H ( 006 002 f e t c h 006 001
0127200 I R I S W I D T H S C A C H E
0127220 006 002 o f 006 001 I R I S D A T A )
0127240 \r
0127260
0127300 C H A R C O D E
0127320 ) ) \r
0127340 0 I R I S
0127360 S T R E A M ) \r
0127400 ( F L U S H O U
0127420 T P U T ( 006 002 f e t c h 006 001
0127440 S P P O U T S T R E A M 006 002 o
0127460 f 006 001 ( 006 002 f e t c h 006 001 I
0127500 R I S D A T A 006 002 o f 006 001 I
0127520 R I S S T R E A M ] ) \r \r ( 006 004
0127540 \ C L I P P I N G R E G I O N .
0127560 I R I S 006 001 \r [ L A M B D A
0127600 ( S T R E A M R E G I O N )
0127620 006 006 006 001
0127640
0127660 006 006 ( * g b n
0127700 " 3 0 - J u n - 8 5 2 1 : 2
0127720 1 " ) 006 001 \r ( 006 002 i f 006
0127740 001 R E G I O N \r
0127760 006 002 t h e n 006 001 ( 006 002 r e p
0130000 l a c e 006 001 I R I S C L I P P
0130020 I N G R E G I O N 006 002 o f 006 001
0130040 ( 006 002 f e t c h 006 001 I R I S
0130060 D A T A 006 002 o f 006 001 S T R E
0130100 A M ) 006 002 w i t h 006 001 R E G
0130120 I O N ) \r 006 002 e l s
0130140 e 006 001 ( 006 002 f e t c h 006 001 I
0130160 R I S C L I P P I N G R E G I O
0130200 N 006 002 o f 006 001 ( 006 002 f e t c
0130220 h 006 001 I R I S D A T A 006 002 o
0130240 f 006 001 S T R E A M ] ) \r \r ( 006
0130260 004 \ C L O S E F N . I R I S 006 001
0130300 \r [ L A M B D A ( S T R )
0130320 006 006 006 001
0130340
*
0130400 006 006 ( * g b n " 1 2 - N
0130420 o v - 8 5 1 4 : 2 5 " ) 006 001 \r
0130440 \r
0130460 006 006 ( * * ( I D
0130500 O N T T H I N K T H A T S
0130520 G I I M P L E M E N T S T H
0130540 E S P P C L O S E P R O T
0130560 O C O L , B U T W E S H O
0130600 U L D \r 006 001
0130620 006 006 T R Y T O C O N V I N
0130640 C E T H E M ) ) 006 001 \r \r
0130660 ( F O R C E O U T P U T I R
0130700 I S C O N N ] ) \r \r ( 006 004 \ C O
0130720 L O R . I R I S 006 001 \r [ L A
0130740 M B D A ( S T R E A M C O L
0130760 O R ) 006 006 006 001
0131000
0131020 006 006 ( *
0131040 g b n " 8 - N o v - 8 5
0131060 1 9 : 2 5 " ) 006 001 \r ( 006
0131100 002 i f 006 001 C O L O R \r
0131120 006 002 t h e n 006 001 ( I R
0131140 I S . C O L O R ( 006 002 \ I R I
0131160 S . A S S U R E . C O L O R 006 001
0131200 C O L O R S T R E A M ) \r
0131220
0131240 ( 006 002 f e t c h 006 001 S P
0131260 P O U T S T R E A M 006 002 o f 006
0131300 001 ( 006 002 f e t c h 006 001 I R I
0131320 S D A T A 006 002 o f 006 001 S T R
0131340 E A M ) ) ) \r 006 002 e
0131360 l s e 006 001 ( I R I S . G E T C
0131400 O L O R ( 006 002 f e t c h 006 001
0131420 S P P O U T S T R E A M 006 002 o
0131440 f 006 001 ( 006 002 f e t c h 006 001 I
0131460 R I S D A T A 006 002 o f 006 001 S
0131500 T R E A M ] ) \r \r ( 006 004 \ I R I
0131520 S . A S S U R E . C O L O R 006 001
0131540 \r [ L A M B D A ( C O L O
0131560 R # I R I S S T R E A M ) 006 006
0131600 006 001
0131620
0131640 006 006 ( * ; " E d i t e d
0131660 3 1 - J a n - 8 7 2 0 : 3 2
0131700 b y g b n " ) 006 001 \r
0131720 ( P R O G ( L E V E L S ) \r
0131740 ( A N D ( C
0131760 O N D \r
0132000 ( ( N U L L C O L
0132020 O R # ) \r
0132040 N I L ) \r
0132060 (
0132100 ( F I X P C O L O R # ) \r
0132120 \r
0132140 006 006 ( * ; ; " s i n c
0132160 e S k e t c h a n d o t h
0132200 e r s c a l l f i l l p o l
0132220 y g o n w i t h t e x t u r
0132240 e s , j u s t r e t u r n
0132260 a c o n s i s t e n t c o l
0132300 o r f r o m a t e x t u r
0132320 e " ) 006 001 \r \r
0132340 ( R E T U R
0132360 N ( I M O D C O L O R # 7
0132400 ) ) ) \r
0132420 [ ( L I T A T O M
0132440 C O L O R # ) \r
0132460 ( R E T U
0132500 R N ( C O N D \r
0132520
0132540 ( ( S E T Q L E
0132560 V E L S ( \ L O O K U P C O L
0132600 O R N A M E C O L O R # ) ) \r
0132620
*
0132700 006 006 (
0132720 * ; " r e c u r s i v e l y
0132740 l o o k u p c o l o r n
0132760 u m b e r " ) 006 001 \r
0133000
0133020 ( 006 002 \ I R I
0133040 S . A S S U R E . C O L O R 006 001
0133060 ( C D R L E V E L S ) \r
0133100
*
0133140 I R I S S T R E A M ) )
0133160 \r
0133200 (
0133220 T ( E R R O R " U n k n o w
0133240 n c o l o r n a m e " C O
0133260 L O R # ] \r
0133300 ( ( H L S P C
0133320 O L O R # )
0133340
0133360 006 006 ( * ; " H L S f
0133400 o r m c o n v e r t t o R
0133420 G B " ) 006 001 \r
0133440 ( S E T Q
0133460 L E V E L S ( H L S T O R G B
0133500 C O L O R # ) ) ) \r
0133520 ( ( R
0133540 G B P C O L O R # )
0133560
0133600 006 006 ( * ; "
0133620 c h e c k f o r R G B o r
0133640 H L S " ) 006 001 \r
0133660 ( S E T
0133700 Q L E V E L S C O L O R # )
0133720 ) \r
0133740 ( ( A N D ( L I S T P
0133760 C O L O R # ) \r
0134000
0134020 ( R G B P ( C A D R C O L
0134040 O R # ) ) )
0134060 006 006 ( * ; \r 006 001
0134100 006 006
0134120 " t e m p o r a r i l y , h a
0134140 n d l e t h e c a s e o f
0134160 b e i n g g i v e n a t
0134200 e x t u r e a n d a c o l
0134220 o r , b y u s i n g t h e
0134240 c o l o r " ) 006 001 \r
0134260 ( R
0134300 E T U R N ( 006 002 \ I R I S . A
0134320 S S U R E . C O L O R 006 001 ( C
0134340 A D R C O L O R # ) \r
0134360
0134400 I R
0134420 I S S T R E A M ) ) ) \r
0134440 ( (
0134460 T Y P E N A M E P C O L O R #
0134500 ' B I T M A P )
0134520 006 006 ( * ;
0134540 " j u s t a h a c k t o
0134560 n o t b l o w u p " ) 006 001 \r
0134600
0134620 ( R E T U R N ( I M O D
0134640 ( 006 002 f o r 006 001 I 006 002 f r
0134660 o m 006 001 1 006 002 t o 006 001 ( B
0134700 I T M A P W I D T H C O L O R
0134720 # ) \r
0134740
0134760 006 002 s u m 006 001 (
0135000 B I T M A P B I T C O L O R #
0135020 I 1 ) ) \r
0135040
0135060 8 ) ) ) \r
0135100 (
0135120 T ( \ I L L E G A L . A R G
0135140 C O L O R # ) ) ) \r
0135160 ( R E T U R N
0135200 ( C O N D \r
0135220
0135240 ( ( 006 002 \ L O O K U P R G B 006
0135260 001 L E V E L S ( 006 002 f e t c
0135300 h 006 001 I R I S D A T A 006 002 o
0135320 f 006 001 I R I S S T R E A M ) )
0135340 ) \r
0135360 ( T (
0135400 E R R O R C O L O R # " n o
0135420 t a v a i l a b l e i n c
0135440 o l o r m a p " ] ) \r \r ( 006 004
0135460 \ D R A W C I R C L E . I R I S
0135500 006 001 \r [ L A M B D A ( I R
0135520 I S S T R E A M X Y R A D
0135540 I U S B R U S H D A S H I N
0135560 G ) 006 006 006 001
0135600 006 006 ( * ; " E d i t
0135620 e d 1 6 - J a n - 8 7 1 5 :
0135640 1 8 b y g b n " ) 006 001 \r
0135660 ( L E T [ ( S P P O U T
0135700 ( 006 002 f e t c h 006 001 ( I R I S
0135720 D A T A S P P O U T S T R E A
0135740 M ) 006 002 o f 006 001 ( 006 002 f e t
0135760 c h 006 001 I R I S D A T A 006 002
0136000 o f 006 001 I R I S S T R E A M ]
0136020 \r ( W I T H .
0136040 I R I S . A T T R ( I R I S .
0136060 C I R C X Y R A D I U S
0136100 S P P O U T ) \r
0136120 S P P O U T I
0136140 R I S S T R E A M : C O L O R
0136160 ( C A D D R B R U S H ) \r
0136200 :
0136220 W I D T H \r
0136240 ( 006 002 i f 006 001 ( N
0136260 O T ( E Q P ( C A D R B R
0136300 U S H ) \r
0136320
0136340 1 ) ) \r
0136360 006 002 t h e
0136400 n 006 001 ( C A D R B R U S H )
0136420 \r
0136440 006 002 e l s e 006 001 N I L )
0136460 \r
0136500 : D A S H I N G D A S H I N
0136520 G ] ) \r \r ( 006 004 \ D R A W C U R
0136540 V E . I R I S 006 001 \r [ L A M
0136560 B D A ( I R I S S T R E A M
0136600 K N O T S C L O S E D B R U
0136620 S H D A S H I N G ) 006 006 006 001
0136640 006 006 ( *
0136660 ; " E d i t e d 1 6 - J a n
0136700 - 8 7 1 6 : 0 0 b y g b n
0136720 " ) 006 001 \r \r 006 006 ( * ; ; ; "
0136740 t a k e s a l i s t o f
0136760 k n o t s . I t m u s t
0137000 b u i l d a s e t o f b
0137020 e z i e r c o n t r o l p o
0137040 i n t s f o r e a c h k n
0137060 o t p a i r . " ) 006 001 \r \r
0137100 ( L E T ( ( S P P O U T
0137120 ( 006 002 f e t c h 006 001 S P P O U
0137140 T S T R E A M 006 002 o f 006 001 (
0137160 006 002 f e t c h 006 001 I R I S D A
0137200 T A 006 002 o f 006 001 I R I S S T
0137220 R E A M ) ) ) \r
0137240 G E O M E T R Y S P L I N
0137260 E ) \r ( W I T
0137300 H . I R I S . A T T R [ P R O
0137320 G N [ S E T Q S P L I N E
0137340 ( P A R A M E T R I C S P L I N
0137360 E K N O T S C L O S E D \r
0137400
*
0137460 ( 006 002 f e t c h 006 001 S C
0137500 R A T C H S P L I N E 006 002 o f
0137520 006 001 ( 006 002 f e t c h 006 001 I R
0137540 I S D A T A \r
0137560
*
0137660 006 002 o f 006 001 I R I
0137700 S S T R E A M ] \r
0137720
*
0140000 006 006 ( * ; \r 006 001
0140020
*
0140060 006 006 " c o n v e r t
0140100 t h e l i s t o f k n o
0140120 t s t o a p a r a m e t r
0140140 i c s p l i n e d e s c r i
0140160 p t i o n . " ) 006 001 \r
0140200
0140220 ( 006 002 \ S
0140240 C A L E . S P L I N E . B Y . D
0140260 E R I V S 006 001 S P L I N E ) \r
0140300
*
0140360 006 006 (
0140400 * ; \r 006 001 006 006 " F o
0140420 r e a c h k n o t i n t
0140440 h e s p l i n e , u s e t
0140460 h e k n o t s a n d t h e
0140500 d e r i v a t i v e s t o
0140520 c o m p u t e b e z i e r c
0140540 o n t r o l p o i n t s " ) 006
0140560 001 \r
0140600
0140620 ( 006 002 f o r 006 001 K N O T #
0140640 006 002 f r o m 006 001 1 006 002 t o
0140660 006 001 ( S U B 1 ( 006 002 f e t c
0140700 h 006 001 % # K N O T S 006 002 o f
0140720 006 001 S P L I N E ) ) \r
0140740
0140760 006
0141000 002 d o 006 001 ( S E T Q G E O M
0141020 E T R Y ( 006 002 \ P S P L I N E
0141040 . T O . B E Z I E R . G E O M E
0141060 T R Y 006 001 S P L I N E K N O
0141100 T # ) ) \r
0141120
0141140 ( S E L E
0141160 C T Q \ I R I S . V E R S I O
0141200 N \r
0141220
0141240 ( G L 1
0141260 ( I R I S . C U R V E 1 0
0141300 \ B E Z I E R B A S I S . I R I
0141320 S G E O M E T R Y S P P O U
0141340 T ) ) \r
0141360
0141400 ( G
0141420 L 2 ( I R I S . C R V G E O
0141440 M E T R Y S P P O U T ) ) \r
0141460
*
0141520