$ od -c -N 50000 [eris]<Lisp>Harmony>uCode>PACKAGEUCODE.DM!1
0000000 377 \0 \0 P a c k U C o d e . c m \0
0000020 373 231 2 s ' \0 \0 376 001 \0 036 231 / / t
0000040 o b u i l d r u n f i l
0000060 e f o r l o a d i n g m i
0000100 c r o c o d e \r \r / / l o a d
0000120 A l t o R . m b f o r r e
0000140 l e a s e \r M i c r o D / n m r
0000160 A l t o R / O L i s p D e f
0000200 s G l o b a l D e f s I n t
0000220 e r f a c e I n i t i a l i z
0000240 e ^ \r F a u l t T i m e r
0000260 D i s p l a y D i s k E t h
0000300 e r C D C T a s k D i s p l
0000320 a y I n i t ^ \r A l t o A l
0000340 t o X B i t B l t L o a d R
0000360 A M O c c u p i e d \r \r / / l
0000400 o a d C S L K e y b o a r d .
0000420 m b \r m i c r o D / n m 376 001 \0 Z
0000440 277 C S L K e y b o a r d / O
0000460 G l o b a l d e f s D i s p l
0000500 a y \r \r / / L o a d L i s p
0000520 R . m b f o r r e l e a s e
0000540 \r \r m i c r o D / n m r L i s
0000560 p R / o L i s p D e f s G l
0000600 o b a l D e f s L o a d R A M
0000620 O c c u p i e d L I S P 0 S
0000640 t a c k O p s A r i t h ^
0000660 \r L o w I n s t B i n d i n
0000700 g s U f n F n c a l l J u
0000720 m p F e t c h F r a m e R
0000740 e t u r n H t F i n d F v a
0000760 r l o o k u p U s t a t s \r \r
0001000 / / m a k e i n t o r u n
0001020 f i l e : 3 m b f i l e s
0001040 376 \0 320 221 373 p a c k e d i n t
0001060 o o n e b r i m a g e ,
0001100 w i t h \r / / a p p r o p r i
0001120 a t e s t a r t a d d r e s
0001140 s e s f o r e a c h o v e
0001160 r l a y \r \r D 0 P a c k m b A
0001200 l t o R . m b L i s p M c . b
0001220 r S o f t G o ^ \r C S L K e
0001240 y b o a r d . m b 7 6 1 0 ^
0001260 \r L i s p R . m b 5 4 0 3 \r \r
0001300 b l d r / f l v D o l p h i n
0001320 L i s p M c / s 6 2 0 0 0 / c
0001340 D 0 R a m L o a d R a m L
0001360 i s p M c \r 377 \0 \0 D 0 P a c k M
0001400 B . r u n \0 373 230 206 356 022 \0 \0 376 001 \0
0001420 & z 003 001 \0 \r \0 \0 \0 030 \0 \0 \0 \0 \0 \0
0001440 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 377 377
0001460 377 377 377 377 377 377 377 377 377 377 377 377 377 377 377 377
*
0001540 377 377 002 \0 002 377 003 001 \r 7 \r 7 \0 \0 \0 \0
0001560 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0
*
0002020 \0 \0 376 001 \0 305 027 \0 \0 \0 \0 \0 \0 \0 \0 \0
0002040 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0
*
0002360 \0 \0 \0 377 377 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 003
0002400 001 004 342 005 035 005 4 005 c \0 . 200 \a \t @ \t
0002420 } \b \0 \b 215 \t 002 376 001 \0 275 ) \0 { \0 Q
0002440 \0 } 005 277 \0 S \0 K \0 \b \0 004 \b 274 \b y
0002460 \b 324 \b 204 \b 360 \b 026 \0 \0 \0 \0 \0 \0 \a 250
0002500 \0 204 005 312 \0 216 005 337 \0 z \0 y 006 # 006 D
0002520 \0 L \0 ~ 002 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0
0002540 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0
*
0002600 \0 \0 \b _ \b 230 \b 240 \b 250 \t 037 \t , \0 H
0002620 \0 | \0 > \0 I \0 M \0 \0 \0 \0 \0 \0 \n 0
0002640 \v 373 \f 313 \f 350 \f 370 200 032 \n u \n } \n 327
0002660 \v s \v 200 \v 335 \0 % \0 002 \f z \0 003 \r 002
0002700 \r \f \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0
0002720 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0
*
0003020 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 376 001 \0 217
0003040 u \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0
0003060 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0
*
0003360 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 Z 001 \f
0003400 370 B L \f 367 375 P Z \a 375 \0 Z \b = ` Z
0003420 \t 9 _ Z 003 205 \0 255 P i \ \0 005 B 004 !
0003440 Z 376 001 \0 325 032 306 \0 B 005 ! X 306 \0 B 006
0003460 : 004 Z \n : 006 Z \v 9 R Z 003 " 005 * 006
0003500 i O \0 004 \t 003 002 I W \0 342 \0 \t \v 022 .
0003520 M B f i l e ( i n p u t ) :
0003540 \0 352 \0 : 005 Z \n : 006 Z \v 9 8 Z 003
0003560 i X \0 004 B \a \t 003 002 O W \0 342 \0 \t \v
0003600 023 . B R f i l e ( o u t p u
0003620 t ) : 352 \0 : 005 Z \v : 006 Z \f 9 B
0003640 Z 003 i ? \0 004 B \b ! > 306 \0 B \t : \t
0003660 ] [ ! [ 306 \0 B \n : \n ] X ! X 306 \0
0003700 B \v : \v ] U ! U 306 \0 B \f ! S 306 \0
0003720 001 \b 002 \f \0 004 002 \v \0 031 \0 ~ \0 \a 002 \r
0003740 B \r 375 \0 Z 017 " \b i F \0 001 i E \0 \0
0003760 205 \0 i C \0 001 \t 006 \b R a m I m a g
0004000 e \0 342 \0 9 ? Z 003 212 \0 " \f i \ \0 003
0004020 " 004 i Z \0 001 202 \r 001 \a 375 \0 ] V 001 022
0004040 002 016 \0 \b \0 343 376 001 \0 255 251 : \t Z 023 :
0004060 006 Z 024 9 N Z 003 ! M 255 \0 i 365 \0 004 "
0004100 \t i I \0 001 E D 375 \0 ] F 9 F Z 003 "
0004120 \n 254 \0 i C \0 003 = W Z 023 : \a Z 021 9
0004140 T Z 022 % 5 200 \f 001 016 001 \v 002 005 001 H 002
0004160 001 021 I 002 002 A J A 313 002 017 002 020 002 021 %
0004200 E 001 004 % D 001 002 \0 005 B 024 9 " Z 003 "
0004220 021 * 022 i ] \0 004 B 016 % 036 ) Z \f 343 %
0004240 352 i 356 \0 002 9 V Z 020 375 \0 Z 021 = 020 Z
0004260 022 ! 017 306 \0 ) M i 343 \0 002 " \a i K \0
0004300 001 : 016 372 \r 001 \v 001 w 002 022 002 023 002 004 \0
0004320 020 \0 P 002 \a 002 003 020 \0 002 024 % 375 i d \0
0004340 001 \t \t 017 b i n s t r u c t i o
0004360 n s \r 342 \0 i Y \0 001 " 004 i 350 \0 001 202
0004400 \r 001 006 001 Y 002 \b \0 024 002 \n 002 026 : \r Z
0004420 026 : 006 Z 027 9 J Z 003 ! 334 255 \0 i 204 \0
0004440 004 " 004 i 324 \0 001 202 \r 001 031 376 001 \0 342 323
0004460 : \r ; \0 372 \r 001 \r : \r # \0 9 U 347 300
0004500 203 \0 ) S \f 344 J 003 " \f * \r i 301 \0 003
0004520 001 5 002 025 \0 003 377 360 002 027 \f 355 \0 / 001 -
0004540 9 D Z 026 375 \0 Z 027 9 # Z 003 " \r 255 P
0004560 i j \0 004 B \a " \a 202 \f 001 033 \t \v 022 E
0004600 r r o r : c a n ' t o p e n
0004620 \0 342 \0 i \f \0 001 " \r i \t \0 001 \t 002
0004640 001 \r 342 \0 i 004 \0 001 001 \t 002 030 002 031 \0 023
0004660 " 017 = 224 346 \0 B 017 001 G i H \0 \0 " 004
0004700 i 314 \0 001 i j \0 \0 : \f Z 003 ! g 255 \0
0004720 i f \0 003 : \f # \0 9 \a 347 300 203 \0 B 020
0004740 375 \0 Z 021 001 026 377 \0 \0 002 \t 006 \0 L \0 a
0004760 \0 s \0 t \0 \0 342 \0 : 021 236 \0 # \0 * 020
0005000 : 021 356 \0 B 003 " \f \f 364 " 021 203 \0 B 021
0005020 " 021 9 \ 344 J 001 352 " 020 9 235 346 \0 * \f
0005040 202 300 \f 360 377 \0 : \f Z 003 ! 8 255 \0 i 7
0005060 376 001 \0 364 343 \0 003 i \f \0 \0 i K \0 \0 205
0005100 P 255 \0 i T \0 002 001 005 002 \v \f 355 376 351 002
0005120 032 " 017 ) 203 \f 343 253 \0 ! 312 i H \0 002 i
0005140 370 \0 \0 i O \0 \0 " \b i M \0 001 % L 200
0005160 \f 001 033 \t 023 " E r r o r : s t a
0005200 r t i n g a d d r e s s n o
0005220 t f o u n d \r \0 342 \0 001 004 002 033 \0
0005240 ` 002 034 i 207 \0 001 : 016 372 \r 001 021 \t 005 \a
0005260 E r r o r : 342 \0 i Z \0 001 " 016 i
0005300 W \0 001 \t 002 001 \r 342 \0 i R \0 001 \f 366 \0
0005320 004 002 035 Z 001 \f 370 \0 \v \f 367 : 004 # \0 9
0005340 206 347 300 202 \f 001 004 204 \0 001 / 002 036 375 \0 Z
0005360 005 375 P Z 006 : 004 # \0 9 f 347 300 B \a 001
0005400 036 002 037 002 027 002 004 " 004 * 006 \f 362 B \b "
0005420 \b 9 [ 345 J 001 016 " \b 9 X 344 K 001 \n "
0005440 005 ) U \f 346 : \b 346 \0 9 O 345 \0 B 005 001
0005460 003 204 \0 001 \n 376 001 \0 034 317 " 006 203 \0 B 006
0005500 " 006 : \a 344 J 001 343 " 005 001 001 \f 366 Z 001
0005520 \f 370 \0 \t \f 367 : 006 # \0 9 V 345 \f 001 \f
0005540 : 006 # 001 9 R 345 \f 001 \a : 004 ] O % O
0005560 001 005 002 031 001 003 % L 001 001 \f 366 Z 001 \f 370
0005600 \0 \v \f 367 : 005 ; 003 Z 006 % K ) " \f 343
0005620 % I 246 \0 B \a " 006 ) 236 \f 346 B \b : 005
0005640 # 002 ) R \f 347 * \b 216 \0 : \a K \0 : 005
0005660 # \0 : \a C 001 : 005 # 001 : \a C 002 " 006
0005700 * 004 = a 276 \0 C \0 001 005 377 \0 \0 0 \0 7
0005720 \0 003 % ' 203 \0 E % \f 366 Z 001 \f 370 \0 016
0005740 \f 367 % 224 200 \f 001 N " 004 = 020 345 \f 001 J
0005760 : 006 # \0 9 353 347 300 = G + \0 9 347 357 300
0006000 245 \r 001 \a \f 366 002 I M \0 002 \0 002 \t 002 026
0006020 375 P Z \a : 006 # \0 9 331 347 300 B \b 001 030
0006040 002 003 002 002 " 006 * \a \f 362 B \t % - * \a
0006060 \f 362 B \n " \t 9 ) 347 \0 376 001 \0 K 025 *
0006100 \n 9 & 357 \0 245 \r 001 003 \f 366 \0 \f " \a 203
0006120 \0 B \a " \a : \b 344 J 001 350 " 005 = 026 236
0006140 \0 # \0 E 026 " 006 i 210 \0 001 \t 003 002 =
0006160 \0 342 \0 i 202 \0 001 % \f i \f \0 001 \t 002 001
0006200 \r 342 \0 i \b \0 001 \f 366 002 001 002 005 377 337 002
0006220 004 002 030 002 031 002 A Z 001 \f 370 \0 262 \f 367 B
0006240 \n : 004 ] Z i Z \0 \0 E Y 001 025 Z 001 \f
0006260 370 \0 \r \f 367 \t \n 020 U n e x p e c t
0006300 e d f i x u p \0 342 \0 212 \0 % G i
0006320 G \0 002 \f 366 001 031 Z 001 \f 370 \0 \r \f 367 \t
0006340 016 031 U n e x p e c t e d e x t
0006360 e r n a l f i x u p 342 \0 212 \0 %
0006400 . i . \0 002 \f 366 ! C 306 \0 = B Z 016 =
0006420 F Z 017 = E Z 020 9 D Z 003 ) Z i Z \0
0006440 005 " 005 203 \0 B \v : \v Z \f : \v Z \r !
0006460 R 306 \0 ) Q 316 \0 J 003 212 \0 % N i N 376
0006500 001 \0 216 \f \0 003 : \v Z 003 " \f 255 \0 i j
0006520 \0 003 374 \0 Z 016 375 \0 Z 017 001 036 002 002 $
0006540 002 " 002 & Z 001 \f 370 \0 \v \f 367 \t \r 027 D
0006560 a t a b e f o r e a d d r e
0006600 s s s e t 342 \0 212 \0 % 353 i 353 \0 002
0006620 \f 366 \0 \n 002 026 375 \0 Z 020 = F Z 021 001 !
0006640 002 % 002 ' \0 \v Z 001 \f 370 \0 \v \f 367 \t \r
0006660 027 D a t a f o r u n k n o w
0006700 n m e m o r y 342 \0 212 \0 % 312 i 312
0006720 \0 002 \f 366 377 375 002 ( \0 \f \0 \r 002 025 002 )
0006740 : \v Z 003 " \r - I i 035 \0 003 ! G 306 \0
0006760 B 022 ! E 306 \0 B 023 % 262 i \ \0 001 202 \r
0007000 001 024 \t 016 030 U n e x p e c t e d
0007020 e n d o f s t r e a m \0 342 \0
0007040 001 002 002 024 001 H 002 * % 232 i G \0 001 B 024
0007060 001 T 205 \0 001 @ % 223 i @ \0 001 E P 375 \0
0007100 Z 025 : 020 376 001 \0 302 307 Z 026 001 \v % 212 i
0007120 7 \0 001 * 025 : 023 276 \0 C \0 " 025 203 \0 B
0007140 025 " 025 : 026 344 J 001 363 : 016 Z 003 " 017 *
0007160 023 016 021 \0 003 " 017 203 \0 B 017 001 U 002 + \0
0007200 \0 241 % S i 034 \0 001 B 025 % O i 030 \0
0007220 001 B 026 " 025 * 005 i g \0 002 202 J 001 021 \t
0007240 \n 020 I n v a l i d m e m o r y
0007260 # \0 342 \0 001 002 002 023 \f 355 \0 333 002 , :
0007300 025 Z 016 : 026 Z 017 " 025 : \f 236 \0 # \0 B
0007320 020 " 025 : \r 236 \0 # \0 B 021 001 % \f 355 \0
0007340 265 002 ! % # i 354 \0 001 B 025 % 037 i 350 \0
0007360 001 B 026 % 033 i 344 \0 001 B 027 % 027 i 340 \0
0007400 001 B 030 " 027 9 [ 347 300 B 034 " 027 9 X 347
0007420 \0 B 035 : 030 Z 036 9 T Z 003 " 025 * 026 016
0007440 \b \0 005 001 001 \f 355 \0 244 002 % 377 i 310 \0
0007460 001 B 025 % 373 i 304 \0 001 B 026 " 022 i T \0
0007500 001 " 025 * 005 i 020 \0 002 376 001 \0 C M 202 J
0007520 001 016 \t \n 020 I n v a l i d m e m
0007540 o r y # \0 342 \0 001 253 002 - " 026 ) _
0007560 i 375 \0 002 202 J 001 017 \t \f 024 I n v a l
0007600 i d m e m o r y w i d t h \0
0007620 342 \0 001 r " 026 9 L 346 \0 ) K \f 344 375 P
0007640 355 \0 " 025 : \f 236 \0 K \0 : 022 Z 003 " 025
0007660 * 026 016 006 \0 003 * 025 : \r 276 \0 C \0 001 [
0007700 377 \0 \0 377 \0 031 % 264 i E \0 001 B 025 % 260
0007720 i A \0 001 B 026 " 022 i \t \0 001 : 022 Z 003
0007740 " 025 * 026 016 \a \0 003 001 F 002 # % 241 i 2
0007760 \0 001 B 025 % 235 i . \0 001 B 026 % 231 i *
0010000 \0 001 B 027 " 022 i 362 \0 001 " 027 9 332 347 300
0010020 B 033 " 027 9 327 347 \0 B 034 : 022 Z 035 9 033
0010040 Z 003 " 025 * 026 016 \t \0 005 001 % 001 \0 \0 017
0010060 \0 020 \t \v 022 I n v a l i d b l o
0010100 c k t y p e \0 342 \0 001 026 001 024 376 001
0010120 \0 270 027 " 024 001 \a 002 , \0 030 \f 355 \0 016 \f
0010140 355 \0 \r \f 350 \0 006 \0 \a 377 304 377 260 377 d 377
0010160 ? 377 016 376 351 376 346 001 340 001 Q \f 366 Z 001 \f
0010200 370 \0 \r \f 367 : 004 Z 005 " 004 9 J 346 \0 B
0010220 006 375 \0 Z \a % G i 340 \0 001 B \b " \b 9
0010240 223 347 300 202 \f 001 \f " \a F 005 " 005 : 004 345
0010260 \0 202 P * 004 202 300 \f 360 377 \0 001 3 " \b 9
0010300 203 347 300 : \a 346 \0 F 005 " \b 9 - 347 \0 202
0010320 \f 001 \v " 005 : 004 345 \0 202 P 203 \0 * 004 202
0010340 300 \f 360 377 \0 001 036 " 005 203 \0 B 005 " 005 :
0010360 006 345 \f 001 017 \t \t 017 S y m b o l t
0010400 o o l o n g 342 \0 212 \0 % 016 i 016 \0
0010420 002 " \b 9 \t 347 300 B \a 001 276 \f 355 376 u \0
0010440 200 \f 366 002 \0 377 002 " 002 & 001 @ Z 001 \f
0010460 370 \0 \n \f 367 " 004 ) P i P \0 002 ! O 203
0010500 \0 ) N i N \0 002 9 M Z 003 " 004 ) G i
0010520 J \0 003 376 001 \0 006 J : 004 ] H \f 366 Z 001
0010540 \f 370 \0 \t \f 367 % C 202 \f 001 005 i A \0 \0
0010560 i T \0 \0 % S 202 \f 001 005 i Q \0 \0 i M
0010600 \0 \0 % N 202 \f 001 005 i L \0 \0 i F \0 \0
0010620 % I 202 \f 001 005 i O \0 \0 i ? \0 \0 % L
0010640 202 \f 001 005 i J \0 \0 i 8 \0 \0 % 037 ) N
0010660 i 027 \0 002 ! K ) 023 i R \0 002 E Q % 026
0010700 ) 016 i O \0 002 9 020 Z 003 % 020 ) \n i \r
0010720 \0 003 % \f ) ; i E \0 002 \f 366 002 ? 002 K
0010740 002 . \0 016 002 L \0 017 002 M 002 = 002 1 002 033
0010760 Z 001 \f 370 \0 \t \f 367 : 004 # \0 : 005 ; \0
0011000 345 \0 202 200 205 260 : 004 + 001 252 220 246 \0 : 005
0011020 + 001 252 220 245 \0 \f 366 002 032 002 3 002 035 002 5
0011040 002 020 002 7 Z 001 \f 370 \0 006 \f 367 i U \0 \0
0011060 E 336 \f 366 002 F 002 9 002 G Z 001 \f 370 \0 006
0011100 \f 367 i J \0 \0 E 352 \f 366 002 A Z 001 \f 370
0011120 \0 006 \f 367 i A \0 \0 376 001 \0 j 375 E 343 \f
0011140 366 002 E 002 / 002 N Z 001 \f 370 \0 006 \f 367 i
0011160 6 \0 \0 E 332 \f 366 Z 001 \f 370 \0 006 \f 367 i
0011200 . \0 \0 E 334 \f 366 Z 001 \f 370 \0 \b \f 367 375
0011220 \0 ] S % 256 ) 335 i 246 \0 002 % 252 255 \0 i
0011240 M \0 002 ! 326 ) 236 i 335 \0 002 001 001 \f 366 Z
0011260 001 \f 370 \0 \b \f 367 % 234 ) R i 224 \0 002 %
0011300 230 ) 307 i 321 \0 002 % 224 - 7 i 7 \0 002 %
0011320 220 ) F i 311 \0 002 % 0 001 002 002 H \f 366 Z
0011340 001 \f 370 \0 \f \f 367 % 204 * 004 i ' \0 002 %
0011360 O * 005 i # \0 002 : 006 # \0 ) Z \f 347 203
0011400 \0 B 003 % E * 006 i U \0 003 % 026 203 \0 E
0011420 024 % 023 001 001 \f 366 Z 001 \f 370 \0 \n \f 367 %
0011440 7 * 004 i \v \0 002 % 3 * 005 i \a \0 002 %
0011460 004 203 \0 E 002 \f 366 002 > 002 O Z 001 \f 370 \0
0011500 \f \f 367 B 006 " 006 9 6 345 K 001 \n % *
0011520 004 i 364 \0 002 % 361 203 \0 E 357 001 \f 376 001 \0
0011540 | V 002 C : 005 Z 003 % 025 * 004 i % \0 003
0011560 % 346 : 005 346 \0 E 343 \f 366 Z 001 \f 370 \0 \t
0011600 \f 367 % \b * 004 i 334 \0 002 % 331 203 \0 E 327
0011620 \f 366 002 = Z 001 \f 370 \0 \n \f 367 % 373 * 004
0011640 i 317 \0 002 % 367 * 005 i 313 \0 002 % 310 203 \0
0011660 E 306 \f 366 \0 \t 002 M \0 002 003 370 Z 001 \f 370
0011700 001 022 \f 367 B \b ! P 306 \0 B \t ! N 306 \0
0011720 i M \0 001 " 006 202 \r 001 003 " 006 001 023 \t 005
0011740 006 C o m . C m \0 342 \0 375 P Z \r 375 \0
0011760 Z 016 = P Z 017 9 O Z 003 255 P i M \0 005
0012000 001 001 E K : 004 ] J : 005 ] I 375 \0 Z \v
0012020 375 \0 Z \f % C 202 \r 001 003 % @ 001 003 " \t
0012040 001 001 B \r : \a Z 016 9 6 Z 003 " \v * \f
0012060 i J \0 004 \f 366 Z 001 \f 370 001 226 \f 367 B \t
0012100 ! C 306 \0 i 023 \0 001 ! I 306 \0 B \n ! G
0012120 306 \0 B \v 205 \0 : \n C \0 205 \0 : \v C \0
0012140 374 \0 376 001 \0 213 355 Z \r 001 ! \0 021 \0 \b 002
0012160 ( " \r i H \0 001 B \f 375 \0 Z \r " \f 9
0012200 C 345 \r 001 \t " \f 9 l 345 \r 001 005 " \f 9
0012220 i 345 \f 001 \b 001 \f 002 \f \0 \n 002 \v 002 P 002
0012240 Q 002 R " \n * \f i ^ \0 002 001 343 " \f 9
0012260 + 345 \f 001 / 001 - 205 \0 i % \0 001 B \f "
0012300 \f 9 " 345 \f 001 004 001 $ 002 016 \0 \t " \f 9
0012320 H 345 \r 001 005 " \f 9 E 345 \f 001 004 001 032 \0
0012340 024 001 025 " \f 9 P 345 \f 001 017 \t \b \r D e
0012360 b u g b r e a k . 342 \0 i P \0
0012400 001 001 \a 002 U \0 / " \v * \f i , \0 002 001
0012420 324 " 006 202 \f 001 006 % 304 202 \r 001 003 = 301 Z
0012440 006 " 006 202 \r 001 \t : \n # \0 203 \0 B 003 "
0012460 006 * \n i ] \0 003 " \a 202 \f 001 006 % 262 202
0012500 \r 001 003 = 257 Z \a " \a 202 \r 001 \r : \v #
0012520 \0 203 \0 B 003 " \a * \v i J \0 003 001 004 \0
0012540 \0 \r 002 V " 005 376 001 \0 271 K 200 \f 001 005
0012560 374 \0 Z \b 375 \0 Z 005 : \b 372 \r 001 \b : \n
0012600 # \0 202 \f 001 004 204 \0 001 016 \0 ! : 005 Z 021
0012620 : 006 Z 022 9 L Z 003 " \n * 004 i I \0 004
0012640 001 002 002 X \f 366 Z 001 \f 370 \0 226 \f 367 B \b
0012660 ! E 306 \0 B \t 9 a Z \f ! _ 306 \0 ) ^
0012700 i ^ \0 002 " \b 9 \ 345 K 001 003 : 004 Z \a
0012720 " 005 9 W 344 J 001 033 : 005 # \0 9 S 347 300
0012740 375 P 345 \f 001 \b : 005 # \0 9 M 347 \0 B 005
0012760 001 016 002 022 : 005 # \0 9 F 347 \0 9 D 347 300
0013000 : 005 + 001 9 ? 357 300 246 \0 B 005 " 006 202 \f
0013020 001 \t \t \a \v T r y a g a i n :
0013040 Z 006 : 004 # \0 202 \f 001 004 i P \0 016 002 S
0013060 " \t * 004 i L \0 002 001 K \0 025 375 \0 Z \v
0013100 375 \0 Z \n : 004 ; \0 372 \r 001 ( \t \a \0 001
0013120 \0 001 \0 002 \0 002 \0 003 \0 003 342 \0 : \v 236 \0
0013140 # \0 : \t Z 016 B 017 " \v 202 \r 376 001 \0 A
0013160 353 001 \r " \v 9 005 345 \f 001 \v 001 \b \0 \b \0
0013200 002 002 ( \0 004 001 \0 377 \0 \0 377 205 P 001 003 !
0013220 370 001 001 B 003 " 016 * 017 i D \0 003 B \n "
0013240 \n 202 \r 001 006 " \a 202 \r 001 002 i C 001 C \t
0013260 \t 017 \r C o u l d n ' t o p e n
0013300 342 \0 i : \0 001 " \t i 7 \0 001 i 001 002
0013320 ^ 002 W \f 355 \0 360 375 P Z \v i / 9 321 Z
0013340 \v i , 9 , Z \v i ) 9 315 Z \v i & 9
0013360 ' Z \v i # 9 304 Z \f : 004 ; \0 Z \r 375
0013400 P Z 016 001 022 9 035 Z \f " \r 375 P 345 \0 B
0013420 \r 001 ) 9 265 Z \f " \r 375 P 345 \0 B \r 001
0013440 " 002 \v 001 001 037 " \r : 004 236 \0 # \0 001
0013460 \v 002 \ \f 355 \0 346 002 031 002 Z \0 003 \0 005 \0
0013500 \n \f 355 \0 020 \f 351 \0 006 \0 o 377 344 \0 d 377
0013520 333 \0 b 377 340 \0 O 377 336 \0 D 377 325 \0 B 377
0013540 332 001 341 " 016 : 004 236 \0 # \0 9 N 345 \f 001
0013560 006 376 001 \0 270 026 9 206 Z \f " 016 203 \0 B 016
0013600 375 \0 Z \n : 016 Z 017 : \r Z 020 001 J " 017
0013620 : 004 236 \0 # \0 9 M 345 \0 B 021 " 021 202 J
0013640 001 005 " 021 : \f 345 J 001 3 \t 002 001 \r 342 \0
0013660 i 306 \0 001 " \t i 303 \0 001 \t \n 020 i s
0013700 n ' t a p r o p e r \0 342 \0
0013720 i 266 \0 001 " \f 9 S 345 \f 001 \a \t 004 005 o
0013740 c t a l 342 \0 001 \b \t 005 \a d e c i m
0013760 a l 342 \0 001 001 i 243 \0 001 \t 005 \a n u
0014000 m b e r 342 \0 i 233 \0 001 i H \0 # " \n
0014020 * \f \f 343 : 021 356 \0 J \n " 017 203 \0 B 017
0014040 " 017 : 020 344 J 001 264 001 o 9 215 Z \f i H
0014060 \0 0 : \a Z \n " \a 202 \r 001 \v : 004 # \0
0014100 202 220 203 \0 B 003 " \a * \t i ; \0 003 001 026
0014120 \t 022 ! N o p l a c e t o p
0014140 u t t h e p a c k e d s t
0014160 r i n g 342 \0 376 001 \0 313 320 i & \0 001 001
0014200 F \0 \b : \a Z \n " \a 202 \r 001 \v : 004 #
0014220 \0 203 \0 B 003 " \a * 004 i 026 \0 003 001 003 002
0014240 ^ i 026 001 4 \t \t 016 U n d e f i n e
0014260 d t y p e \0 342 \0 i \a \0 001 001 ' "
0014300 005 001 \a 002 [ 002 022 002 X \f 355 \0 002 ] \f
0014320 350 \0 I \0 \b 376 273 377 347 377 346 377 \f 377 344 377
0014340 250 377 342 377 016 \f 351 \0 \b O W 377 001 O C 376
0014360 374 I W 376 367 I C 376 252 E F 376 377 \0 P 377
0014400 234 \0 O 376 362 \0 \0 377 276 001 316 " \n 001 036 \t
0014420 002 001 \r 342 \0 i L \0 001 " 006 i I \0 001 \t
0014440 003 003 / \r 342 \0 = D Z 020 374 \0 Z 021 :
0014460 006 Z 022 9 N Z 003 212 \0 " 004 i K \0 005 %
0014500 J ) G i I \0 002 i H \f 366 Z 001 \f 370 001
0014520 023 \f 367 B \t ! I 306 \0 \t 002 001 \r 352 \0 J
0014540 \r = ' Z 016 375 \0 Z 017 \t 002 \0 \0 352 \0 J
0014560 020 9 K Z 003 255 P i I \0 006 376 001 \0 201 257
0014600 " 006 = 031 345 \f 001 \t " \a 202 \r 001 004 " \a
0014620 200 \f 001 003 = " Z \a : 005 # \0 9 L 347 300
0014640 B \n ! J 306 \0 B \v 375 P Z \f : \n Z \r
0014660 001 & 002 031 002 _ " \f 202 220 B 016 " \f 202 200
0014700 205 p 202 \r 001 \r " 016 : 005 236 \0 # \0 9 N
0014720 347 \0 001 016 \0 \r 002 T 002 ` 002 O 002 Y " 016
0014740 : 005 236 \0 # \0 9 ' 347 300 001 002 \0 \t * \f
0014760 : \v 276 \0 C \0 " \f 203 \0 B \f " \f : \r
0015000 344 J 001 332 205 \0 : 004 C \0 001 o \0 \n 002 (
0015020 " 006 i H \0 001 B \f 375 P Z \r : \n Z 016
0015040 001 017 " \r : \v 236 \0 # \0 : \f 345 \f 001 005
0015060 " \f 001 ^ 377 \0 \0 022 " \r 203 \0 B \r " \r
0015100 : 016 344 J 001 357 : \a 372 \r 001 D 001 - \t 004
0015120 004 X X X \r \0 342 \0 212 \0 " \a i + \0 002
0015140 " \a * \b i ' \0 002 001 A \0 377 : 004 # \0
0015160 202 \f 001 002 i " " \a ) ! i 260 \0 002 : 004
0015200 376 001 \0 206 004 # \0 : 004 236 \0 # \0 212 \0 "
0015220 \a i 247 \0 002 : 004 # \0 375 P 345 \0 : 004 C
0015240 \0 001 & \f 355 \0 $ 002 , 001 027 " \f 001 \f \f
0015260 355 \0 ! \f 355 \0 021 002 b \f 355 \0 032 002 a \0
0015300 \ \f 355 \0 \n \f 351 \0 003 \0 177 377 304 \0 \b 377
0015320 321 \0 001 377 317 001 001 " 004 * \f i J \0 002 :
0015340 \a 372 \r 001 005 " \a * \f i V \0 002 001 224 001
0015360 215 001 214 \f 366 Z 001 \f 370 \0 \b \f 367 001 027 %
0015400 L i L \0 001 202 \r 001 003 ! I 001 005 % E i
0015420 314 \0 001 001 001 B 005 " 005 9 Y 345 \f 001 005 :
0015440 004 372 \r 001 002 001 003 " 005 001 002 001 352 \f 366 Z
0015460 001 \f 370 \0 \n \f 367 : 004 # \0 203 \0 : 004 C
0015500 \0 " 005 : 004 + \0 : 004 276 \0 C \0 \f 366 Z
0015520 001 \f 370 \0 \f \f 367 : 005 # \0 * 004 202 300 \f
0015540 360 377 \0 375 P Z 006 : 005 ; \0 Z \a 001 * 002
0015560 V " 006 202 220 B \b " 006 202 200 205 p 202 \r 001
0015600 017 " 006 : 005 376 \0 x | 003 236 \0 # \0 * \b
0015620 : 004 356 \0 \f 360 \0 377 001 024 002 O 002 P 002 023
0015640 \0 \r 205 \0 * \b : 004 276 \0 C \0 " 006 : 005
0015660 236 \0 # \0 * \b : 004 356 \0 202 300 \f 360 377 \0
0015700 " 006 203 \0 B 006 " 006 : \a 344 J 001 325 \f 366
0015720 \0 002 ` 002 b 002 031 002 030 002 _ 002 \v 002 M
0015740 002 K 002 N 002 ) 002 ( 002 022 002 L 002 024 002 -
0015760 002 026 002 $ 002 & 002 027 002 , 002 O 002 023 002 \f
0016000 002 X 377 \0 \0 D 0 R a m . b r \0 373 231
0016020 2 s 243 \0 \0 376 \0 n \r ( 002 002 \0 7 \0 \0
0016040 \0 017 \0 \0 \0 " \0 \0 \0 % \0 \0 \0 2 \0 \0
0016060 \0 6 \0 \0 \0 \0 \0 \0 \0 003 \0 A \0 001 005 D
0016100 0 R a m \0 \0 \0 \0 \a L o a d R a m
0016120 \0 \0 \0 \0 \b R a m I m a g e \0 \0 001
0016140 \0 001 \0 001 \0 \f \0 \f Z 001 \f 370 \0 \b \f 367
0016160 % 005 255 P i 004 \0 002 \f 366 \0 \0 \0 \0 \0 003
0016200 \0 \0 \0 \v \0 \n \0 \0 377 \0 \0 D 0 P a c
0016220 k M B . b c p l \0 373 230 177 T 8 \0 \0
0016240 376 001 \0 037 M / / D 0 P a c k M B
0016260 - - P a c k a D 0 . M
0016300 B f i l e f o r u s e w
0016320 i t h L R J \r / / l a s t
0016340 e d i t e d J a n u a r y 2
0016360 7 , 1 9 8 2 5 : 1 0 P M
0016400 , v a n M e l l e \r / / l
0016420 a s t e d i t e d A u g u s
0016440 t 6 , 1 9 8 0 9 : 4 6
0016460 A M \r \r / / C o m m a n d l
0016500 i n e f o r m a t i s : \r /
0016520 / \t D 0 P a c k M B x x x . M
0016540 B x x x . B R [ s t a r t l
0016560 a b e l / s t a r t a d d r e s
0016600 s ] ( x x x . M B s t a r t
0016620 l a b e l / s t a r t a d d r e
0016640 s s ) * 376 001 \0 a 002 [ s y m b o
0016660 l ] \r \r \t g e t " s t r e a m
0016700 s . d " \r \r e x t e r n a l \r [
0016720 \t \t / / O . S . \r \t C l o s e
0016740 s \r \t E n d o f s \r \t M o v e B
0016760 l o c k \r \t N o o p \r \t O p e n
0017000 F i l e \r \t S e t B l o c k \r \t
0017020 W o ; W s ; W r i t e B l o
0017040 c k \r \t Z e r o \r \t f p C o m C
0017060 m \r \t \t / / G P \r \t S e t u p
0017100 R e a d P a r a m \r \t R e a d P
0017120 a r a m \r \t \t / / R e a d M B
0017140 \r \t R e a d M B \r \t \t / / W r
0017160 i t e B R \r \t S t a r t B R f i
0017200 l e \r \t S t a r t B R n a m e s
0017220 ; B R n a m e \r \t S t a r t B
0017240 R l a b e l s ; B 376 001 \0 005 271 R
0017260 l a b e l \r \t S t a r t B R c o
0017300 d e ; B R c o d e \r \t E n d B
0017320 R b l o c k \r \t E n d B R f i l
0017340 e \r ] \r \r \r s t r u c t u r e
0017360 B S : [ l e n g t h b y t
0017400 e ; c h a r ^ 1 , 2 5 5 b y
0017420 t e ] \r \r s t a t i c \r [ \t i
0017440 m x = - 1 \r \t i m a p \r \t i
0017460 m v \r \t n i \r \t s a \r \t s a v \r
0017500 ] \r \r \r l e t D 0 P a c k M B
0017520 ( ) b e \r [ \t l e t c o m
0017540 = O p e n F i l e ( 0 , k s
0017560 T y p e R e a d O n l y , c h
0017600 a r I t e m , 0 , f p C o m
0017620 C m ) \r \t l e t n v , s w v
0017640 = v e c 1 0 0 , v e c 376
0017660 001 \0 303 213 1 0 0 \r \t S e t u p R
0017700 e a d P a r a m ( n v , s w v
0017720 , c o m , s w v ) \r \t l e t
0017740 i n s t = R e a d P a r a
0017760 m ( " I W " , " . M B f i l
0020000 e ( i n p u t ) : " , n v
0020020 , s w v ) \r \t l e t o u t s
0020040 t = R e a d P a r a m ( " O
0020060 W " , " . B R f i l e ( o
0020100 u t p u t ) : " , n v , s
0020120 w v ) \r \t l e t s v v = v
0020140 e c 1 0 0 \r \t s a v = s v
0020160 v \r \t l e t i m p = v e c
0020200 1 0 0 0 0 b \t / / I m a g i
0020220 n a r y t o r e a l a d d
0020240 r e s s m a p \r \t i m a p =
0020260 i m p 376 001 \0 v 216 \r \t l e t i
0020300 m v e c = v e c 3 0 0 0 0
0020320 b \t / / H o l d s r e s u l
0020340 t i n g I M d a t a , 3
0020360 w o r d s p e r i n s t r u
0020400 c t i o n \r \t i m v = i m v
0020420 e c \r \t l e t n a m e , n e
0020440 x t n a m e = v e c 1 2 8
0020460 , v e c 1 2 8 \r \t l e t o
0020500 u t c o m e = n i l \r \t l e
0020520 t t o t a l n i = 0 \r \r /
0020540 / a t t h i s p o i n t ,
0020560 w e h a v e i n s t o p
0020600 e n o n ( f i r s t ) m b
0020620 f i l e , o u t s t o n
0020640 b r f i l e \r / / C o m m a
0020660 n d l i n e i 376 001 \0 R 370 s
0020700 s t a r t l a b e l [ n e x
0020720 t . m b s t a r t l a b e l
0020740 ] * [ s y m b o l ] \r \r \t S t
0020760 a r t B R f i l e ( o u t s t )
0021000 \r \t S t a r t B R c o d e ( ) \r
0021020 \t B R c o d e ( 0 ) \t / / B l
0021040 d r z e r o s t h e f i r
0021060 s t w o r d ! \r \t \t \t / / B
0021100 u t L R J w a n t s a n
0021120 e x t r a w o r d o n t h
0021140 e f r o n t a n y w a y \r \t
0021160 M o v e B l o c k ( n a m e ,
0021200 " R a m I m a g e " , 5 ) \r \r
0021220 [ t e s t E n d
0021240 o f s ( c o m ) \r \t i f s
0021260 o s a = 0 \r \t i f 376 001
0021300 \0 200 8 n o t [ R e a d P a r
0021320 a m ( $ P , 0 , s v v , s
0021340 w v ) \r \t \t s a = r e a
0021360 d S A ( s v v ) \r \t \t ] \r \t n i
0021400 = 0 \t \t \t / / i n s t r u
0021420 c t i o n c o u n t e r \r \t S
0021440 e t B l o c k ( i m p , - 1 ,
0021460 1 0 0 0 0 b ) \t / / c l e a
0021500 r ( - 1 ) t h e v i r t u
0021520 a l t o r e a l m a p \r \r
0021540 \t o u t c o m e = R e a d M
0021560 B ( i n s t , 2 0 , p m e m
0021600 p r o c , ( s a e q - 1 ?
0021620 p s y m p r o c , N o o p )
0021640 ) \r \r \t B R c o d e ( i m v ,
0021660 n i * 3 ) \t / / d u m p o u
0021700 t i 376 001 \0 / 300 n s t r u c t i
0021720 o n s \r \t l e t w 0 , w 1 ,
0021740 w 2 = 7 7 7 7 b l s h i
0021760 f t 4 , 0 , s a \r \t B R c
0022000 o d e ( l v w 0 , 3 ) \t / /
0022020 f i n a l e n t r y h a s
0022040 a d d r = 7 7 7 7 , s t a r
0022060 t i n g a d d r e s s \r \t C l
0022100 o s e s ( i n s t ) \r \t i f o
0022120 u t c o m e \r \t t h e n
0022140 b r e a k \t \t / / e r r o r
0022160 o c c u r r e d \r \t W o ( n i )
0022200 ; W s ( " b i n s t r u c t
0022220 i o n s * N " ) \r \t i f E n d
0022240 o f s ( c o m ) \t \t / / m o
0022260 r e c o m m a n d l i n e ?
0022300 \r \t t h e 376 001 \0 \t 260 n b
0022320 r e a k \t \t / / n o , d o n
0022340 e \r \t R e a d P a r a m ( $ P ,
0022360 0 , n e x t n a m e , s w
0022400 v ) \r \t t e s t E n d o f s (
0022420 c o m ) \t / / m o r e t h a
0022440 n o n e t h i n g o n c
0022460 o m l i n e ? \r \t i f s
0022500 o [ \t \t / / n o , n e x
0022520 t n a m e i s a l a b e l
0022540 f o r b r f i l e \r \t \t
0022560 i f n e x t n a m e ! 0 \r \t
0022600 \t t h e n M o v e B
0022620 l o c k ( n a m e , n e x t n
0022640 a m e , ( n e x t n a m e > >
0022660 B S . l e n g t h + 1 ) / 2 ) \r
0022700 \t \t b r e a k \r \t \t ] 376 001 \0
0022720 372 001 \r \t i f n o t [ i n
0022740 s t = O p e n F i l e ( n e
0022760 x t n a m e , k s T y p e R e
0023000 a d O n l y , w o r d I t e m
0023020 , 0 ) \r \t \t i f i n s t
0023040 e q 0 \r \t \t t h e
0023060 n [ W s ( " E r r o r :
0023100 c a n ' t o p e n " ) \r \t \t
0023120 \t W s ( n e x t n a m
0023140 e ) \r \t \t \t W s ( " *
0023160 N " ) \r \t \t \t b r e a k
0023200 \r \t \t \t ] \r \t \t t o t a
0023220 l n i = t o t a l n i + n i
0023240 \r \t \t ] \r ] r e p e a t
0023260 \t \t \t / / d o a l l m b
0023300 f i l e s \r \r \t E n d B R b l o
0023320 c k 376 001 \0 003 344 ( ) \r \t C l o s e
0023340 s ( c o m ) \r \t \t \t \t / / n o
0023360 w w r i t e l a b e l s e
0023400 c t i o n o f b r f i l e
0023420 \r \t S t a r t B R n a m e s ( )
0023440 \r \t B R n a m e ( # 1 4 0 , 0
0023460 , n a m e ) \t / / e n t r y
0023500 l a b e l x x x p o i n t
0023520 s a t l e a d i n g z e r
0023540 o w o r d \r \t l e t l e n
0023560 = n a m e > > B S . l e n g t
0023600 h + 1 \r \t f o r i = 0 t
0023620 o 4 d o \r \t n a m e > >
0023640 B S . c h a r ^ ( l e n + i )
0023660 = t a b l e [ $ L ; $ a ;
0023700 $ s ; $ t ; 0 ] ! i \r \t n
0023720 a m e > > B S 376 001 \0 343 270 . l e n
0023740 g t h = l e n + 3 \r \t B R n
0023760 a m e ( # 1 4 0 , 0 , n a m
0024000 e ) \t / / e n t r y l a b e
0024020 l x x x L a s t p o i n t s
0024040 a t 7 7 7 7 e n t r y \r \t
0024060 E n d B R b l o c k ( ) \r \r \t S
0024100 t a r t B R l a b e l s ( ) \r \t
0024120 B R l a b e l ( 1 , 0 ) \t \t /
0024140 / i n i t i a l i z e t h e
0024160 i n i t i a l l a b e l \r \t
0024200 B R l a b e l ( 2 , 1 + t o t
0024220 a l n i * 3 ) \t / / i n i t i
0024240 a l i z e t h e L a s t l
0024260 a b e l \r \t E n d B R b l o c k
0024300 ( ) \r \t E n d B R f i l e ( ) \r
0024320 \t C l o s e s ( o u t s 376 001 \0 f
0024340 { t ) \r \r \t i f s a e q -
0024360 1 \r \t t h e n [ W s ( " E
0024400 r r o r : s t a r t i n g a
0024420 d d r e s s n o t f o u n d
0024440 * N " ) ] \r \t i f o u t c o
0024460 m e \r \t t h e n [ W s
0024500 ( " E r r o r : " ) ; W s (
0024520 o u t c o m e ) ; W s ( " * N
0024540 " ) ] \r ] \r \r a n d r e a d
0024560 S A ( s a v ) = v a l o f \r
0024600 / / R e a d s t a r t i n g
0024620 a d d r e s s f r o m s t
0024640 r i n g , r e t u r n v a l
0024660 u e i f n u m e r i c o r
0024700 - 1 i f n o t \r [ \t i f
0024720 s a v > > B S . l e n g t h e
0024740 q 376 001 \0 261 351 0 r e s u l t i
0024760 s - 1 \t / / n u l l s t r
0025000 i n g \r \t l e t s a = 0 \r
0025020 \t f o r i = 1 t o s a
0025040 v > > B S . l e n g t h d o \r
0025060 \t [ l e t c = s a v > >
0025100 B S . c h a r ^ i \r \t t e s
0025120 t ( c g e $ 0 ) & ( c
0025140 l e $ 7 ) \r \t i f s o
0025160 s a = s a * 1 0 b + c - $
0025200 0 \r \t i f n o t r e s u
0025220 l t i s - 1 \r \t ] \r \t r e s u
0025240 l t i s s a \r ] \r \r \r a n d
0025260 p m e m p r o c ( m e m x , w
0025300 i d t h , n a m e ) = v a
0025320 l o f \r [ \t t e s t ( n a m e
0025340 ! 0 e q 376 001 \0 L 034 1 0 0 0 b
0025360 + $ I ) & ( n a m e ! 1 e
0025400 q $ M * 4 0 0 b ) \r \t i f s
0025420 o [ i m x = m e m x ;
0025440 r e s u l t i s p i m p r o c
0025460 ] \r \t i f n o t r e s u l
0025500 t i s N o o p \r ] \r \r a n d
0025520 p i m p r o c ( a d d r , d a
0025540 t a ) b e \r [ \t l e t i m a
0025560 = d a t a ! 3 \r \t l e t p
0025600 = i m v + n i * 3 \r \t p ! 0
0025620 , p ! 1 , p ! 2 = ( i m
0025640 a l s h i f t 4 ) + ( d
0025660 a t a ! 2 r s h i f t 1 2 )
0025700 , d a t a ! 0 , d a t a ! 1
0025720 \r \t i m a p ! a d d r = i m
0025740 a \r \t n i = n i + 376 001 \0 225 250
0025760 1 \r ] \r \r a n d p s y m p r o
0026000 c ( m e m x , v a l u e , n
0026020 a m e ) b e \r / / L o o k
0026040 u p a s y m b o l i c s t
0026060 a r t i n g a d d r e s s \r i
0026100 f ( s a e q - 1 ) & (
0026120 m e m x e q i m x ) t h e
0026140 n \t / / m i g h t h a v e
0026160 f o u n d i t a l r e a d y
0026200 \r [ \t i f n a m e > > B S . l
0026220 e n g t h n e s a v > > B S
0026240 . l e n g t h r e t u r n \r \t
0026260 f o r i = 1 t o n a m
0026300 e > > B S . l e n g t h d o \r
0026320 \t [ l e t c 1 = n a m e
0026340 > > B S . c h a r ^ i \r \t l
0026360 376 \0 217 241 004 e t c 2 = s a v
0026400 > > B S . c h a r ^ i \r \t i
0026420 f ( c 1 & n o t 4 0 b )
0026440 n e ( c 2 & n o t 4 0
0026460 b ) r e t u r n \t / / c a s
0026500 e s h i f t \r \t ] \r \t s a =
0026520 i m a p ! v a l u e \r \t W s (
0026540 n a m e ) ; W s ( " = " ) ;
0026560 W o ( s a ) ; W s ( " * N "
0026600 ) \r ] \r 377 \0 \0 D 0 R a m . b c p
0026620 l \0 373 231 2 s 231 \0 \0 376 \0 277 C 032 / /
0026640 L o a d D 0 m i c r o c o
0026660 d e a n d s o f t b o o t
0026700 \r / / l a s t e d i t e d
0026720 J u n e 1 2 , 1 9 8 2 3
0026740 : 0 1 P M \r \r \r e x t e r n a
0026760 l [ \t \r \t R a m I m a g e \t
0027000 \t / / f r o m u c o d e f
0027020 i l e \r \t L o a d R a m \t \t \t /
0027040 / f r o m L o a d R a m . a
0027060 s m \r \t ] \r \r l e t D 0 R a
0027100 m ( ) b e L o a d R a m ( R
0027120 a m I m a g e , 1 ) \r \r 377 \0 \0
0027140 L o a d R a m . a s m \0 373 231 2 r
0027160 026 \0 \0 376 001 \0 374 b ; L o a d R a
0027200 m . a s m . \r \r ; P r o c e
0027220 d u r e s d e f i n e d \r \t .
0027240 e n t \t L o a d R a m \r \r ; s
0027260 t a t i c s u s e d \r \t . e x
0027300 t d \t T o p L e v e l F r a m e
0027320 , u P C T r a c e A d d r ,
0027340 l v N I L \r \r ; L i s p e x
0027360 t e n d e d N o v a i n s t
0027400 r u c t i o n s - d i s p a
0027420 t c h i n t o m i c r o c o
0027440 d e \r \t . d u s r \t L R J =
0027460 # 6 1 0 3 6 \r \r \t . S R E L \r L
0027500 o a d R a m : \t l r j \r \r \t . N
0027520 R E L \r \r l r j : \r \t s t a 3
0027540 , s a v A c 3 \t \t ; l o a d
0027560 r a m s m a s 376 \0 7 340 234 h e s
0027600 a c 3 \r \t L R J \r \t l d a 3
0027620 , s a v A c 3 \r \t j m p 1 ,
0027640 3 \r \r s a v A c 3 : \t 0 \r \r \t .
0027660 E N D \r 377 \0 \0 L o a d R a m . b
0027700 r \0 373 231 2 r S \0 \0 376 \0 D 6 336 002 \0
0027720 \0 " \0 \0 \0 017 \0 \0 \0 026 \0 \0 \0 031 \0 \0
0027740 \0 037 \0 \0 \0 ! \0 \0 \0 \0 \0 \0 \0 001 \0 `
0027760 \0 \0 \a L o a d R a m \0 001 \0 001 \0 \0
0030000 \0 005 Y 004 b 036 9 002 003 001 \0 \0 \0 001 \0 \0
0030020 \0 \0 377 \0 \0 M a k e D 0 P a c k M
0030040 B . c m \0 373 230 206 355 333 \0 \0 376 \0 # -
0030060 * b l d r / f l v D 0 P a c k
0030100 M B R e a d M B W r i t e B
0030120 r G P 377 \0 \0 P a c k a g e U c
0030140 o d e F i l e s . c m \0 373 231 2 s
0030160 # \0 \0 376 \0 w 333 033 P a c k U C o d
0030200 e . c m D 0 P a c k M B . r u
0030220 n D 0 R a m . b r D 0 P a c
0030240 k M B . b c p l D 0 R a m . b
0030260 c p l L o a d R a m . a s m
0030300 L o a d R a m . b r M a k e D
0030320 0 P a c k M B . c m P a c k a
0030340 g e U c o d e F i l e s . c m 374
0030360