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