$ od -c -N 50000 [qv]<notecards>RELEASE1.1>TURTLE.DCOM!1 0000000 ( F I L E C R E A T E D " 1 4 0000020 - J a n - 8 5 2 3 : 5 9 : 1 5 0000040 " ( " c o m p i l e d o n 0000060 " { P H Y L U M } < T R I G G 0000100 > L I S P > T U R T L E . ; 1 ) 0000120 " 2 0 - D e c - 8 4 1 2 : 0 0000140 7 : 2 2 " \r t c o m p l ' d 0000160 i n " I N T E R L I S P - D 0000200 1 0 - J a n - 8 5 . . . " d 0000220 a t e d " 1 0 - J a n - 8 5 0000240 1 3 : 2 8 : 5 5 " ) \r ( F I L E 0000260 C R E A T E D " 1 4 - J a n - 0000300 8 5 2 3 : 5 8 : 3 7 " { P H 0000320 Y L U M } < T R I G G > L I S P 0000340 > T U R T L E . ; 1 6 1 1 3 0000360 c h a n g e s t o : ( V A R 0000400 S T U R T L E C O M S ) ( \r 0000420 F N S T U R . F o r w a r d 0000440 T U R . B a c k T U R . R i g 0000460 h t T U R . L e f t T U R . 0000500 P e n U p T U R . P e n D o w 0000520 n T U R . I n i t i a l i z e 0000540 T U R . D r a w T u r t l e 0000560 \r T U R . C o n n e c t P o i n 0000600 t s T U R . T r a n s l a t e 0000620 P o i n t s T U R . R o t a t 0000640 e P o i n t s T U R . C h a n 0000660 g e H e a d i n g ) ) \r T U R . 0000700 F o r w a r d D 1 \r ( I 0 0000720 D i s t a n c e ) \0 H \0 \0 \0 001 0000740 ` \0 \0 \t \0 \0 ` \0 \0 262 026 ` \0 \0 @ 326 0000760 ` \0 \0 @ 326 k h ` \0 \0 \r 005 \0 \0 217 ` 0001000 \0 \0 @ 326 ` \0 \0 @ 326 ` \0 \0 \v \0 \0 277 0001020 h ` \0 \0 \n \0 \0 h ` \0 \0 \n \0 \0 032 027 0001040 \0 \0 d \t \0 \0 020 \0 ( 1 0 5 Q T U 0001060 R . D r a w T u r t l e 7 5 Q 0001100 D S P Y P O S I T I O N 6 6 0001120 Q D S P X P O S I T I O N 5 0001140 6 Q R E L M O V E T O 3 5 Q 0001160 R E L D R A W T O 5 T U R 0001200 . D r a w T u r t l e ) \r ( 1 0 0001220 1 Q T U R . C u r P o s 7 2 0001240 Q T U R . W i n d o w 6 3 Q 0001260 T U R . W i n d o w 5 3 Q 0001300 T U R . W i n d o w 4 6 Q T 0001320 U R . S i n H e a d i n g 4 1 0001340 Q T U R . C o s H e a d i n g 0001360 3 1 Q T U R . W i n d o w 0001400 2 2 Q T U R . S i n H e a d i 0001420 n g 1 5 Q T U R . C o s H e 0001440 a d i n g 1 0 Q T U R . P e 0001460 n D o w n F l g 2 T U R . C 0001500 u r P o s ) \r ( ) \r T U R . B a 0001520 c k D 1 \r ( I 0 D i s t a 0001540 n c e ) \0 \t \0 \0 \0 001 @ \t \0 \0 \t 0001560 \0 \0 020 \0 ( 6 T U R . F o r w a 0001600 r d 3 M I N U S ) \r N I L \r 0001620 ( ) \r T U R . R i g h t D 1 \r 0001640 ( I 0 A n g l e ) \0 \t \0 \0 0001660 \0 001 @ \t \0 \0 \t \0 \0 020 \0 ( 6 T U 0001700 R . L e f t 3 M I N U S ) \r 0001720 N I L \r ( ) \r T U R . L e f t 0001740 D 1 \r ( I 0 A n g l e ) \0 0001760 026 \0 \0 \0 001 ` \0 \0 \t \0 \0 @ ` \0 \0 324 0002000 \t \0 \0 ` \0 \0 \t \0 \0 020 \0 ( 2 3 Q 0002020 T U R . D r a w T u r t l e 1 0002040 5 Q T U R . C h a n g e H e a 0002060 d i n g 5 T U R . D r a w T 0002100 u r t l e ) \r ( 2 0 Q T U R . 0002120 C u r P o s 1 1 Q T U R . H 0002140 e a d i n g 2 T U R . C u r 0002160 P o s ) \r ( ) \r T U R . P e n U 0002200 p D 1 \r N I L \0 006 \0 \0 \0 \0 h 0002220 027 \0 \0 020 \0 N I L \r ( 3 T U R . 0002240 P e n D o w n F l g ) \r ( ) \r T 0002260 U R . P e n D o w n D 1 \r N I 0002300 L \0 006 \0 \0 \0 \0 i 027 \0 \0 020 \0 N I 0002320 L \r ( 3 T U R . P e n D o w n 0002340 F l g ) \r ( ) \r T U R . I n i t 0002360 i a l i z e D 1 \r ( I 0 R 0002400 e g i o n ) \0 033 \0 \0 \0 001 @ \t \0 0002420 \0 027 \0 \0 i 027 \0 \0 l Z \t \0 \0 j d 032 0002440 027 \0 \0 \t \0 \0 020 \0 ( 3 0 Q T U R 0002460 . D r a w T u r t l e 1 7 Q 0002500 T U R . C h a n g e H e a d i n 0002520 g 3 C R E A T E W ) \r ( 2 5 0002540 Q T U R . C u r P o s 1 2 Q 0002560 T U R . P e n D o w n F l g 0002600 6 T U R . W i n d o w ) \r ( ) 0002620 \r T U R . D r a w T u r t l e 0002640 D 1 \r ( I 0 P o s ) \0 035 \0 0002660 \0 \0 001 ` \0 \0 \t \0 \0 @ \n \0 \0 \t \0 \0 0002700 @ d l 002 g \0 \0 ` \0 \0 \r 005 \0 \0 020 \0 0002720 ( 3 2 Q D R A W B E T W E E N 0002740 1 4 Q T U R . C o n n e c t 0002760 P o i n t s 1 1 Q T U R . T 0003000 r a n s l a t e P o i n t s 5 0003020 T U R . R o t a t e P o i n t 0003040 s ) \r ( 2 6 Q T U R . W i n d 0003060 o w 2 3 Q I N V E R T 2 0003100 T U R . I c o n P o i n t s ) \r 0003120 ( ) \r T U R . C o n n e c t P o 0003140 i n t s D 1 \r ( P 1 P o i 0003160 n t P 0 F i r s t I 0 0003200 P o i n t s ) \0 = 002 \0 \0 001 @ 0003220 001 021 001 \0 H 001 H 002 ` \0 \0 \v \0 \0 @ 260 0003240 027 d 001 021 001 001 I 001 I 002 k g \0 \0 ` \0 0003260 \0 \r 005 \0 \0 023 002 003 265 351 H 001 H 002 k g 0003300 \0 \0 ` \0 \0 \r 005 \0 \0 h 020 \0 ( 7 1 Q 0003320 D R A W T O 4 5 Q D R A W 0003340 T O 1 6 Q M O V E T O ) \r ( 0003360 6 5 Q T U R . W i n d o w 6 0003400 2 Q I N V E R T 4 1 Q T U 0003420 R . W i n d o w 3 6 Q I N V 0003440 E R T 1 3 Q T U R . W i n d 0003460 o w ) \r ( ) \r T U R . T r a n s 0003500 l a t e P o i n t s D 1 \r ( L 0003520 ( 1 P o s 0 P o i n t s 0003540 ) ) \0 - \a \0 \0 002 @ A 001 A 002 021 C 0003560 006 H 003 265 004 K 020 001 276 I N 001 324 J N 002 0003600 324 032 275 L 265 \f M h 032 \ 273 H 002 X 260 344 0003620 M & 274 260 370 \0 N I L \r N I L \r ( ) 0003640 \r T U R . R o t a t e P o i n t 0003660 s D 1 \r ( P 6 Y P 5 0003700 X P 4 P o i n t I 0 0003720 P o i n t s ) \0 > \a \0 \0 001 @ 021 0003740 a 006 H 003 265 004 I 020 001 274 ` \0 \0 L 001 ] 0003760 326 ` \0 \0 \t \0 \0 L 002 ^ 326 324 ` \0 \0 M 0004000 326 ` \0 \0 N 326 324 032 273 J 265 \f K h 032 Z 0004020 271 H 002 X 260 317 K & 272 260 370 \0 ( 3 0 Q 0004040 M I N U S ) \r ( 4 5 Q T U R 0004060 . C o s H e a d i n g 4 0 Q 0004100 T U R . S i n H e a d i n g 2 0004120 5 Q T U R . S i n H e a d i n 0004140 g 1 6 Q T U R . C o s H e a 0004160 d i n g ) \r ( ) \r T U R . C h a 0004200 n g e H e a d i n g D 1 \r ( I 0004220 0 A n g l e ) \0 024 \0 \0 \0 001 0004240 @ 027 \0 \0 d \t \0 \0 027 \0 \0 @ \t \0 \0 027 0004260 \0 \0 020 \0 ( 1 6 Q C O S 7 S 0004300 I N ) \r ( 2 1 Q T U R . C o s 0004320 H e a d i n g 1 2 Q T U R . 0004340 S i n H e a d i n g 3 T U R 0004360 . H e a d i n g ) \r ( ) \r ( P R 0004400 E T T Y C O M P R I N T T U R 0004420 T L E C O M S ) \r ( R P A Q Q 0004440 T U R T L E C O M S ( ( * T 0004460 h e s t a n d a r d t u r t 0004500 l e f u n c t i o n s . ) ( 0004520 F N S T U R . F o r w a r d 0004540 T U R . B a c k T U R . R i g 0004560 h t T U R . L e f t \r T U R 0004600 . P e n U p T U R . P e n D o 0004620 w n ) ( * H a n d y i n t 0004640 e r n a l f u n c t i o n s . 0004660 ) ( F N S T U R . I n i t i 0004700 a l i z e T U R . D r a w T u 0004720 r t l e \r T U R . C o n n e c 0004740 t P o i n t s T U R . T r a n 0004760 s l a t e P o i n t s T U R . 0005000 R o t a t e P o i n t s T U R 0005020 . C h a n g e H e a d i n g ) 0005040 ( V A R S ( T U R . I c o n P 0005060 o i n t s ( Q U O T E \r ( ( 0005100 9 . 0 ) ( - 5 . 5 ) 0005120 ( - 5 . - 5 ) ) ) ) ) ( G 0005140 L O B A L V A R S T U R . C u 0005160 r P o s T U R . H e a d i n g 0005200 T U R . S i n H e a d i n g 0005220 T U R . C o s H e a d i n g \r 0005240 T U R . W i n d o w T U R . I 0005260 c o n P o i n t s T U R . P e 0005300 n D o w n F l g ) ) ) \r ( R P A 0005320 Q Q T U R . I c o n P o i n t 0005340 s ( ( 9 . 0 ) ( - 5 . 0005360 5 ) ( - 5 . - 5 ) ) ) \r 0005400 ( P U T P R O P S T U R T L E 0005420 C O P Y R I G H T ( " X e r 0005440 o x C o r p o r a t i o n " 0005460 1 9 8 5 ) ) \r N I L \r 0005473