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