$ od -c -N 50000 [phylum]<3-LISP>course>SIMPLEG.DCOM!1
0000000 ( F I L E C R E A T E D " 2 6
0000020 - M a r - 8 4 2 1 : 4 5 : 0 8
0000040 " ( " c o m p i l e d o n
0000060 " { P H Y L U M } < 3 - L I S
0000100 P > C O U R S E > S I M P L E G
0000120 . ; 1 ) \r " 1 5 - M a r - 8 4
0000140 0 0 : 0 1 : 0 1 " t c o m p
0000160 l ' d i n W O R K d a t e
0000200 d " 2 6 - M a r - 8 4 0 4 :
0000220 5 4 : 3 9 " ) \r ( F I L E C R E
0000240 A T E D " 2 6 - M a r - 8 4
0000260 2 1 : 4 4 : 4 0 " { P H Y L U
0000300 M } < 3 - L I S P > C O U R S E
0000320 > S I M P L E G . ; 1 1 5 5 6
0000340 2 c h a n g e s t o : ( V
0000360 A R S \r S I M P L E G C O M S
0000400 t 1 t 2 t 3 t 4 t 5
0000420 t 6 t 7 t 8 T U R T L E
0000440 T u r t l e A r r o w ) ( R E
0000460 C O R D S L I N E T U R T L
0000500 E ) ( F N S C E N T E R C
0000520 L E A R W I N D O W \r C o m p
0000540 u t e T u r t l e A r r a y I n
0000560 d e x C r e a t e T u r t l e
0000600 R e c o r d D r a w T D r a
0000620 w T u r t l e E r a s e T u r
0000640 t l e F O R W A R D J U M P
0000660 P O I N T P R E T T Y 0 \r
0000700 P R E T T Y 1 P R E T T Y 2
0000720 P R E T T Y 3 S e t U p T u r
0000740 t l e A r r a y T R I T R I
0000760 T U R N C C u r v e C C u r
0001000 v e 1 ) ( A D V I C E C L E
0001020 A R W ) p r e v i o u s d a
0001040 t e : \r " 1 0 - F e b - 8 4
0001060 0 8 : 5 1 : 3 1 " { R O S E B
0001100 O W L } < V I T T A L > C O U R
0001120 S E > L I S P > S I M P L E G .
0001140 ; 9 ) \r C E N T E R D 1 \r ( F
0001160 0 T U R T L E ) \0 ; \0 001 \0
0001200 \0 \b \0 \0 P 002 h P 002 002 002 001 \t \0 \0 311
0001220 \0 \n \0 \0 002 002 001 l 002 353 030 P 002 002 h P
0001240 002 002 002 001 \t \0 \0 311 \0 \n \0 \0 002 002 002 001
0001260 l 002 353 030 P j 030 \b \0 \0 020 \0 ( 7 0 Q
0001300 D r a w T u r t l e 5 2 Q
0001320 D S P C L I P P I N G R E G I O
0001340 N 4 5 Q \ I N S U R E W I N
0001360 D O W 2 2 Q D S P C L I P P
0001400 I N G R E G I O N 1 5 Q \ I
0001420 N S U R E W I N D O W 2 E r
0001440 a s e T u r t l e ) \r N I L \r (
0001460 ) \r C L E A R W I N D O W D 1
0001500 \r ( F 0 T U R T L E ) \0 030
0001520 \0 001 \0 \0 \b \0 \0 P 002 002 002 001 \t \0 \0 P
0001540 d 001 n 001 h \n \0 \0 030 001 020 \0 ( 2 3 Q
0001560 R E M A I N D E R 1 2 Q C
0001600 L E A R W 2 E r a s e T u r
0001620 t l e ) \r N I L \r ( ) \r C o m p
0001640 u t e T u r t l e A r r a y I n
0001660 d e x D 1 \r ( F 0 T U R T
0001700 L E ) \0 $ \0 001 \0 \0 j P 001 363 232 P
0001720 d 001 n 001 h 350 030 277 260 362 P 001 o \0 \0 \0
0001740 324 n 001 h \n \0 \0 l - 333 k 330 020 \0 ( 3
0001760 4 Q R E M A I N D E R ) \r N I
0002000 L \r ( 2 5 Q 2 2 . 5 ) \r C r
0002020 e a t e T u r t l e R e c o r d
0002040 D 1 \r ( F 0 T u r t l e W
0002060 i n d o w F 1 T U R T L E
0002100 ) \0 017 \0 002 \0 \0 j d d P i h 032 032
0002120 032 032 032 c 002 020 \0 N I L \r N I L \r (
0002140 ) \r D r a w T D 1 \r N I L \0
0002160 U \0 \0 \0 \0 l 2 \t \0 \0 l Z g \0 \0 \n
0002200 \0 \0 l 2 \t \0 \0 l Z g \0 \0 \n \0 \0 l
0002220 2 \t \0 \0 l Z g \0 \0 \n \0 \0 l } \t \0
0002240 \0 l Z g \0 \0 \n \0 \0 l 2 \t \0 \0 l Z
0002260 g \0 \0 \n \0 \0 l 2 \t \0 \0 l Z g \0 \0
0002300 \n \0 \0 l 2 \t \0 \0 020 \0 ( 1 2 2 Q
0002320 F O R W A R D 1 1 5 Q T U R
0002340 N 1 0 5 Q F O R W A R D 1
0002360 0 0 Q T U R N 7 0 Q F O R
0002400 W A R D 6 3 Q T U R N 5 3
0002420 Q F O R W A R D 4 6 Q T U
0002440 R N 3 6 Q F O R W A R D 3
0002460 1 Q T U R N 2 1 Q F O R W
0002500 A R D 1 4 Q T U R N 4 F
0002520 O R W A R D ) \r ( 1 1 2 Q R I
0002540 G H T 7 5 Q L E F T 6 0 Q
0002560 L E F T 4 3 Q L E F T 2
0002600 6 Q L E F T 1 1 Q R I G H
0002620 T ) \r ( ) \r D r a w T u r t l e
0002640 D 1 \r ( F 0 T U R T L E
0002660 F 1 T u r t l e A r r a y )
0002700 \0 4 \0 002 \0 \0 P 002 002 002 002 001 264 , P
0002720 002 002 002 002 h 030 Q \b \0 \0 ( h d P 002 002
0002740 002 001 P 002 001 l \f 325 P 002 002 001 l \f 325 h
0002760 d d g \0 \0 \r \n \0 \0 020 \0 ( 6 1 Q
0003000 B K B I T B L T 2 2 Q C o m
0003020 p u t e T u r t l e A r r a y I
0003040 n d e x ) \r ( 5 5 Q I N V E R
0003060 T ) \r ( ) \r E r a s e T u r t l
0003100 e D 1 \r ( F 0 T U R T L E
0003120 F 1 T u r t l e A r r a y
0003140 ) \0 6 \0 002 \0 \0 P 002 002 002 002 001 263 -
0003160 P 002 002 002 002 i 030 Q \b \0 \0 ( h d P 002
0003200 002 002 001 P 002 001 l \f 325 P 002 002 001 l \f 325
0003220 h d d g \0 \0 \r \n \0 \0 020 h 020 \0 ( 6
0003240 1 Q B K B I T B L T 2 2 Q
0003260 C o m p u t e T u r t l e A r r
0003300 a y I n d e x ) \r ( 5 5 Q I N
0003320 V E R T ) \r ( ) \r F O R W A R D
0003340 D 1 \r ( P 1 n e x t y P
0003360 0 n e x t x I 1 L I N
0003400 E W I D T H I 0 D I S T A
0003420 N C E F 2 T U R T L E )
0003440 \0 E 002 001 \0 002 021 001 R 002 001 @ R 001 \t
0003460 \0 \0 352 350 X R 002 002 001 @ R 001 \t \0 \0 352
0003500 350 Y \b \0 \0 R 002 001 R 002 002 001 H I A 265
0003520 003 k h R 002 002 002 001 \r \a \0 \0 R 002 H 030
0003540 R 002 002 I 030 \b \0 \0 h 020 \0 ( 1 0 1 Q
0003560 D r a w T u r t l e 6 5 Q
0003600 D R A W L I N E 3 6 Q E r a
0003620 s e T u r t l e 3 0 Q S I N
0003640 1 3 Q C O S ) \r N I L \r ( )
0003660 \r J U M P D 1 \r ( P 1 n e
0003700 x t y P 0 n e x t x I
0003720 0 D I S T A N C E F 2 T
0003740 U R T L E ) \0 . 002 001 \0 001 021 001
0003760 \b \0 \0 R 002 001 @ R 001 \t \0 \0 352 350 X R
0004000 002 002 001 @ R 001 \t \0 \0 352 350 Y R 002 H 030
0004020 R 002 002 I 030 \b \0 \0 h 020 \0 ( 5 2 Q
0004040 D r a w T u r t l e 3 3 Q S
0004060 I N 1 6 Q C O S 5 E r a
0004100 s e T u r t l e ) \r N I L \r ( )
0004120 \r P O I N T D 1 \r ( I 0 T
0004140 H E T A F 0 T U R T L E )
0004160 \0 \v \0 001 \0 001 \b \0 \0 P @ 030 \b \0 \0
0004200 020 \0 ( 1 0 Q D r a w T u r t l
0004220 e 2 E r a s e T u r t l e )
0004240 \r N I L \r ( ) \r P R E T T Y 0
0004260 D 1 \r ( P 1 i ) \0 037 002 \0 \0
0004300 \0 l \n k 021 002 001 I H 361 221 h 020 l 2 \t
0004320 \0 \0 277 l 262 \t \0 \0 277 I k 330 Y 260 353 \0
0004340 ( 2 6 Q T U R N 2 0 Q F O
0004360 R W A R D ) \r N I L \r ( ) \r P R
0004400 E T T Y 1 D 1 \r ( P 1 i )
0004420 \0 ) 002 \0 \0 \0 \b \0 \0 l Z \t \0 \0 l
0004440 \n k 021 002 001 I H 361 221 h 020 \b \0 \0 277 \b
0004460 \0 \0 277 l \n \t \0 \0 277 I k 330 Y 260 351 \0
0004500 ( 4 0 Q T U R N 3 2 Q D r
0004520 a w T 2 6 Q D r a w T 7
0004540 P O I N T 2 C E N T E R ) \r
0004560 N I L \r ( ) \r P R E T T Y 2 D
0004600 1 \r ( P 1 i ) \0 D 002 \0 \0 \0
0004620 \b \0 \0 \b \0 \0 l Z \t \0 \0 l \n k 021 002
0004640 001 I H 361 263 026 \b \0 \0 277 l \n \t \0 \0 277
0004660 \b \0 \0 277 I k 330 Y 260 352 023 l K k 021 002
0004700 001 I H 361 221 h 020 l 003 \t \0 \0 277 I k 330
0004720 Y 260 361 \0 ( 7 3 Q J U M P 4 2
0004740 Q D r a w T 3 6 Q T U R N
0004760 3 0 Q D r a w T 1 2 Q P
0005000 O I N T 5 C E N T E R 2
0005020 C L E A R W I N D O W ) \r N I L
0005040 \r ( ) \r P R E T T Y 3 D 1 \r (
0005060 P 1 i ) \0 $ 002 \0 \0 \0 \b \0 \0
0005100 j \t \0 \0 l 024 k 021 002 001 I H 361 221 h 020
0005120 \b \0 \0 277 l 036 \t \0 \0 277 I k 330 Y 260 355
0005140 \0 ( 3 3 Q J U M P 2 5 Q P
0005160 R E T T Y 0 6 P O I N T 2
0005200 C E N T E R ) \r N I L \r ( ) \r
0005220 S e t U p T u r t l e A r r a y
0005240 D 1 \r ( F 0 T u r t l e A
0005260 r r a y F 1 t 1 F 2
0005300 t 2 F 3 t 6 F 4 t 3
0005320 F 5 t 7 F 6 t 4 F
0005340 7 t 5 F 1 0 Q t 8 )
0005360 \0 5 \0 \t \0 \0 l \b g \0 \0 \n \0 \0 c \0
0005400 d l 003 Q * P l 002 R * P k T * P l
0005420 \b V * P l \a W 016 * P l 006 S * P l
0005440 005 U * P l 004 W 020 * 020 \0 ( 7 A R
0005460 R A Y ) \r ( 4 P O I N T E R )
0005500 \r ( ) \r T R I T R I D 1 \r ( I
0005520 0 S I D E ) \0 H \0 \0 \0 001 l
0005540 d \t \0 \0 l x g \0 \0 \n \0 \0 l 031 \t \0
0005560 \0 l x g \0 \0 \n \0 \0 l d \t \0 \0 l x
0005600 g \0 \0 \n \0 \0 l 031 \t \0 \0 l x g \0 \0
0005620 \n \0 \0 l d \t \0 \0 l x g \0 \0 \n \0 \0
0005640 l 031 \t \0 \0 020 \0 ( 1 0 5 Q F O R
0005660 W A R D 1 0 0 Q T U R N 7
0005700 0 Q F O R W A R D 6 3 Q T
0005720 U R N 5 3 Q F O R W A R D
0005740 4 6 Q T U R N 3 6 Q F O R
0005760 W A R D 3 1 Q T U R N 2 1
0006000 Q F O R W A R D 1 4 Q T U
0006020 R N 4 F O R W A R D ) \r ( 7
0006040 5 Q R I G H T 6 0 Q L E F
0006060 T 4 3 Q R I G H T 2 6 Q
0006100 L E F T 1 1 Q R I G H T ) \r
0006120 ( ) \r T U R N D 1 \r ( I 1
0006140 D I R E C T I O N I 0 T H
0006160 E T A F 0 T U R T L E )
0006200 \0 > \0 001 \0 002 \b \0 \0 P A 225 A g \0 \0
0006220 360 224 P 001 @ 350 203 P 001 @ 351 030 j P 001 363
0006240 230 P d 001 n 001 h 330 030 277 P 001 n 001 h 363
0006260 232 P d 001 n 001 h \n \0 \0 030 277 \b \0 \0 g
0006300 \0 \0 020 \0 ( 7 0 Q D r a w T u r
0006320 t l e 6 3 Q R E M A I N D E
0006340 R 2 E r a s e T u r t l e )
0006360 \r ( 7 3 Q D r a w A r r o w
0006400 1 1 Q L E F T ) \r ( ) \r C C u
0006420 r v e D 1 \r ( I 3 d s I
0006440 2 m i n l e n I 1 a n
0006460 g l e I 0 l e n F 0
0006500 m i n L e n ) \0 \v \0 001 \0 004 B c
0006520 \0 @ A C \v \0 \0 020 \0 ( 1 0 Q C C
0006540 u r v e 1 ) \r N I L \r ( ) \r C C
0006560 u r v e 1 D 1 \r ( I 2 d s
0006600 I 1 a n g l e I 0 l
0006620 e n F 0 m i n L e n ) \0
0006640 5 \0 001 \0 003 P @ 363 230 A \t \0 \0 @ \t \0
0006660 \0 020 @ o \0 \0 \0 \t \0 \0 353 A l - 350 B
0006700 \v \0 \0 @ o \0 \0 \0 \t \0 \0 353 A l - 351
0006720 b 002 277 b \0 277 277 260 316 \0 ( 4 5 Q S
0006740 Q R T 3 5 Q C C u r v e 1
0006760 2 4 Q S Q R T 1 3 Q F O R
0007000 W A R D 7 P O I N T ) \r N I
0007020 L \r ( 4 2 Q 2 . 0 2 1 Q
0007040 2 . 0 ) \r ( P R E T T Y C O M P
0007060 R I N T S I M P L E G C O M S
0007100 ) \r ( R P A Q Q S I M P L E G
0007120 C O M S ( ( F N S C E N T E
0007140 R C L E A R W I N D O W C o
0007160 m p u t e T u r t l e A r r a y
0007200 I n d e x C r e a t e T u r t
0007220 l e R e c o r d D r a w T \r
0007240 D r a w T u r t l e E r a s e
0007260 T u r t l e F O R W A R D J
0007300 U M P P O I N T P R E T T Y
0007320 0 P R E T T Y 1 P R E T T Y
0007340 2 P R E T T Y 3 S e t U p T
0007360 u r t l e A r r a y T R I T R
0007400 I T U R N \r ) ( F N S C C
0007420 u r v e C C u r v e 1 ) ( R
0007440 E C O R D S L I N E T U R T
0007460 L E ) ( B I T M A P S t 1
0007500 t 2 t 3 t 4 t 5 t 6 t
0007520 7 t 8 ) ( V A R S T U R T
0007540 L E \r T u r t l e A r r o w
0007560 t 1 t 2 t 3 t 4 t 5 t
0007600 6 t 7 t 8 ( T u r t l e A
0007620 r r o w ( Q U O T E ( ( ( 0
0007640 0 0 ) ( 1 0 0 0 ) )
0007660 ( ( 7 4 0 ) ( 1 0 0 0
0007700 ) ) ( ( 7 - 4 \r 0 ) ( 1
0007720 0 0 0 ) ) ) ) ) ) ( A D V
0007740 I S E C L E A R W ) ( P (
0007760 S E T Q T u r t l e W i n d o
0010000 w ( C R E A T E W ( C R E A
0010020 T E R E G I O N 3 0 0 2 5
0010040 7 0 0 7 0 0 ) \r "
0010060
0010100 - - - - -
0010120 - T u r t l e G r a p h i c
0010140 s W i n d o w - - - - - -
0010160
0010200 " 1 0 ) ) ( *
0010220 \r T h i s s e t s u p t h
0010240 e b i t m a p s f o r e
0010260 a c h o f t h e 8 t u r
0010300 t l e s ) ( S e t U p T u r t
0010320 l e A r r a y ) ( C r e a t e
0010340 T u r t l e R e c o r d ) ( C
0010360 E N T E R ) \r ( C L O S E W
0010400 T u r t l e W i n d o w ) ) ) )
0010420 \r ( R E C O R D L I N E ( (
0010440 X 1 Y 1 Z 1 ) ( X 2 Y 2
0010460 Z 2 ) ) ) \r ( R E C O R D T
0010500 U R T L E ( H E A D I N G C
0010520 U R R E N T X C U R R E N T Y
0010540 W I N D O W E R A S E D ? )
0010560 ) \r ( R P A Q t 1 ( R E A D
0010600 B I T M A P ) ) \r ( 2 5 2 5
0010620 " @ @ A L @ @ @ @ " " @ @ C F
0010640 @ @ @ @ " " @ @ B B @ @ @ @ "
0010660 " A H C F @ L @ @ " " B D A
0010700 D A B @ @ " " B D A L A B @ @
0010720 " " B B C F F B @ @ " " C J
0010740 N C M L @ @ " \r " @ O H H F @
0010760 @ @ " " @ F A L C @ @ @ " "
0011000 @ B C N A @ @ @ " " @ D B J A
0011020 @ @ @ " " @ D @ H A @ @ @ "
0011040 " @ D @ H A @ @ @ " " @ B @ H
0011060 B @ @ @ " " @ C @ H B @ @ @ "
0011100 " @ G H H G H @ @ " \r " @ D
0011120 L @ N L @ @ " " @ I G O B F @
0011140 @ " " C B @ H B B @ @ " " B
0011160 D @ L A B @ @ " " B D @ D @ J
0011200 @ @ " " G L @ L @ L @ @ " "
0011220 @ @ C @ @ @ @ @ " " @ @ B @ @
0011240 @ @ @ " ) \r ( R P A Q t 2 (
0011260 R E A D B I T M A P ) ) \r ( 2 5
0011300 2 5 " @ @ A O H G @ @ " "
0011320 @ @ @ H H L H @ " " @ @ @ I H
0011340 H H @ " " @ @ C O F C H @ "
0011360 " @ A L @ C N @ @ " " @ C @ @
0011400 A H @ @ " " @ F @ G H H @ @ "
0011420 " @ D @ A H L @ @ " \r " @ D
0011440 @ C H D @ @ " " N L @ F H D @
0011460 @ " " K H @ L H D @ @ " " H
0011500 H A H @ G H @ " " H H C @ @ H
0011520 H @ " " K H B @ @ H H @ " "
0011540 L H @ @ A O H @ " " @ H @ @ A
0011560 A H @ " " @ L @ @ C C H @ "
0011600 \r " @ O @ @ F C @ @ " " H I N
0011620 @ L @ @ @ " " O H G O @ @ @ @
0011640 " " @ @ D D @ @ @ @ " " @ A
0011660 L L @ @ @ @ " " @ A @ H @ @ @
0011700 @ " " @ A @ H @ @ @ @ " " @
0011720 A O H @ @ @ @ " ) \r ( R P A Q
0011740 t 3 ( R E A D B I T M A P ) )
0011760 \r ( 2 5 2 5 " @ @ @ @ @ @ @
0012000 @ " " A N @ @ A @ @ @ " " A
0012020 C @ @ A H @ @ " " C A @ @ A D
0012040 @ @ " " A M A N C D @ @ " "
0012060 @ D N A L L @ @ " " @ G H @ G
0012100 @ @ @ " " @ A @ @ A @ @ @ "
0012120 \r " @ B @ @ @ H @ @ " " @ F @
0012140 @ L K H @ " " @ D @ @ F F H @
0012160 " " I L C O O D H @ " " J H
0012200 @ @ F G H @ " " F L @ @ L L @
0012220 @ " " @ D @ @ @ H @ @ " " @
0012240 B @ @ A H @ @ " " @ G H @ A L
0012260 @ @ " \r " @ E N @ N D @ @ "
0012300 " A M A O C D @ @ " " C A @ @
0012320 A D @ @ " " C I @ @ A D @ @ "
0012340 " @ N @ @ C H @ @ " " @ @ @
0012360 @ @ @ @ @ " " @ @ @ @ @ @ @ @
0012400 " " @ @ @ @ @ @ @ @ " ) \r ( R
0012420 P A Q t 4 ( R E A D B I T M
0012440 A P ) ) \r ( 2 5 2 5 " F @ A
0012460 O @ @ @ @ " " I @ A C @ @ @ @
0012500 " " A H A B @ @ @ @ " " @ H
0012520 C F @ @ @ @ " " @ H G L @ @ @
0012540 @ " " @ O H F @ @ @ @ " " @
0012560 D @ C @ @ @ @ " " @ L @ A H C
0012600 @ @ " \r " N H D @ L C H @ "
0012620 " K @ F @ F B H @ " " I @ C @
0012640 C L H @ " " K @ A @ A @ H @ "
0012660 " M @ A H A A H @ " " @ H @
0012700 M @ O @ @ " " @ H @ E @ H @ @
0012720 " " @ D @ G @ H @ @ " " @ C
0012740 A O @ H @ @ " \r " @ A @ @ A H
0012760 @ @ " " @ A L @ A @ @ @ " "
0013000 @ @ F @ N J @ @ " " @ D E O I
0013020 G @ @ " " @ G L H A A H @ "
0013040 " @ C A H A @ H @ " " @ A O @
0013060 @ I H @ " " @ @ F @ @ G @ @ "
0013100 ) \r ( R P A Q t 5 ( R E A D
0013120 B I T M A P ) ) \r ( 2 5 2 5
0013140 " @ @ A L @ @ @ @ " " A N @ D
0013160 @ O @ @ " " B B @ D A A @ @ "
0013200 " B C A H A B @ @ " " A O N
0013220 G N N @ @ " " @ A H @ M @ @ @
0013240 " " @ A @ H G @ @ @ " " @ C
0013260 @ H C @ @ @ " \r " @ B @ H A @
0013300 @ @ " " @ B @ H A @ @ @ " "
0013320 @ B @ H A @ @ @ " " @ B @ H A
0013340 @ @ @ " " F B @ H A @ @ @ "
0013360 " G A B J C @ @ @ " " E I C N
0013400 B C @ @ " " D G A L G O @ @ "
0013420 " D A A L D A @ @ " \r " C @
0013440 L H N B @ @ " " A K N C I N @
0013460 @ " " @ N C N @ @ @ @ " " @
0013500 @ A B @ @ @ @ " " @ @ B A @ @
0013520 @ @ " " @ @ B M @ @ @ @ " "
0013540 @ @ C C @ @ @ @ " " @ @ A N @
0013560 @ @ @ " ) \r ( R P A Q t 6 (
0013600 R E A D B I T M A P ) ) \r ( 2 5
0013620 2 5 " @ @ C L @ D @ @ " "
0013640 @ @ D B @ B @ @ " " @ @ D D @
0013660 B @ @ " " @ @ F D @ B @ @ "
0013700 " D @ C O M N @ @ " " L @ N @
0013720 F @ @ @ " " L A H @ C @ @ @ "
0013740 " L F @ @ A @ @ @ " \r " J L
0013760 @ A I @ @ @ " " I H @ C A @ @
0014000 @ " " O @ @ F A @ @ @ " " C
0014020 @ H L A O @ @ " " A @ I H A @
0014040 H @ " " A @ K @ C H H @ " "
0014060 B @ N @ B D H @ " " B @ O H F
0014100 D H @ " " A @ @ @ D C @ @ "
0014120 \r " @ L @ A H @ @ @ " " C B @
0014140 C @ @ @ @ " " N C H N @ @ @ @
0014160 " " H F O L B @ @ @ " " H D
0014200 A K N @ @ @ " " H D @ H D @ @
0014220 @ " " L L @ H L @ @ @ " " G
0014240 @ @ G @ @ @ @ " ) \r ( R P A Q
0014260 t 7 ( R E A D B I T M A P ) )
0014300 \r ( 2 5 2 5 " @ G L @ @ F @
0014320 @ " " @ L H @ A I @ @ " " @
0014340 H H @ A A @ @ " " @ H H @ A A
0014360 @ @ " " @ L O O M G @ @ " "
0014400 @ G L @ C D @ @ " " @ G @ @ A
0014420 L @ @ " " @ D @ @ @ H @ @ "
0014440 \r " F H F @ @ D @ @ " " J H L
0014460 @ @ D H @ " " I I O O N F H @
0014500 " " H H L @ @ E H @ " " K H
0014520 F @ @ D @ @ " " F H @ @ @ H @
0014540 @ " " @ L @ @ @ H @ @ " " @
0014560 N @ @ A H @ @ " " @ O N @ C L
0014600 @ @ " \r " @ H K O N J @ @ "
0014620 " @ I @ @ A C @ @ " " @ H H @
0014640 B A H @ " " @ L L @ A @ H @ "
0014660 " @ F D @ A M @ @ " " @ C N
0014700 @ @ B @ @ " " @ @ @ @ @ @ @ @
0014720 " " @ @ @ @ @ @ @ @ " ) \r ( R
0014740 P A Q t 8 ( R E A D B I T M
0014760 A P ) ) \r ( 2 5 2 5 " G H A
0015000 O H @ @ @ " " H L A C H @ @ @
0015020 " " H D O N @ @ @ @ " " L G
0015040 J G @ @ @ @ " " D L @ A L @ @
0015060 @ " " C H @ @ F @ @ @ " " A
0015100 A O H C A H @ " " C A L @ A A
0015120 H @ " \r " B A F @ @ K H @ "
0015140 " F A C @ @ N H @ " " G A A H
0015160 @ D H @ " " I @ @ L @ D H @ "
0015200 " I H @ F @ F H @ " " I L @
0015220 C @ E H @ " " F D @ A H H @ @
0015240 " " F F @ @ @ H @ @ " " B C
0015260 @ @ @ H @ @ " \r " @ A L @ A @
0015300 @ @ " " @ @ G @ C N @ @ " "
0015320 @ @ M O O K @ @ " " @ A A @ @
0015340 A @ @ " " @ A A @ @ @ H @ "
0015360 " @ A H H @ @ H @ " " @ @ H H
0015400 @ A @ @ " " @ @ G H @ @ @ @ "
0015420 ) \r ( R P A Q Q T U R T L E
0015440 ( 1 8 0 . 0 3 4 0 . 0 4 3 5
0015460 . 5 { W I N D O W } # 1 3 , 2
0015500 0 4 5 4 N I L ) ) \r ( R P A Q
0015520 Q T u r t l e A r r o w ( (
0015540 ( 0 0 0 ) ( 1 0 0 0 )
0015560 ) ( ( 7 4 0 ) ( 1 0 0
0015600 0 ) ) ( ( 7 - 4 0 ) (
0015620 1 0 0 0 ) ) ) ) \r ( R P A Q
0015640 t 1 ( R E A D B I T M A P )
0015660 ) \r ( 2 5 2 5 " @ @ A L @ @
0015700 @ @ " " @ @ C F @ @ @ @ " "
0015720 @ @ B B @ @ @ @ " " A H C F @
0015740 L @ @ " " B D A D A B @ @ "
0015760 " B D A L A B @ @ " " B B C F
0016000 F B @ @ " " C J N C M L @ @ "
0016020 \r " @ O H H F @ @ @ " " @ F
0016040 A L C @ @ @ " " @ B C N A @ @
0016060 @ " " @ D B J A @ @ @ " " @
0016100 D @ H A @ @ @ " " @ D @ H A @
0016120 @ @ " " @ B @ H B @ @ @ " "
0016140 @ C @ H B @ @ @ " " @ G H H G
0016160 H @ @ " \r " @ D L @ N L @ @ "
0016200 " @ I G O B F @ @ " " C B @
0016220 H B B @ @ " " B D @ L A B @ @
0016240 " " B D @ D @ J @ @ " " G L
0016260 @ L @ L @ @ " " @ @ C @ @ @ @
0016300 @ " " @ @ B @ @ @ @ @ " ) \r (
0016320 R P A Q t 2 ( R E A D B I T
0016340 M A P ) ) \r ( 2 5 2 5 " @ @
0016360 A O H G @ @ " " @ @ @ H H L H
0016400 @ " " @ @ @ I H H H @ " " @
0016420 @ C O F C H @ " " @ A L @ C N
0016440 @ @ " " @ C @ @ A H @ @ " "
0016460 @ F @ G H H @ @ " " @ D @ A H
0016500 L @ @ " \r " @ D @ C H D @ @ "
0016520 " N L @ F H D @ @ " " K H @
0016540 L H D @ @ " " H H A H @ G H @
0016560 " " H H C @ @ H H @ " " K H
0016600 B @ @ H H @ " " L H @ @ A O H
0016620 @ " " @ H @ @ A A H @ " " @
0016640 L @ @ C C H @ " \r " @ O @ @ F
0016660 C @ @ " " H I N @ L @ @ @ "
0016700 " O H G O @ @ @ @ " " @ @ D D
0016720 @ @ @ @ " " @ A L L @ @ @ @ "
0016740 " @ A @ H @ @ @ @ " " @ A @
0016760 H @ @ @ @ " " @ A O H @ @ @ @
0017000 " ) \r ( R P A Q t 3 ( R E A
0017020 D B I T M A P ) ) \r ( 2 5 2 5
0017040 " @ @ @ @ @ @ @ @ " " A N @
0017060 @ A @ @ @ " " A C @ @ A H @ @
0017100 " " C A @ @ A D @ @ " " A M
0017120 A N C D @ @ " " @ D N A L L @
0017140 @ " " @ G H @ G @ @ @ " " @
0017160 A @ @ A @ @ @ " \r " @ B @ @ @
0017200 H @ @ " " @ F @ @ L K H @ "
0017220 " @ D @ @ F F H @ " " I L C O
0017240 O D H @ " " J H @ @ F G H @ "
0017260 " F L @ @ L L @ @ " " @ D @
0017300 @ @ H @ @ " " @ B @ @ A H @ @
0017320 " " @ G H @ A L @ @ " \r " @
0017340 E N @ N D @ @ " " A M A O C D
0017360 @ @ " " C A @ @ A D @ @ " "
0017400 C I @ @ A D @ @ " " @ N @ @ C
0017420 H @ @ " " @ @ @ @ @ @ @ @ "
0017440 " @ @ @ @ @ @ @ @ " " @ @ @ @
0017460 @ @ @ @ " ) \r ( R P A Q t 4
0017500 ( R E A D B I T M A P ) ) \r ( 2
0017520 5 2 5 " F @ A O @ @ @ @ "
0017540 " I @ A C @ @ @ @ " " A H A B
0017560 @ @ @ @ " " @ H C F @ @ @ @ "
0017600 " @ H G L @ @ @ @ " " @ O H
0017620 F @ @ @ @ " " @ D @ C @ @ @ @
0017640 " " @ L @ A H C @ @ " \r " N
0017660 H D @ L C H @ " " K @ F @ F B
0017700 H @ " " I @ C @ C L H @ " "
0017720 K @ A @ A @ H @ " " M @ A H A
0017740 A H @ " " @ H @ M @ O @ @ "
0017760 " @ H @ E @ H @ @ " " @ D @ G
0020000 @ H @ @ " " @ C A O @ H @ @ "
0020020 \r " @ A @ @ A H @ @ " " @ A
0020040 L @ A @ @ @ " " @ @ F @ N J @
0020060 @ " " @ D E O I G @ @ " " @
0020100 G L H A A H @ " " @ C A H A @
0020120 H @ " " @ A O @ @ I H @ " "
0020140 @ @ F @ @ G @ @ " ) \r ( R P A Q
0020160 t 5 ( R E A D B I T M A P )
0020200 ) \r ( 2 5 2 5 " @ @ A L @ @
0020220 @ @ " " A N @ D @ O @ @ " "
0020240 B B @ D A A @ @ " " B C A H A
0020260 B @ @ " " A O N G N N @ @ "
0020300 " @ A H @ M @ @ @ " " @ A @ H
0020320 G @ @ @ " " @ C @ H C @ @ @ "
0020340 \r " @ B @ H A @ @ @ " " @ B
0020360 @ H A @ @ @ " " @ B @ H A @ @
0020400 @ " " @ B @ H A @ @ @ " " F
0020420 B @ H A @ @ @ " " G A B J C @
0020440 @ @ " " E I C N B C @ @ " "
0020460 D G A L G O @ @ " " D A A L D
0020500 A @ @ " \r " C @ L H N B @ @ "
0020520 " A K N C I N @ @ " " @ N C
0020540 N @ @ @ @ " " @ @ A B @ @ @ @
0020560 " " @ @ B A @ @ @ @ " " @ @
0020600 B M @ @ @ @ " " @ @ C C @ @ @
0020620 @ " " @ @ A N @ @ @ @ " ) \r (
0020640 R P A Q t 6 ( R E A D B I T
0020660 M A P ) ) \r ( 2 5 2 5 " @ @
0020700 C L @ D @ @ " " @ @ D B @ B @
0020720 @ " " @ @ D D @ B @ @ " " @
0020740 @ F D @ B @ @ " " D @ C O M N
0020760 @ @ " " L @ N @ F @ @ @ " "
0021000 L A H @ C @ @ @ " " L F @ @ A
0021020 @ @ @ " \r " J L @ A I @ @ @ "
0021040 " I H @ C A @ @ @ " " O @ @
0021060 F A @ @ @ " " C @ H L A O @ @
0021100 " " A @ I H A @ H @ " " A @
0021120 K @ C H H @ " " B @ N @ B D H
0021140 @ " " B @ O H F D H @ " " A
0021160 @ @ @ D C @ @ " \r " @ L @ A H
0021200 @ @ @ " " C B @ C @ @ @ @ "
0021220 " N C H N @ @ @ @ " " H F O L
0021240 B @ @ @ " " H D A K N @ @ @ "
0021260 " H D @ H D @ @ @ " " L L @
0021300 H L @ @ @ " " G @ @ G @ @ @ @
0021320 " ) \r ( R P A Q t 7 ( R E A
0021340 D B I T M A P ) ) \r ( 2 5 2 5
0021360 " @ G L @ @ F @ @ " " @ L H
0021400 @ A I @ @ " " @ H H @ A A @ @
0021420 " " @ H H @ A A @ @ " " @ L
0021440 O O M G @ @ " " @ G L @ C D @
0021460 @ " " @ G @ @ A L @ @ " " @
0021500 D @ @ @ H @ @ " \r " F H F @ @
0021520 D @ @ " " J H L @ @ D H @ "
0021540 " I I O O N F H @ " " H H L @
0021560 @ E H @ " " K H F @ @ D @ @ "
0021600 " F H @ @ @ H @ @ " " @ L @
0021620 @ @ H @ @ " " @ N @ @ A H @ @
0021640 " " @ O N @ C L @ @ " \r " @
0021660 H K O N J @ @ " " @ I @ @ A C
0021700 @ @ " " @ H H @ B A H @ " "
0021720 @ L L @ A @ H @ " " @ F D @ A
0021740 M @ @ " " @ C N @ @ B @ @ "
0021760 " @ @ @ @ @ @ @ @ " " @ @ @ @
0022000 @ @ @ @ " ) \r ( R P A Q t 8
0022020 ( R E A D B I T M A P ) ) \r ( 2
0022040 5 2 5 " G H A O H @ @ @ "
0022060 " H L A C H @ @ @ " " H D O N
0022100 @ @ @ @ " " L G J G @ @ @ @ "
0022120 " D L @ A L @ @ @ " " C H @
0022140 @ F @ @ @ " " A A O H C A H @
0022160 " " C A L @ A A H @ " \r " B
0022200 A F @ @ K H @ " " F A C @ @ N
0022220 H @ " " G A A H @ D H @ " "
0022240 I @ @ L @ D H @ " " I H @ F @
0022260 F H @ " " I L @ C @ E H @ "
0022300 " F D @ A H H @ @ " " F F @ @
0022320 @ H @ @ " " B C @ @ @ H @ @ "
0022340 \r " @ A L @ A @ @ @ " " @ @
0022360 G @ C N @ @ " " @ @ M O O K @
0022400 @ " " @ A A @ @ A @ @ " " @
0022420 A A @ @ @ H @ " " @ A H H @ @
0022440 H @ " " @ @ H H @ A @ @ " "
0022460 @ @ G H @ @ @ @ " ) \r ( R P A Q
0022500 Q T u r t l e A r r o w ( (
0022520 ( 0 0 0 ) ( 1 0 0 0 )
0022540 ) ( ( 7 4 0 ) ( 1 0 0
0022560 0 ) ) ( ( 7 - 4 0 ) (
0022600 1 0 0 0 ) ) ) ) \r ( P U T P
0022620 R O P S C L E A R W R E A D
0022640 V I C E ( N I L ( B E F O R
0022660 E N I L ( C O N D ( ( E Q
0022700 T u r t l e W i n d o w W I
0022720 N D O W ) ( E r a s e T u r t
0022740 l e ) ) ) ) ( A F T E R N I
0022760 L \r ( C O N D ( ( E Q W I
0023000 N D O W T u r t l e W i n d o
0023020 w ) ( D r a w T u r t l e ) )
0023040 ) ) ) ) \r ( R E A D V I S E C
0023060 L E A R W ) \r ( S E T Q T u r
0023100 t l e W i n d o w ( C R E A T
0023120 E W ( C R E A T E R E G I O N
0023140 3 0 0 2 5 7 0 0 7 0 0 )
0023160 \r "
0023200
0023220 - - - - - - T u r t l e
0023240 G r a p h i c s W i n d o w
0023260 - - - - - -
0023300 "
0023320 1 0 ) ) \r ( S e t U p T u r t l
0023340 e A r r a y ) \r ( C r e a t e T
0023360 u r t l e R e c o r d ) \r ( C E
0023400 N T E R ) \r ( C L O S E W T u
0023420 r t l e W i n d o w ) \r N I L \r
0023440