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