$ od -c -N 50000 [phylum]<3-LISP>emacs>COMS.DCOM!30
0000000 ( F I L E C R E A T E D " 3
0000020 - A u g - 8 4 2 3 : 2 5 : 4 0
0000040 " ( " c o m p i l e d o n
0000060 " { P H Y L U M } < 3 - L I S
0000100 P > E M A C S > C O M S . F P K
0000120 G ; 1 ) \r " 8 - J u n - 8 4
0000140 1 1 : 1 7 : 2 0 " t c o m p
0000160 l % ' d i n W O R K d a t
0000200 e d " 2 1 - J u n - 8 4 1 0
0000220 : 5 0 : 2 8 " ) \r ( F I L E C R
0000240 E A T E D " 3 - A u g - 8 4
0000260 2 3 : 2 5 : 1 0 " { P H Y L
0000300 U M } < 3 - L I S P > E M A C S
0000320 > C O M S . F P K G ; 1 4 0 2
0000340 8 2 c h a n g e s t o : (
0000360 F N S \r E M A C S . A P P L Y
0000400 * E M A C S . C A L L F U N
0000420 E M A C S . C L O S E E M A C
0000440 S . M A K E . C O M M A N D T
0000460 O U P P E R T O L O W E R E
0000500 M A C S . C H A R A C T E R \r
0000520 \ \ C O M . E M A C S . D I S P
0000540 A T C H . ^ X E M A C S . M A
0000560 K E . ^ X . C O M M A N D \ \
0000600 C O M . E M A C S . D I S P A T
0000620 C H . M E T A E M A C S . M A
0000640 K E . M E T A . C O M M A N D
0000660 \r \ \ C O M . F O R W A R D . C
0000700 H A R A C T E R \ \ C O M . B
0000720 A C K W A R D S . C H A R A C T
0000740 E R \ \ C O M . D E L E T E .
0000760 C H A R A C T E R \ \ C O M .
0001000 R U B O U T \r \ \ C O M . T R
0001020 A N S P O S E . C H A R A C T E
0001040 R S \ \ C O M . F O R W A R D
0001060 . W O R D \ \ C O M . B A C K
0001100 W A R D S . W O R D \ \ C O M
0001120 . D E L E T E . W O R D . F O R
0001140 W A R D \r \ \ C O M . D E L E
0001160 T E . W O R D . B A C K W A R D
0001200 \ \ C O M . B E G I N N I N G
0001220 . O F . L I N E \ \ C O M . E
0001240 N D . O F . L I N E \ \ C O M
0001260 . P R E V I O U S . L I N E \r
0001300 \ \ C O M . N E X T . L I N E
0001320 \ \ C O M . K I L L . L I N E
0001340 \ \ C O M . F O R W A R D . P A
0001360 R A G R A P H \ \ C O M . B A
0001400 C K W A R D S . P A R A G R A P
0001420 H \ \ C O M . W R I T E . F I
0001440 L E \r \ \ C O M . S A V E . F
0001460 I L E \ \ C O M . G E T . F I
0001500 L E \ \ C O M . I N S E R T .
0001520 F I L E \ \ C O M . L A S T .
0001540 S C R E E N F U L \ \ C O M .
0001560 N E X T . S C R E E N F U L \r
0001600 \ \ C O M . E V A L . F R O M .
0001620 B U F F E R \ \ C O M . F O R
0001640 W A R D . S E X P R \ \ C O M
0001660 . B A C K W A R D S . S E X P R
0001700 \ \ C O M . K I L L . S E X P
0001720 R \r \ \ C O M . T O P . O F .
0001740 D E F I N I T I O N \ \ C O M
0001760 . E N D . O F . D E F I N I T I
0002000 O N \ \ C O M . G R I N D . D
0002020 E F I N I T I O N E M A C S .
0002040 K I L L . W H I T E S P A C E .
0002060 O N . L I N E \r \ \ C O M . I
0002100 N D E N T . N E X T . L I N E
0002120 \ \ C O M . I N D E N T . F O R
0002140 . S E X P R E M A C S . F L A
0002160 S H E M A C S . F L A S H . S
0002200 E X P R . B A C K \ \ C O M .
0002220 F L A S H . P A R E N \r \ \ C
0002240 O M . F L A S H . B R A C K E T
0002260 E M A C S . P A R E N . F L A
0002300 S H I N G . O N E M A C S . P
0002320 A R E N . F L A S H I N G . O F
0002340 F D E D I T E m a c s \ \ C
0002360 O M . D E D I T . E X P R E S S
0002400 I O N \r \ \ C O M . S N A R F
0002420 . E X P R E S S I O N . F R O M
0002440 . D E D I T \ \ C O M . J U M
0002460 P . T O . B E G I N N I N G \
0002500 \ C O M . J U M P . T O . E N D
0002520 \ \ C O M . N O T . M O D I F
0002540 I E D \r \ \ C O M . U N I V E
0002560 R S A L . A R G U M E N T \ \
0002600 C O M . M E T A . A U T O A R G
0002620 U M E N T \ \ C O M . J O I N
0002640 . L I N E S \ \ C O M . Q U O
0002660 T E . N E X T . C H A R A C T E
0002700 R \r \ \ C O M . R E D I S P L
0002720 A Y \ \ C O M . O P E N . L I
0002740 N E \ \ C O M . D E L E T E .
0002760 B L A N K . L I N E S \ \ C O
0003000 M . Q U I T . E M A C S \ \ C
0003020 O M . H A R D C O P Y . B U F F
0003040 E R \r \ \ C O M . S T R I N G
0003060 . S E A R C H . F O R W A R D
0003100 \ \ C O M . S T R I N G . R E P
0003120 L A C E ) ) \r E M A C S . A P P
0003140 L Y * D 1 \r ( I 1 S T R E
0003160 A M I 0 F N ) \0 / \0 \0 \0
0003200 002 A d 006 \0 \0 311 020 006 \0 \0 311 032 006 \0 \0
0003220 311 006 k 331 \n \0 \0 A k @ 017 016 A 006 \0 \0
0003240 311 020 \t \0 \0 \t \0 \0 277 A \t \0 \0 277 020 \0
0003260 ( 5 3 Q E M A C S . S H O W C
0003300 A R E T 4 6 Q E M A C S . U
0003320 P D A T E . M O D E L I N E 4
0003340 3 Q \ T E D I T . M A I N W
0003360 2 5 Q E M A C S . S E T C A R
0003400 E T P T R ) \r ( 3 6 Q S T R E
0003420 A M 1 6 Q S E L E C T I O N
0003440 1 1 Q T E X T O B J 4 S
0003460 T R E A M ) \r ( ) \r E M A C S .
0003500 C A L L F U N A 0 0 0 1 D 1 \r
0003520 ( N A M E E R R O R S E T L
0003540 ( 2 E R R O R S E T . W 1
0003560 E R R O R S E T . V 0 E R
0003600 R O R S E T . U ) F 0 F N
0003620 F 1 S T R E A M ) \0 \t \0
0003640 002 \0 003 P Q \n \0 \0 h 032 020 \0 ( 4 E
0003660 M A C S . A P P L Y * ) \r N I L
0003700 \r ( ) \r E M A C S . C A L L F U
0003720 N D 1 \r ( P 0 S U C E S S
0003740 P I 1 S T R E A M I 0
0003760 F N ) \0 J 001 \0 \0 002 o \0 \0 \0 i
0004000 \n \0 \0 021 001 \0 H 265 020 A o \0 \0 \0 o \0
0004020 \0 \0 \v \0 \0 277 H 001 g \0 \0 360 263 023 A 006
0004040 \0 \0 311 020 \t \0 \0 g \0 \0 \n \0 \0 260 025 A
0004060 o \0 \0 \0 A \t \0 \0 \n \0 \0 o \0 \0 \0 \v
0004100 \0 \0 h 020 \0 ( 1 0 6 Q T E D I T
0004120 . N O T I F Y 7 7 Q C O N C
0004140 A T 7 4 Q E M A C S . N U M
0004160 E R I C . A R G 6 1 Q P U T
0004200 W I N D O W P R O P 5 3 Q \
0004220 T E D I T . M A I N W 3 1 Q
0004240 T E D I T . N O T I F Y 7 E
0004260 M A C S . C A L L F U N A 0 0 0
0004300 1 ) \r ( 5 6 Q N U M E R I C .
0004320 A R G 4 6 Q S T R E A M 3
0004340 7 Q N U M E R I C . A R G ) \r
0004360 ( 1 0 3 Q ( C L E A R W )
0004400 7 0 Q " A r g : " 2 6 Q
0004420 ( F R E S H L I N E ) 2 2 Q
0004440 " C o m m a n d A b o r t e d
0004460 " 3 ( D U M M Y . F O R . E
0004500 R R O R S E T ) ) \r E M A C S .
0004520 C L O S E D 1 \r ( L ( 0 F
0004540 N ) ) \0 036 \0 \0 \0 001 g \0 \0 o \0 \0
0004560 \0 g \0 \0 g \0 \0 @ h 032 032 g \0 \0 h 032
0004600 032 032 h 032 032 032 020 \0 N I L \r ( 2 3 Q
0004620 S T R E A M 1 4 Q Q U O T
0004640 E 1 1 Q E M A C S . C A L L
0004660 F U N 2 L A M B D A ) \r (
0004700 6 ( S T R E A M ) ) \r E M A C
0004720 S . M A K E . C O M M A N D D
0004740 1 \r ( I 2 D O C U M E N T A
0004760 T I O N I 1 F U N C T I O
0005000 N I 0 C H A R C O D E F
0005020 0 T E D I T . R E A D T A B
0005040 L E ) \0 037 \0 001 \0 003 @ A \t \0 \0 P
0005060 \v \0 \0 B 264 023 A 004 l 004 361 h 360 264 \n A
0005100 g \0 \0 B \v \0 \0 020 \0 ( 3 4 Q P U
0005120 T P R O P 1 0 Q T E D I T .
0005140 S E T F U N C T I O N 4 E M
0005160 A C S . C L O S E ) \r ( 3 0 Q
0005200 E M A C S . D O C U M E N T A T
0005220 I O N ) \r ( ) \r T O U P P E R
0005240 D 1 \r ( L ( 0 C H A R ) )
0005260 \0 022 \0 \0 \0 001 l a @ 361 251 @ d l z 361
0005300 244 l 331 020 @ 020 \0 N I L \r N I L \r
0005320 ( ) \r T O L O W E R D 1 \r ( L
0005340 ( 0 C H A R ) ) \0 022 \0 \0 \0
0005360 001 l A @ 361 251 @ d l Z 361 244 l 330 020
0005400 @ 020 \0 N I L \r N I L \r ( ) \r E M
0005420 A C S . C H A R A C T E R D 1
0005440 \r ( P 0 B I T B U F I 0
0005460 C H A R N U M ) \0 2 001 \0 \0 001
0005500 @ l @ 344 m 177 345 \t \0 \0 h 032 021 001 \0 @
0005520 d l 200 345 j 360 247 277 g \0 \0 H 032 270 @ l
0005540 @ 345 j 360 226 g \0 \0 H 032 X 200 H \t \0 \0
0005560 020 \0 ( 5 7 Q P A C K 1 1 Q
0005600 C H A R A C T E R ) \r ( 4 7 Q
0005620 C - 3 2 Q M - ) \r ( ) \r \ \
0005640 C O M . E M A C S . D I S P A T
0005660 C H . ^ X D 1 \r ( P 1 C O
0005700 M P 0 C H A R I 0 S
0005720 T R E A M F 2 \ \ E M A C
0005740 S . ^ X . D I S P A T C H ) \0
0005760 > 002 001 \0 001 @ o \0 \0 \0 o \0 \0 \0 \v \0
0006000 \0 \b \0 \0 \t \0 \0 021 021 001 @ H \t \0 \0 \n
0006020 \0 \0 H R \n \0 \0 002 Y d 226 d 001 @ \n \0
0006040 \0 020 \b \0 \0 @ o \0 \0 \0 o \0 \0 \0 \v \0
0006060 \0 020 \0 ( 7 3 Q T E D I T . N O
0006100 T I F Y 5 7 Q B E E P 5 3
0006120 Q E M A C S . A P P L Y * 4
0006140 1 Q S A S S O C 3 4 Q T E
0006160 D I T . N O T I F Y 3 1 Q E
0006200 M A C S . C H A R A C T E R 2
0006220 1 Q T O U P P E R 1 6 Q T
0006240 Y I 1 3 Q T E D I T . N O T
0006260 I F Y ) \r N I L \r ( 7 0 Q (
0006300 F R E S H L I N E T E R P R I
0006320 ) 6 4 Q " C o m m a n d n
0006340 o t k n o w n . " 1 0 Q (
0006360 C L E A R W ) 4 " C - X "
0006400 ) \r E M A C S . M A K E . ^ X .
0006420 C O M M A N D D 1 \r ( I 2
0006440 D O C U M E N T A T I O N I
0006460 1 F U N C T I O N I 0 C
0006500 H A R N U M F 0 \ \ E M A
0006520 C S . ^ X . D I S P A T C H )
0006540 \0 \r \0 001 \0 003 @ \t \0 \0 A B 032 P \v \0
0006560 \0 020 \0 ( 1 2 Q P U T A S S O C
0006600 3 T O U P P E R ) \r N I L \r
0006620 ( ) \r \ \ C O M . E M A C S . D
0006640 I S P A T C H . M E T A D 1 \r
0006660 ( P 1 C O M P 0 C H A
0006700 R I 0 S T R E A M F 2
0006720 \ \ E M A C S . M E T A . D I
0006740 S P A T C H ) \0 = 002 001 \0 001 @ o
0006760 \0 \0 \0 o \0 \0 \0 \v \0 \0 \b \0 \0 \t \0 \0
0007000 021 021 001 @ H \t \0 \0 \n \0 \0 H R \n \0 \0
0007020 002 Y d 225 d @ \n \0 \0 020 \b \0 \0 @ o \0
0007040 \0 \0 o \0 \0 \0 \v \0 \0 020 \0 ( 7 2 Q
0007060 T E D I T . N O T I F Y 5 6 Q
0007100 B E E P 5 2 Q E M A C S .
0007120 A P P L Y * 4 1 Q S A S S O
0007140 C 3 4 Q T E D I T . N O T I
0007160 F Y 3 1 Q E M A C S . C H A
0007200 R A C T E R 2 1 Q T O U P P
0007220 E R 1 6 Q T Y I 1 3 Q T
0007240 E D I T . N O T I F Y ) \r N I L
0007260 \r ( 6 7 Q ( F R E S H L I N
0007300 E T E R P R I ) 6 3 Q " C
0007320 o m m a n d n o t k n o w n
0007340 . " 1 0 Q ( C L E A R W )
0007360 4 " M - " ) \r E M A C S . M A
0007400 K E . M E T A . C O M M A N D
0007420 D 1 \r ( I 2 D O C U M E N T
0007440 A T I O N I 1 F U N C T I
0007460 O N I 0 C H A R N U M F
0007500 0 \ \ E M A C S . M E T A .
0007520 D I S P A T C H ) \0 " \0 001 \0 003
0007540 @ \t \0 \0 A P \v \0 \0 @ \t \0 \0 l 200 344
0007560 A B \v \0 \0 @ \t \0 \0 l 200 344 A \n \0 \0
0007600 020 \0 ( 3 7 Q E M A C S . M A K
0007620 E . C O M M A N D 3 0 Q T O
0007640 L O W E R 2 4 Q E M A C S .
0007660 M A K E . C O M M A N D 1 4 Q
0007700 T O U P P E R 1 0 Q P U T
0007720 A S S O C 3 T O U P P E R )
0007740 \r N I L \r ( ) \r \ \ C O M . F O
0007760 R W A R D . C H A R A C T E R
0010000 D 1 \r ( I 0 S T R E A M )
0010020 \0 \n \0 \0 \0 001 @ d \t \0 \0 \n \0 \0 020 \0
0010040 ( 7 E M A C S . C H A R . F W
0010060 D 4 E M A C S . N U M E R I
0010100 C . A R G ) \r N I L \r ( ) \r \ \
0010120 C O M . B A C K W A R D S . C H
0010140 A R A C T E R D 1 \r ( I 0
0010160 S T R E A M ) \0 \n \0 \0 \0 001 @ d
0010200 \t \0 \0 \n \0 \0 020 \0 ( 7 E M A C S
0010220 . C H A R . B A C K 4 E M A
0010240 C S . N U M E R I C . A R G ) \r
0010260 N I L \r ( ) \r \ \ C O M . D E L
0010300 E T E . C H A R A C T E R D 1
0010320 \r ( P 0 P T R I 0 S T
0010340 R E A M ) \0 027 001 \0 \0 001 @ \t \0 \0
0010360 021 001 \0 @ H d @ \t \0 \0 k 331 330 \v \0 \0
0010400 h 020 \0 ( 2 3 Q E M A C S . D E
0010420 L E T E 1 5 Q E M A C S . N
0010440 U M E R I C . A R G 3 E M A
0010460 C S . G E T F I L E P T R ) \r N
0010500 I L \r ( ) \r \ \ C O M . R U B O
0010520 U T D 1 \r ( P 1 Q T Y P
0010540 0 P T R I 0 S T R E A
0010560 M ) \0 002 \0 \0 001 @ \t \0 \0 @ \t \0
0010600 \0 021 002 001 j H 361 255 I H 361 251 @ H k 331
0010620 H I 331 \v \0 \0 h 020 \0 ( 3 4 Q E M
0010640 A C S . D E L E T E 7 E M A
0010660 C S . N U M E R I C . A R G 3
0010700 E M A C S . G E T F I L E P T
0010720 R ) \r N I L \r ( ) \r \ \ C O M .
0010740 T R A N S P O S E . C H A R A C
0010760 T E R S D 1 \r ( P 1 C H A
0011000 R P 0 P T R I 0 S T
0011020 R E A M ) \0 G 002 \0 \0 001 021 001 @
0011040 \t \0 \0 263 = @ l \r 331 j 360 226 @ \t \0
0011060 \0 l 002 204 @ \t \0 \0 k 331 270 @ H \n \0 \0
0011100 277 @ 271 @ H d \v \0 \0 277 @ H k 331 \n
0011120 \0 \0 277 @ I \n \0 \0 277 @ H k 330 \n \0 \0
0011140 h 020 \0 ( 1 0 3 Q E M A C S . S
0011160 E T F I L E P T R 7 3 Q B O
0011200 U T 6 5 Q E M A C S . S E T
0011220 C A R E T P T R 5 5 Q E M A
0011240 C S . D E L E T E 4 3 Q E M
0011260 A C S . S E T C A R E T P T R
0011300 3 3 Q E M A C S . G E T F I L
0011320 E P T R 2 4 Q E M A C S . G
0011340 E T F I L E P T R 6 E M A C
0011360 S . E O F P ) \r N I L \r ( ) \r \
0011400 \ C O M . F O R W A R D . W O R
0011420 D D 1 \r ( I 0 S T R E A M
0011440 ) \0 \n \0 \0 \0 001 @ d \t \0 \0 \n \0 \0
0011460 020 \0 ( 7 E M A C S . W O R D .
0011500 F W D 4 E M A C S . N U M E
0011520 R I C . A R G ) \r N I L \r ( ) \r
0011540 \ \ C O M . B A C K W A R D S .
0011560 W O R D D 1 \r ( I 0 S T R
0011600 E A M ) \0 \n \0 \0 \0 001 @ d \t \0 \0
0011620 \n \0 \0 020 \0 ( 7 E M A C S . W O
0011640 R D . B A C K 4 E M A C S .
0011660 N U M E R I C . A R G ) \r N I L
0011700 \r ( ) \r \ \ C O M . D E L E T E
0011720 . W O R D . F O R W A R D D 1
0011740 \r ( P 1 E N D P 0 S T
0011760 A R T I 0 S T R E A M )
0012000 \0 % 002 \0 \0 001 @ \t \0 \0 021 021 001 @ d \t
0012020 \0 \0 \n \0 \0 @ \t \0 \0 Y H I 331 j 360 247
0012040 @ H I k 331 \v \0 \0 h 020 \0 ( 4 1 Q
0012060 E M A C S . D E L E T E 2 2 Q
0012100 E M A C S . G E T F I L E P T
0012120 R 1 6 Q E M A C S . W O R D
0012140 . F W D 1 3 Q E M A C S . N
0012160 U M E R I C . A R G 3 E M A
0012200 C S . G E T F I L E P T R ) \r N
0012220 I L \r ( ) \r \ \ C O M . D E L E
0012240 T E . W O R D . B A C K W A R D
0012260 D 1 \r ( P 0 P T R I 0
0012300 S T R E A M ) \0 ! 001 \0 \0 001 @
0012320 \t \0 \0 021 001 \0 H 264 027 @ d \t \0 \0 \n \0
0012340 \0 277 @ d \t \0 \0 H k 331 \v \0 \0 h 020 \0
0012360 ( 3 5 Q E M A C S . D E L E T
0012400 E 2 7 Q E M A C S . G E T F
0012420 I L E P T R 2 1 Q E M A C S
0012440 . W O R D . B A C K 1 6 Q E
0012460 M A C S . N U M E R I C . A R G
0012500 3 E M A C S . G E T F I L E
0012520 P T R ) \r N I L \r ( ) \r \ \ C O
0012540 M . B E G I N N I N G . O F . L
0012560 I N E D 1 \r ( I 0 S T R E
0012600 A M ) \0 035 \0 \0 \0 001 @ d 006 \0 \0 311
0012620 020 006 \0 \0 311 032 006 \0 \0 311 016 006 \0 \0 311 020
0012640 k 331 \n \0 \0 020 \0 ( 3 2 Q E M A C
0012660 S . S E T C A R E T P T R ) \r (
0012700 2 3 Q L I N E D E S C R I P T
0012720 O R 1 6 Q S E L E C T I O N
0012740 1 1 Q T E X T O B J 4 S
0012760 T R E A M ) \r ( ) \r \ \ C O M .
0013000 E N D . O F . L I N E D 1 \r (
0013020 P 0 P L A C E I 0 S T
0013040 R E A M ) \0 - 001 \0 \0 001 @ 006 \0 \0
0013060 311 020 006 \0 \0 311 032 006 \0 \0 311 016 006 \0 \0 311
0013100 022 021 001 \0 @ H @ \t \0 \0 331 j 360 221 H 202
0013120 H k 331 \n \0 \0 h 020 \0 ( 5 1 Q E M
0013140 A C S . S E T C A R E T P T R
0013160 3 5 Q G E T E O F P T R ) \r (
0013200 2 2 Q L I N E D E S C R I P T
0013220 O R 1 5 Q S E L E C T I O N
0013240 1 0 Q T E X T O B J 3 S
0013260 T R E A M ) \r ( ) \r \ \ C O M .
0013300 P R E V I O U S . L I N E D 1
0013320 \r ( P 1 1 Q I P 5 P R
0013340 E V L I N E P 4 T H I S L
0013360 I N E P 3 B O L P 2
0013400 H E I G H T P 1 W P 0
0013420 T H I S S E L I 0 S T R
0013440 E A M F 1 2 Q T E D I T .
0013460 D E F A U L T . C H A R L O O K
0013500 S ) \0 307 \n 001 \0 001 @ 006 \0 \0 311 020 006
0013520 \0 \0 311 032 @ 006 \0 \0 311 020 006 \0 \0 311 020 W
0013540 024 006 \0 \0 311 \0 \t \0 \0 021 S \a H 006 \0 \0
0013560 311 016 \ d 006 \0 \0 311 020 k 331 [ L ] @ \t
0013600 \0 \0 k 021 002 \t O 022 O 020 361 263 T M 006 \0
0013620 \0 311 " \t \0 \0 g \0 \0 360 262 031 M 006 \0 \0
0013640 311 " 006 \0 \0 311 020 j 360 250 M 006 \0 \0 311 "
0013660 275 260 & I j J \v \0 \0 277 M 006 \0 \0 311 "
0013700 \t \0 \0 g \0 \0 360 262 030 M 006 \0 \0 311 " 006
0013720 \0 \0 311 020 j 360 227 O 022 k 330 _ 022 260 253 023
0013740 @ K k 331 H 006 \0 \0 311 006 K 331 M 006 \0 \0
0013760 311 020 k 331 330 k 331 276 d N 361 221 277 N _ 016
0014000 277 j O 016 361 242 O 016 200 j \n \0 \0 h 020 \0
0014020 ( 3 0 3 Q E M A C S . S E T C
0014040 A R E T P T R 1 7 1 Q T Y P
0014060 E N A M E 1 5 7 Q \ T E D I
0014100 T . S C R O L L F N 1 1 4 Q
0014120 T Y P E N A M E 7 0 Q E M A
0014140 C S . N U M E R I C . A R G 3
0014160 7 Q F O N T H E I G H T ) \r (
0014200 2 4 6 Q L I N E D E S C R I P
0014220 T O R 2 3 6 Q S E L E C T I
0014240 O N 2 1 0 Q L I N E D E S C
0014260 R I P T O R 2 0 3 Q L I N E
0014300 D E S C R I P T O R 1 7 4 Q
0014320 L I N E D E S C R I P T O R 1
0014340 6 4 Q L I N E D E S C R I P T
0014360 O R 1 4 4 Q L I N E D E S C
0014400 R I P T O R 1 3 3 Q L I N E
0014420 D E S C R I P T O R 1 2 6 Q
0014440 L I N E D E S C R I P T O R 1
0014460 1 7 Q L I N E D E S C R I P T
0014500 O R 1 0 7 Q L I N E D E S C
0014520 R I P T O R 5 5 Q L I N E D
0014540 E S C R I P T O R 4 6 Q S E
0014560 L E C T I O N 3 2 Q C H A R
0014600 L O O K S 2 3 Q T E X T O B
0014620 J 1 6 Q S T R E A M 1 0 Q
0014640 T E X T O B J 3 S T R E A
0014660 M ) \r ( ) \r \ \ C O M . N E X T
0014700 . L I N E D 1 \r ( P 1 1 Q
0014720 I P 5 N E X T L I N E P
0014740 4 T H I S L I N E P 3
0014760 B O L P 2 H E I G H T P
0015000 1 W P 0 T H I S S E L
0015020 I 0 S T R E A M F 1 2
0015040 Q T E D I T . D E F A U L T .
0015060 C H A R L O O K S ) \0 316 \n 001 \0
0015100 001 @ 006 \0 \0 311 020 006 \0 \0 311 032 @ 006 \0 \0
0015120 311 020 006 \0 \0 311 020 W 024 006 \0 \0 311 \0 \t \0
0015140 \0 021 S \a H 006 \0 \0 311 016 \ d ] @ \t \0
0015160 \0 k 021 002 \t O 022 O 020 361 222 261 \0 221 M 006
0015200 \0 \0 311 \t \0 \0 g \0 \0 360 262 031 M 006 \0
0015220 \0 311 006 \0 \0 311 020 j 360 250 M 006 \0 \0 311
0015240 275 260 % I j J \t \0 \0 \v \0 \0 277 M 006
0015260 \0 \0 311 \t \0 \0 g \0 \0 360 M 006 \0 \0 311
0015300 006 \0 \0 277 263 G @ d \t \0 \0 H 006 \0 \0
0015320 311 006 L 006 \0 \0 311 020 331 M 006 \0 \0 311 " 006
0015340 \0 \0 311 022 330 276 d N 361 221 277 N M 006 \0 \0
0015360 311 022 k 331 _ 016 277 d O 016 361 222 277 O 016 \n
0015400 \0 \0 277 O 022 k 330 _ 022 261 377 n h 020 \0 (
0015420 3 0 0 Q E M A C S . S E T C A
0015440 R E T P T R 2 1 2 Q G E T E
0015460 O F P T R 1 6 5 Q T Y P E N
0015500 A M E 1 5 3 Q \ T E D I T .
0015520 S C R O L L F N 1 5 0 Q M I
0015540 N U S 1 0 5 Q T Y P E N A M
0015560 E 5 7 Q E M A C S . N U M E
0015600 R I C . A R G 3 7 Q F O N T
0015620 H E I G H T ) \r ( 2 5 6 Q L I
0015640 N E D E S C R I P T O R 2 4 0
0015660 Q L I N E D E S C R I P T O R
0015700 2 3 3 Q L I N E D E S C R I
0015720 P T O R 2 2 4 Q L I N E D E
0015740 S C R I P T O R 2 1 6 Q S E
0015760 L E C T I O N 2 0 2 Q L I N
0016000 E D E S C R I P T O R 1 7 5 Q
0016020 L I N E D E S C R I P T O R
0016040 1 7 0 Q L I N E D E S C R I P
0016060 T O R 1 6 0 Q L I N E D E S
0016100 C R I P T O R 1 3 5 Q L I N
0016120 E D E S C R I P T O R 1 2 4 Q
0016140 L I N E D E S C R I P T O R
0016160 1 1 7 Q L I N E D E S C R I P
0016200 T O R 1 1 0 Q L I N E D E S
0016220 C R I P T O R 1 0 0 Q L I N
0016240 E D E S C R I P T O R 4 6 Q
0016260 S E L E C T I O N 3 2 Q C H
0016300 A R L O O K S 2 3 Q T E X T
0016320 O B J 1 6 Q S T R E A M 1
0016340 0 Q T E X T O B J 3 S T R
0016360 E A M ) \r ( ) \r \ \ C O M . K I
0016400 L L . L I N E D 1 \r ( P 3
0016420 C R P 2 E O L P 1 P
0016440 O I N T P 0 T H I S L N
0016460 I 0 S T R E A M F 5 E
0016500 M A C S . N O N C R ) \0 h 005 001
0016520 \0 001 @ 006 \0 \0 311 020 006 \0 \0 311 032 006 \0 \0
0016540 311 016 @ \t \0 \0 021 2 004 H 006 \0 \0 311 022 k
0016560 331 Z @ U \n \0 \0 @ \t \0 \0 [ @ I K J
0016600 331 j 360 235 d J k 331 274 d L 361 263 032 277 L
0016620 260 026 J @ \t \0 \0 375 361 244 @ \t \0 \0 206 I
0016640 d J 361 241 277 J \v \0 \0 K J 361 264 \f @ \t
0016660 \0 \0 277 @ \t \0 \0 h 020 \0 ( 1 4 4 Q
0016700 \ B A C K B I N 1 3 7 Q T E
0016720 R P R I 1 2 6 Q E M A C S .
0016740 D E L E T E 1 1 3 Q G E T E
0016760 O F P T R 1 0 4 Q G E T E O
0017000 F P T R 5 0 Q G E T F I L E
0017020 P T R 4 4 Q E M A C S . S K
0017040 I P . S Y N T A X . F W D 2 3
0017060 Q E M A C S . G E T F I L E P
0017100 T R ) \r ( 3 2 Q L I N E D E S
0017120 C R I P T O R 1 5 Q S E L E
0017140 C T I O N 1 0 Q T E X T O B
0017160 J 3 S T R E A M ) \r ( ) \r \
0017200 \ C O M . F O R W A R D . P A R
0017220 A G R A P H D 1 \r ( I 0 S
0017240 T R E A M ) \0 006 \0 \0 \0 001 @ \t \0
0017260 \0 020 \0 ( 3 E M A C S . P A R A
0017300 . E N D ) \r N I L \r ( ) \r \ \ C
0017320 O M . B A C K W A R D S . P A R
0017340 A G R A P H D 1 \r ( I 0 S
0017360 T R E A M ) \0 006 \0 \0 \0 001 @ \t \0
0017400 \0 020 \0 ( 3 E M A C S . P A R A
0017420 . B E G I N N I N G ) \r N I L \r
0017440 ( ) \r \ \ C O M . W R I T E . F
0017460 I L E D 1 \r ( I 0 S T R E
0017500 A M ) \0 \b \0 \0 \0 001 @ h i \v \0 \0
0017520 020 \0 ( 5 E M A C S . P U T ) \r
0017540 N I L \r ( ) \r \ \ C O M . S A V
0017560 E . F I L E D 1 \r ( I 0 S
0017600 T R E A M ) \0 \a \0 \0 \0 001 @ i \n
0017620 \0 \0 020 \0 ( 4 E M A C S . P U T
0017640 ) \r N I L \r ( ) \r \ \ C O M . G
0017660 E T . F I L E D 1 \r ( I 0
0017700 S T R E A M ) \0 006 \0 \0 \0 001 @ \t
0017720 \0 \0 020 \0 ( 3 E M A C S . G E T
0017740 ) \r N I L \r ( ) \r \ \ C O M . I
0017760 N S E R T . F I L E D 1 \r ( I
0020000 0 S T R E A M ) \0 006 \0 \0 \0
0020020 001 @ \t \0 \0 020 \0 ( 3 T E D I T .
0020040 I N C L U D E ) \r N I L \r ( ) \r
0020060 \ \ C O M . L A S T . S C R E E
0020100 N F U L D 1 \r ( P 0 W I N
0020120 D O W I 0 S T R E A M )
0020140 \0 7 001 \0 \0 001 @ 006 \0 \0 311 020 \t \0 \0 021
0020160 001 \0 @ 006 \0 \0 311 020 006 \0 \0 h 024 F H j
0020200 h H \n \0 \0 \t \0 \0 h H \t \0 \0 311 \0 \n
0020220 \0 \0 002 002 002 001 331 \v \0 \0 h 020 \0 ( 6 3
0020240 Q \ T E D I T . S C R O L L F
0020260 N 5 3 Q D S P C L I P P I N
0020300 G R E G I O N 4 6 Q \ I N S
0020320 U R E W I N D O W 4 1 Q F O
0020340 N T H E I G H T 3 6 Q D S P
0020360 F O N T 1 0 Q \ T E D I T .
0020400 M A I N W ) \r ( 2 4 Q T E X T
0020420 O B J 1 7 Q S T R E A M 3
0020440 S T R E A M ) \r ( ) \r \ \ C O
0020460 M . N E X T . S C R E E N F U L
0020500 D 1 \r ( P 0 W I N D O W
0020520 I 0 S T R E A M ) \0 7 001 \0
0020540 \0 001 @ 006 \0 \0 311 020 \t \0 \0 021 001 \0 @ 006
0020560 \0 \0 311 020 006 \0 \0 h 024 F H j h H \t \0
0020600 \0 311 \0 \n \0 \0 002 002 002 001 h H \n \0 \0 \t
0020620 \0 \0 331 \v \0 \0 h 020 \0 ( 6 3 Q \ T
0020640 E D I T . S C R O L L F N 5 7
0020660 Q F O N T H E I G H T 5 4 Q
0020700 D S P F O N T 4 3 Q D S P
0020720 C L I P P I N G R E G I O N 3
0020740 6 Q \ I N S U R E W I N D O W
0020760 1 0 Q \ T E D I T . M A I N
0021000 W ) \r ( 2 4 Q T E X T O B J
0021020 1 7 Q S T R E A M 3 S T R
0021040 E A M ) \r ( ) \r \ \ C O M . E V
0021060 A L . F R O M . B U F F E R D
0021100 1 \r ( I 0 S T R E A M ) \0
0021120 021 \0 \0 \0 001 @ d \t \0 \0 \t \0 \0 o \0 \0
0021140 \0 \v \0 \0 020 \0 ( 1 6 Q T E D I T
0021160 . N O T I F Y 7 E V A L 4
0021200 R E A D ) \r N I L \r ( 1 3 Q
0021220 ( C L E A R W ) ) \r \ \ C O M
0021240 . F O R W A R D . S E X P R A 0
0021260 0 0 1 D 1 \r ( N A M E E R R
0021300 O R S E T L ( 2 E R R O R
0021320 S E T . W 1 E R R O R S E T
0021340 . V 0 E R R O R S E T . U )
0021360 F 0 S T R E A M ) \0 \a \0
0021400 001 \0 003 P \t \0 \0 i 020 \0 ( 3 E M A
0021420 C S . S E X P R . F W D ) \r N I
0021440 L \r ( ) \r \ \ C O M . F O R W A
0021460 R D . S E X P R D 1 \r ( I 0
0021500 S T R E A M ) \0 ' \0 \0 \0 001 o
0021520 \0 \0 \0 \t \0 \0 263 035 @ 006 \0 \0 311 020 \t \0
0021540 \0 l 002 \n \0 \0 @ o \0 \0 \0 o \0 \0 \0 \v
0021560 \0 \0 020 h 020 \0 ( 4 2 Q T E D I T
0021600 . N O T I F Y 2 6 Q F L A S
0021620 H W I N D O W 2 1 Q \ T E D
0021640 I T . M A I N W 6 \ \ C O M
0021660 . F O R W A R D . S E X P R A 0
0021700 0 0 1 ) \r ( 1 4 Q S T R E A M
0021720 ) \r ( 3 7 Q ( C L E A R W )
0021740 3 3 Q " U n b a l a n c e d
0021760 P a r e n t h e s i s " 3
0022000 ( D U M M Y . F O R . E R R O R
0022020 S E T ) ) \r \ \ C O M . B A C K
0022040 W A R D S . S E X P R A 0 0 0 1
0022060 D 1 \r ( N A M E E R R O R S
0022100 E T L ( 2 E R R O R S E T
0022120 . W 1 E R R O R S E T . V
0022140 0 E R R O R S E T . U ) F
0022160 0 S T R E A M ) \0 \a \0 001 \0 003
0022200 P \t \0 \0 i 020 \0 ( 3 E M A C S .
0022220 S E X P R . B A C K ) \r N I L \r
0022240 ( ) \r \ \ C O M . B A C K W A R
0022260 D S . S E X P R D 1 \r ( I 0
0022300 S T R E A M ) \0 ' \0 \0 \0 001 o
0022320 \0 \0 \0 \t \0 \0 263 035 @ 006 \0 \0 311 020 \t \0
0022340 \0 l 002 \n \0 \0 @ o \0 \0 \0 o \0 \0 \0 \v
0022360 \0 \0 020 h 020 \0 ( 4 2 Q T E D I T
0022400 . N O T I F Y 2 6 Q F L A S
0022420 H W I N D O W 2 1 Q \ T E D
0022440 I T . M A I N W 6 \ \ C O M
0022460 . B A C K W A R D S . S E X P R
0022500 A 0 0 0 1 ) \r ( 1 4 Q S T R E
0022520 A M ) \r ( 3 7 Q ( C L E A R
0022540 W ) 3 3 Q " U n b a l a n c
0022560 e d P a r e n t h e s i s "
0022600 3 ( D U M M Y . F O R . E R R
0022620 O R S E T ) ) \r \ \ C O M . K I
0022640 L L . S E X P R D 1 \r ( P 0
0022660 P T R I 0 S T R E A M )
0022700 \0 031 001 \0 \0 001 @ \t \0 \0 021 001 \0 @ \t
0022720 \0 \0 @ H @ \t \0 \0 k 331 \v \0 \0 h 020 \0
0022740 ( 2 5 Q E M A C S . D E L E T
0022760 E 2 0 Q E M A C S . G E T F
0023000 I L E P T R 1 2 Q E M A C S
0023020 . S E X P R . F W D 3 E M A
0023040 C S . G E T F I L E P T R ) \r N
0023060 I L \r ( ) \r \ \ C O M . T O P .
0023100 O F . D E F I N I T I O N D 1
0023120 \r ( I 0 S T R E A M F 0
0023140 E M A C S . N O N C R F 1
0023160 E M A C S . A R R A Y F 2
0023200 E M A C S . N O N W S ) \0 !
0023220 \0 003 \0 001 @ \t \0 \0 221 h 020 @ P \n \0 \0
0023240 277 Q @ \t \0 \0 ( R 345 j 360 264 357 @ \t \0
0023260 \0 277 260 342 \0 ( 3 4 Q E M A C S .
0023300 C H A R . B A C K 2 1 Q E M
0023320 A C S . P O I N T 1 3 Q E M
0023340 A C S . S K I P . S Y N T A X .
0023360 B A C K 3 E M A C S . B O F
0023400 P ) \r N I L \r ( ) \r \ \ C O M .
0023420 E N D . O F . D E F I N I T I O
0023440 N D 1 \r ( P 0 C O D E I
0023460 0 S T R E A M F 1 E M
0023500 A C S . N O N C R F 2 E M
0023520 A C S . A R R A Y F 3 E M
0023540 A C S . C R ) \0 # 001 003 \0 001 021 020
0023560 \0 @ \t \0 \0 263 031 @ Q \n \0 \0 277 @ \t \0
0023600 \0 277 R @ \t \0 \0 ( S 345 j 360 263 345 h 020
0023620 \0 ( 3 0 Q E M A C S . P O I N
0023640 T 2 2 Q E M A C S . C H A R
0023660 . F W D 1 5 Q E M A C S . S
0023700 K I P . S Y N T A X . F W D 6
0023720 E M A C S . E O F P ) \r N I L
0023740 \r ( ) \r \ \ C O M . G R I N D .
0023760 D E F I N I T I O N D 1 \r ( P
0024000 2 P T R 2 P 1 E X P R
0024020 P 0 P T R 1 I 0 S T
0024040 R E A M F 3 E M A C S . W
0024060 S ) \0 ) 003 001 \0 001 @ S \n \0 \0 @ \t
0024100 \0 \0 @ \t \0 \0 @ \t \0 \0 021 003 002 @ H J
0024120 k 331 \v \0 \0 I h d d d @ \r 006 \0 \0 h
0024140 020 \0 ( 4 5 Q P R I N T D E F
0024160 3 3 Q E M A C S . D E L E T E
0024200 2 0 Q G E T F I L E P T R
0024220 1 4 Q R E A D 1 0 Q G E T
0024240 F I L E P T R 4 E M A C S .
0024260 S K I P . S Y N T A X . F W D )
0024300 \r N I L \r ( ) \r E M A C S . K I
0024320 L L . W H I T E S P A C E . O N
0024340 . L I N E D 1 \r ( P 1 T H
0024360 E R E P 0 H E R E I 0
0024400 S T R E A M F 3 E M A C
0024420 S . W S F 4 E M A C S . C
0024440 R ) \0 : 003 002 \0 001 @ \t \0 \0 021 ! 002
0024460 @ S \n \0 \0 @ \t \0 \0 k 331 Y @ H \n \0
0024500 \0 @ T \n \0 \0 I @ \t \0 \0 k 331 272 d J
0024520 361 221 277 J Y d H 361 264 \t @ H I \v \0 \0
0024540 h 020 \0 ( 6 6 Q E M A C S . D E
0024560 L E T E 4 1 Q E M A C S . G
0024600 E T F I L E P T R 3 4 Q E M
0024620 A C S . S K I P T O . S Y N T A
0024640 X . F W D 2 7 Q E M A C S .
0024660 S E T F I L E P T R 1 7 Q E
0024700 M A C S . G E T F I L E P T R
0024720 1 3 Q E M A C S . S K I P . S
0024740 Y N T A X . F W D 3 E M A C
0024760 S . G E T F I L E P T R ) \r N I
0025000 L \r ( ) \r \ \ C O M . I N D E N
0025020 T . N E X T . L I N E D 1 \r (
0025040 I 0 S T R E A M ) \0 024 \0 \0
0025060 \0 001 @ \t \0 \0 @ d \t \0 \0 k 324 \n \0 \0
0025100 @ \t \0 \0 020 \0 ( 2 1 Q \ \ C O M
0025120 . I N D E N T . F O R . S E X P
0025140 R 1 5 Q E M A C S . S E T F
0025160 I L E P T R 1 0 Q E M A C S
0025200 . G E T F I L E P T R 3 T E
0025220 R P R I ) \r N I L \r ( ) \r \ \ C
0025240 O M . I N D E N T . F O R . S E
0025260 X P R D 1 \r ( P 2 I D X
0025300 P 1 O F F S E T P 0 H
0025320 E R E I 0 S T R E A M )
0025340 \0 @ 003 \0 \0 001 @ \t \0 \0 @ \t \0 \0 021 !
0025360 002 @ \t \0 \0 @ \t \0 \0 @ \t \0 \0 277 @ \t
0025400 \0 \0 325 Y @ H \n \0 \0 I j 361 234 @ I o
0025420 \0 \0 \0 \n \0 \0 \n \0 \0 277 @ H I 330 k 331
0025440 \n \0 \0 h 020 \0 ( 7 4 Q E M A C S
0025460 . S E T F I L E P T R 6 2 Q
0025500 T E D I T . I N S E R T 5 7 Q
0025520 A L L O C S T R I N G 4 2 Q
0025540 E M A C S . S E T F I L E P T
0025560 R 3 3 Q E M A C S . G E T F
0025600 I L E P T R 2 6 Q E M A C S
0025620 . B O L 2 2 Q E M A C S . G
0025640 E T F I L E P T R 1 6 Q E M
0025660 A C S . S E X P R . B A C K 7
0025700 E M A C S . G E T F I L E P T
0025720 R 3 E M A C S . K I L L . W
0025740 H I T E S P A C E . O N . L I N
0025760 E ) \r N I L \r ( 5 4 Q " "
0026000 ) \r E M A C S . F L A S H D 1
0026020 \r ( I 2 D U R A T I O N I
0026040 1 P O I N T I 0 S T R
0026060 E A M ) \0 031 \0 \0 \0 003 @ d \t \0 \0
0026100 k 330 k A i \r 005 \0 \0 @ i \n \0 \0 B \t
0026120 \0 \0 020 \0 ( 2 6 Q D I S M I S S
0026140 2 2 Q T E D I T . S H O W S
0026160 E L 1 5 Q T E D I T . S E T
0026200 S E L 4 E M A C S . G E T F
0026220 I L E P T R ) \r N I L \r ( ) \r E
0026240 M A C S . F L A S H . S E X P R
0026260 . B A C K A 0 0 0 1 D 1 \r ( N
0026300 A M E E R R O R S E T L (
0026320 2 E R R O R S E T . W 1 E
0026340 R R O R S E T . V 0 E R R O
0026360 R S E T . U ) F 0 S T R E
0026400 A M ) \0 \n \0 001 \0 003 P \t \0 \0 277 i
0026420 h 032 020 \0 ( 3 E M A C S . S E X
0026440 P R . B A C K ) \r N I L \r ( ) \r
0026460 E M A C S . F L A S H . S E X P
0026500 R . B A C K D 1 \r ( P 2 F
0026520 I N A L . P T R P 1 M A T
0026540 C H E D P 0 I N I T I A L
0026560 . P T R I 0 S T R E A M )
0026600 \0 N 003 \0 \0 001 @ \t \0 \0 o \0 \0 \0 \t
0026620 \0 \0 @ \t \0 \0 021 003 002 I 263 036 @ o \0 \0
0026640 \0 o \0 \0 \0 \v \0 \0 277 @ 006 \0 \0 311 020 \t
0026660 \0 \0 l 002 \n \0 \0 277 @ \t \0 \0 237 @ g \0
0026700 \0 I 222 l 310 202 n 003 350 \v \0 \0 277 @ H \n
0026720 \0 \0 h 020 \0 ( 1 1 2 Q E M A C S
0026740 . S E T C A R E T P T R 1 0 4
0026760 Q E M A C S . F L A S H 6 4
0027000 Q E M A C S . G E T F I L E P
0027020 T R 5 7 Q F L A S H W I N D
0027040 O W 5 2 Q \ T E D I T . M A
0027060 I N W 4 0 Q T E D I T . N O
0027100 T I F Y 1 6 Q E M A C S . G
0027120 E T F I L E P T R 1 2 Q E M
0027140 A C S . F L A S H . S E X P R .
0027160 B A C K A 0 0 0 1 3 E M A C
0027200 S . G E T F I L E P T R ) \r ( 7
0027220 1 Q R I G H T 4 5 Q S T R
0027240 E A M ) \r ( 3 5 Q ( C L E A
0027260 R W ) 3 1 Q " U n b a l a n
0027300 c e d P a r e n t h e s e s "
0027320 7 ( D U M M Y . F O R . E R
0027340 R O R S E T ) ) \r \ \ C O M . F
0027360 L A S H . P A R E N D 1 \r ( I
0027400 0 S T R E A M ) \0 \f \0 \0 \0
0027420 001 @ l ) \n \0 \0 @ \t \0 \0 020 \0 ( 1 1
0027440 Q E M A C S . F L A S H . S E
0027460 X P R . B A C K 5 \ B O U T
0027500 ) \r N I L \r ( ) \r \ \ C O M . F
0027520 L A S H . B R A C K E T D 1 \r
0027540 ( I 0 S T R E A M ) \0 \f \0
0027560 \0 \0 001 @ l ] \n \0 \0 @ \t \0 \0 020 \0 (
0027600 1 1 Q E M A C S . F L A S H .
0027620 S E X P R . B A C K 5 \ B O
0027640 U T ) \r N I L \r ( ) \r E M A C S
0027660 . P A R E N . F L A S H I N G .
0027700 O N D 1 \r N I L \0 022 \0 \0 \0 \0
0027720 l ) g \0 \0 \n \0 \0 l ] g \0 \0 \n \0 \0
0027740 020 \0 ( 1 7 Q E M A C S . M A K
0027760 E . C O M M A N D 7 E M A C
0030000 S . M A K E . C O M M A N D ) \r
0030020 ( 1 4 Q \ \ C O M . F L A S H
0030040 . B R A C K E T 4 \ \ C O M
0030060 . F L A S H . P A R E N ) \r ( )
0030100 \r E M A C S . P A R E N . F L A
0030120 S H I N G . O F F D 1 \r ( F
0030140 0 T E D I T . R E A D T A B L
0030160 E ) \0 020 \0 001 \0 \0 l ) h P \v \0 \0
0030200 l ] h P \v \0 \0 020 \0 ( 1 5 Q T E
0030220 D I T . S E T S Y N T A X 6
0030240 T E D I T . S E T S Y N T A X )
0030260 \r N I L \r ( ) \r D E D I T E m a
0030300 c s D 1 \r N I L \0 033 \0 \0 \0 \0
0030320 i \t \0 \0 \b \0 \0 \b \0 \0 001 \t \0 \0 h i
0030340 \v \0 \0 \t \0 \0 \n \0 \0 020 \0 ( 3 0 Q
0030360 D E D I T Z A P C A R 2 5 Q
0030400 R E A D 2 2 Q E M A C S 1
0030420 5 Q M K S T R I N G 1 1 Q
0030440 T O P S E L E C T I O N 6 T
0030460 O P S E L E C T I O N 3 C U
0030500 R S O R ) \r N I L \r ( ) \r \ \ C
0030520 O M . D E D I T . E X P R E S S
0030540 I O N D 1 \r ( P 2 P T R 2
0030560 P 1 E X P R P 0 P T
0030600 R 1 I 0 S T R E A M ) \0
0030620 ) 003 \0 \0 001 @ \t \0 \0 @ \t \0 \0 @ \t \0
0030640 \0 021 003 002 @ H J k 331 \v \0 \0 I \t \0 \0
0030660 Y d h d d d @ \r 006 \0 \0 h 020 \0 ( 4
0030700 5 Q P R I N T D E F 3 2 Q
0030720 E D I T E 2 6 Q E M A C S .
0030740 D E L E T E 1 3 Q G E T F I
0030760 L E P T R 7 R E A D 3 G
0031000 E T F I L E P T R ) \r N I L \r (
0031020 ) \r \ \ C O M . S N A R F . E X
0031040 P R E S S I O N . F R O M . D E
0031060 D I T D 1 \r ( I 0 S T R E
0031100 A M ) \0 017 \0 \0 \0 001 \b \0 \0 001 h d
0031120 d d @ \r 006 \0 \0 020 \0 ( 1 4 Q P R
0031140 I N T D E F 2 T O P S E L E
0031160 C T I O N ) \r N I L \r ( ) \r \ \
0031200 C O M . J U M P . T O . B E G I
0031220 N N I N G D 1 \r ( I 0 S T
0031240 R E A M ) \0 \a \0 \0 \0 001 @ j \n \0
0031260 \0 020 \0 ( 4 E M A C S . S E T F
0031300 I L E P T R ) \r N I L \r ( ) \r \
0031320 \ C O M . J U M P . T O . E N D
0031340 D 1 \r ( I 0 S T R E A M )
0031360 \0 \n \0 \0 \0 001 @ d \t \0 \0 \n \0 \0 020
0031400 \0 ( 7 E M A C S . S E T F I L
0031420 E P T R 4 G E T E O F P T R
0031440 ) \r N I L \r ( ) \r \ \ C O M . N
0031460 O T . M O D I F I E D D 1 \r (
0031500 I 0 S T R E A M ) \0 023 \0 \0
0031520 \0 001 @ i \n \0 \0 @ 006 \0 \0 311 020 \t \0 \0
0031540 \t \0 \0 020 \0 ( 2 0 Q E M A C S .
0031560 U P D A T E . M O D E L I N E
0031600 1 5 Q \ T E D I T . M A I N W
0031620 4 T E D I T . S T R E A M C
0031640 H A N G E D P ) \r ( 1 0 Q S T
0031660 R E A M ) \r ( ) \r \ \ C O M . U
0031700 N I V E R S A L . A R G U M E N
0031720 T D 1 \r ( P 0 W I N D O W
0031740 I 0 S T R E A M ) \0 037 001
0031760 \0 \0 001 @ 006 \0 \0 311 020 \t \0 \0 021 001 \0 H
0032000 g \0 \0 @ \t \0 \0 l 004 332 \v \0 \0 g \0 \0
0032020 020 \0 ( 3 1 Q P U T W I N D O W
0032040 P R O P 2 3 Q E M A C S . N
0032060 U M E R I C . A R G 1 0 Q \
0032100 T E D I T . M A I N W ) \r ( 3 4
0032120 Q N U M E R I C . A R G 1 7
0032140 Q N U M E R I C . A R G 3
0032160 S T R E A M ) \r ( ) \r \ \ C O M
0032200 . M E T A . A U T O A R G U M E
0032220 N T D 1 \r ( P 1 O L D V A
0032240 L P 0 W I N D O W I 1
0032260 Q T Y I 0 S T R E A M )
0032300 \0 * 002 \0 \0 002 @ 006 \0 \0 311 020 \t \0 \0
0032320 021 021 001 H g \0 \0 \n \0 \0 271 H g \0 \0 I
0032340 241 A 205 A I l \n 332 330 \v \0 \0 g \0 \0 020
0032360 \0 ( 4 4 Q P U T W I N D O W P
0032400 R O P 2 2 Q G E T W I N D O
0032420 W U S E R P R O P 1 0 Q \ T
0032440 E D I T . M A I N W ) \r ( 4 7 Q
0032460 N U M E R I C . A R G 2 7 Q
0032500 N U M E R I C . A R G 1 7 Q
0032520 N U M E R I C . A R G 3 S
0032540 T R E A M ) \r ( ) \r \ \ C O M .
0032560 J O I N . L I N E S D 1 \r ( P
0032600 6 P T R 2 P 5 P T R 1
0032620 P 4 P E O L P 3 P B
0032640 O L P 2 E O L P 1 B
0032660 O L P 0 P T R I 0 S
0032700 T R E A M F 1 0 Q E M A C
0032720 S . W S ) \0 g \b 001 \0 001 @ \t \0 \0
0032740 021 q \a @ H \n \0 \0 Y @ H \n \0 \0 Z I
0032760 k 331 \ @ L \n \0 \0 [ @ I \n \0 \0 @ W
0033000 020 \n \0 \0 @ \t \0 \0 d K 361 241 277 K ] @
0033020 I \n \0 \0 @ W 020 \n \0 \0 @ \t \0 \0 J k
0033040 330 _ 016 277 d O 016 361 222 277 O 016 ^ @ M \n
0033060 \0 \0 @ M N k 331 \v \0 \0 @ l \n \0 \0
0033100 h 020 \0 ( 1 4 3 Q \ B O U T 1
0033120 3 5 Q E M A C S . D E L E T E
0033140 1 2 5 Q E M A C S . S E T F
0033160 I L E P T R 1 0 1 Q E M A C
0033200 S . G E T F I L E P T R 7 5 Q
0033220 E M A C S . S K I P . S Y N T
0033240 A X . F W D 6 7 Q E M A C S
0033260 . S E T F I L E P T R 5 3 Q
0033300 E M A C S . G E T F I L E P T R
0033320 4 7 Q E M A C S . S K I P .
0033340 S Y N T A X . B A C K 4 1 Q
0033360 E M A C S . S E T F I L E P T R
0033400 3 3 Q E M A C S . B O L 2
0033420 1 Q E M A C S . E O L 1 3 Q
0033440 E M A C S . B O L 3 E M A
0033460 C S . G E T F I L E P T R ) \r N
0033500 I L \r ( ) \r \ \ C O M . Q U O T
0033520 E . N E X T . C H A R A C T E R
0033540 D 1 \r ( P 2 Q T Y P 1
0033560 P T R I 0 S T R E A M )
0033600 \0 H 003 \0 \0 001 @ \t \0 \0 @ \t \0 \0 021
0033620 001 \0 k H 361 241 H 200 k 022 021 002 002 @ o \0
0033640 \0 \0 o \0 \0 \0 \v \0 \0 @ J \b \0 \0 \n \0
0033660 \0 I k 330 \v \0 \0 @ J I 330 \n \0 \0 @ 006
0033700 \0 \0 311 020 006 \0 \0 311 V \t \0 \0 h 020 \0 (
0033720 1 0 4 Q C L E A R W 6 6 Q
0033740 E M A C S . S E T F I L E P T R
0033760 5 7 Q T E D I T . I N S E R
0034000 T 5 1 Q A L L O C S T R I N
0034020 G 4 6 Q T Y I 4 1 Q T E
0034040 D I T . N O T I F Y 7 E M A
0034060 C S . N U M E R I C . A R G 3
0034100 E M A C S . G E T F I L E P T
0034120 R ) \r ( 7 7 Q T E X T O B J
0034140 7 2 Q S T R E A M ) \r ( 3 6
0034160 Q ( C L E A R W ) 3 2 Q "
0034200 C - Q " ) \r \ \ C O M . R E D I
0034220 S P L A Y D 1 \r ( I 0 S T
0034240 R E A M ) \0 016 \0 \0 \0 001 @ 006 \0 \0
0034260 311 020 \t \0 \0 \t \0 \0 020 \0 ( 1 3 Q R
0034300 E D I S P L A Y W 1 0 Q \ T
0034320 E D I T . M A I N W ) \r ( 3 S
0034340 T R E A M ) \r ( ) \r \ \ C O M .
0034360 O P E N . L I N E D 1 \r ( P
0034400 2 I P 0 H E R E I 0
0034420 S T R E A M ) \0 ' 003 \0 \0 001 @
0034440 \t \0 \0 021 001 \0 @ \t \0 \0 k 021 002 002 J I
0034460 361 252 @ \t \0 \0 277 J k 330 Z 260 364 023 @ H
0034500 \n \0 \0 h 020 \0 ( 4 3 Q E M A C S
0034520 . S E T F I L E P T R 2 6 Q
0034540 T E R P R I 1 2 Q E M A C S
0034560 . N U M E R I C . A R G 3 E
0034600 M A C S . G E T F I L E P T R )
0034620 \r N I L \r ( ) \r \ \ C O M . D E
0034640 L E T E . B L A N K . L I N E S
0034660 D 1 \r ( P 2 S T A R T I
0034700 0 S T R E A M F 3 E M
0034720 A C S . W S ) \0 9 003 001 \0 001 @ S
0034740 \n \0 \0 @ \t \0 \0 @ \t \0 \0 k 330 021 002 001
0034760 H d I 361 221 277 I 022 021 001 002 @ S \n \0 \0
0035000 277 @ J @ \t \0 \0 k 331 \v \0 \0 023 @ \t \0
0035020 \0 @ \t \0 \0 020 \0 ( 6 6 Q \ B A C
0035040 K B I N 6 2 Q T E R P R I
0035060 5 5 Q E M A C S . D E L E T E
0035100 5 0 Q E M A C S . G E T F I
0035120 L E P T R 4 1 Q E M A C S .
0035140 S K I P . S Y N T A X . F W D
0035160 1 4 Q E M A C S . G E T F I L
0035200 E P T R 1 0 Q G E T E O F P
0035220 T R 4 E M A C S . S K I P .
0035240 S Y N T A X . B A C K ) \r N I L
0035260 \r ( ) \r \ \ C O M . Q U I T . E
0035300 M A C S D 1 \r ( P 1 A N S
0035320 P 0 W I N D O W I 0
0035340 S T R E A M F 2 E M A C S
0035360 . A L L . B U F F E R S ) \0 k
0035400 002 001 \0 001 @ 006 \0 \0 311 020 006 \0 \0 311 V 021
0035420 021 001 @ 006 \0 \0 311 020 006 \0 \0 311 . 262 0 H
0035440 \t \0 \0 263 * o \0 \0 \0 o \0 \0 \0 h H \f
0035460 \0 \0 Y 265 017 o \0 \0 \0 o \0 \0 \0 \n \0 \0
0035500 h 020 k ) o \0 \0 \0 \n \0 \0 262 352 @ 006 \0
0035520 \0 311 020 \t \0 \0 R \n \0 \0 c 004 277 @ i \n
0035540 \0 \0 277 @ 006 \0 \0 311 020 \t \0 \0 260 324 \0 (
0035560 1 4 7 Q T E D I T . Q U I T
0035600 1 3 5 Q T E D I T . S T R E A
0035620 M C H A N G E D P 1 2 5 Q D
0035640 R E M O V E 1 2 1 Q \ T E D
0035660 I T . M A I N W 1 0 6 Q M E
0035700 M B E R 7 3 Q T E D I T . N
0035720 O T I F Y 5 5 Q P R O M P T
0035740 F O R W O R D 3 6 Q C L E A
0035760 R W ) \r ( 1 4 2 Q S T R E A M
0036000 1 1 4 Q S T R E A M 2 6 Q
0036020 T E X T O B J 2 1 Q S T R
0036040 E A M 1 0 Q T E X T O B J
0036060 3 S T R E A M ) \r ( 1 0 3 Q
0036100 ( 1 3 1 Q 1 7 1 Q ) 7 0 Q
0036120 ( C L E A R W ) 6 4 Q " Q
0036140 u i t a b o r t e d " 5 0 Q
0036160 " Y e s " 4 4 Q " B u f f
0036200 e r h a s b e e n m o d i
0036220 f i e d ! A r e y o u s
0036240 u r e ? " ) \r \ \ C O M . H A R
0036260 D C O P Y . B U F F E R D 1 \r
0036300 ( P 0 P R E S S P I 0
0036320 S T R E A M ) \0 # 001 \0 \0 001 @ \t
0036340 \0 \0 @ \t \0 \0 021 001 \0 @ H 264 017 d 006 \0
0036360 \0 311 020 o \0 \0 \0 \n \0 \0 H \v \0 \0 h 020
0036400 \0 ( 3 7 Q T E D I T . H A R D
0036420 C O P Y 3 3 Q T E D I T . G
0036440 E T I N P U T 7 E M A C S .
0036460 N U M E R I C . A R G . P 3
0036500 \ \ C O M . J U M P . T O . B E
0036520 G I N N I N G ) \r ( 2 2 Q S T
0036540 R E A M ) \r ( 3 0 Q " P r e
0036560 s s F i l e n a m e : " ) \r \
0036600 \ C O M . S T R I N G . S E A R
0036620 C H . F O R W A R D D 1 \r ( P
0036640 0 T E X T O B J I 0 S
0036660 T R E A M ) \0 030 001 \0 \0 001 @ 006 \0
0036700 \0 311 020 021 001 \0 H d o \0 \0 \0 \n \0 \0 \n
0036720 \0 \0 h 020 \0 ( 2 4 Q T E D I T .
0036740 F I N D 2 1 Q T E D I T . G
0036760 E T I N P U T ) \r ( 3 S T R E
0037000 A M ) \r ( 1 6 Q " S e a r c
0037020 h s t r i n g : " ) \r \ \ C O
0037040 M . S T R I N G . R E P L A C E
0037060 D 1 \r ( P 0 T E X T O B J
0037100 I 0 S T R E A M ) \0 $ 001
0037120 \0 \0 001 @ 006 \0 \0 311 020 021 001 \0 H d o \0
0037140 \0 \0 \n \0 \0 H o \0 \0 \0 \n \0 \0 @ \t \0
0037160 \0 \f \0 \0 h 020 \0 ( 4 0 Q T E D I
0037200 T . S U B S T I T U T E 3 5 Q
0037220 E M A C S . N U M E R I C . A
0037240 R G . P 3 1 Q T E D I T . G
0037260 E T I N P U T 2 1 Q T E D I
0037300 T . G E T I N P U T ) \r ( 3 S
0037320 T R E A M ) \r ( 2 6 Q " R e
0037340 p l a c e m e n t s t r i n g
0037360 : " 1 6 Q " S e a r c h s
0037400 t r i n g : " ) \r ( P R E T T Y
0037420 C O M P R I N T C O M S C O M
0037440 S ) \r ( R P A Q Q C O M S C O
0037460 M S ( ( I N I T V A R S ( \
0037500 \ E M A C S . ^ X . D I S P A T
0037520 C H ( Q U O T E ( N I L ) )
0037540 ) ( \ \ E M A C S . M E T A .
0037560 D I S P A T C H ( Q U O T E
0037600 ( N I L ) ) ) ) \r ( F N S E
0037620 M A C S . A P P L Y * E M A C
0037640 S . C A L L F U N E M A C S .
0037660 C L O S E E M A C S . M A K E
0037700 . C O M M A N D T O U P P E R
0037720 T O L O W E R E M A C S . C
0037740 H A R A C T E R \r \ \ C O M .
0037760 E M A C S . D I S P A T C H . ^
0040000 X E M A C S . M A K E . ^ X .
0040020 C O M M A N D \ \ C O M . E M
0040040 A C S . D I S P A T C H . M E T
0040060 A E M A C S . M A K E . M E T
0040100 A . C O M M A N D \r \ \ C O M
0040120 . F O R W A R D . C H A R A C T
0040140 E R \ \ C O M . B A C K W A R
0040160 D S . C H A R A C T E R \ \ C
0040200 O M . D E L E T E . C H A R A C
0040220 T E R \ \ C O M . R U B O U T
0040240 \r \ \ C O M . T R A N S P O S
0040260 E . C H A R A C T E R S \ \ C
0040300 O M . F O R W A R D . W O R D
0040320 \ \ C O M . B A C K W A R D S .
0040340 W O R D \ \ C O M . D E L E T
0040360 E . W O R D . F O R W A R D \r
0040400 \ \ C O M . D E L E T E . W O R
0040420 D . B A C K W A R D \ \ C O M
0040440 . B E G I N N I N G . O F . L I
0040460 N E \ \ C O M . E N D . O F .
0040500 L I N E \ \ C O M . P R E V I
0040520 O U S . L I N E \r \ \ C O M .
0040540 N E X T . L I N E \ \ C O M .
0040560 K I L L . L I N E \ \ C O M .
0040600 F O R W A R D . P A R A G R A P
0040620 H \ \ C O M . B A C K W A R D
0040640 S . P A R A G R A P H \ \ C O
0040660 M . W R I T E . F I L E \r \ \
0040700 C O M . S A V E . F I L E \ \
0040720 C O M . G E T . F I L E \ \ C
0040740 O M . I N S E R T . F I L E \
0040760 \ C O M . L A S T . S C R E E N
0041000 F U L \ \ C O M . N E X T . S
0041020 C R E E N F U L \r \ \ C O M .
0041040 E V A L . F R O M . B U F F E R
0041060 \ \ C O M . F O R W A R D . S
0041100 E X P R \ \ C O M . B A C K W
0041120 A R D S . S E X P R \ \ C O M
0041140 . K I L L . S E X P R \r \ \ C
0041160 O M . T O P . O F . D E F I N I
0041200 T I O N \ \ C O M . E N D . O
0041220 F . D E F I N I T I O N \ \ C
0041240 O M . G R I N D . D E F I N I T
0041260 I O N E M A C S . K I L L . W
0041300 H I T E S P A C E . O N . L I N
0041320 E \r \ \ C O M . I N D E N T .
0041340 N E X T . L I N E \ \ C O M .
0041360 I N D E N T . F O R . S E X P R
0041400 E M A C S . F L A S H E M A
0041420 C S . F L A S H . S E X P R . B
0041440 A C K \ \ C O M . F L A S H .
0041460 P A R E N \r \ \ C O M . F L A
0041500 S H . B R A C K E T E M A C S
0041520 . P A R E N . F L A S H I N G .
0041540 O N E M A C S . P A R E N . F
0041560 L A S H I N G . O F F D E D I
0041600 T E m a c s \ \ C O M . D E D
0041620 I T . E X P R E S S I O N \r \
0041640 \ C O M . S N A R F . E X P R E
0041660 S S I O N . F R O M . D E D I T
0041700 \ \ C O M . J U M P . T O . B
0041720 E G I N N I N G \ \ C O M . J
0041740 U M P . T O . E N D \ \ C O M
0041760 . N O T . M O D I F I E D \r \
0042000 \ C O M . U N I V E R S A L . A
0042020 R G U M E N T \ \ C O M . M E
0042040 T A . A U T O A R G U M E N T
0042060 \ \ C O M . J O I N . L I N E S
0042100 \ \ C O M . Q U O T E . N E X
0042120 T . C H A R A C T E R \r \ \ C
0042140 O M . R E D I S P L A Y \ \ C
0042160 O M . O P E N . L I N E \ \ C
0042200 O M . D E L E T E . B L A N K .
0042220 L I N E S \ \ C O M . Q U I T
0042240 . E M A C S \ \ C O M . H A R
0042260 D C O P Y . B U F F E R \r \ \
0042300 C O M . S T R I N G . S E A R C
0042320 H . F O R W A R D \ \ C O M .
0042340 S T R I N G . R E P L A C E )
0042360 ( P ( T E D I T . S E T S Y N
0042400 T A X ( C H A R C O D E ^ Z
0042420 ) ( Q U O T E U N D O ) \r
0042440 T E D I T . R E A D T A B L E )
0042460 ( T E D I T . S E T S Y N T A
0042500 X ( C H A R C O D E ^ R )
0042520 ( Q U O T E R E D O ) T E D
0042540 I T . R E A D T A B L E ) ( T
0042560 E D I T . S E T S Y N T A X (
0042600 \r C H A R C O D E # K ) ( Q
0042620 U O T E D E L E T E ) T E D
0042640 I T . R E A D T A B L E ) ( T
0042660 E D I T . S E T S Y N T A X (
0042700 C H A R C O D E # k ) ( Q U
0042720 O T E D E L E T E ) \r T E D
0042740 I T . R E A D T A B L E ) ( E
0042760 M A C S . M A K E . C O M M A N
0043000 D ( C H A R C O D E ^ X )
0043020 ( Q U O T E \ \ C O M . E M A
0043040 C S . D I S P A T C H . ^ X )
0043060 \r " P r e f i x f o r o t h
0043100 e r c o m m a n d s . C -
0043120 X ? f o r a l i s t " )
0043140 ( E M A C S . M A K E . C O M
0043160 M A N D ( C H A R C O D E E
0043200 S C ) ( Q U O T E \r \ \ C O
0043220 M . E M A C S . D I S P A T C H
0043240 . M E T A ) " S e t s t h e
0043260 m e t a b i t f o r t h
0043300 e n e x t c h a r a c t e r
0043320 . " ) ( E M A C S . M A K E .
0043340 C O M M A N D ( C H A R C O D
0043360 E \r ^ F ) ( Q U O T E \ \
0043400 C O M . F O R W A R D . C H A R
0043420 A C T E R ) " M o v e f o r
0043440 w a r d a r g c h a r a c t
0043460 e r s " ) ( E M A C S . M A K
0043500 E . C O M M A N D ( C H A R C
0043520 O D E ^ B ) ( \r Q U O T E
0043540 \ \ C O M . B A C K W A R D S .
0043560 C H A R A C T E R ) " M o v e
0043600 b a c k a r g c h a r a c
0043620 t e r s " ) ( E M A C S . M A
0043640 K E . C O M M A N D ( C H A R
0043660 C O D E ^ D ) ( Q U O T E
0043700 \r \ \ C O M . D E L E T E . C H
0043720 A R A C T E R ) " D e l e t e
0043740 c h a r a c t e r ( s ) a t
0043760 p o i n t " ) ( E M A C S .
0044000 M A K E . C O M M A N D ( C H
0044020 A R C O D E D E L ) ( Q U O
0044040 T E \r \ \ C O M . R U B O U T
0044060 ) " D e l e t e c h a r a c
0044100 t e r ( s ) l e f t o f p
0044120 o i n t " ) ( E M A C S . M A
0044140 K E . C O M M A N D ( C H A R
0044160 C O D E ^ T ) ( Q U O T E
0044200 \r \ \ C O M . T R A N S P O S E
0044220 . C H A R A C T E R S ) \r " T
0044240 r a n s p o s e c h a r a c t
0044260 e r s b e t w e e n c a r e
0044300 t , e x c e p t a t E O L
0044320 ; t h e n t r a n s p o s e
0044340 t w o b e f o r e c a r e
0044360 t " ) ( \r E M A C S . M A K E
0044400 . M E T A . C O M M A N D ( C
0044420 H A R C O D E F ) ( Q U O T
0044440 E \ \ C O M . F O R W A R D .
0044460 W O R D ) " M o v e f o r w
0044500 a r d a r g w o r d s " )
0044520 ( \r E M A C S . M A K E . M E T
0044540 A . C O M M A N D ( C H A R C
0044560 O D E B ) ( Q U O T E \ \
0044600 C O M . B A C K W A R D S . W O
0044620 R D ) " M o v e b a c k a
0044640 r g w o r d s " ) ( \r E M A
0044660 C S . M A K E . M E T A . C O M
0044700 M A N D ( C H A R C O D E D
0044720 ) ( Q U O T E \ \ C O M . D
0044740 E L E T E . W O R D . F O R W A
0044760 R D ) " D e l e t e w o r d
0045000 s ( s ) a t p o i n t " )
0045020 ( \r E M A C S . M A K E . M E T
0045040 A . C O M M A N D ( C H A R C
0045060 O D E D E L ) ( Q U O T E
0045100 \ \ C O M . D E L E T E . W O R
0045120 D . B A C K W A R D ) \r " D e
0045140 l e t e w o r d s ( s ) l e
0045160 f t o f p o i n t " ) ( E
0045200 M A C S . M A K E . C O M M A N
0045220 D ( C H A R C O D E ^ A )
0045240 ( Q U O T E \ \ C O M . B E G
0045260 I N N I N G . O F . L I N E )
0045300 \r " G o t o l e f t e d g
0045320 e o f s c r e e n " ) ( E
0045340 M A C S . M A K E . C O M M A N
0045360 D ( C H A R C O D E ^ E )
0045400 ( Q U O T E \ \ C O M . E N D
0045420 . O F . L I N E ) \r " G o t
0045440 o r i g h t e d g e o f
0045460 l i n e " ) ( E M A C S . M A
0045500 K E . C O M M A N D ( C H A R
0045520 C O D E ^ P ) ( Q U O T E
0045540 \ \ C O M . P R E V I O U S . L
0045560 I N E ) \r " G o t o a r g
0045600 t h p r e v i o u s l i n e
0045620 " ) ( E M A C S . M A K E . C
0045640 O M M A N D ( C H A R C O D E
0045660 ^ N ) ( Q U O T E \ \ C O
0045700 M . N E X T . L I N E ) \r " G
0045720 o t o a r g t h n e x t
0045740 l i n e " ) ( E M A C S . M A
0045760 K E . C O M M A N D ( C H A R
0046000 C O D E ^ K ) ( Q U O T E
0046020 \ \ C O M . K I L L . L I N E )
0046040 \r " K i l l f r o m h e r
0046060 e t o E O L " ) ( E M A C
0046100 S . M A K E . M E T A . C O M M
0046120 A N D ( C H A R C O D E % ]
0046140 ) ( Q U O T E \ \ C O M . F
0046160 O R W A R D . P A R A G R A P H
0046200 ) \r " G o t o e n d o f
0046220 p a r a g r a p h " ) ( E M
0046240 A C S . M A K E . M E T A . C O
0046260 M M A N D ( C H A R C O D E
0046300 % [ ) ( Q U O T E \ \ C O M
0046320 . B A C K W A R D S . P A R A G
0046340 R A P H ) \r " G o t o s t
0046360 a r t o f p a r a g r a p h
0046400 " ) ( E M A C S . M A K E . ^
0046420 X . C O M M A N D ( C H A R C
0046440 O D E ^ W ) ( Q U O T E \
0046460 \ C O M . W R I T E . F I L E )
0046500 \r " P r o m p t s f o r f
0046520 i l e n a m e a n d w r i t
0046540 e s f i l e " ) ( E M A C S
0046560 . M A K E . ^ X . C O M M A N D
0046600 ( C H A R C O D E ^ S ) (
0046620 Q U O T E \ \ C O M . S A V E
0046640 . F I L E ) \r " S a v e f
0046660 i l e t o l a s t f i l e
0046700 n a m e w r i t t e n t o ,
0046720 o r f i l e n a m e r e a
0046740 d f r o m " ) ( E M A C S .
0046760 M A K E . ^ X . C O M M A N D
0047000 ( C H A R C O D E ^ F ) \r (
0047020 Q U O T E \ \ C O M . G E T .
0047040 F I L E ) " L o a d s a f
0047060 i l e i n t o t h e b u f
0047100 f e r " ) ( E M A C S . M A K
0047120 E . ^ X . C O M M A N D ( C H
0047140 A R C O D E ^ V ) ( Q U O T
0047160 E \r \ \ C O M . G E T . F I L
0047200 E ) ) ( E M A C S . M A K E .
0047220 ^ X . C O M M A N D ( C H A R
0047240 C O D E I ) ( Q U O T E \
0047260 \ C O M . I N S E R T . F I L E
0047300 ) \r " I n s e r t s a f i
0047320 l e a t p o i n t " ) ( E
0047340 M A C S . M A K E . M E T A . C
0047360 O M M A N D ( C H A R C O D E
0047400 V ) ( Q U O T E \ \ C O M
0047420 . L A S T . S C R E E N F U L )
0047440 \r " B a c k u p a s c r
0047460 e e n f u l " ) ( E M A C S .
0047500 M A K E . C O M M A N D ( C H
0047520 A R C O D E ^ V ) ( Q U O T
0047540 E \ \ C O M . N E X T . S C R
0047560 E E N F U L ) \r " S u p p o s
0047600 e d l y d i s p l a y s n e
0047620 x t s c r e e n f u l " ) (
0047640 E M A C S . M A K E . ^ X . C O
0047660 M M A N D ( C H A R C O D E
0047700 ^ Z ) ( Q U O T E \r \ \ C O
0047720 M . E V A L . F R O M . B U F F
0047740 E R ) " R e a d s f o r m
0047760 l e f t o f p o i n t a n
0050000 d E V A L u a t e s i t .
0050020 R e t u r n e d v a l u e
0050040 i n e c h o a r e a . " )
0050060 ( \r E M A C S . M A K E . M E
0050100 T A . C O M M A N D ( C H A R
0050120 C O D E ^ F ) ( Q U O T E
0050140 \ \ C O M . F O R W A R D . S E
0050160 X P R ) " F o r w a r d o n
0050200 e S e x p r " ) ( \r E M A C
0050220 S . M A K E . M E T A . C O M M
0050240 A N D ( C H A R C O D E ^ B
0050260 ) ( Q U O T E \ \ C O M . B
0050300 A C K W A R D S . S E X P R )
0050320 " B a c k w a r d s o n e S
0050340 e x p r " ) ( \r E M A C S . M
0050360 A K E . M E T A . C O M M A N D
0050400 ( C H A R C O D E ^ K ) (
0050420 Q U O T E \ \ C O M . K I L L
0050440 . S E X P R ) " K i l l S e
0050460 x p r t o r i g h t o f
0050500 p o i n t " ) ( \r E M A C S .
0050520 M A K E . M E T A . C O M M A N
0050540 D ( C H A R C O D E ^ A )
0050560 ( Q U O T E \ \ C O M . T O P
0050600 . O F . D E F I N I T I O N )
0050620 " G o t o t o p o f d e
0050640 f i n i t i o n " ) ( \r E M A
0050660 C S . M A K E . M E T A . C O M
0050700 M A N D ( C H A R C O D E ^
0050720 E ) ( Q U O T E \ \ C O M .
0050740 E N D . O F . D E F I N I T I O
0050760 N ) " G o t o e n d o f
0051000 d e f i n i t i o n " ) ( \r
0051020 E M A C S . M A K E . M E T A .
0051040 C O M M A N D ( C H A R C O D
0051060 E G ) ( Q U O T E \ \ C O
0051100 M . G R I N D . D E F I N I T I
0051120 O N ) \r " G r i n d S e x p
0051140 r t o r i g h t o f p o
0051160 i n t i n t o b u f f e r "
0051200 ) ( E M A C S . M A K E . C O
0051220 M M A N D ( C H A R C O D E
0051240 L F ) ( Q U O T E \r \ \ C O
0051260 M . I N D E N T . N E X T . L I
0051300 N E ) " S u p p o s e d l y
0051320 i n d e n t s n e x t l i n
0051340 e c o r r e c t l y " ) ( E
0051360 M A C S . M A K E . C O M M A N
0051400 D ( C H A R C O D E T A B )
0051420 ( \r Q U O T E \ \ C O M . I
0051440 N D E N T . F O R . S E X P R )
0051460 " S u p p o s e d l y i n d
0051500 e n t s c u r r e n t l i n
0051520 e c o r r e c t l y " ) ( E
0051540 M A C S . M A K E . ^ X . C O M
0051560 M A N D ( \r C H A R C O D E
0051600 D ) ( Q U O T E \ \ C O M .
0051620 D E D I T . E X P R E S S I O N
0051640 ) " C a l l D E d i t o n
0051660 f o r m t o r i g h t o
0051700 f p o i n t " ) ( \r E M A C
0051720 S . M A K E . ^ X . C O M M A N
0051740 D ( C H A R C O D E ^ D )
0051760 ( Q U O T E \ \ C O M . S N A
0052000 R F . E X P R E S S I O N . F R
0052020 O M . D E D I T ) \r " G r a b
0052040 s s e l e c t i o n f r o m
0052060 D E d i t " ) ( E M A C S .
0052100 M A K E . M E T A . C O M M A N
0052120 D ( C H A R C O D E < ) (
0052140 Q U O T E \ \ C O M . J U M P
0052160 . T O . B E G I N N I N G ) \r
0052200 " G o t o b e g i n n i n g
0052220 o f f i l e " ) ( E M A C
0052240 S . M A K E . M E T A . C O M M
0052260 A N D ( C H A R C O D E > )
0052300 ( Q U O T E \ \ C O M . J U
0052320 M P . T O . E N D ) \r " G o
0052340 t o e n d o f f i l e " )
0052360 ( E M A C S . M A K E . M E T
0052400 A . C O M M A N D ( C H A R C
0052420 O D E ~ ) ( Q U O T E \ \
0052440 C O M . N O T . M O D I F I E D
0052460 ) \r " F o r g e t t h a t
0052500 b u f f e r h a s b e e n
0052520 m o d i f i e d " ) ( E M A C
0052540 S . M A K E . C O M M A N D (
0052560 C H A R C O D E ^ U ) ( Q U
0052600 O T E \r \ \ C O M . U N I V E
0052620 R S A L . A R G U M E N T ) "
0052640 M u l t i p l y c u r r e n t
0052660 a r g b y 4 " ) ( f o r
0052700 I f r o m ( C H A R C O D
0052720 E 0 ) t o ( C H A R C O D
0052740 E 9 ) d o ( \r E M A C S .
0052760 M A K E . M E T A . C O M M A N
0053000 D I ( L I S T ( Q U O T E
0053020 L A M B D A ) ( Q U O T E
0053040 ( S T R E A M ) ) ( L I S T
0053060 ( Q U O T E \ \ C O M . M E T
0053100 A . A U T O A R G U M E N T )
0053120 \r ( Q U O T E S T R E A M )
0053140 ( I D I F F E R E N C E I (
0053160 C H A R C O D E 0 ) ) ) ) "
0053200 T y p e v a l u e a s a r
0053220 g u m e n t " ) ) ( E M A C S
0053240 . M A K E . M E T A . C O M M A
0053260 N D ( \r C H A R C O D E ^ )
0053300 ( Q U O T E \ \ C O M . J O
0053320 I N . L I N E S ) " D e l e t
0053340 e s w h i t e s p a c e b e
0053360 t w e e n l i n e s " ) ( E
0053400 M A C S . M A K E . C O M M A N
0053420 D ( C H A R C O D E \r ^ Q )
0053440 ( Q U O T E \ \ C O M . Q U
0053460 O T E . N E X T . C H A R A C T
0053500 E R ) " Q u o t e s n e x t
0053520 c h a r a c t e r " ) ( E M
0053540 A C S . M A K E . C O M M A N D
0053560 ( C H A R C O D E ^ L ) (
0053600 \r Q U O T E \ \ C O M . R E D
0053620 I S P L A Y ) " R e d i s p l
0053640 a y b u f f e r " ) ( E M A
0053660 C S . M A K E . C O M M A N D
0053700 ( C H A R C O D E ^ O ) ( Q
0053720 U O T E \ \ C O M . O P E N .
0053740 L I N E ) \r " I n s e r t a
0053760 r g b l a n k l i n e s a
0054000 t p o i n t " ) ( E M A C S
0054020 . M A K E . ^ X . C O M M A N D
0054040 ( C H A R C O D E ^ O ) (
0054060 Q U O T E \r \ \ C O M . D E L
0054100 E T E . B L A N K . L I N E S )
0054120 " C l o s e a l l b u t
0054140 o n e b l a n k l i n e a
0054160 r o u n d p o i n t " ) ( E
0054200 M A C S . M A K E . ^ X . C O M
0054220 M A N D ( \r C H A R C O D E
0054240 Q ) ( Q U O T E \ \ C O M .
0054260 Q U I T . E M A C S ) " E x i
0054300 t E M A C S " ) ( E M A C S
0054320 . M A K E . ^ X . C O M M A N D
0054340 ( C H A R C O D E ^ Q ) (
0054360 Q U O T E \r \ \ C O M . Q U I
0054400 T . E M A C S ) " E x i t E
0054420 M A C S " ) ( E M A C S . M A
0054440 K E . ^ X . C O M M A N D ( C
0054460 H A R C O D E H ) ( Q U O T
0054500 E \ \ C O M . H A R D C O P Y
0054520 . B U F F E R ) \r " H a r d c
0054540 o p y b u f f e r . A r g
0054560 m e a n s c r e a t e p r
0054600 e s s f i l e . " ) ( E M A
0054620 C S . M A K E . C O M M A N D
0054640 ( C H A R C O D E ^ S ) ( Q
0054660 U O T E \r \ \ C O M . S T R I
0054700 N G . S E A R C H . F O R W A R
0054720 D ) " S e a r c h f o r w a
0054740 r d f o r a s t r i n g "
0054760 ) ( E M A C S . M A K E . M E
0055000 T A . C O M M A N D ( C H A R
0055020 C O D E % % ) ( \r Q U O T E
0055040 \ \ C O M . S T R I N G . S E
0055060 A R C H . F O R W A R D ) \r "
0055100 S e a r c h f o r w a r d f
0055120 o r a s t r i n g , r e p
0055140 l a c i n g i t w i t h a
0055160 n o t h e r . \r A r g u m e n t
0055200 m e a n s q u e r y e a c
0055220 h r e p l a c e m e n t " ) )
0055240 ) ) \r ( R P A Q ? \ \ E M A C
0055260 S . ^ X . D I S P A T C H ( Q
0055300 U O T E ( N I L ) ) ) \r ( R P
0055320 A Q ? \ \ E M A C S . M E T A
0055340 . D I S P A T C H ( Q U O T E
0055360 ( N I L ) ) ) \r ( T E D I T .
0055400 S E T S Y N T A X ( C H A R C
0055420 O D E ^ Z ) ( Q U O T E U
0055440 N D O ) T E D I T . R E A D T
0055460 A B L E ) \r ( T E D I T . S E T
0055500 S Y N T A X ( C H A R C O D E
0055520 ^ R ) ( Q U O T E R E D O
0055540 ) T E D I T . R E A D T A B L
0055560 E ) \r ( T E D I T . S E T S Y N
0055600 T A X ( C H A R C O D E # K
0055620 ) ( Q U O T E D E L E T E )
0055640 T E D I T . R E A D T A B L E
0055660 ) \r ( T E D I T . S E T S Y N T
0055700 A X ( C H A R C O D E # k )
0055720 ( Q U O T E D E L E T E )
0055740 T E D I T . R E A D T A B L E )
0055760 \r ( E M A C S . M A K E . C O M
0056000 M A N D ( C H A R C O D E ^
0056020 X ) ( Q U O T E \ \ C O M .
0056040 E M A C S . D I S P A T C H . ^
0056060 X ) \r " P r e f i x f o r
0056100 o t h e r c o m m a n d s .
0056120 C - X ? f o r a l i s
0056140 t " ) \r ( E M A C S . M A K E .
0056160 C O M M A N D ( C H A R C O D
0056200 E E S C ) ( Q U O T E \ \
0056220 C O M . E M A C S . D I S P A T
0056240 C H . M E T A ) \r " S e t s
0056260 t h e m e t a b i t f o r
0056300 t h e n e x t c h a r a c
0056320 t e r . " ) \r ( E M A C S . M A
0056340 K E . C O M M A N D ( C H A R
0056360 C O D E ^ F ) ( Q U O T E
0056400 \ \ C O M . F O R W A R D . C H
0056420 A R A C T E R ) " M o v e f
0056440 o r w a r d a r g c h a r a
0056460 c t e r s " ) \r ( E M A C S . M
0056500 A K E . C O M M A N D ( C H A
0056520 R C O D E ^ B ) ( Q U O T E
0056540 \ \ C O M . B A C K W A R D S
0056560 . C H A R A C T E R ) " M o v
0056600 e b a c k a r g c h a r a
0056620 c t e r s " ) \r ( E M A C S . M
0056640 A K E . C O M M A N D ( C H A
0056660 R C O D E ^ D ) ( Q U O T E
0056700 \ \ C O M . D E L E T E . C H
0056720 A R A C T E R ) " D e l e t e
0056740 c h a r a c t e r ( s ) a t
0056760 p o i n t " ) \r ( E M A C S .
0057000 M A K E . C O M M A N D ( C H
0057020 A R C O D E D E L ) ( Q U O
0057040 T E \ \ C O M . R U B O U T )
0057060 " D e l e t e c h a r a c t
0057100 e r ( s ) l e f t o f p o
0057120 i n t " ) \r ( E M A C S . M A K
0057140 E . C O M M A N D ( C H A R C
0057160 O D E ^ T ) ( Q U O T E \
0057200 \ C O M . T R A N S P O S E . C
0057220 H A R A C T E R S ) \r " T r a
0057240 n s p o s e c h a r a c t e r
0057260 s b e t w e e n c a r e t ,
0057300 e x c e p t a t E O L ;
0057320 t h e n t r a n s p o s e t
0057340 w o b e f o r e c a r e t "
0057360 ) \r ( E M A C S . M A K E . M E
0057400 T A . C O M M A N D ( C H A R
0057420 C O D E F ) ( Q U O T E \
0057440 \ C O M . F O R W A R D . W O R
0057460 D ) " M o v e f o r w a r d
0057500 a r g w o r d s " ) \r ( E M
0057520 A C S . M A K E . M E T A . C O
0057540 M M A N D ( C H A R C O D E
0057560 B ) ( Q U O T E \ \ C O M .
0057600 B A C K W A R D S . W O R D )
0057620 " M o v e b a c k a r g w
0057640 o r d s " ) \r ( E M A C S . M A
0057660 K E . M E T A . C O M M A N D
0057700 ( C H A R C O D E D ) ( Q U
0057720 O T E \ \ C O M . D E L E T E
0057740 . W O R D . F O R W A R D ) "
0057760 D e l e t e w o r d s ( s )
0060000 a t p o i n t " ) \r ( E M A C
0060020 S . M A K E . M E T A . C O M M
0060040 A N D ( C H A R C O D E D E
0060060 L ) ( Q U O T E \ \ C O M .
0060100 D E L E T E . W O R D . B A C K
0060120 W A R D ) \r " D e l e t e w
0060140 o r d s ( s ) l e f t o f
0060160 p o i n t " ) \r ( E M A C S . M
0060200 A K E . C O M M A N D ( C H A
0060220 R C O D E ^ A ) ( Q U O T E
0060240 \ \ C O M . B E G I N N I N G
0060260 . O F . L I N E ) " G o t o
0060300 l e f t e d g e o f s c
0060320 r e e n " ) \r ( E M A C S . M A
0060340 K E . C O M M A N D ( C H A R
0060360 C O D E ^ E ) ( Q U O T E
0060400 \ \ C O M . E N D . O F . L I N
0060420 E ) " G o t o r i g h t
0060440 e d g e o f l i n e " ) \r (
0060460 E M A C S . M A K E . C O M M A
0060500 N D ( C H A R C O D E ^ P )
0060520 ( Q U O T E \ \ C O M . P R
0060540 E V I O U S . L I N E ) " G o
0060560 t o a r g t h p r e v i o
0060600 u s l i n e " ) \r ( E M A C S
0060620 . M A K E . C O M M A N D ( C
0060640 H A R C O D E ^ N ) ( Q U O
0060660 T E \ \ C O M . N E X T . L I
0060700 N E ) " G o t o a r g t h
0060720 n e x t l i n e " ) \r ( E M
0060740 A C S . M A K E . C O M M A N D
0060760 ( C H A R C O D E ^ K ) (
0061000 Q U O T E \ \ C O M . K I L L
0061020 . L I N E ) " K i l l f r o
0061040 m h e r e t o E O L " ) \r
0061060 ( E M A C S . M A K E . M E T A
0061100 . C O M M A N D ( C H A R C O
0061120 D E % ] ) ( Q U O T E \ \
0061140 C O M . F O R W A R D . P A R A
0061160 G R A P H ) " G o t o e n
0061200 d o f p a r a g r a p h " )
0061220 \r ( E M A C S . M A K E . M E T
0061240 A . C O M M A N D ( C H A R C
0061260 O D E % [ ) ( Q U O T E \
0061300 \ C O M . B A C K W A R D S . P
0061320 A R A G R A P H ) " G o t o
0061340 s t a r t o f p a r a g r
0061360 a p h " ) \r ( E M A C S . M A K
0061400 E . ^ X . C O M M A N D ( C H
0061420 A R C O D E ^ W ) ( Q U O T
0061440 E \ \ C O M . W R I T E . F I
0061460 L E ) " P r o m p t s f o r
0061500 f i l e n a m e a n d w r
0061520 i t e s f i l e " ) \r ( E M A
0061540 C S . M A K E . ^ X . C O M M A
0061560 N D ( C H A R C O D E ^ S )
0061600 ( Q U O T E \ \ C O M . S A
0061620 V E . F I L E ) \r " S a v e
0061640 f i l e t o l a s t f i
0061660 l e n a m e w r i t t e n t
0061700 o , o r f i l e n a m e r
0061720 e a d f r o m " ) \r ( E M A C
0061740 S . M A K E . ^ X . C O M M A N
0061760 D ( C H A R C O D E ^ F )
0062000 ( Q U O T E \ \ C O M . G E T
0062020 . F I L E ) " L o a d s a
0062040 f i l e i n t o t h e b u
0062060 f f e r " ) \r ( E M A C S . M A
0062100 K E . ^ X . C O M M A N D ( C
0062120 H A R C O D E ^ V ) ( Q U O
0062140 T E \ \ C O M . G E T . F I L
0062160 E ) ) \r ( E M A C S . M A K E .
0062200 ^ X . C O M M A N D ( C H A R
0062220 C O D E I ) ( Q U O T E \
0062240 \ C O M . I N S E R T . F I L E
0062260 ) " I n s e r t s a f i l
0062300 e a t p o i n t " ) \r ( E M
0062320 A C S . M A K E . M E T A . C O
0062340 M M A N D ( C H A R C O D E
0062360 V ) ( Q U O T E \ \ C O M .
0062400 L A S T . S C R E E N F U L )
0062420 " B a c k u p a s c r e e
0062440 n f u l " ) \r ( E M A C S . M A
0062460 K E . C O M M A N D ( C H A R
0062500 C O D E ^ V ) ( Q U O T E
0062520 \ \ C O M . N E X T . S C R E E
0062540 N F U L ) " S u p p o s e d l
0062560 y d i s p l a y s n e x t
0062600 s c r e e n f u l " ) \r ( E M A
0062620 C S . M A K E . ^ X . C O M M A
0062640 N D ( C H A R C O D E ^ Z )
0062660 ( Q U O T E \ \ C O M . E V
0062700 A L . F R O M . B U F F E R )
0062720 \r " R e a d s f o r m l e f
0062740 t o f p o i n t a n d E
0062760 V A L u a t e s i t . R
0063000 e t u r n e d v a l u e i n
0063020 e c h o a r e a . " ) \r ( E
0063040 M A C S . M A K E . M E T A . C
0063060 O M M A N D ( C H A R C O D E
0063100 ^ F ) ( Q U O T E \ \ C O
0063120 M . F O R W A R D . S E X P R )
0063140 " F o r w a r d o n e S e
0063160 x p r " ) \r ( E M A C S . M A K
0063200 E . M E T A . C O M M A N D (
0063220 C H A R C O D E ^ B ) ( Q U
0063240 O T E \ \ C O M . B A C K W A
0063260 R D S . S E X P R ) " B a c k
0063300 w a r d s o n e S e x p r "
0063320 ) \r ( E M A C S . M A K E . M E
0063340 T A . C O M M A N D ( C H A R
0063360 C O D E ^ K ) ( Q U O T E
0063400 \ \ C O M . K I L L . S E X P R
0063420 ) " K i l l S e x p r t o
0063440 r i g h t o f p o i n t "
0063460 ) \r ( E M A C S . M A K E . M E
0063500 T A . C O M M A N D ( C H A R
0063520 C O D E ^ A ) ( Q U O T E
0063540 \ \ C O M . T O P . O F . D E F
0063560 I N I T I O N ) " G o t o
0063600 t o p o f d e f i n i t i o
0063620 n " ) \r ( E M A C S . M A K E .
0063640 M E T A . C O M M A N D ( C H
0063660 A R C O D E ^ E ) ( Q U O T
0063700 E \ \ C O M . E N D . O F . D
0063720 E F I N I T I O N ) " G o t
0063740 o e n d o f d e f i n i t
0063760 i o n " ) \r ( E M A C S . M A K
0064000 E . M E T A . C O M M A N D (
0064020 C H A R C O D E G ) ( Q U O
0064040 T E \ \ C O M . G R I N D . D
0064060 E F I N I T I O N ) \r " G r i
0064100 n d S e x p r t o r i g h
0064120 t o f p o i n t i n t o
0064140 b u f f e r " ) \r ( E M A C S .
0064160 M A K E . C O M M A N D ( C H
0064200 A R C O D E L F ) ( Q U O T
0064220 E \ \ C O M . I N D E N T . N
0064240 E X T . L I N E ) \r " S u p p
0064260 o s e d l y i n d e n t s n
0064300 e x t l i n e c o r r e c t
0064320 l y " ) \r ( E M A C S . M A K E
0064340 . C O M M A N D ( C H A R C O
0064360 D E T A B ) ( Q U O T E \
0064400 \ C O M . I N D E N T . F O R .
0064420 S E X P R ) \r " S u p p o s e
0064440 d l y i n d e n t s c u r r
0064460 e n t l i n e c o r r e c t
0064500 l y " ) \r ( E M A C S . M A K E
0064520 . ^ X . C O M M A N D ( C H A
0064540 R C O D E D ) ( Q U O T E
0064560 \ \ C O M . D E D I T . E X P R
0064600 E S S I O N ) \r " C a l l D
0064620 E d i t o n f o r m t o
0064640 r i g h t o f p o i n t " )
0064660 \r ( E M A C S . M A K E . ^ X .
0064700 C O M M A N D ( C H A R C O D
0064720 E ^ D ) ( Q U O T E \ \ C
0064740 O M . S N A R F . E X P R E S S
0064760 I O N . F R O M . D E D I T )
0065000 \r " G r a b s s e l e c t i o
0065020 n f r o m D E d i t " ) \r (
0065040 E M A C S . M A K E . M E T A .
0065060 C O M M A N D ( C H A R C O D
0065100 E < ) ( Q U O T E \ \ C O
0065120 M . J U M P . T O . B E G I N N
0065140 I N G ) " G o t o b e g i
0065160 n n i n g o f f i l e " ) \r
0065200 ( E M A C S . M A K E . M E T A
0065220 . C O M M A N D ( C H A R C O
0065240 D E > ) ( Q U O T E \ \ C
0065260 O M . J U M P . T O . E N D )
0065300 " G o t o e n d o f f i
0065320 l e " ) \r ( E M A C S . M A K E
0065340 . M E T A . C O M M A N D ( C
0065360 H A R C O D E ~ ) ( Q U O T
0065400 E \ \ C O M . N O T . M O D I
0065420 F I E D ) \r " F o r g e t t
0065440 h a t b u f f e r h a s b
0065460 e e n m o d i f i e d " ) \r (
0065500 E M A C S . M A K E . C O M M A
0065520 N D ( C H A R C O D E ^ U )
0065540 ( Q U O T E \ \ C O M . U N
0065560 I V E R S A L . A R G U M E N T
0065600 ) " M u l t i p l y c u r r
0065620 e n t a r g b y 4 " ) \r (
0065640 f o r I f r o m ( C H A R
0065660 C O D E 0 ) t o ( C H A R
0065700 C O D E 9 ) d o ( E M A C
0065720 S . M A K E . M E T A . C O M M
0065740 A N D I ( L I S T ( Q U O
0065760 T E L A M B D A ) ( Q U O T
0066000 E ( \r S T R E A M ) ) ( L I
0066020 S T ( Q U O T E \ \ C O M .
0066040 M E T A . A U T O A R G U M E N
0066060 T ) ( Q U O T E S T R E A M
0066100 ) ( I D I F F E R E N C E I
0066120 ( C H A R C O D E 0 ) ) ) )
0066140 \r " T y p e v a l u e a s
0066160 a r g u m e n t " ) ) \r ( E M
0066200 A C S . M A K E . M E T A . C O
0066220 M M A N D ( C H A R C O D E
0066240 ^ ) ( Q U O T E \ \ C O M .
0066260 J O I N . L I N E S ) " D e l
0066300 e t e s w h i t e s p a c e
0066320 b e t w e e n l i n e s " ) \r
0066340 ( E M A C S . M A K E . C O M M
0066360 A N D ( C H A R C O D E ^ Q
0066400 ) ( Q U O T E \ \ C O M . Q
0066420 U O T E . N E X T . C H A R A C
0066440 T E R ) " Q u o t e s n e x
0066460 t c h a r a c t e r " ) \r ( E
0066500 M A C S . M A K E . C O M M A N
0066520 D ( C H A R C O D E ^ L )
0066540 ( Q U O T E \ \ C O M . R E D
0066560 I S P L A Y ) " R e d i s p l
0066600 a y b u f f e r " ) \r ( E M A
0066620 C S . M A K E . C O M M A N D
0066640 ( C H A R C O D E ^ O ) ( Q
0066660 U O T E \ \ C O M . O P E N .
0066700 L I N E ) " I n s e r t a r
0066720 g b l a n k l i n e s a t
0066740 p o i n t " ) \r ( E M A C S .
0066760 M A K E . ^ X . C O M M A N D
0067000 ( C H A R C O D E ^ O ) ( Q
0067020 U O T E \ \ C O M . D E L E T
0067040 E . B L A N K . L I N E S ) \r
0067060 " C l o s e a l l b u t o
0067100 n e b l a n k l i n e a r
0067120 o u n d p o i n t " ) \r ( E M
0067140 A C S . M A K E . ^ X . C O M M
0067160 A N D ( C H A R C O D E Q )
0067200 ( Q U O T E \ \ C O M . Q U
0067220 I T . E M A C S ) " E x i t
0067240 E M A C S " ) \r ( E M A C S . M
0067260 A K E . ^ X . C O M M A N D (
0067300 C H A R C O D E ^ Q ) ( Q U
0067320 O T E \ \ C O M . Q U I T . E
0067340 M A C S ) " E x i t E M A C
0067360 S " ) \r ( E M A C S . M A K E .
0067400 ^ X . C O M M A N D ( C H A R
0067420 C O D E H ) ( Q U O T E \
0067440 \ C O M . H A R D C O P Y . B U
0067460 F F E R ) \r " H a r d c o p y
0067500 b u f f e r . A r g m e
0067520 a n s c r e a t e p r e s s
0067540 f i l e . " ) \r ( E M A C S .
0067560 M A K E . C O M M A N D ( C H
0067600 A R C O D E ^ S ) ( Q U O T
0067620 E \ \ C O M . S T R I N G . S
0067640 E A R C H . F O R W A R D ) "
0067660 S e a r c h f o r w a r d f
0067700 o r a s t r i n g " ) \r ( E
0067720 M A C S . M A K E . M E T A . C
0067740 O M M A N D ( C H A R C O D E
0067760 % % ) ( Q U O T E \ \ C O
0070000 M . S T R I N G . S E A R C H .
0070020 F O R W A R D ) \r " S e a r c
0070040 h f o r w a r d f o r a
0070060 s t r i n g , r e p l a c i n
0070100 g i t w i t h a n o t h e
0070120 r . \r A r g u m e n t m e a n
0070140 s q u e r y e a c h r e p
0070160 l a c e m e n t " ) \r ( P U T P
0070200 R O P S C O M S . F P K G C
0070220 O P Y R I G H T ( " X e r o x
0070240 C o r p o r a t i o n " 1 9
0070260 8 4 ) ) \r N I L \r
0070271