$ od -c -N 50000 [eris]<Lisp>Harmony>BCPL>BCPLENV.DM!1>DspStreamsB.br 0000000 002 002 \a 250 \0 \0 \0 017 \0 \0 001 9 \0 \0 001 t 0000020 \0 \0 \a y \0 \0 \a 247 \0 \0 \0 \0 \0 \0 \0 - 0000040 \0 @ \0 001 023 C r e a t e D i s p l 0000060 a y S t r e a m \0 @ \0 002 \t C h a 0000100 r W i d t h \0 @ \0 003 \t R e s e t 0000120 L i n e \0 @ \0 004 \n F o n t H e i 0000140 g h t \0 \0 A \0 005 005 x f o n t \0 A 0000160 \0 006 \a C l e a r D s \0 A \0 \a \b C 0000200 l e a r M a p \0 \0 A \0 \b \t R e l 0000220 e a s e D s \0 @ \0 \t 021 S h o w D 0000240 i s p l a y S t r e a m \0 A \0 \n 0000260 \a P r e v D C B \0 @ \0 \v \a G e t 0000300 F o n t \0 @ \0 \f \a S e t F o n t 0000320 \0 @ \0 \r \t G e t B i t P o s \0 @ 0000340 \0 016 \t S e t B i t P o s \0 @ \0 017 0000360 \b G e t L m a r g \0 \0 @ \0 020 \b S 0000400 e t L m a r g \0 \0 @ \0 021 \b G e t 0000420 R m a r g \0 \0 @ \0 022 \b S e t R m 0000440 a r g \0 \0 @ \0 023 \n G e t L i n e 0000460 P o s \0 \0 @ \0 024 \n S e t L i n e 0000500 P o s \0 \0 @ \0 025 \n I n v e r t L 0000520 i n e \0 \0 @ \0 026 006 S c r o l l \0 0000540 \0 A \0 027 \a C o m p a c t \0 A \0 030 0000560 \v G e t M a p S p a c e \0 A \0 031 0000600 \b S c r o l l O K \0 \0 A \0 032 \n F 0000620 r e e B i t M a p \0 \0 @ \0 033 \t E 0000640 r a s e B i t s \0 \0 \0 \0 \v D e f 0000660 a u l t A r g s \0 \0 \0 \0 \a s y s 0000700 F o n t \0 \0 \0 \0 \a s y s Z o n e 0000720 \0 \0 \0 \0 \b A l l o c a t e \0 \0 \0 0000740 \0 \0 003 U s c \0 \0 \0 \0 006 S y s E r 0000760 r \0 \0 \0 \0 \0 \n D i s p l a y P u 0001000 t \0 \0 \0 \0 \0 004 Z e r o \0 \0 \0 \0 \0 0001020 004 F r e e \0 \0 \0 \0 \0 003 d s p \0 \0 0001040 \0 \0 004 P u t s \0 \0 a \0 034 003 o n e 0001060 \0 \0 \0 \0 \t M o v e B l o c k \0 a 0001100 \0 035 004 u s e d \0 \0 \0 \0 \0 003 M a x 0001120 \0 \0 \0 \0 003 M i n \0 \0 \0 \0 \b S e t 0001140 B l o c k \0 \0 \0 \0 \0 006 B i t B l 0001160 t \0 \0 035 \0 001 \0 001 \0 002 \0 320 \0 003 001 , 0001200 \0 004 001 @ \0 005 001 J \0 006 001 X \0 \a 001 223 0001220 \0 \b 001 252 \0 \t 001 272 \0 \n 002 036 \0 \v 002 5 0001240 \0 \f 002 < \0 \r 002 Z \0 016 002 a \0 017 002 217 0001260 \0 020 002 226 \0 021 002 243 \0 022 002 252 \0 023 002 314 0001300 \0 024 002 332 \0 025 003 016 \0 026 003 ) \0 027 004 ; 0001320 \0 030 004 343 \0 031 005 > \0 032 005 Q \0 033 005 o 0001340 \0 ' 003 375 \0 ) 004 215 006 004 006 004 Z 001 \f 370 0001360 \0 030 \f 367 B \v ! ] 306 \0 = \ Z 017 9 [ 0001400 Z 020 9 Z Z 021 = Y Z 022 9 X Z 003 ) W 0001420 i W \0 006 " 005 : 006 346 \0 B 006 " 005 203 \0 0001440 374 P 347 \0 B 005 " 006 374 P 347 \0 B 006 " \n 0001460 ) H i H \0 002 B \f " \n : \f C 037 " 004 0001500 : \f C 036 " \a : \f C 023 ! a : \f C \n 0001520 " \b : \f C 022 " \a i [ \0 001 232 \0 # 376 0001540 203 \0 202 220 B \r " \r 202 P * \b \f 343 J 016 0001560 " 006 : 005 345 \0 * 004 252 P 252 P : 016 356 \0 0001600 i H \0 002 202 K 001 005 " \f ) e i e \0 002 0001620 % d : \f C 004 % b : \f C 002 % ` : \f 0001640 C 005 % ^ : \f C \f % \ : \f C \r 001 \v 0001660 \0 \v \0 \0 \0 & \0 003 \0 \0 \0 \f 377 375 \0 \0 0001700 \0 \0 \0 " 004 202 P 202 P * 005 216 \0 J 017 0001720 " 017 9 Z 345 \0 B 020 " 005 : \f C \0 " 020 0001740 : \f C 001 " 016 : \f C 021 : 017 Z 021 " 006 0001760 : 016 345 \0 : \f C 032 " 021 : \f C 033 : 005 0002000 Z 022 375 P Z 023 : 004 Z 024 001 023 020 A \0 \0 0002020 \0 \0 " 022 9 9 346 \0 : 022 C \0 " \r : 022 0002040 C 003 " 022 9 1 346 \0 B 022 " 023 203 \0 B 023 0002060 " 023 : 024 344 J 001 356 205 \0 : 020 C \0 " \b 0002100 ) # \f 346 B 023 " 023 9 I 344 J 001 \v 9 F 0002120 Z 023 001 \b 006 244 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0002140 \0 \0 ! ^ : \f C 016 " 023 : \f C 017 " \t 0002160 : \f C 020 " \f * \a i T \0 002 " \f i 357 0002200 \0 001 " \f 001 002 \0 004 \f 366 Z 001 \f 370 \0 017 0002220 \f 367 375 \0 Z 006 " 005 9 M 347 \0 202 \r 001 037 0002240 375 P Z \b : 005 # \0 9 E 347 300 B \t 001 020 0002260 : 006 Z \n " 005 * \b \f 362 212 \0 " 004 i U 0002300 \0 002 * \n 216 \0 J 006 " \b 203 \0 B \b " \b 0002320 : \t 344 J 001 356 " 006 001 4 002 ^ : 004 # \n 0002340 9 226 345 \f 001 004 : 004 ; 023 Z 004 : 004 # 376 0002360 202 K 001 006 : 004 ; 377 Z 004 375 P Z 006 " 005 0002400 : 004 236 \0 # \0 : 005 346 \0 : 004 236 \0 # \0 0002420 B \a " \a 375 P 347 \0 202 \r 001 004 001 \f \0 \b 0002440 \0 \0 " 006 9 M 346 \0 B 006 " \a 202 220 B 005 0002460 001 347 377 \0 " \a 202 220 * 006 216 \0 242 \0 001 001 0002500 \f 366 Z 001 \f 370 \0 \t \f 367 " 004 : 004 + 017 0002520 i ] \0 002 : 004 # 016 : 004 ; 017 345 \0 212 \0 0002540 " 004 i U \0 002 \f 366 \0 \0 Z 001 \f 370 \0 \b 0002560 \f 367 " 004 i M \0 001 232 \0 # 376 \f 366 Z 001 0002600 \f 370 \0 \a \f 367 : 004 # 376 202 K 001 004 : 004 0002620 # 377 001 003 " 004 001 001 \f 366 Z 001 \f 370 \0 \f 0002640 \f 367 : 004 ; \0 Z 005 : 004 ; 032 Z 006 : 005 0002660 Z \a 375 P Z \b : 004 ; 036 Z \t 001 017 \0 020 0002700 205 \0 : \a C 001 " 006 : \a C 002 " \a 9 Y 0002720 346 \0 B \a " \b 203 \0 B \b " \b : \t 344 J 0002740 001 360 " 005 : 004 C \v " 005 : 004 C 034 " 005 0002760 203 \0 : 004 + 022 \f 361 \0 377 : 004 # 033 : 004 0003000 C 035 " 004 i M \0 001 \f 366 \0 \0 \0 \0 \0 222 0003020 Z 001 \f 370 \0 \t \f 367 : 004 # \v 203 \0 : 004 0003040 + 022 \f 361 ? 377 : 004 # 032 : 004 + 021 i E 0003060 \0 002 " 004 : 004 + 016 i 351 \0 002 \f 366 Z 001 0003100 \f 370 \0 \t \f 367 " 004 255 P i J \0 002 : 004 0003120 # 037 * 004 i F \0 002 205 \0 001 001 \f 366 Z 001 0003140 \f 370 \0 016 \f 367 B \a ! E 306 \0 9 \n Z \v 0003160 = G Z \f 9 F Z 003 254 \0 i F \0 004 001 B 0003200 \0 004 : 004 # \0 i A \0 001 B \b : \b 372 \r 0003220 001 006 : 004 ; 001 # \0 : \b C \0 001 D \0 \0 0003240 : 006 ; 001 # \0 : 004 ; 001 C \0 : 004 # \0 0003260 : 006 ; 001 C \0 001 7 \0 \0 : 006 # \0 i % 0003300 \0 001 B \b : \b 372 \r 001 \n : 006 # \0 : 004 0003320 ; 001 C \0 : 004 # \0 : \b C \0 001 $ \0 \0 0003340 \0 \0 205 \0 : 004 ; 001 C \0 : 004 # \0 E 020 0003360 001 032 \0 \a " 004 ) \r i \r \0 002 001 024 \0 \0 0003400 \0 \b " 005 001 \b \0 j \0 \0 \f 355 \0 \f 001 020 0003420 006 245 \0 266 \f 350 \0 004 \0 004 377 303 377 317 377 342 0003440 377 261 001 351 \f 366 Z 001 \f 370 \0 \b \f 367 9 360 0003460 Z 005 001 \t " 005 202 \f 001 003 205 \0 001 \v : 005 0003500 ; \0 Z 005 : 005 # \0 : 004 345 \f 001 364 " 005 0003520 001 001 \f 366 Z 001 \f 370 \0 006 \f 367 : 004 # 023 0003540 \f 366 Z 001 \f 370 \0 \v \f 367 " 005 i L \0 001 0003560 232 \0 # 376 203 \0 202 220 B 006 " 005 : 004 C 023 0003600 " 004 : 004 + 017 i T \0 002 : 004 ; \v # 003 0003620 * 006 214 J 254 001 255 \0 242 \0 001 001 \f 366 Z 001 0003640 \f 370 \0 006 \f 367 : 004 # 027 \f 366 Z 001 \f 370 0003660 \0 \n \f 367 " 005 : 004 C 027 " 005 200 \0 9 ` 0003700 347 \0 : 004 C 025 : 004 ; \v Z 006 : 006 # 001 0003720 9 X 347 \0 : 004 C 024 : 006 # 001 9 R 347 \0 0003740 : 006 + 002 215 \0 " 005 J \a ) Y \f 347 * \a 0003760 216 \0 : 004 K 030 " 005 : 004 ; 026 344 J 204 001 0004000 205 \0 001 002 001 222 \f 366 Z 001 \f 370 \0 006 \f 367 0004020 : 004 # 016 \f 366 Z 001 \f 370 \0 \n \f 367 " 005 0004040 : 004 C 016 " 004 * 005 i M \0 002 \f 366 \0 \0 0004060 Z 001 \f 370 \0 006 \f 367 : 004 # 017 \f 366 Z 001 0004100 \f 370 \0 \v \f 367 " 005 : 004 C 017 375 \0 Z 006 0004120 : 004 ; 023 Z \a : \a # 376 202 K 001 006 375 P 0004140 Z 006 : \a ; 377 Z \a : \a # 377 9 \n 347 \0 0004160 * 005 215 \0 : 006 355 \0 : 004 K 026 \f 366 \0 017 0004200 \0 377 Z 001 \f 370 \0 \a \f 367 : 004 # \v : 004 0004220 ; \0 345 \0 ) 004 \f 344 242 \0 \f 366 \0 004 Z 001 0004240 \f 370 \0 \v \f 367 " 005 202 P 202 P : 004 + \0 0004260 216 \0 J 006 " 005 : 004 ; 036 345 J 001 004 205 \0 0004300 001 " 001 220 : 006 # 001 9 d 347 300 202 \r 001 003 0004320 205 \0 001 031 : 006 # 001 9 324 347 \0 202 \f 001 003 0004340 205 \0 001 021 " 006 : 004 C \v : 006 # 001 9 311 0004360 347 \0 : 004 C 024 " 004 : 004 + 027 i 343 \0 002 0004400 204 \0 001 001 \f 366 Z 001 \f 370 \0 \n \f 367 " 005 0004420 202 P 202 P : 004 + \0 216 \0 J 006 : 006 # 001 0004440 9 O 347 004 205 P B \a " \a 203 \0 * 006 253 \0 0004460 202 300 \b 317 @ \0 " \a 001 001 \f 366 Z 001 \f 370 0004500 \0 020 \f 367 B 006 " 006 9 < 345 J 001 T 001 r 0004520 001 V " 004 ) V i V \0 002 ) U \f 346 B \a 0004540 : 004 ; 016 Z \b : 004 # 027 : \b 345 \0 * \a 0004560 \f 344 253 \0 " \a \f 343 : \b 356 \0 " 004 i 242 0004600 \0 002 202 \f 001 \a " 004 ) < i P \0 002 001 002 0004620 ? \0 " 005 001 L " 005 001 J 204 \0 001 H " 005 0004640 9 0 345 K 001 017 " 004 ) G i @ \0 002 " 005 0004660 9 D 346 \0 212 \0 " 004 i 9 \0 002 001 5 @ \0 0004700 \0 002 " 004 * 005 i 036 \0 002 B \a " \a : 004 0004720 ; 027 346 \0 B \b " \a 202 \r 001 & " \b : 004 0004740 ; 017 344 J 001 022 : 004 # 020 9 ( 347 \0 202 \f 0004760 001 \v 001 7 \f 355 \0 5 \f 355 \0 034 \f 355 \0 1 0005000 \0 001 ? \0 003 001 020 : 004 ; 026 Z \t " \b 0005020 9 026 346 \0 : 004 C 026 " 004 * 005 i \a \0 002 0005040 " \t : 004 C 026 " 005 001 002 \0 \0 \f 355 \0 230 0005060 001 030 " 005 001 005 \0 ^ \0 @ \0 004 \0 024 \f 350 0005100 \0 \r \0 005 377 206 377 254 377 253 377 246 377 203 \f 351 0005120 \0 003 \0 \0 377 241 377 377 377 241 377 376 377 237 001 240 0005140 375 \0 Z \a : 004 ; \v Z \b : 004 ; 001 Z \t 0005160 " \b : \t 345 \f 001 B : 004 ; \0 Z \n " \n 0005200 : 004 ; 034 345 \f 001 016 " 004 i O \0 001 202 \f 0005220 001 003 " 005 001 e " 004 i I \0 001 202 \f 001 002 0005240 i F " 004 i Z \0 001 202 \f 001 003 " 005 001 X 0005260 374 \0 Z \a 001 016 " \n 203 \0 * \n 9 O 356 \0 0005300 9 242 Z 003 i L \0 003 " \n 9 270 346 \0 B \n 0005320 " \n : \t 345 \f 001 360 : 004 # 034 9 257 345 \0 0005340 : 004 C 034 " \b 203 \0 : 004 + 022 \f 361 ? 377 0005360 : 004 # 032 : \b C 002 001 016 " 004 i . \0 001 0005400 202 \f 001 003 " 005 001 , : \b ; \0 Z \b " \b 0005420 : 004 C \v : \b # 002 : 004 ; 032 345 \f 001 \b 0005440 " 004 i K \0 001 001 \a \0 \0 \0 \0 \0 \0 " 004 0005460 i E \0 001 : \a 372 \r 001 006 " 004 254 \0 : 004 0005500 017 \f \0 002 " 005 9 G 345 \r 001 005 " 004 * 005 0005520 i K \0 002 " 005 001 004 \0 273 \0 005 \0 \0 \f 366 0005540 Z 001 \f 370 \0 024 \f 367 : 004 ; \v Z 005 : 005 0005560 # 003 202 P B 006 : 005 # 001 9 ` 347 \0 B \a 0005600 : 004 # 020 9 \ 347 \0 202 \r 001 \b : 004 # 027 0005620 9 W 346 \0 ) V \f 347 001 003 " \a 001 001 B \b 0005640 : 005 ; 002 Z \t 375 \0 Z \n : 004 # 020 375 P 0005660 347 \0 202 \r 001 ( 001 # 001 332 \0 \0 " \t : 004 0005700 ; 021 346 \0 : \n 346 \0 B \v 375 P Z \f : 006 0005720 Z \r 001 016 \0 \r " \v : \a 345 \0 B \v & \v 0005740 202 \r 001 003 i d 003 240 " \f 203 \0 B \f " \f 0005760 : \r 344 J 001 361 " \n 203 \0 B \n " \n : \b 0006000 345 \f 001 335 " \b : \n 345 \0 203 \0 374 P 347 \0 0006020 B \b " \t : \n 346 \0 B \t " \b * 006 \f 343 0006040 " 004 i m \0 002 B \v " \v 202 \f 001 \v " 005 0006060 203 \0 255 \0 \f 361 ? 377 001 5 \0 377 \0 002 \0 017 0006100 \0 004 " \v 200 \f 001 004 205 \0 001 2 001 + : \v 0006120 Z \f " \b 202 \r 001 033 375 P Z \r : 006 Z 016 0006140 001 022 : \b Z 003 " \f * \t i J \0 003 " \t 0006160 : \a 346 \0 B \t " \f : \b 346 \0 B \f " \r 0006200 203 \0 B \r " \r : 016 344 J 001 354 " 005 203 \0 0006220 * \b \f 361 \0 377 " 005 203 \0 * \n 252 300 \f 361 0006240 ? \0 " \v : 005 C 002 204 \0 001 002 \0 \0 \f 366 0006260 Z 001 \f 370 \0 \r \f 367 : 004 ; 033 Z \a : 004 0006300 ; 035 Z 006 : 004 ; 034 # 002 B \b : 004 ; 032 0006320 Z \t " \b : \t 345 \f 001 003 : \a Z 006 " 006 0006340 : \a 345 \0 * \b : \a 355 \0 244 J 001 037 " \t 0006360 : 006 345 \0 : 005 345 J 001 005 001 003 \0 \0 004 9 0006400 001 + : 004 # 033 : 004 C 035 " \b : 004 ; 033 0006420 345 \f 001 \v " 004 i J \0 001 202 \f 001 003 204 \0 0006440 001 " " 004 i P \0 001 001 026 " \b : 006 345 \0 0006460 : 005 345 J 001 002 001 020 " 004 i 8 \0 001 202 \f 0006500 001 003 204 \0 001 020 " 004 i > \0 001 202 \f 001 003 0006520 205 \0 001 \t 001 265 " 006 : 005 346 \0 : 004 C 035 0006540 " 006 001 001 \f 366 Z 001 \f 370 \0 \t \f 367 : 004 0006560 # 020 9 O 347 \0 202 \r 001 003 205 \0 001 \a " 004 0006600 254 P : 004 017 \f \0 002 001 001 \f 366 Z 001 \f 370 0006620 \0 \b \f 367 : 004 ; 034 Z 005 : 005 # 002 : 004 0006640 ; 032 345 \f 001 004 205 \0 001 017 004 037 " 005 9 X 0006660 346 \0 : 004 C 034 " 005 203 \0 255 \0 \f 361 ? 377 0006700 204 \0 001 002 004 \f 366 Z 001 \f 370 \0 " \f 367 0006720 B \a " \a 9 F 345 K 001 003 375 \0 Z 006 : 004 0006740 # 027 : 005 346 \0 255 \0 i R \0 002 B \b ! P 0006760 306 \0 B \t " \t 203 \0 374 P 347 \0 B \t " \t 0007000 ) H i H \0 002 " 006 202 K 001 004 ! K 001 004 0007020 \0 \b ! I 001 001 : \t C \0 : 004 ; \v # 002 0007040 : \t C 002 : 004 ; \v # 001 9 ^ 347 \0 : \t 0007060 C 003 375 \0 Z \v : 004 ; 027 Z \f " 005 255 \0 0007100 i T \0 002 * \f 216 \0 " \v i ! \0 002 : \t 0007120 C 004 " \b 202 \f 001 006 : 004 # 027 001 & \0 004 0007140 \0 003 : 004 ; \v # 001 9 ? 347 \0 ) 371 \f 346 0007160 * \b 214 J 001 020 : 004 ; \v # 001 9 5 347 \0 0007200 ) 357 \f 346 : 004 ; 027 345 \0 001 016 \0 \0 \0 021 0007220 \0 020 001 347 " 005 201 \0 212 \0 " 005 i 370 \0 002 0007240 001 003 \0 016 \0 \f 001 001 : \t C 006 : 004 ; \v 0007260 # 003 202 P : \t C \a " \t 9 365 346 \0 B \v 0007300 " 006 202 \f 204 001 205 \0 9 313 Z 003 212 \0 " \v 0007320 i 016 \0 003 " \t i \f \0 001 " 004 * \b i \t 0007340 \0 002 " \b 001 003 \0 377 \0 \0 \f 366 \0 \0 \0 \0 0007360 002 354 \0 - \0 \0 003 214 004 h \0 \0 002 215 \0 271 0007400 004 g \0 270 001 372 002 017 \0 \0 001 033 \0 \0 006 003 0007420 \0 \0 \0 \0 \0 \0 002 242 \0 \0 \0 \0 \0 \0 \0 272 0007440 004 7 005 \t 005 ` 005 m 001 221 002 016 \0 d \0 g 0007460 \0 l \0 223 002 024 \0 267 005 324 001 373 002 \n 004 ~ 0007500 004 ! 005 \n 004 341 005 321 005 377 006 001 006 002 \0 \0 0007520