$ od -c -N 50000 [phylum]<LISP>KOTO>Lispusers>TRAJECTORY-FOLLOWER.DCOM!1
0000000 ( F I L E C R E A T E D " 1 9
0000020 - F e b - 8 6 1 1 : 1 7 : 5 6
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < L I S P U S E
0000100 R S > K O T O > T R A J E C T O
0000120 R Y - F O L L O W E R . ; 2 )
0000140 \r " 1 9 - M a r - 8 5 1 4 : 3
0000160 4 : 1 7 " t c o m p l ' d i
0000200 n " I N T E R L I S P - D 2
0000220 4 - D e c - 8 5 . . . " d a
0000240 t e d " 2 4 - D e c - 8 5 1
0000260 4 : 4 3 : 4 2 " ) \r ( F I L E C
0000300 R E A T E D " 1 9 - F e b - 8
0000320 6 1 1 : 1 0 : 1 9 " { E R I
0000340 S } < L I S P U S E R S > K O T
0000360 O > T R A J E C T O R Y - F O L
0000400 L O W E R . ; 2 8 0 7 9 c h
0000420 a n g e s t o : ( V A R S
0000440 \r T R A J E C T O R Y - F O L L
0000460 O W E R C O M S ) ( F N S T
0000500 R A J E C T O R Y . F O L L O W
0000520 T R A J E C T O R Y . F O L L
0000540 O W E R . P O I N T T R A J E
0000560 C T O R Y . F O L L O W E R . P
0000600 U T \r T R A J E C T O R Y . F
0000620 O L L O W E R . S E T U P T R
0000640 A J E C T O R Y . F O L L O W E
0000660 R . T E S T ) p r e v i o u s
0000700 d a t e : " 2 5 - A P R - 8
0000720 3 1 7 : 2 8 : 4 8 " \r { P H
0000740 Y L E X : P A R C : X E R O X }
0000760 < L I S P > I N T E R M E Z Z O
0001000 > L I S P U S E R S > T R A J E
0001020 C T O R Y - F O L L O W E R . ;
0001040 1 ) \r T R A J E C T O R Y . F O
0001060 L L O W D 1 \r ( I 5 W I N
0001100 D O W I 4 B I T M A P I
0001120 3 D E L A Y I 2 N I
0001140 1 C L O S E D I 0 K N
0001160 O T S F 0 T R A J E C T O
0001200 R Y . F O L L O W E R . B A L L
0001220 ) \0 % \0 001 \0 006 E 265 005 ` \0 \0 B C
0001240 D 265 003 P \f \0 \0 @ A g \0 \0 h E 265 005
0001260 ` \0 \0 \r 005 \0 \0 \b \0 \0 h 020 \0 ( 4 1
0001300 Q T R A J E C T O R Y . F O L
0001320 L O W E R . W R A P U P 3 6 Q
0001340 D R A W C U R V E 1 6 Q T
0001360 R A J E C T O R Y . F O L L O W
0001400 E R . S E T U P ) \r ( 3 2 Q P
0001420 R O M P T W I N D O W 2 3 Q
0001440 T R A J E C T O R Y . F O L L O
0001460 W E R . P O I N T 5 S c r e
0001500 e n B i t M a p ) \r ( ) \r T R A
0001520 J E C T O R Y . F O L L O W E R
0001540 . P O I N T D 1 \r ( I 2 W
0001560 I N D O W I 1 Y I 0
0001600 X ) \0 ` \0 \0 \0 003 ` \0 \0 l 002 330 027
0001620 \0 \0 d ` \0 \0 361 224 277 k 027 \0 \0 \t \0 \0
0001640 ` \0 \0 265 $ @ 262 6 ` \0 \0 ` \0 \0 @ \t
0001660 \0 \0 * ` \0 \0 ` \0 \0 k 330 A \t \0 \0 *
0001700 ` \0 \0 \t \0 \0 020 ` \0 \0 \t \0 \0 331 \t \0
0001720 \0 277 j \t \0 \0 027 \0 \0 277 260 313 ` \0 \0 `
0001740 \0 \0 o \0 \0 \0 * 020 \0 ( 1 1 4 Q C
0001760 L O C K 1 0 7 Q D I S M I S
0002000 S 1 0 3 Q C L O C K D I F F
0002020 E R E N C E 7 4 Q T R A J E
0002040 C T O R Y . F O L L O W E R . P
0002060 U T 6 5 Q F I X R 5 0 Q
0002100 F I X R 2 6 Q T R A J E C T
0002120 O R Y . F O L L O W E R . P U T
0002140 ) \r ( 1 3 0 Q T R A J E C T O
0002160 R Y . F O L L O W E R . P O I N
0002200 T E R 1 2 5 Q T R A J E C T
0002220 O R Y . F O L L O W E R . P O I
0002240 N T S 1 1 7 Q T R A J E C T
0002260 O R Y . F O L L O W E R . L A S
0002300 T . T I M E 1 0 0 Q T R A J
0002320 E C T O R Y . F O L L O W E R .
0002340 L A S T . T I M E 7 1 Q T R
0002360 A J E C T O R Y . F O L L O W E
0002400 R . P O I N T E R 5 7 Q T R
0002420 A J E C T O R Y . F O L L O W E
0002440 R . P O I N T E R 5 4 Q T R
0002460 A J E C T O R Y . F O L L O W E
0002500 R . P O I N T S 4 4 Q T R A
0002520 J E C T O R Y . F O L L O W E R
0002540 . P O I N T E R 4 1 Q T R A
0002560 J E C T O R Y . F O L L O W E R
0002600 . P O I N T S 3 1 Q T R A J
0002620 E C T O R Y . F O L L O W E R .
0002640 D E L A Y 2 3 Q T R A J E C
0002660 T O R Y . F O L L O W E R . P O
0002700 I N T E R 1 4 Q T R A J E C
0002720 T O R Y . F O L L O W E R . C O
0002740 U N T 1 0 Q T R A J E C T O
0002760 R Y . F O L L O W E R . P O I N
0003000 T E R 2 T R A J E C T O R Y
0003020 . F O L L O W E R . P O I N T E
0003040 R ) \r ( 1 3 4 Q 1 7 7 7 7 7
0003060 7 7 7 7 7 Q ) \r T R A J E C T O
0003100 R Y . F O L L O W E R . P U T
0003120 D 1 \r ( P 1 Y P 0 X
0003140 I 0 P O I N T E R ) \0 ? 002
0003160 \0 \0 001 021 001 ` \0 \0 @ ( X o \0 \0 \0
0003200 \n \0 \0 263 , ` \0 \0 @ k 330 ( 271 ` \0 \0
0003220 j d ` \0 \0 H ` \0 \0 331 I ` \0 \0 331 `
0003240 \0 \0 ` \0 \0 g \0 \0 g \0 \0 \r \n \0 \0 h
0003260 020 \0 ( 7 3 Q B I T B L T 1 7
0003300 Q I E Q P ) \r ( 6 7 Q I N V
0003320 E R T 6 4 Q I N P U T 6 1
0003340 Q T R A J E C T O R Y . F O L
0003360 L O W E R . H E I G H T 5 6 Q
0003400 T R A J E C T O R Y . F O L L
0003420 O W E R . W I D T H 5 2 Q T
0003440 R A J E C T O R Y . F O L L O W
0003460 E R . H A L F . H E I G H T 4
0003500 5 Q T R A J E C T O R Y . F O
0003520 L L O W E R . H A L F . W I D T
0003540 H 4 1 Q T R A J E C T O R Y
0003560 . F O L L O W E R . D S P 3 4
0003600 Q T R A J E C T O R Y . F O L
0003620 L O W E R . B I T M A P 2 4 Q
0003640 T R A J E C T O R Y . F O L L
0003660 O W E R . P O I N T S 5 T R
0003700 A J E C T O R Y . F O L L O W E
0003720 R . P O I N T S ) \r ( 1 4 Q
0003740 1 7 7 7 7 7 7 7 7 7 7 Q ) \r T R
0003760 A J E C T O R Y . F O L L O W E
0004000 R . S E T U P D 1 \r ( P 1
0004020 R E A L . B I T M A P P 0
0004040 R E A L . N I 3 B I T M A
0004060 P I 2 D E L A Y I 1
0004100 N I 0 D S P F 2 T R
0004120 A J E C T O R Y . F O L L O W E
0004140 R . D E F A U L T . B I T M A P
0004160 ) \0 t 002 001 \0 004 A 265 004 l d C 265 003
0004200 R 021 002 001 ` \0 \0 234 H l 002 332 ` \0 \0 \t
0004220 \0 \0 360 263 024 H l 002 332 g \0 \0 o \0 \0 \0
0004240 \v \0 \0 027 \0 \0 277 k 027 \0 \0 H 027 \0 \0 @
0004260 027 \0 \0 B 027 \0 \0 d 227 j \t \0 \0 027 \0 \0
0004300 277 I 027 \0 \0 d 006 \0 \0 310 004 027 \0 \0 I 006
0004320 \0 \0 310 003 027 \0 \0 ` \0 \0 l 002 333 027 \0 \0
0004340 ` \0 \0 l 002 333 027 \0 \0 h 020 \0 ( 1 0 4
0004360 Q C L O C K 5 2 Q A R R A
0004400 Y 3 1 Q A R R A Y S I Z E )
0004420 \r ( 1 6 0 Q T R A J E C T O R
0004440 Y . F O L L O W E R . H A L F .
0004460 H E I G H T 1 5 2 Q T R A J
0004500 E C T O R Y . F O L L O W E R .
0004520 H E I G H T 1 4 7 Q T R A J
0004540 E C T O R Y . F O L L O W E R .
0004560 H A L F . W I D T H 1 4 1 Q
0004600 T R A J E C T O R Y . F O L L O
0004620 W E R . W I D T H 1 3 6 Q T
0004640 R A J E C T O R Y . F O L L O W
0004660 E R . H E I G H T 1 3 1 Q B
0004700 I T M A P 1 2 5 Q T R A J E
0004720 C T O R Y . F O L L O W E R . W
0004740 I D T H 1 2 0 Q B I T M A P
0004760 1 1 4 Q T R A J E C T O R Y
0005000 . F O L L O W E R . B I T M A P
0005020 1 0 7 Q T R A J E C T O R Y
0005040 . F O L L O W E R . L A S T . T
0005060 I M E 7 6 Q T R A J E C T O
0005100 R Y . F O L L O W E R . D E L A
0005120 Y 7 2 Q T R A J E C T O R Y
0005140 . F O L L O W E R . D S P 6 6
0005160 Q T R A J E C T O R Y . F O L
0005200 L O W E R . C O U N T 6 2 Q
0005220 T R A J E C T O R Y . F O L L O
0005240 W E R . P O I N T E R 5 5 Q
0005260 T R A J E C T O R Y . F O L L O
0005300 W E R . P O I N T S 4 3 Q F
0005320 I X P 2 6 Q T R A J E C T O
0005340 R Y . F O L L O W E R . P O I N
0005360 T S 1 6 Q T R A J E C T O R
0005400 Y . F O L L O W E R . P O I N T
0005420 S ) \r ( 4 7 Q 1 7 7 7 7 7 7
0005440 7 7 7 7 Q ) \r T R A J E C T O R
0005460 Y . F O L L O W E R . T E S T
0005500 D 1 \r ( P 4 B I T M A P P
0005520 3 C L O S E D P 2 D E
0005540 L A Y P 1 N P 0 K N
0005560 O T S ) 001 005 \n \0 \0 \0 021 p 006 o \0
0005600 \0 \0 ` \0 \0 \n \0 \0 \b \0 \0 021 0 \t \b \0
0005620 \0 _ 022 277 O 020 265 003 202 261 \0 312 O 022 h 032
0005640 _ 020 _ 016 277 ` \0 \0 310 \0 l @ 345 j 360 262
0005660 337 O 016 022 032 X o \0 \0 \0 \t \0 \0 Y j o
0005700 \0 \0 \0 \t \0 \0 \n \0 \0 Z d j 360 250 d 005
0005720 003 226 d \t \0 \0 221 h 272 ` \0 \0 037 d o \0
0005740 \0 \0 024 004 277 d g \0 \0 024 277 d g \0 \0
0005760 024 034 277 j d n 177 377 d h 032 032 032 032 275 d
0006000 M 024 \n 277 \t \0 \0 [ ` \0 \0 037 d o \0 \0
0006020 \0 024 004 277 d g \0 \0 024 277 d g \0 \0 024
0006040 034 277 j d n 177 377 d h 032 032 032 032 276 d N
0006060 024 \n 277 \t \0 \0 \ ` \0 \0 I J L \f \0 \0
0006100 K g \0 \0 360 262 ' ` \0 \0 310 \0 l @ 345 j
0006120 360 263 ) H i g \0 \0 h ` \0 \0 \r 005 \0 \0
0006140 277 260 346 O 022 & _ 020 277 261 377 < H h g \0
0006160 \0 h ` \0 \0 \r 005 \0 \0 277 \b \0 \0 h 020 \0
0006200 ( 4 0 1 Q T R A J E C T O R Y
0006220 . F O L L O W E R . W R A P U P
0006240 3 7 5 Q D R A W C U R V E
0006260 3 4 4 Q D R A W C U R V E 3
0006300 0 4 Q T R A J E C T O R Y . F
0006320 O L L O W E R . S E T U P 2 7
0006340 2 Q M E N U 2 1 3 Q M E N
0006360 U 1 3 2 Q \ F Z E R O P 1
0006400 1 5 Q M A X 1 1 2 Q R N U
0006420 M B E R 1 0 1 Q R N U M B E
0006440 R 2 5 Q G E T P O S I T I O
0006460 N 1 7 Q G E T P O S I T I O
0006500 N 1 4 Q P R I N 1 ) \r ( 3 7
0006520 1 Q P R O M P T W I N D O W
0006540 3 6 5 Q T R A J E C T O R Y .
0006560 F O L L O W E R . P O I N T 3
0006600 4 0 Q P R O M P T W I N D O W
0006620 3 3 4 Q T R A J E C T O R Y
0006640 . F O L L O W E R . P O I N T
0006660 3 1 6 Q \ E M . K B D A D 2
0006700 3 1 0 Q C L O S E D 2 7 6 Q
0006720 S c r e e n B i t M a p 2 4
0006740 3 Q D E F A U L T M E N U H E
0006760 L D F N 2 3 4 Q C L R P R O
0007000 M P T 2 1 7 Q 004 003 M E N U T
0007020 Y P E # 1 6 4 Q D E F A U L
0007040 T M E N U H E L D F N 1 5 5 Q
0007060 C L R P R O M P T 1 4 0 Q
0007100 004 003 M E N U T Y P E # 5 4 Q
0007120 \ E M . K B D A D 2 1 1 Q P
0007140 R O M P T W I N D O W ) \r ( 2
0007160 2 5 Q ( ( " s i n g l e p o
0007200 i n t " N I L ) ( " A h o
0007220 r i z o n t a l l i n e " T
0007240 R A J E C T O R Y . F O L L O W
0007260 E R . H O R I Z O N T A L ) (
0007300 " A v e r t i c a l l i n e
0007320 " T R A J E C T O R Y . F O L
0007340 L O W E R . V E R T I C A L )
0007360 ( " A b a l l " T R A J E C
0007400 T O R Y . F O L L O W E R . B A
0007420 L L ) ) 1 4 6 Q ( O P E N
0007440 C L O S E D ) 1 0 7 Q " I n
0007460 d i c a t e t h e d e l a y
0007500 p e r p o i n t ( m i l l
0007520 i s e c o n d s ) " 7 6 Q "
0007540 I n d i c a t e t h e n u m
0007560 b e r o f p o i n t s i n
0007600 t h e f o l l o w e r " 6
0007620 " I n d i c a t e k n o t s
0007640 o n a t r a j e c t o r y
0007660 ; h o l d d o w n l e f t
0007700 s h i f t k e y o n l a
0007720 s t p o i n t " ) \r T R A J E
0007740 C T O R Y . F O L L O W E R . W
0007760 R A P U P D 1 \r ( P 1 I )
0010000 \0 027 002 \0 \0 \0 ` \0 \0 021 021 001 k Y H
0010020 363 221 h 020 \b \0 \0 277 I k 324 260 363 \0 ( 1
0010040 7 Q T R A J E C T O R Y . F O
0010060 L L O W E R . P O I N T ) \r ( 2
0010100 T R A J E C T O R Y . F O L L
0010120 O W E R . C O U N T ) \r ( ) \r (
0010140 P R E T T Y C O M P R I N T T
0010160 R A J E C T O R Y - F O L L O W
0010200 E R C O M S ) \r ( R P A Q Q T
0010220 R A J E C T O R Y - F O L L O W
0010240 E R C O M S ( ( F N S T R A
0010260 J E C T O R Y . F O L L O W T
0010300 R A J E C T O R Y . F O L L O W
0010320 E R . P O I N T \r T R A J E C
0010340 T O R Y . F O L L O W E R . P U
0010360 T T R A J E C T O R Y . F O L
0010400 L O W E R . S E T U P T R A J
0010420 E C T O R Y . F O L L O W E R .
0010440 T E S T T R A J E C T O R Y .
0010460 F O L L O W E R . W R A P U P )
0010500 \r ( V A R S ( T R A J E C T
0010520 O R Y . F O L L O W E R . P O I
0010540 N T S ) ) ( G L O B A L V A R
0010560 S T R A J E C T O R Y . F O L
0010600 L O W E R . C O U N T \r T R A
0010620 J E C T O R Y . F O L L O W E R
0010640 . L A S T . T I M E T R A J E
0010660 C T O R Y . F O L L O W E R . P
0010700 O I N T E R T R A J E C T O R
0010720 Y . F O L L O W E R . P O I N T
0010740 S \r T R A J E C T O R Y . F O
0010760 L L O W E R . D E L A Y T R A
0011000 J E C T O R Y . F O L L O W E R
0011020 . D S P T R A J E C T O R Y .
0011040 F O L L O W E R . B I T M A P
0011060 \r T R A J E C T O R Y . F O L L
0011100 O W E R . H A L F . W I D T H
0011120 T R A J E C T O R Y . F O L L O
0011140 W E R . H A L F . H E I G H T
0011160 T R A J E C T O R Y . F O L L O
0011200 W E R . W I D T H \r T R A J E
0011220 C T O R Y . F O L L O W E R . H
0011240 E I G H T ) ( B I T M A P S
0011260 T R A J E C T O R Y . F O L L O
0011300 W E R . D E F A U L T . B I T M
0011320 A P T R A J E C T O R Y . F O
0011340 L L O W E R . B A L L \r T R A
0011360 J E C T O R Y . F O L L O W E R
0011400 . H O R I Z O N T A L T R A J
0011420 E C T O R Y . F O L L O W E R .
0011440 V E R T I C A L ) ( P ( F I
0011460 L E S L O A D ( S Y S L O A D
0011500 F R O M V A L U E O F \r L
0011520 I S P U S E R S D I R E C T O R
0011540 I E S ) R E A D N U M B E R )
0011560 ) ) ) \r ( R P A Q Q T R A J E
0011600 C T O R Y . F O L L O W E R . P
0011620 O I N T S N I L ) \r ( R P A Q
0011640 T R A J E C T O R Y . F O L L
0011660 O W E R . D E F A U L T . B I T
0011700 M A P ( R E A D B I T M A P )
0011720 ) \r ( 1 1 " H @ @ @ " ) \r (
0011740 R P A Q T R A J E C T O R Y .
0011760 F O L L O W E R . B A L L ( R
0012000 E A D B I T M A P ) ) \r ( 2 1
0012020 2 1 " @ A O L @ @ @ @ " " @
0012040 C O O @ @ @ @ " " @ O O O H @
0012060 @ @ " " A O O O L @ @ @ " "
0012100 C O O O N @ @ @ " " G O O O O
0012120 @ @ @ " " G O O O O @ @ @ "
0012140 " G O O O O H @ @ " \r " O O O
0012160 O O H @ @ " " O O O O O H @ @
0012200 " " O O O O O H @ @ " " O O
0012220 O O O H @ @ " " G O O O O H @
0012240 @ " " G O O O O @ @ @ " " G
0012260 O O O O @ @ @ " " C O O O N @
0012300 @ @ " " C O O O N @ @ @ " \r
0012320 " A O O O L @ @ @ " " @ O O O
0012340 H @ @ @ " " @ G O O @ @ @ @ "
0012360 " @ A O L @ @ @ @ " ) \r ( R P
0012400 A Q T R A J E C T O R Y . F O
0012420 L L O W E R . H O R I Z O N T A
0012440 L ( R E A D B I T M A P ) ) \r
0012460 ( 1 8 1 " O O O O L @ @ @ "
0012500 ) \r ( R P A Q T R A J E C T O
0012520 R Y . F O L L O W E R . V E R T
0012540 I C A L ( R E A D B I T M A P
0012560 ) ) \r ( 1 1 6 " H @ @ @ "
0012600 " H @ @ @ " " H @ @ @ " " H
0012620 @ @ @ " " H @ @ @ " " H @ @
0012640 @ " " H @ @ @ " " H @ @ @ "
0012660 " H @ @ @ " " H @ @ @ " "
0012700 H @ @ @ " " H @ @ @ " " H @
0012720 @ @ " \r " H @ @ @ " " H @ @
0012740 @ " " H @ @ @ " ) \r ( F I L E
0012760 S L O A D ( S Y S L O A D F
0013000 R O M V A L U E O F L I S P
0013020 U S E R S D I R E C T O R I E S
0013040 ) R E A D N U M B E R ) \r ( P
0013060 U T P R O P S T R A J E C T O
0013100 R Y - F O L L O W E R C O P Y
0013120 R I G H T ( " X e r o x C o
0013140 r p o r a t i o n " 1 9 8 6 )
0013160 ) \r N I L \r
0013166