$ od -c -N 50000 [_CD8_]<dorado>doradobaserom.dm!12
0000000 377 \0 \0 d o r a d o i o . m d e f
0000020 s \0 373 227 003 e 272 \0 \0 376 001 \0 206 317 ; *
0000040 * * * * * * * *
*
0000140 \r ; \r ; \t D O R A D O
0000160 C o n t r o l
0000200 P r o g r a m
0000220 \r ; \r ; \t \t I / O D
0000240 e v i c e A d
0000260 d r e s s e s \r ; \r
0000300 ; * * * * * * * *
0000320 * * * * * * * *
*
0000400 * \r \r ; \t f i l e d o n D
0000420 o r a d o I O . m d e f s \r 376 001
0000440 \0 c \f ; \t E . M c C r e i g h
0000460 t \r ; \t l a s t m o d i f i e
0000500 d A p r i l 1 4 , 1 9 8 1
0000520 1 2 : 4 8 P M \r \r \t . R D
0000540 X \t 1 6 \r \r ; \t D e s c r i p t
0000560 i o n o f t h e M C S 6 5
0000600 3 2 " c o m b o " R a m / I
0000620 O / T i m e r c h i p \r \r P A
0000640 = 0 \r D D R = 1 \r \t I s
0000660 O u t p u t = 1 \r \t I s I n
0000700 p u t = 0 \r \t A l l O u t p
0000720 u t = 0 f f \r \t A l l I n p
0000740 u t = 0 \r P B = 2 \r T i
0000760 m e r = 1 4 \r \t D o T i m e
0001000 r I n t e r r u p t = 8 \r \t
0001020 D i v 8 = 1 \r \t D i v 6 4
0001040 = 2 376 001 \0 s 223 \r \t D i v 1 0 2
0001060 4 = 3 \r I n t F l a g s =
0001100 5 \r \t T i m e r F l a g =
0001120 8 0 \r \t P A 7 F l a g = 4 0
0001140 \r \r \r ; \t T h e v a r i o u s
0001160 6 5 3 2 c h i p s : \r \r D A
0001200 C = 4 0 0 + P A \r M A B y t
0001220 e = D A C \r D A C D D R V a
0001240 l u e = A l l O u t p u t \t
0001260 ; a l l b i t s o u t p u
0001300 t \r \r S y n c = 8 0 \r C P I
0001320 B u s = 4 0 0 + P B \r \t M A
0001340 S y n c = S y n c \t ; i n
0001360 C P I B u s \r \t T r a p ' =
0001400 4 0 \r \t D M D 0 = 2 0 \t ;
0001420 u s e d f o r s a v i n g
0001440 t h e D M D 376 001 \0 e 371 s h
0001460 i f t r e g i s t e r \r \t C P
0001500 I = 1 e \t ; C P I [ 0 - 3
0001520 ] i n b i t s 4 - 1 \r \t D
0001540 M u x D a t a = 1 \r C P I B
0001560 u s D D R V a l u e = I s O
0001600 u t p u t * ( M A S y n c + T r
0001620 a p ' ) \r \r C o m p a r a t o r
0001640 s = 4 8 0 + P A \r \t I S e l
0001660 = 0 e 0 \t ; i n C o m p
0001700 a r a t o r s \r \t \t I D e l t a
0001720 = 1 ^ 5 \t ; i n I S e l
0001740 \r \t \t I C a l i b r a t e M a s
0001760 k = 0 * I D e l t a \r \t \t I
0002000 D D M a s k = 1 * I D e l t
0002020 a \r \t \t I C C M a s k = 2 *
0002040 I D e l t a \r \t \t I T T M 376 001 \0
0002060 T 227 a s k = 3 * I D e l t a
0002100 \r \t \t I E E M a s k = 4 * I
0002120 D e l t a \r \t \t I G n d M a s k
0002140 = 5 * I D e l t a \r \t \t I V
0002160 E E M a s k = 6 * I D e l t
0002200 a \r \t C I = 1 0 \r \t C V D D
0002220 = 8 \r \t C V C C = 4 \r \t
0002240 C V T T = 2 \r \t C V E E =
0002260 1 \r C o m p a r a t o r s D D
0002300 R V a l u e = I s O u t p u
0002320 t * I S e l \r \r M i s c B y t e
0002340 = 4 8 0 + P B \r \t L a m p O
0002360 f f = 8 0 \t ; i n M i s
0002400 c B y t e \r \t B o o t ' = 4
0002420 0 \r \t T C B T e m p S e n s e
0002440 = 2 0 \r \t T B a s e T e m p S
0002460 e n 376 001 \0 352 263 s e = 1 0 \r \t
0002500 M C M a n i f o l d = 0 f \r
0002520 M i s c B y t e D D R V a l u e
0002540 = I s O u t p u t * L a m p
0002560 O f f \r \r C P R e g H = 5 0
0002600 0 + P A \r \t A M S y n c = S
0002620 y n c \t ; i n C P R e g H
0002640 d u r i n g P o k e M i c r o
0002660 \r \t D o r a d o S e l = 4 0
0002700 \r \t A H a s C P = 2 0 \r \t M
0002720 W a n t s A = 1 0 \r \t H o l
0002740 d M C = 8 \r \t M i d a s C o
0002760 m m a n d = 7 \t ; b i t s
0003000 0 - 2 \r C P R e g H D D R V a
0003020 l u e = A l l I n p u t \t ;
0003040 a l l i n p u t b i t s \r
0003060 \r C P R e g L 376 001 \0 243 ` = 5
0003100 0 0 + P B \r C P R e g L D D R V
0003120 a l u e = A l l I n p u t \t
0003140 ; a l l i n p u t b i t s
0003160 \r \r M C P B u s H = 5 8 0 +
0003200 P A \r M C P B u s H D D R V a l
0003220 u e = 0 f f \r \r M C P B u s
0003240 L = 5 8 0 + P B \r \t M C P A
0003260 B u s = 7 0 \t ; i n M C
0003300 P B u s L \r \t S e t R u n I n
0003320 = 4 \r \t S k i p D i s k W a i
0003340 t ' = 2 \r \t M C P S t r o b
0003360 e = 1 \r M C P B u s L D D R
0003400 V a l u e = I s O u t p u t
0003420 * ( 8 0 + M C P A B u s + M C P
0003440 S t r o b e ) \r \r W a t c h d o
0003460 g = 6 0 0 + P A \r \t 376 001 \0 332
0003500 273 W a t c h d o g I n = 8 0
0003520 \t ; i n W a t c h d o g \r \t
0003540 W a t c h d o g O u t = 4 0
0003560 \r W a t c h d o g D D R V a l u
0003600 e = W a t c h d o g O u t *
0003620 I s O u t p u t \r \r ; \t \t M e m
0003640 o r y A d d r e s s e s \r \r P
0003660 a g e 0 = 0 \r P a g e 1 =
0003700 1 0 0 \r S t a c k T o p =
0003720 P a g e 1 + 1 \t ; + S \r \f \r ;
0003740 \t D o r a d o C P B u s B
0003760 i t s \r \r C o n t r o l = 0
0004000 \t ; g o e s i n M C P B u
0004020 s L [ M C P A B u s ] \r C l o c
0004040 k = 1 0 \r A B M u x 0 =
0004060 2 0 \r A B M u x 1 = 3 0 \r M
0004100 I 376 001 \0 177 366 R 0 = 4 0 \r M I
0004120 R 1 = 5 0 \r M I R 2 = 6
0004140 0 \r M I R 3 = 7 0 \r \r \r C l
0004160 r S t o p = 4 0 \t ; i n
0004200 C o n t r o l \r S t o p A t T 1
0004220 = 2 0 \r J a m = 1 0 \r F
0004240 r e e z e = 8 \r C l r M I R
0004260 = 4 \r C l r C T = 2 \r S
0004300 e t R u n = 1 \r S e t S S
0004320 = 8 0 \t ; i n t h e l o
0004340 w - o r d e r b y t e o f
0004360 M C P B u s \r \r D A d d r B i t
0004400 = 8 0 \t ; i n C l o c k
0004420 \r S h i f t D M D = 4 0 \r I
0004440 n h i b i t C A H o l d s =
0004460 2 0 \r G e t T L I N K = 1 0
0004500 \r U s e C P 376 \0 222 225 322 R e g =
0004520 8 \r U s e D M D = 4 \r B a
0004540 s e A t t n = 2 \r C l r R e
0004560 a d y = 1 \r \r B 0 = 0 \t
0004600 ; M C P B u s H v a l u e s
0004620 f o r C P I r e a d o u t
0004640 \r B 1 = 2 0 \r B 2 = 4 0
0004660 \r B 3 = 6 0 \r P E I M =
0004700 8 0 \r P E M e m = 0 a 0 \r S
0004720 t o p p e d = 0 c 0 \r 377 \0 \0
0004740 d o r a d o b a s e c o d e v e
0004760 r s i o n . m a s m \0 373 231 300 252 314
0005000 \0 \0 376 001 \0 335 240 ; * * * *
0005020 * * * * * * * *
*
0005100 * * * * * \r ; \r ; \t D
0005120 O R A D O C o
0005140 n t r o l P r
0005160 o g r a m \r ; \r ; \t \t C
0005200 o d e V e r s
0005220 i o n \r ; \r ; * * *
0005240 * * * * * * * *
*
0005320 * * * * * * \r \r ; \t f
0005340 i l e d o n D o r a d o B a
0005360 s e C o d e V e r s i o n . m a
0005400 s m \r ; \t E . 376 001 \0 ) V M c C
0005420 r e i g h t \r ; \t l a s t m o
0005440 d i f i e d S e p t e m b e r
0005460 2 8 , 1 9 8 2 1 2 : 0 4
0005500 P M \r \r \t . E X P O R T \t B a
0005520 s e C o d e V e r s i o n , B o
0005540 o t 0 G o L o c , I n i t M a p
0005560 \r \r B a s e C o d e V e r s i o
0005600 n = 1 7 o \t ; a f t e r
0005620 S e p t e m b e r 2 8 , 1 9
0005640 8 2 1 2 : 0 4 P M \r B o o
0005660 t 0 G o L o c = 7 7 4 0 o \t
0005700 ; I M l o c a t i o n w h
0005720 e r e B o o t 0 c o n t r o
0005740 l s t a r t s \r I n i t M a p
0005760 = 1 0 7 6 o \t ; c o n v e
0006000 n t i o n a l I M i 376 \0 037 1
0006020 n i t i a l i z a t i o n l
0006040 o c a t i o n \r \t . E N D \r \r \r
0006060 377 \0 \0 d o r a d o m i d a s h o
0006100 o k s . m a s m \0 373 227 253 363 016 \0 \0
0006120 376 001 \0 004 4 ; * * * * *
0006140 * * * * * * * *
*
0006220 * * * * \r ; \r ; \t D O
0006240 R A D O C o n
0006260 t r o l P r o
0006300 g r a m \r ; \r ; \t \t M i
0006320 d a s - K n o w
0006340 n L o c a t i
0006360 o n s \r ; \r ; * * *
0006400 * * * * * * * *
*
0006460 * * * * * * \r \r ; \t f
0006500 i l e d o n D o r a d o M i
0006520 d a s H o 376 001 \0 : z o k s . m a
0006540 s m \r ; \t E . M c C r e i g h
0006560 t \r ; \t l a s t m o d i f i e
0006600 d A u g u s t 2 0 , 1 9 8
0006620 1 1 0 : 1 4 A M \r \r \t . R
0006640 D X \t 1 6 \r \r \t . E X P O R T \t
0006660 Z C o d e V e r s i o n \r \t . E
0006700 X P O R T \t Z P t r \r \t . E X P
0006720 O R T \t Z P C , Z S , Z P , Z A
0006740 , Z X , Z Y \r \t . E X P O R T \t
0006760 Z S u b P C , Z S u b S , Z S u
0007000 b P , Z S u b A , Z S u b X , Z
0007020 S u b Y \r \t . E X P O R T \t Z S
0007040 i m B l k \r \t . E X P O R T \t T
0007060 i m e r 1 0 0 m s , S u p p l y
0007100 B a d T i m e \r \t . E X P O R T
0007120 \t P o w e r O u t O 376 001 \0 \f 207 f
0007140 S p e c \r \t . E X P O R T \t V o
0007160 l t a g e T a b l e , C u r r e
0007200 n t T a b l e , E n v i r o n m
0007220 e n t L e n \r \t . E X P O R T \t
0007240 V D D , V E E , V T T , V C C \r
0007260 \t . E X P O R T \t I D D , I E E
0007300 , I T T , I C C \r \t . E X P O R
0007320 T \t T h e r m o m e t e r s \r \t
0007340 . E X P O R T \t B a s e T e m p
0007360 , C B T e m p , C A T e m p \r \t
0007400 . E X P O R T \t P r o c L T e m
0007420 p , P r o c H T e m p , I F U T
0007440 e m p \r \t . E X P O R T \t M e m
0007460 C T e m p , M e m X T e m p , M
0007500 e m D T e m p \r \t . E X P O R T
0007520 \t C u r E n v i r o n m e n t 376
0007540 001 \0 @ 332 , F i r s t E n v i r o
0007560 n m e n t \r \t . E X P O R T \t M
0007600 i n E n v i r o n m e n t , M a
0007620 x E n v i r o n m e n t \r \t . E
0007640 X P O R T \t B a d S u p p l y S
0007660 p e c , P r o b l e m s \r \t . E
0007700 X P O R T \t N o r m a l W a i t
0007720 , C o u l d n t B o o t D o r a
0007740 d o , T r a n s i e n t P o w e
0007760 r P r o b l e m \r \t . E X P O R
0010000 T \t C u r r e n t P o w e r P r
0010020 o b l e m , O v e r T e m p , S
0010040 h u t D o w n \r \t . E X P O R T
0010060 \t C a n t G e t C P C o n t r o
0010100 l , M e l t D o w n T e m p \r \r
0010120 ; \t S t a t e f o r M i d a
0010140 s i n 376 001 \0 312 243 t e r f a c e
0010160 . S t a r t s a t l o c a
0010200 t i o n 0 . \r ; \t M i d a s
0010220 m u s t k n o w w h e r e
0010240 t h i s i s ! \r \r \t . L O C
0010260 \t M i d a s H o o k s \r \r ; \t T
0010300 h e m i c r o c o m p u t e r
0010320 c o d e v e r s i o n . \r \r
0010340 Z C o d e V e r s i o n : \r \t .
0010360 B L K \t 1 \r \r \r ; \t I n f o r m
0010400 a t i o n a b o u t p o w e
0010420 r s u p p l i e s a n d t
0010440 e m p e r a t u r e . \r \r P o w
0010460 e r O u t O f S p e c : \t . B L
0010500 K \t 1 \t ; f o r v o l t a g
0010520 e s a n d c u r r e n t s \r
0010540 ; \t f r o m h i 376 001 \0 322 325 g h
0010560 t o l o w o r d e r : \r ;
0010600 \t \t V D D , V C C , V T T , V E
0010620 E , I D D , I C C , I T T , I E
0010640 E \r \r C u r E n v i r o n m e n
0010660 t : \r V o l t a g e T a b l e :
0010700 \r \t V D D : \t . B L K \t 1 \t ;
0010720 . 0 6 1 9 v o l t s / c o u n
0010740 t \t [ + 1 2 v n o m ] \r \t V C
0010760 C : \t . B L K \t 1 \t ; . 0 2 6
0011000 2 v o l t s / c o u n t [ +
0011020 5 v n o m ] \r \t V T T : \t . B
0011040 L K \t 1 \t ; - . 0 1 0 1 v o
0011060 l t s / c o u n t [ - 2 v n
0011100 o m ] \r \t V E E : \t . B L K \t 1
0011120 \t ; - . 0 2 5 9 v o l t s /
0011140 c o u n t [ - 5 . 2 v n 376 001
0011160 \0 203 006 o m ] \r \r C u r r e n t T
0011200 a b l e : \r \t I D D : \t . B L K
0011220 \t 1 \t ; . 9 7 1 a m p s / c
0011240 o u n t \r \t I C C : \t . B L K \t
0011260 1 \t ; . 9 7 1 a m p s / c o
0011300 u n t \r \t I T T : \t . B L K \t 1
0011320 \t ; . 9 7 1 a m p s / c o u
0011340 n t \r \t I E E : \t . B L K \t 1 \t
0011360 ; 4 . 2 9 a m p s / c o u n
0011400 t \r \r T h e r m o m e t e r s :
0011420 \r \t B a s e T e m p : \t . B L K
0011440 \t 1 \t ; - 1 m e a n s n o
0011460 b o a r d i n s t a l l e d
0011500 \r \t C B T e m p : \t . B L K \t 1
0011520 \t ; 0 m e a n s b o a r d
0011540 b u t n o t h e r m o m e
0011560 t e r 376 001 \0 214 E \r \t C A T e m p
0011600 : \t . B L K \t 1 \t ; o t h e r
0011620 w i s e 1 . 9 6 d e g K /
0011640 c o u n t \r \t P r o c L T e m p
0011660 : \t . B L K \t 1 \r \t P r o c H T
0011700 e m p : \t . B L K \t 1 \r \t I F U
0011720 T e m p : \t . B L K \t 1 \t ; T
0011740 e m p e r a t u r e s c a n n
0011760 o t b e r e a d \r \t M e m C
0012000 T e m p : \t . B L K \t 1 \t ;
0012020 u n l e s s t h e - 5 . 2 v
0012040 s u p p l y i s g o o d \r
0012060 \t M e m X T e m p : \t . B L K \t
0012100 1 \r \t M e m D T e m p : \t . B L
0012120 K \t 1 \r \t D s k E t h T e m p :
0012140 \t . B L K \t 1 \r \t D i s p l a y
0012160 T e m p : \t . B 376 001 \0 4 370 L K \t
0012200 1 \r \t \t \t . B L K \t 1 \r \r E n v
0012220 i r o n m e n t L e n = . -
0012240 C u r E n v i r o n m e n t \r \r
0012260 F i r s t E n v i r o n m e n t
0012300 : \r F i r s t V o l t a g e T a
0012320 b l e : \r \t F i r s t V D D : \t
0012340 . B L K \t 1 \r \t F i r s t V C C
0012360 : \t . B L K \t 1 \r \t F i r s t V
0012400 T T : \t . B L K \t 1 \r \t F i r s
0012420 t V E E : \t . B L K \t 1 \r \r F i
0012440 r s t C u r r e n t T a b l e :
0012460 \r \t F i r s t I D D : \t . B L K
0012500 \t 1 \r \t F i r s t I C C : \t . B
0012520 L K \t 1 \r \t F i r s t I T T : \t
0012540 . B L K \t 1 \r \t F i r s t I E E
0012560 : \t . B L K \t 1 \r \r F i r 376 001 \0
0012600 347 M s t T h e r m o m e t e r s
0012620 : \r \t F i r s t B a s e T e m p
0012640 : \t . B L K \t 1 \r \t F i r s t C
0012660 B T e m p : \t . B L K \t 1 \r \t F
0012700 i r s t C A T e m p : \t . B L K
0012720 \t 1 \r \t F i r s t P r o c L T e
0012740 m p : \t . B L K \t 1 \r \t F i r s
0012760 t P r o c H T e m p : \t . B L K
0013000 \t 1 \r \t F i r s t I F U T e m p
0013020 : \t . B L K \t 1 \r \t F i r s t M
0013040 e m C T e m p : \t . B L K \t 1 \r
0013060 \t F i r s t M e m X T e m p : \t
0013100 . B L K \t 1 \r \t F i r s t M e m
0013120 D T e m p : \t . B L K \t 1 \r \t F
0013140 i r s t D s k E t h T e m p : \t
0013160 . B L K \t 1 \r \t F i r s t D i s
0013200 p l 376 001 \0 246 031 a y T e m p : \t .
0013220 B L K \t 1 \r \t \t \t . B L K \t 1 \r
0013240 \r M i n E n v i r o n m e n t :
0013260 \r M i n V o l t a g e T a b l e
0013300 : \r \t M i n V D D : \t . B L K \t
0013320 1 \r \t M i n V C C : \t . B L K \t
0013340 1 \r \t M i n V T T : \t . B L K \t
0013360 1 \r \t M i n V E E : \t . B L K \t
0013400 1 \r \r M i n C u r r e n t T a b
0013420 l e : \r \t M i n I D D : \t . B L
0013440 K \t 1 \r \t M i n I C C : \t . B L
0013460 K \t 1 \r \t M i n I T T : \t . B L
0013500 K \t 1 \r \t M i n I E E : \t . B L
0013520 K \t 1 \r \r M i n T h e r m o m e
0013540 t e r s : \r \t M i n B a s e T e
0013560 m p : \t . B L K \t 1 \r \t M i n C
0013600 B T e m p : \t 376 001 \0 307 303 . B L K
0013620 \t 1 \r \t M i n C A T e m p : \t .
0013640 B L K \t 1 \r \t M i n P r o c L T
0013660 e m p : \t . B L K \t 1 \r \t M i n
0013700 P r o c H T e m p : \t . B L K \t
0013720 1 \r \t M i n I F U T e m p : \t .
0013740 B L K \t 1 \r \t M i n M e m C T e
0013760 m p : \t . B L K \t 1 \r \t M i n M
0014000 e m X T e m p : \t . B L K \t 1 \r
0014020 \t M i n M e m D T e m p : \t . B
0014040 L K \t 1 \r \t M i n D s k E t h T
0014060 e m p : \t . B L K \t 1 \r \t M i n
0014100 D i s p l a y T e m p : \t . B L
0014120 K \t 1 \r \t \t \t . B L K \t 1 \r \r M
0014140 a x E n v i r o n m e n t : \r M
0014160 a x V o l t a g e T a b l e : \r
0014200 \t M a x V D D : \t . B L 376 001 \0 \n
0014220 275 K \t 1 \r \t M a x V C C : \t . B
0014240 L K \t 1 \r \t M a x V T T : \t . B
0014260 L K \t 1 \r \t M a x V E E : \t . B
0014300 L K \t 1 \r \r M a x C u r r e n t
0014320 T a b l e : \r \t M a x I D D : \t
0014340 . B L K \t 1 \r \t M a x I C C : \t
0014360 . B L K \t 1 \r \t M a x I T T : \t
0014400 . B L K \t 1 \r \t M a x I E E : \t
0014420 . B L K \t 1 \r \r M a x T h e r m
0014440 o m e t e r s : \r \t M a x B a s
0014460 e T e m p : \t . B L K \t 1 \r \t M
0014500 a x C B T e m p : \t . B L K \t 1
0014520 \r \t M a x C A T e m p : \t . B L
0014540 K \t 1 \r \t M a x P r o c L T e m
0014560 p : \t . B L K \t 1 \r \t M a x P r
0014600 o c H T e m p : \t . B L K \t 1 \r
0014620 \t 376 001 \0 D 247 M a x I F U T e m p
0014640 : \t . B L K \t 1 \r \t M a x M e m
0014660 C T e m p : \t . B L K \t 1 \r \t M
0014700 a x M e m X T e m p : \t . B L K
0014720 \t 1 \r \t M a x M e m D T e m p :
0014740 \t . B L K \t 1 \r \t M a x D s k E
0014760 t h T e m p : \t . B L K \t 1 \r \t
0015000 M a x D i s p l a y T e m p : \t
0015020 . B L K \t 1 \r \t \t \t . B L K \t 1
0015040 \r \r \r ; \t T i m e r t h a t
0015060 g e t s i n c r e m e n t e d
0015100 e v e r y 1 0 2 . 4 m s .
0015120 L o w - o r d e r b y t e \r
0015140 ; \t f i r s t . I n i t i a l
0015160 i z e d t o 0 w h e n m
0015200 i c r o c o m p u t e r i s
0015220 r e s e t . 376 001 \0 262 247 \r \r T i m
0015240 e r 1 0 0 m s : \t . B L K \t 6 \r
0015260 \r \r ; \t C o p y o f t h e
0015300 1 0 0 m s t i m e r m a d
0015320 e t h e l a s t t i m e
0015340 a p o w e r \r ; \t s u p p l y
0015360 w a s o u t o f s p e c
0015400 . T h e v a l u e o f P
0015420 o w e r O u t O f S p e c \r ; \t
0015440 a t t h a t t i m e i s
0015460 r e c o r d e d i n B a d S
0015500 u p p l y S p e c . \r \r S u p p
0015520 l y B a d T i m e : \t . B L K \t
0015540 6 \r \r \r ; \t T h e p o i n t e
0015560 r b y m e a n s o f w h
0015600 i c h M i d a s a c c e s s
0015620 e s a n y \r ; \t m e 376 001 \0 370 025
0015640 m o r y l o c a t i o n \r \r Z
0015660 P t r : \t . B L K \t 2 \t ; p o
0015700 i n t e r f o r m e m o r y
0015720 r e a d s a n d w r i t e
0015740 s \r \r \r ; \t T h e s a v e d
0015760 s t a t e w h e n t h e M
0016000 i d a s i n t e r r u p t w
0016020 a s t a k e n \r \r Z P C : \t .
0016040 B L K \t 2 \t ; s a v e d p r
0016060 o g r a m c o u n t e r , l
0016100 o w - o r d e r b y t e f i
0016120 r s t \r Z S : \t . B L K \t 1 \t ;
0016140 s a v e d s t a c k p o i
0016160 n t e r \r Z P : \t . B L K \t 1 \t
0016200 ; s a v e d p r o c e s s o
0016220 r s t a t e r e g i s t e r
0016240 376 001 \0 235 322 \r Z A : \t . B L K \t 1
0016260 \t ; s a v e d a c c u m u l
0016300 a t o r \r Z X : \t . B L K \t 1 \t
0016320 ; s a v e d X r e g i s t
0016340 e r \r Z Y : \t . B L K \t 1 \t ;
0016360 s a v e d Y r e g i s t e r
0016400 \r \r \r ; \t A d e s c r i p t i
0016420 o n o f w h a t s u p p l
0016440 i e s w e r e m e a s u r e
0016460 d b a d , t h e l a s t \r
0016500 ; \t t i m e a n y s u p p l
0016520 i e s w e r e o u t o f
0016540 t o l e r a n c e . \r \r B a d S
0016560 u p p l y S p e c : \t . B L K \t
0016600 1 \t ; s a m e f o r m a t
0016620 a s P o w e r O u t O f S p e
0016640 c \r \r \r ; 376 001 \0 N \0 \t A d e s
0016660 c r i p t i o n o f w h a t
0016700 t h e m i c r o c o m p u t
0016720 e r t h i n k s i s w r o
0016740 n g \r ; \t w i t h t h e m a
0016760 c h i n e . \r \r P r o b l e m s
0017000 : \t . B L K \t 1 \r \t N o r m a l
0017020 W a i t = 8 0 \r \t C o u l d
0017040 n t B o o t D o r a d o = 4
0017060 0 \r \t T r a n s i e n t P o w e
0017100 r P r o b l e m = 2 0 \r \t C
0017120 u r r e n t P o w e r P r o b l
0017140 e m = 1 0 \r \t S h u t D o w
0017160 n = 8 \r \t O v e r T e m p
0017200 = 4 \r \t C a n t G e t C P C o
0017220 n t r o l = 2 \r \r ; \t S t a
0017240 t e w h i c h M 376 001 \0 7 237 i
0017260 d a s c a n s e t u p f
0017300 o r c a l l i n g m i c r o
0017320 c o m p u t e r \r ; \t s u b r o
0017340 u t i n e s \r \r Z S u b P C : \t
0017360 . B L K \t 2 \t ; s u b r o u t
0017400 i n e p r o g r a m c o u n
0017420 t e r , l o w - o r d e r b
0017440 y t e f i r s t \r Z S u b S :
0017460 \t . B L K \t 1 \t ; s u b r o u
0017500 t i n e s t a c k p o i n t
0017520 e r \r Z S u b P : \t . B L K \t 1
0017540 \t ; s u b r o u t i n e p r
0017560 o c e s s o r s t a t e r e
0017600 g i s t e r \r Z S u b A : \t . B
0017620 L K \t 1 \t ; s u b r o u t i n
0017640 e a c c u m u l a t o r \r Z 376
0017660 001 \0 c 361 S u b X : \t . B L K \t 1
0017700 \t ; s u b r o u t i n e X
0017720 r e g i s t e r \r Z S u b Y : \t
0017740 . B L K \t 1 \t ; s u b r o u t
0017760 i n e Y r e g i s t e r \r \t
0020000 \t \t . B L K \t 1 \r \r Z S i m B l
0020020 k : \r \t . B L K \t 1 0 . \t ; \t B
0020040 l o c k f o r s i m u l a t
0020060 e d i n s t r u c t i o n e
0020100 x e c u t i o n , o f t h e
0020120 f o r m \r \r ; \t S i m I n s
0020140 t r ; N o r m a l j u m p ;
0020160 A l t e r n a t e j u m p \r
0020200 \r M e l t D o w n T e m p : \r \t
0020220 . B L K \t 1 \t ; t h r e s h o
0020240 l d t e m p f o r m e l t
0020260 d o w n 376 \0 034 004 245 : 1 . 9 6
0020300 d e g K / c o u n t \r \r \t . E
0020320 N D \r \r \r 377 \0 \0 d o r a d o m u
0020340 f m a n . m a s m \0 373 231 300 252 227 \0
0020360 \0 376 001 \0 L 376 ; * * * * *
0020400 * * * * * * * *
*
0020460 * * * * \r ; \r ; \t D O
0020500 R A D O C o n
0020520 t r o l P r o
0020540 g r a m \r ; \r ; \r ; \t \t
0020560 M u f f l e r /
0020600 M a n i f o l d
0020620 a n d \r ; \r ; \t \t M i
0020640 c r o i n s t r
0020660 u c t i o n C
0020700 o n s t a n t s
0020720 \r ; \r ; * * * * * *
0020740 * * * * * * * *
0020760 * * * 376 001 \0 360 342 * * *
0021000 * * * * * * * *
0021020 * * * * * \r \r ; \t f i
0021040 l e d o n D o r a d o M u f
0021060 M a n . m a s m \r ; \t E . M c
0021100 C r e i g h t \r ; \t l a s t m
0021120 o d i f i e d S e p t e m b e
0021140 r 2 8 , 1 9 8 2 1 1 : 5
0021160 5 A M \r \r \t . E X P O R T \t P
0021200 o w e r U p M i n u s 5 A n d 1
0021220 2 , P o w e r D o w n M i n u s
0021240 2 \r \t . E X P O R T \t P o w e r
0021260 U p D i s k , P o w e r U p A l
0021300 l S u p p l i e s , P o w e r D
0021320 o w n D i s k \r \t . E X P O R T
0021340 \t L o a d D i s k H e a d s , U
0021360 n l o a d D i s k H e 376 001 \0 9 020
0021400 a d s \r \t . E X P O R T \t P o w
0021420 e r D o w n E v e r y t h i n g
0021440 , D o I O R e s e t , D i s c o
0021460 n n e c t M u f M a n \r \t . E X
0021500 P O R T \t S t d C l o c k S e t
0021520 , S t d C l o c k S p e e d H ,
0021540 S t d C l o c k S p e e d L \r \t
0021560 . E X P O R T \t C l e a r D M M
0021600 a n i f o l d , A l l o w C B H
0021620 o l d s \r \t . E X P O R T \t M u
0021640 f f l e r T a b l e , I n i t M
0021660 a n i f o l d s \r \t . E X P O R
0021700 T \t M a x I n i t M a n i f o l
0021720 d \r \t . E X P O R T \t C l o c k
0021740 S p e e d M u f F i e l d \r \t .
0021760 E X P O R T \t D i s k H e a d s
0022000 376 001 \0 351 276 L o a d e d M u f \r \t
0022020 . E X P O R T \t T h e r m o m M
0022040 u f A d d r , M a x T h e r m o
0022060 m \r \t . E X P O R T \t E c l U p
0022100 M u f f l e r , T u r n O n P w
0022120 r M u f \r \r \t . P R E D E F I N
0022140 E " M C S 6 5 0 2 P R E D E F
0022160 S . S R " \r \t . R D X \t 1 6 \r \f
0022200 \r \t . L O C \t M u f f l e r D a
0022220 t a \r \r M u f f l e r T a b l e
0022240 : \r \r ; \t B a s e B o a r d m
0022260 a n i f o l d v a l u e s \r \r
0022300 ; \t T h i s f i r s t b a t
0022320 c h i s f o r c o n t r o
0022340 l l i n g t h e p o w e r
0022360 s e q u e n c i n g \r ; \t o f
0022400 t h e D 376 001 \0 331 ? o r a d o ,
0022420 a n d i s a r r a n g e d
0022440 m o r e o r l e s s i n
0022460 t h e o r d e r \r ; \t i n
0022500 w h i c h t h e y a r e n
0022520 o r m a l l y u s e d . \r \r P
0022540 o w e r M a n i f o l d = 2
0022560 3 0 0 o \r R u n M i n u s 5 A n
0022600 d 1 2 = 8 \r R u n D i s k
0022620 = 4 \r L o a d H e a d s =
0022640 2 \r R u n M i n u s 2 = 1 \r
0022660 \r P o w e r U p D i s k = .
0022700 - M u f f l e r T a b l e \r \t .
0022720 A D R \t ( P o w e r M a n i f o
0022740 l d + R u n D i s k ) ^ 4 \r \t \t
0022760 ; s u p p l i e s o f f ,
0023000 d i s k o n , h 376 001 \0 336 h e
0023020 a d s n o t l o a d e d \r L
0023040 o a d D i s k H e a d s = .
0023060 - M u f f l e r T a b l e \r \t .
0023100 A D R \t ( P o w e r M a n i f o
0023120 l d + R u n D i s k + L o a d H
0023140 e a d s ) ^ 4 \r \t \t ; s u p p
0023160 l i e s o f f , d i s k o
0023200 n , h e a d s l o a d e d \r
0023220 P o w e r U p M i n u s 5 A n d
0023240 1 2 = . - M u f f l e r T a
0023260 b l e \r \t . A D R \t ( P o w e r
0023300 M a n i f o l d + R u n M i n u
0023320 s 5 A n d 1 2 + R u n D i s k +
0023340 L o a d H e a d s ) ^ 4 \r \t \t ;
0023360 s o m e s u p p l i e s o
0023400 n , d i s k o n , h e a 376
0023420 001 \0 _ 221 d s l o a d e d \r P o
0023440 w e r U p A l l S u p p l i e s
0023460 = . - M u f f l e r T a b l
0023500 e \r \t . A D R \t ( P o w e r M a
0023520 n i f o l d + R u n M i n u s 5
0023540 A n d 1 2 + R u n M i n u s 2 +
0023560 R u n D i s k + L o a d H e a d
0023600 s ) ^ 4 \t \r \t \t ; a l l s u
0023620 p p l i e s o n , d i s k
0023640 o n , h e a d s l o a d e d
0023660 \r U n l o a d D i s k H e a d s
0023700 = . - M u f f l e r T a b l
0023720 e \r \t . A D R \t ( P o w e r M a
0023740 n i f o l d + R u n M i n u s 5
0023760 A n d 1 2 + R u n M i n u s 2 +
0024000 R u n D i s k ) ^ 4 \r \t \t ; s
0024020 u p p l 376 001 \0 034 341 i e s o n ,
0024040 d i s k o n , h e a d s
0024060 n o t l o a d e d \r P o w e r
0024100 D o w n D i s k = . - M u f
0024120 f l e r T a b l e \r \t . A D R \t
0024140 ( P o w e r M a n i f o l d + R
0024160 u n M i n u s 5 A n d 1 2 + R u
0024200 n M i n u s 2 ) ^ 4 \r \t \t ; d
0024220 i s k o f f , s u p p l i e
0024240 s o n \r P o w e r D o w n M i
0024260 n u s 2 = . - M u f f l e r
0024300 T a b l e \r \t . A D R \t ( P o w
0024320 e r M a n i f o l d + R u n M i
0024340 n u s 5 A n d 1 2 ) ^ 4 \r \t \t ;
0024360 s o m e s u p p l i e s a
0024400 n d d i s k o f f \r P o w e
0024420 r D o w n E v e r 376 001 \0 234 006 y t
0024440 h i n g = . - M u f f l e r
0024460 T a b l e \r \t . A D R \t ( P o w
0024500 e r M a n i f o l d + 0 ) ^ 4 \r
0024520 \t \t ; a l l s u p p l i e s
0024540 a n d d i s k o f f \r \r D
0024560 i s c o n n e c t M u f M a n
0024600 = . - M u f f l e r T a b l e
0024620 \r \t . A D R \t ( 2 2 4 0 o + R u
0024640 n R f s h ) ^ 4 \t \t ; E c l
0024660 d o w n , r e f r e s h e s
0024700 o n , I O r e s e t \r \r \r ;
0024720 \t T h i s n e x t p a i r
0024740 s e t s t h e c l o c k s
0024760 p e e d t o s t a n d a r d
0025000 . R e l i g i o n \r ; \t a s s
0025020 e r t s t h a t e v e r 376 001
0025040 \0 @ B y D o r a d o w i l l
0025060 r u n e v e r y i n s t r
0025100 u c t i o n \r ; \t f l a w l e s
0025120 s l y w i t h o u t e x c e
0025140 p t i o n a t t h i s s p
0025160 e e d . \r \r ; S t d C l o c k
0025200 S p e e d = 3 2 . ; n s
0025220 p e r h a l f c l o c k \r
0025240 ; S t d C l o c k S e t =
0025260 ( ( ( ( 2 * 2 0 0 0 . ) / S t d
0025300 C l o c k S p e e d ) + 1 ) / 2
0025320 ) - 1 \r ; T h e a b o
0025340 v e e q u a t i o n i s t
0025360 h e c o r r e c t o n e .
0025400 M i d a s \r ; ( a t
0025420 l e a s t u p t h r o u g h
0025440 S e 376 001 \0 017 s p t e m b e r
0025460 2 8 , 1 9 8 2 ) u s e s a
0025500 d i f f e r e n t \r ;
0025520 ( a n d i n c o r r e c t )
0025540 o n e . T h e c o l o r
0025560 D i s p M b o a r d \r ;
0025600 r e q u i r e s a h a l f
0025620 - c y c l e t i m e ( s a i
0025640 d t o M i d a s ) \r ;
0025660 o f a t m o s t 3 2 n
0025700 s . M i d a s c o m p u t e
0025720 s t h e c l o c k \r ;
0025740 s e t t i n g f o r t h i
0025760 s a s 6 3 ( d e c i m a l
0026000 ) . \r ; W e d o l i
0026020 k e w i s e f o r c o m p a
0026040 t a b i l i t y 376 001 \0 206 331 , i
0026060 f n o t f o r c o r r e c
0026100 t n e s s . \r S t d C l o c k S
0026120 e t = 6 3 . \r \r S t d C l o
0026140 c k S p e e d H = . - M u f
0026160 f l e r T a b l e \r \t . A D R \t
0026200 ( 2 2 0 0 o + ( S t d C l o c k
0026220 S e t ^ ( - 4 ) ) ) ^ 4 \r S t d
0026240 C l o c k S p e e d L = . -
0026260 M u f f l e r T a b l e \r \t . A
0026300 D R \t ( 2 2 2 0 o + ( S t d C l
0026320 o c k S e t & 0 f ) ) ^ 4 \r \r ;
0026340 \t T h i s n e x t g r o u p
0026360 i s u s e d d u r i n g
0026400 t h e b o o t s t r a p o p
0026420 e r a t i o n \r ; \t j u s t b
0026440 e f o r e t h e D o r 376 001 \0
0026460 345 _ a d o b e g i n s r u n
0026500 n i n g f o r r e a l . \r \r
0026520 C l e a r D M M a n i f o l d
0026540 = . - M u f f l e r T a b l e
0026560 \r \t . A D R \t ( 2 2 6 0 o + 0 )
0026600 ^ 4 \t \t ; c l e a r s D o r
0026620 a d o - t o - m i c r o r e g
0026640 i s t e r t o 0 \r A l l o w
0026660 C B H o l d s = . - M u f f
0026700 l e r T a b l e \r \t . A D R \t (
0026720 M i d a s C B F l a g s + 0 ) ^
0026740 4 \t \r \r \r ; \t T h i s n e x t
0026760 g r o u p i s i n v o k e
0027000 d a s a g r o u p j u s
0027020 t a f t e r t h e p o w e
0027040 r \r ; \t s u p p l i e s a r e
0027060 u 376 001 \0 T m p a n d s t a
0027100 b l e . \r \r F i r s t I n i t M
0027120 a n i f o l d : \r I n i t M a n
0027140 i f o l d s = . - M u f f l
0027160 e r T a b l e \r \r ; \t B a s e B
0027200 o a r d I n i t i a l i z a t
0027220 i o n \r \r E c l U p = 8 \r R
0027240 u n R f s h = 1 \r D o I O R
0027260 e s e t = . - M u f f l e r
0027300 T a b l e \r \t . A D R \t ( 2 2 4
0027320 0 o + E c l U p + R u n R f s h
0027340 ) ^ 4 \t ; I O r e s e t s
0027360 t i l l a s s e r t e d \r \r \r
0027400 ; \t C o n t r o l B I n i t
0027420 i a l i z a t i o n \r \r C o n t
0027440 r o l B M a n i f o l d = 0
0027460 \r C o n t r o 376 001 \0 313 216 l B M u
0027500 f A d r = 2 0 0 o \r \r P a r
0027520 i t y E n a b l e s = C o n
0027540 t r o l B M a n i f o l d + ( 0
0027560 ^ 6 ) \r M i d a s C B F l a g s
0027600 = C o n t r o l B M a n i f
0027620 o l d + ( 1 ^ 6 ) \r M i d a s R
0027640 B M u x [ 0 ~ 5 ] = C o n t
0027660 r o l B M a n i f o l d + ( 2 ^
0027700 6 ) \r M i d a s R B M u x [ 6 ~
0027720 1 1 ] = C o n t r o l B M a
0027740 n i f o l d + ( 3 ^ 6 ) \r M i d
0027760 a s R B M u x [ 1 2 ~ 1 5 ] =
0030000 C o n t r o l B M a n i f o l
0030020 d + ( 4 ^ 6 ) \r M i d a s B N P
0030040 C [ 0 ~ 5 ] = C o n t r o l
0030060 B M a n i f o l d + ( 5 376 001 \0 364
0030100 260 ^ 6 ) \r M i d a s B N P C [ 6
0030120 ~ 1 1 ] = C o n t r o l B M
0030140 a n i f o l d + ( 6 ^ 6 ) \r M i
0030160 d a s S t o p M I R C l k =
0030200 C o n t r o l B M a n i f o l d
0030220 + ( 7 ^ 6 ) \r \r I n h i b i t C
0030240 B H o l d = 1 0 \r \r D i s a
0030260 b l e D o r a d o E r r o r s
0030300 = . - M u f f l e r T a b l e
0030320 \r \t . A D R \t ( P a r i t y E n
0030340 a b l e s + 0 3 0 ) ^ 4 \t ; a
0030360 l l e x c e p t I M p a r
0030400 i t y e r r o r s d i s a b
0030420 l e d \r C l e a r M i d a s C B
0030440 F l a g s = . - M u f f l e
0030460 r T a b l e \r \t . A D R \t ( M i
0030500 d 376 001 \0 ] O a s C B F l a g s +
0030520 I n h i b i t C B H o l d ) ^ 4
0030540 \r C l e a r M i d a s R B M u x
0030560 [ 0 ~ 5 ] = . - M u f f l e
0030600 r T a b l e \r \t . A D R \t ( M i
0030620 d a s R B M u x [ 0 ~ 5 ] + 0 )
0030640 ^ 4 \r C l e a r M i d a s R B M
0030660 u x [ 6 ~ 1 1 ] = . - M u f
0030700 f l e r T a b l e \r \t . A D R \t
0030720 ( M i d a s R B M u x [ 6 ~ 1 1
0030740 ] + 0 ) ^ 4 \r C l e a r M i d a
0030760 s R B M u x [ 1 2 ~ 1 5 ] =
0031000 . - M u f f l e r T a b l e \r \t
0031020 . A D R \t ( M i d a s R B M u x
0031040 [ 1 2 ~ 1 5 ] + 0 ) ^ 4 \r C l e
0031060 a r M i d a s B N P C [ 0 ~ 5 ]
0031100 = . - 376 001 \0 211 u M u f f l
0031120 e r T a b l e \r \t . A D R \t ( M
0031140 i d a s B N P C [ 0 ~ 5 ] + 0 )
0031160 ^ 4 \r C l e a r M i d a s B N P
0031200 C [ 6 ~ 1 1 ] = . - M u f f
0031220 l e r T a b l e \r \t . A D R \t (
0031240 M i d a s B N P C [ 6 ~ 1 1 ] +
0031260 0 ) ^ 4 \r S e t M i d a s S t o
0031300 p M I R C l k = . - M u f f
0031320 l e r T a b l e \r \t . A D R \t (
0031340 M i d a s S t o p M I R C l k +
0031360 2 0 ) ^ 4 \t ; t u r n o n
0031400 M I R d e b u g f e a t u r
0031420 e \r \r ; \t C o n t r o l A I
0031440 n i t i a l i z a t i o n \r \r C
0031460 o n t r o l A M u f A d r =
0031500 0 \r \r ; \t P r o c e s 376 001 \0 372 9
0031520 s o r L I n i t i a l i z a
0031540 t i o n \r \r P r o c L M u f A d
0031560 r = 4 1 0 o \r \r ; \t P r o c
0031600 e s s o r H I n i t i a l i
0031620 z a t i o n \r \r P r o c H M u f
0031640 A d r = 4 0 0 o \r \r M a x I
0031660 n i t M a n i f o l d = ( .
0031700 - F i r s t I n i t M a n i f o
0031720 l d - 2 ) / 2 \r \r \f \r ; \t \t M
0031740 u f f l e r A
0031760 d d r e s s e s \r
0032000 \r ; \t M u f f l e r a d d r e
0032020 s s e s u s e d b y t h e
0032040 b a s e b o a r d f o r
0032060 s t a t u s . \r \r D i s k H e a
0032100 d s L o a d e d M u f = . - M u
0032120 376 001 \0 002 321 f f l e r T a b l e \r
0032140 \t . A D R \t ( 2 2 3 2 o ) ^ 4 \t
0032160 ; S e q u e n c e 0 ' s i g
0032200 n a l \r E c l U p M u f f l e r
0032220 = . - M u f f l e r T a b l e \r
0032240 \t . A D R \t ( 2 2 1 0 o ) ^ 4 \t
0032260 ; E c l U p s i g n a l \r T
0032300 u r n O n P w r M u f = . - M u
0032320 f f l e r T a b l e \r \t . A D R
0032340 \t ( 2 2 3 0 o ) ^ 4 \t ; P o w
0032360 e r - o n s i g n a l t o
0032400 p o w e r s u p p l y r e l
0032420 a y s \r C l o c k S p e e d M u
0032440 f F i e l d = . - M u f f l e r
0032460 T a b l e \r \t . A D R \t ( 2 2 0
0032500 0 o ) ^ 4 \r \t . A D R \t ( 1 o )
0032520 ^ 4 \r \r ; 376 001 \0 341 9 \t T a b l e
0032540 o f t h e r m o m e t e r
0032560 m u f f l e r a d d r e s s e
0032600 s \r \r ; \t N o t e : t h e s e
0032620 a r e a l s o u s e d a
0032640 s b o a r d d e t e c t s .
0032660 I n f i n i t y \r ; \t m e a n
0032700 s b o a r d m i s s i n g .
0032720 A b s o l u t e z e r o m
0032740 e a n s b o a r d p r e s e
0032760 n t b u t \r ; \t n o t h e r
0033000 m o m e t e r c h i p . \r \r T
0033020 h e r m o m M u f A d d r : \r \t
0033040 . A D R \t ( 2 2 1 5 o ) ^ 4 \t ;
0033060 o n t h e b a s e b o a
0033100 r d \r \t . A D R \t ( 1 6 0 o ) ^
0033120 4 \t ; o n t h e 376 001 \0 212 234
0033140 c o n t r o l B b o a r d ,
0033160 R e v C \r \t . A D R ( 3 0
0033200 2 o ) ^ 4 \t ; o n t h e c
0033220 o n t r o l A b o a r d (
0033240 = S t o p ) \r \t . A D R \t ( 6
0033260 1 0 o ) ^ 4 \t ; o n t h e
0033300 p r o c e s s o r L b o a r
0033320 d \r \t . A D R \t ( 6 0 0 o ) ^ 4
0033340 \t ; o n t h e p r o c e s
0033360 s o r H b o a r d \r \t . A D
0033400 R \t ( 2 5 5 2 o ) ^ 4 \t ; o n
0033420 t h e I F U b o a r d \r \t
0033440 . A D R \t ( 1 0 0 1 o ) ^ 4 \t ;
0033460 o n t h e m e m o r y C
0033500 b o a r d \r \t . A D R \t ( 1 7
0033520 0 7 o ) ^ 4 \t ; o n t h e 376
0033540 \0 274 - 272 m e m o r y X b o
0033560 a r d \r \t . A D R \t ( 1 2 0 7 o
0033600 ) ^ 4 \t ; o n t h e m e m
0033620 o r y D b o a r d \r \t . A D
0033640 R \t ( 2 0 0 0 o ) ^ 4 \t ; o n
0033660 t h e d i s k / E t h e r n
0033700 e t b o a r d \r \t . A D R \t (
0033720 0 o ) ^ 4 \t ; o n t h e d
0033740 i s p l a y c o n t r o l b
0033760 o a r d \r \r M a x T h e r m o m
0034000 = ( . - T h e r m o m M u f
0034020 A d d r - 2 ) / 2 \r \t . E N D \r
0034040 377 \0 \0 d o r a d o r e s e t . m
0034060 a s m \0 373 225 5 322 : \0 \0 376 001 \0 021 372
0034100 ; * * * * * * * *
0034120 * * * * * * * *
*
0034200 * \r ; \r ; \t D O R A D
0034220 O C o n t r o
0034240 l P r o g r a
0034260 m \r ; \r ; \t \t P r e l
0034300 i m i n a r y
0034320 R e s e t C o
0034340 d e \r ; \r ; * * * * *
0034360 * * * * * * * *
*
0034440 * * * * \r \r ; \t f i l e
0034460 d o n D o r a d o R e s e t
0034500 376 001 \0 371 d . m a s m \r ; \t E .
0034520 M c C r e i g h t \r ; \t l a s t
0034540 m o d i f i e d N o v e m b
0034560 e r 1 8 , 1 9 8 1 3 : 1
0034600 5 P M \r \r \t . E X P O R T \t R
0034620 e b o o t D o r a d o \r \t . E X
0034640 P O R T \t I n t e r r u p t P t
0034660 r \r \t . E X P O R T \t U p d a t
0034700 e T i m e r \r \t . E X P O R T \t
0034720 D e l a y , B o o t T i c k s O
0034740 f f , B o o t P u s h C o u n t
0034760 \r \t . E X P O R T \t S e t P r o
0035000 b l e m , C l e a r P r o b l e
0035020 m \r \r \t . I M P O R T \t P o w e
0035040 r U p M i n u s 5 A n d 1 2 , P
0035060 o w e r U p A l l S u p p l i e
0035100 s , P o w 376 001 \0 } 207 e r U p D i
0035120 s k \r \t . I M P O R T \t D i s c
0035140 o n n e c t M u f M a n , L o a
0035160 d D i s k H e a d s \r \t . I M P
0035200 O R T \t S t d C l o c k S p e e
0035220 d H , S t d C l o c k S p e e d
0035240 L \r \t . I M P O R T \t M i d a s
0035260 C a l l , M i d a s S e t u p ,
0035300 T r a p E n c o u n t e r e d \r
0035320 \t . I M P O R T \t I n h i b i t
0035340 M i d a s , E n a b l e M i d a
0035360 s \r \t . I M P O R T \t I n i t E
0035400 n v i r o n m e n t , D o A l l
0035420 C o n v e r s i o n s , P o w e
0035440 r O u t O f S p e c \r \t . I M P
0035460 O R T \t L o a d D o r a d o C o
0035500 d e , S e t M a n i 376 001 \0 G 300 f
0035520 o l d , C o n t i n u o u s \r \t
0035540 . I M P O R T \t Z C o d e V e r
0035560 s i o n , B a s e C o d e V e r
0035600 s i o n \r \t . I M P O R T \t R e
0035620 a d M u f f l e r , D i s k H e
0035640 a d s L o a d e d M u f , T u r
0035660 n O n P w r M u f \r \t . I M P O
0035700 R T \t S t o p D o r a d o , P a
0035720 c i f y W a t c h d o g \r \t . I
0035740 M P O R T \t T i m e r 1 0 0 m s
0035760 \r \t . I M P O R T \t P r o b l e
0036000 m s \r \t . I M P O R T \t N o r m
0036020 a l W a i t , C u r r e n t P o
0036040 w e r P r o b l e m , S h u t D
0036060 o w n \r \t . I M P O R T \t M e l
0036100 t D o w n T e m p \r \t . I M P 376
0036120 001 \0 222 \t O R T \t C h e c k B o o
0036140 t B u t t o n \r \r \t . S H O R T
0036160 \t Z C o d e V e r s i o n , T i
0036200 m e r 1 0 0 m s , P r o b l e m
0036220 s \r \r \t . P R E D E F I N E "
0036240 M C S 6 5 0 2 P R E D E F S . S
0036260 R " \r \t . G E T N O L I S T \t "
0036300 D o r a d o I O . m d e f s " \r
0036320 \r ; \t R e s e t P o i n t e r
0036340 s \r \r \t . L O C \t 0 f f f c \r \t
0036360 . A D R \t R e s e t \r \t . A D R
0036400 \t I n t e r r u p t \r \r ; \t V
0036420 a r i a b l e s \r
0036440 \r \t . L O C \t R e s e t D a t a
0036460 \r \t . S H O R T \t R e s e t D a
0036500 t a \r \r I n t e r r u p t P t r
0036520 : \r \t . 376 001 \0 " # B L K \t 2 \r \r
0036540 ; \t C o u n t e r s a n d o
0036560 t h e r s t u f f \r \r S p a r
0036600 e U s e c s : \t . B L K \t 2 \r S
0036620 u b T i c k s : \t . B L K \t 1 \t
0036640 ; 5 0 . s u b t i c k s m
0036660 a k e a t i m e r t i c k
0036700 \r \r O l d W o r s t P r o b l e
0036720 m : \t . B L K \t 1 \r P l a c e I
0036740 n C o d e : \t . B L K \t 1 \r \r E
0036760 n d O f D e l a y : \t . B L K \t
0037000 2 \r \r B o o t S u b t i c k s O
0037020 n : \t . B L K \t 1 \r B o o t T i
0037040 c k s O n : \t . B L K \t 1 \r B o
0037060 o t S u b t i c k s O f f : \t .
0037100 B L K \t 1 \r B o o t T i c k s O
0037120 f f : \t . B L K \t 376 001 \0 036 313 1 \r
0037140 B o o t P u s h C o u n t : \t .
0037160 B L K \t 1 \r \f \r \t . L O C \t R e
0037200 s e t C o d e \r \r I n t e r r u
0037220 p t : \r \t C L D \r P H A \r
0037240 \t T X A \r \t P H A \r \t T S X \r \t
0037260 L D A X \t S t a c k T o p + 2 \t
0037300 ; s e e i f B R K e n c
0037320 o u n t e r e d \r \t A N D I \t 1
0037340 0 \r \t B E Q \t N o t B R K \r \r \t
0037360 J M P \t T r a p E n c o u n t e
0037400 r e d \r \r N o t B r k : \r \t J M
0037420 P @ \t I n t e r r u p t P t r \t
0037440 ; c a n u s e A a n d
0037460 X , m u s t r e s t o r e
0037500 f r o m s t a c k \r \r S t a n
0037520 d a r d I n t e r r u p t R 376 001
0037540 \0 246 r o u t i n e : \r \t L D A \t
0037560 T i m e r 1 0 0 m s \r \t P H A \r
0037600 \r \t J S R \t U p d a t e T i m e
0037620 r \t ; t h i s i s d o n e
0037640 e v e r y 2 m s . \r \t J S
0037660 R \t F a s t K b d B o o t C h e
0037700 c k \r \r \t P L A \r \t C M P \t T i
0037720 m e r 1 0 0 m s \r \t B E Q \t I n
0037740 t R e t u r n \r \r \t C L I \t ;
0037760 r e - e n a b l e i n t e r r
0040000 u p t s \r \r \t J S R \t C h e c k
0040020 K b d B o o t B u t t o n \t ;
0040040 t h i s i s d o n e e v e
0040060 r y 1 0 0 m s . \r \t J S R \t
0040100 F l a s h T h e L i g h t \r \r I
0040120 n t R e t u r n : \r \t P L A \r \t
0040140 T A X 376 001 \0 \t n \r \t P L A \r \t R
0040160 T I \r \f \r ; \t R o u t i n e t
0040200 h a t k e e p s t h e 2 .
0040220 0 4 8 m s s u b t i c k c
0040240 o u n t a n d t h e \r ; \t 1
0040260 0 2 . 4 m s t i m e r u p
0040300 t o d a t e . T h i s \r ;
0040320 \t r u n s w i t h i n t e r
0040340 r u p t s m a s k e d o f f
0040360 . \r \r S u b T i c k I n U s e c
0040400 s : \r \t . A D R \t 2 . * 1 0 2 4
0040420 . \r \r U p d a t e T i m e r : \r
0040440 \t L D A \t 5 8 0 + I n t F l a g
0040460 s \r \t A N D I \t T i m e r F l a
0040500 g \r \t B E Q \t U p d a t e T i m
0040520 e r E x i t \r \r \t L D X I \t 2 .
0040540 \t ; 2 * 1 0 2 376 001 \0 226 206 4 u
0040560 s e c \r \t L D A I \t 4 \t ; 4
0040600 u s d e a d t i m e b e t
0040620 w e e n r e a d a n d r e
0040640 l o a d \r \t S E C \r \t S B C \t 5
0040660 8 0 + T i m e r \r \t S T X \t 5 8
0040700 0 + T i m e r + D i v 1 0 2 4 +
0040720 D o T i m e r I n t e r r u p t
0040740 \r \r \t A D C \t S p a r e U s e c
0040760 s \r \t S T A \t S p a r e U s e c
0041000 s \r \t L D A I \t 0 \r \t A D C \t S
0041020 p a r e U s e c s + 1 \r \t S T A
0041040 \t S p a r e U s e c s + 1 \r \r \t
0041060 B C C \t S p a r e O v e r f l o
0041100 w I n C a r r y \r \r \t L D A \t S
0041120 p a r e U s e c s \r \t S B C \t S
0041140 u b T i c k I n U s e c s 376 001 \0
0041160 317 373 \r \t S T A \t S p a r e U s e
0041200 c s \r \t L D A \t S p a r e U s e
0041220 c s + 1 \r \t S B C \t S u b T i c
0041240 k I n U s e c s + 1 \r \t S T A \t
0041260 S p a r e U s e c s + 1 \r \r S p
0041300 a r e O v e r f l o w I n C a r
0041320 r y : \r \t L D A I \t 1 \r \t A D C
0041340 \t S u b T i c k s \r \t S T A \t S
0041360 u b T i c k s \r \t S B C I \t 5 0
0041400 . - 1 \t ; a c t u a l l y 5
0041420 0 . - - n o c a r r y b
0041440 i t m e a n s b o r r o w \r
0041460 \t B C C \t U p d a t e T i m e r
0041500 E x i t \r \r \t S T A \t S u b T i
0041520 c k s \t ; s u b t i c k o v
0041540 e r f l o w e d i n t o t i
0041560 m e 376 001 \0 245 k r t i c k \r \r \t
0041600 L D X I \t 0 \r \r I n c N e x t T
0041620 i m e r B y t e : \r \t I N C X \t
0041640 T i m e r 1 0 0 m s \r \t B N E \t
0041660 U p d a t e T i m e r E x i t \r
0041700 \t I N X \r \t B N E \t I n c N e x
0041720 t T i m e r B y t e \t ; u n c
0041740 o n d i t i o n a l \r \r U p d a
0041760 t e T i m e r E x i t : \r \t R T
0042000 S \r \r \f \r ; \t R o u t i n e s
0042020 t o c h e c k t h e b o o
0042040 t b u t t o n o n t h e
0042060 k e y b o a r d . \r \r ; \t T h i
0042100 s f i r s t r o u t i n e
0042120 i s d o n e e v e r y 2
0042140 m s s u b t i c k . I t a
0042160 c t u a l l y 376 001 \0 337 f l o o
0042200 k s a t \r ; \t t h e b o o t
0042220 b u t t o n , a n d m a i
0042240 n t a i n s t w o c o u n t
0042260 s : B o o t S u b t i c k s O
0042300 n a n d \r ; \t B o o t S u b t
0042320 i c k s O f f . W h e n t h
0042340 e b o o t b u t t o n h a
0042360 s b e e n u p f o r 4 0
0042400 m s o r \r ; \t m o r e , B
0042420 o o t S u b t i c k s O n i s
0042440 r e s e t t o 0 . T h e
0042460 r e a f t e r w h e n i t
0042500 i s d o w n \r ; \t f o r 8
0042520 m s , B o o t P u s h C o u n
0042540 t i s i n c r e m e n t e d
0042560 b y 1 . \r \r F a s t 376 001 \0 .
0042600 u K b d B o o t C h e c k : \r \t
0042620 L D A \t M i s c B y t e \r \t A N
0042640 D I \t B o o t ' \r \t B N E \t B o
0042660 o t N o t P u s h e d \r \r \t L D
0042700 A I \t 0 \r \t S T A \t B o o t T i
0042720 c k s O f f \r \t S T A \t B o o t
0042740 S u b t i c k s O f f \r \r \t L D
0042760 A \t B o o t S u b t i c k s O n
0043000 \r \t C M P I \t 3 . \r \t B N E \t N
0043020 o t A N e w P u s h \r \r \t I N C
0043040 \t B o o t P u s h C o u n t \r \r
0043060 N o t A N e w P u s h : \r \t C M
0043100 P I \t 4 . \r \t B P L \t D o n t I
0043120 n c r e m e n t S u b t i c k s
0043140 \r \t I N C \t B o o t S u b t i c
0043160 k s O n \r \r D o n t I n c r e m
0043200 e 376 001 \0 322 E n t S u b t i c k s
0043220 : \r \t R T S \r \r B o o t N o t P
0043240 u s h e d : \r \t L D A \t B o o t
0043260 S u b t i c k s O f f \r \t C M P
0043300 I \t 2 0 . ; 4 0 . m s u
0043320 p m e a n s r e a l l y u
0043340 p \r \t B P L \t B o o t S o l i d
0043360 l y U p \r \t I N C \t B o o t S u
0043400 b t i c k s O f f \r \t R T S \r \r
0043420 B o o t S o l i d l y U p : \r \t
0043440 L D A I \t 0 \r \t S T A \t B o o t
0043460 T i c k s O n \r \t S T A \t B o o
0043500 t S u b t i c k s O n \r \t R T S
0043520 \r \r \r ; \t T h i s r o u t i n
0043540 e i s d o n e o n c e e
0043560 v e r y 1 0 0 m s t i c k
0043600 . I t t 376 001 \0 Y @ a k e s
0043620 i t s c u e f r o m \r ; \t B
0043640 o o t S u b t i c k s O n a n
0043660 d m a i n t a i n s t h e
0043700 c o u n t s \r ; \t B o o t T i c
0043720 k s O n a n d B o o t T i c
0043740 k s O f f . I f B o o t T i
0043760 c k s O n e v e r g e t s
0044000 t o \r ; \t 2 s e c o n d s ,
0044020 B o o t P u s h C o u n t i s
0044040 r e s e t t o 0 . \r \r C h
0044060 e c k K b d B o o t B u t t o n
0044100 : \r \t L D A \t B o o t S u b t i
0044120 c k s O n \r \t C M P I \t 1 . \r \t
0044140 B M I \t B o o t N o t R e c o g
0044160 n i z e d \r \r \t L D A \t B o o t
0044200 T i c k s O n \r \t C M 376 001 \0 s 5
0044220 P I \t 2 0 . \t ; 2 s e c \r \t
0044240 B P L \t C l e a r P u s h C o u
0044260 n t \t ; u s e r s a y s h
0044300 e m a d e a m i s t a k e
0044320 \r \r \t I N C \t B o o t T i c k s
0044340 O n \r \t R T S \r \r C l e a r P u
0044360 s h C o u n t : \r \t L D A I \t 0
0044400 \r \t S T A \t B o o t P u s h C o
0044420 u n t \r \t R T S \r \r B o o t N o
0044440 t R e c o g n i z e d : \r \t L D
0044460 A \t B o o t T i c k s O f f \r \t
0044500 C M P I \t 1 0 0 . \t ; h o l d
0044520 c o u n t a t 1 0 s e c
0044540 o n d s \r \t B P L \t D o n t I n
0044560 c r e m e n t T i c k s \r \t I N
0044600 C \t B o o t T i c k s O f f \r \r
0044620 376 001 \0 231 G D o n t I n c r e m e
0044640 n t T i c k s : \r \t R T S \r \f \r
0044660 ; \t S u b r o u t i n e t o
0044700 f l a s h t h e l i g h t
0044720 i n r e s p o n s e t o t
0044740 h e h i g h e s t - \r ; \t p r
0044760 i o r i t y c u r r e n t p
0045000 r o b l e m . \r \r F l a s h T h
0045020 e L i g h t : \r \t J S R \t F i n
0045040 d W o r s t P r o b l e m \r \t T
0045060 X A \r \t B E Q \t N o P r o b l e
0045100 m s \t ; 0 m e a n s n o
0045120 p r o b l e m s \r \t C P X \t O l
0045140 d W o r s t P r o b l e m \r \t B
0045160 M I \t O l d P r o b l e m W a s
0045200 W o r s e \r \t S T X \t O l d W o
0045220 r s t P r 376 001 \0 247 231 o b l e m \r
0045240 \r O l d P r o b l e m W a s W o
0045260 r s e : \r \t I N C \t P l a c e I
0045300 n C o d e \r \t B M I \t T u r n L
0045320 i g h t O f f \t ; s t i l l
0045340 p a u s i n g b e f o r e c
0045360 o d e \r \t L D A \t P l a c e I n
0045400 C o d e \r \t L S R A \r \t L S R A
0045420 \r \t B C S \t T u r n L i g h t O
0045440 f f \t ; s p a c e b e t w e
0045460 e n b i t s o f u n a r y
0045500 c o d e \r \t C M P \t O l d W o
0045520 r s t P r o b l e m \r \t B M I \t
0045540 T u r n L i g h t O n \t ; n e
0045560 x t b i t o f u n a r y
0045600 c o d e \r \r S t a r t N e w C o
0045620 d e : \r \t J S R \t F 376 001 \0 237 275 i
0045640 n d W o r s t P r o b l e m \r \t
0045660 S T X \t O l d W o r s t P r o b
0045700 l e m \r \t L D A I \t - 1 3 . \t ;
0045720 1 . 5 - s e c o n d d e l a
0045740 y b e t w e e n c o d e b
0045760 u r s t s \r \t S T A \t P l a c e
0046000 I n C o d e \r \r T u r n L i g h
0046020 t O f f : \r \t L D A I \t L a m p
0046040 O f f \r \t O R A \t M i s c B y t
0046060 e \r \t S T A \t M i s c B y t e \r
0046100 \t R T S \r \r N o P r o b l e m s
0046120 : \r \t S T X \t O l d W o r s t P
0046140 r o b l e m \r \t L D A I \t - 1 3
0046160 . \t ; 1 . 5 - s e c o n d d
0046200 e l a y b e t w e e n c o d
0046220 e b u r s t s \r \t S T A \t P 376
0046240 001 \0 275 223 l a c e I n C o d e \r \r
0046260 T u r n L i g h t O n : \r \t L D
0046300 A I \t - 1 - L a m p O f f \r \t A
0046320 N D \t M i s c B y t e \r \t S T A
0046340 \t M i s c B y t e \r \t R T S \r \r
0046360 \r ; \t P u t s t h e i n d e
0046400 x o f t h e \r ; \t h i g h e
0046420 s t - p r i o r i t y p r o b
0046440 l e m i n X . 0 i s n
0046460 o p r o b l e m s , \r ; \t 1
0046500 m e a n s P r o b l e m s = 1
0046520 0 0 0 0 0 0 0 , 2 m e a n
0046540 s P r o b l e m s = x 1 0 0
0046560 0 0 0 0 , \r ; \t . . . , 8 m
0046600 e a n s P r o b l e m s = x x
0046620 x x x x x 1 . \r \r F i n d W o
0046640 r s t P 376 001 \0 < 8 r o b l e m :
0046660 \t ; 0 t h r u 8 : 0 m
0046700 e a n s n o p r o b l e m s
0046720 , 8 i s h i g h e s t p
0046740 r i o r i t y \r \t L D X I \t 0 \r
0046760 \t S E C \r \t L D A \t P r o b l e
0047000 m s \r \t S B C I \t 1 \r \t E O R I
0047020 \t 0 f f \r \t A N D \t P r o b l e
0047040 m s \t ; P r o b l e m s &
0047060 ~ ( P r o b l e m s - 1 ) \r \t B
0047100 E Q \t W o r s t P r o b l e m I
0047120 n X \r \r T r y N e x t P r o b l
0047140 e m : \r \t I N X \r \t A S L A \r \t
0047160 B N E \t T r y N e x t P r o b l
0047200 e m \r \r W o r s t P r o b l e m
0047220 I n X : \r \t R T S \r \r \f \r ; \t T
0047240 h i s i s t h 376 001 \0 243 G e
0047260 r e s e t c o d e t h a t
0047300 g e t s r u n w h e n e v e
0047320 r t h e c i r c u i t \r ; \t
0047340 b r e a k e r s a r e t u r
0047360 n e d o n o r t h e l i
0047400 t t l e b u t t o n o n t
0047420 h e f r o n t \r ; \t p a n e l
0047440 i s p u s h e d . \r \r R e s
0047460 e t : \r \t C L D \t ; i n i t i
0047500 a t e b i n a r y a r i t h
0047520 m e t i c \r \r ; \t C l e a r a
0047540 l l t h e b y t e s i n
0047560 p a g e 0 . \r \r L D X I
0047600 \t 0 \r \t L D A I \t 0 \r \r C l e a
0047620 r M o r e B y t e s : \r \t S T A
0047640 X \t 0 \r \t D E X \r \t B N E \t 376 001
0047660 \0 w 263 C l e a r M o r e B y t e
0047700 s \r \r ; \t P u t t h e c o d
0047720 e v e r s i o n n u m b e r
0047740 i n a c o n s p i c u o u
0047760 s p l a c e \r \r \t L D A I \t B
0050000 a s e C o d e V e r s i o n \r \t
0050020 S T A \t Z C o d e V e r s i o n
0050040 \r \r ; \t S e t u p t h e s
0050060 t a c k a n d p r e p a r e
0050100 f o r i n t e r r u p t s .
0050120 \r \r \t L D X I \t 0 f f \r \t T X S
0050140 \r \t L D A I \t S t a n d a r d I
0050160 n t e r r u p t R o u t i n e ,
0050200 # L o w A d d r B y t e \r \t S T
0050220 A \t I n t e r r u p t P t r \r \t
0050240 L D A I \t S t a n d a r d I n t
0050260 e r r 376 001 \0 A v u p t R o u t i
0050300 n e , # H i g h A d d r B y t e
0050320 \r \t S T A \t I n t e r r u p t P
0050340 t r + 1 \r \t J S R \t M i d a s S
0050360 e t u p \r \r ; \t S e t t h e
0050400 d a t a d i r e c t i o n r
0050420 e g i s t e r s i n t h e
0050440 I / O p o r t s , a f t e r
0050460 f i r s t \r ; \t s e t t i n g
0050500 s o m e o u t p u t r e g
0050520 i s t e r s s o t h e i r
0050540 c r i t i c a l b i t s w i
0050560 l l \r ; \t r e m a i n h i g h
0050600 \r \r \t L D X I \t 0 f f \t ; s e
0050620 t f o r a l l o u t p u t
0050640 b i t s \r \t S T X \t D A C + D
0050660 D R \r \t S T X \t 376 001 \0 366 372 M C P
0050700 B u s H + D D R \r \r \t I N X \t ;
0050720 s e t f o r a l l i n p
0050740 u t b i t s \r \t S T X \t C P R
0050760 e g L + D D R \r \t S T X \t C P R
0051000 e g H + D D R \r \r \t L D X I \t I
0051020 S e l \t ; s e t f o r m i
0051040 x t u r e s \r \t S T X \t C o m p
0051060 a r a t o r s + D D R \r \r \t L D
0051100 X I \t M A S y n c + T r a p ' \r
0051120 \t S T X \t C P I B u s + D D R \r
0051140 \r \t L D X I \t L a m p O f f \r \t
0051160 S T X \t M i s c B y t e \r \t S T
0051200 X \t M i s c B y t e + D D R \r \r
0051220 \t L D X I \t 8 0 + M C P A B u s
0051240 + M C P S t r o b e \r \t S T X \t
0051260 M C P B u s L + D D R \r \r 376 001 \0
0051300 252 337 \t L D X I \t W a t c h d o g
0051320 D D R V a l u e \r \t S T X W a
0051340 t c h d o g + D D R \r \r \t L D A
0051360 I \t ( 5 0 . + 2 7 3 . ) * 2 5 /
0051400 4 9 \t ; 5 0 d e g r e e s
0051420 C , a t 1 . 9 6 c o u n t
0051440 s / d e g K \r \t S T A \t M e l
0051460 t D o w n T e m p \r \r ; \t N o w
0051500 b e g i n t i m e r i n t
0051520 e r r u p t s . \r \r \t L D A I \t
0051540 1 \r \t S T A \t 5 8 0 + T i m e r
0051560 + D o T i m e r I n t e r r u p
0051600 t \r \t C L I \r \r ; \t N o w i n
0051620 i t i a l i z e t h e v o l
0051640 t a g e , c u r r e n t , a
0051660 n d t e m p e r a t u r e v
0051700 e c 376 001 \0 \f 310 t o r s . \r \r \t J
0051720 S R \t I n i t E n v i r o n m e
0051740 n t \r \r ; \t S e e w h e t h e
0051760 r t h e d e b u g g i n g
0052000 j u m p e r i s i n s t a l
0052020 l e d o n t h e b a c k p
0052040 a n e l \r ; \t o r i f p o w
0052060 e r h a s a l r e a d y b
0052100 e e n c o m m a n d e d o n
0052120 . I f s o , s t a r t u
0052140 p \r ; \t i m m e d i a t e l y .
0052160 \r \r \t L D A \t M C P B u s L \r \t
0052200 A N D I \t S k i p D i s k W a i
0052220 t ' \r \t B E Q \t R e b o o t D o
0052240 r a d o \r \t L D X I \t T u r n O
0052260 n P w r M u f \r \t J S R \t R e a
0052300 d M u f f l e 376 001 \0 275 001 r \r \t B
0052320 N E \t R e b o o t D o r a d o \r
0052340 \r ; \t P o w e r u p o n l y
0052360 a f t e r t h e u s e r
0052400 p r e s s e s h i s t e r m
0052420 i n a l b o o t b u t t o n
0052440 \r ; \t a t l e a s t o n c e
0052460 . \r \r L D A I \t S h u t D
0052500 o w n \r \t J S R \t S e t P r o b
0052520 l e m \r \r W a i t F o r I n i t
0052540 i a l B o o t : \r \t J S R \t C h
0052560 e c k B o o t B u t t o n \r \t J
0052600 S R \t D o A l l C o n v e r s i
0052620 o n s \r \t J M P \t W a i t F o r
0052640 I n i t i a l B o o t \r \f \r ; \t
0052660 P o w e r s e q u e n c i n g
0052700 . F i r s t m a k e 376 001 \0 354
0052720 322 s u r e o u r o w n s
0052740 u p p l y i s i n s p e c
0052760 . \r \r R e b o o t D o r a d o :
0053000 \r \t J S R \t P a c i f y W a t c
0053020 h d o g \r \r \t L D A I \t N o r m
0053040 a l W a i t \r \t J S R \t S e t P
0053060 r o b l e m \r \r \t L D A I \t - 1
0053100 - N o r m a l W a i t \r \t J S R
0053120 \t C l e a r P r o b l e m \r \r \t
0053140 J S R \t D o A l l C o n v e r s
0053160 i o n s \r \r C h e c k V C C : \r
0053200 \t L D X I D i s c o n n e c t
0053220 M u f M a n \r \t J S R \t S e t M
0053240 a n i f o l d \t ; f o r c e
0053260 I O r e s e t \r \r \t J S R \t S
0053300 t o p D o r a d o \r \r \t L D A \t
0053320 P 376 001 \0 367 206 o w e r O u t O f S
0053340 p e c \r \t A N D I \t 4 4 \t ; +
0053360 5 v s u p p l y \r \t B E Q \t V
0053400 C C O K \r \r \t J S R \t P a c i f
0053420 y W a t c h d o g \r \r \t J S R \t
0053440 I n i t E n v i r o n m e n t \r
0053460 \t L D A I \t C u r r e n t P o w
0053500 e r P r o b l e m \r \t J S R \t S
0053520 e t P r o b l e m \r \t J M P \t C
0053540 h e c k V C C \r \r \r ; \t N o w
0053560 f i g u r e o u t w h e t h
0053600 e r t h e d i s k h e a d
0053620 s a r e a l r e a d y \r ; \t
0053640 l o a d e d ( S e q u e n c e
0053660 0 ' i s a s s e r t e d ) .
0053700 I f n o t , s t a r t t
0053720 h e d i s 376 001 \0 305 H k \r ; \t a
0053740 n d w a i t f o r 2 0 s
0053760 e c o n d s . T h e n c o m
0054000 m a n d t h e h e a d s t
0054020 o l o a d \r ; \t a n d w a i
0054040 t f o r a n o t h e r 2 0
0054060 s e c o n d s . A l l t h
0054100 i s w a i t i n g c a n b
0054120 e s k i p p e d \r ; \t i f S
0054140 k i p D i s k W a i t ' i s
0054160 a s s e r t e d . \r \r V C C O K
0054200 : \r \t L D A I \t C u r r e n t P
0054220 o w e r P r o b l e m \r \t J S R
0054240 \t C l e a r P r o b l e m \r \r \t
0054260 L D X I \t D i s k H e a d s L o
0054300 a d e d M u f \t \r \t J S R \t R e
0054320 a d M u f f l e r \r \t 376 001 \0 350 274
0054340 B E Q \t D i s k O K \r \r \t L D X
0054360 I \t P o w e r U p D i s k \r \t J
0054400 S R \t S e t M a n i f o l d \r \t
0054420 L D X I \t 2 0 . \t ; a b o u t
0054440 2 0 s e c o n d s \r \t J S R
0054460 \t D i s k W a i t \r \r \t L D X I
0054500 \t L o a d D i s k H e a d s \r \t
0054520 J S R \t S e t M a n i f o l d \r
0054540 \t L D X I \t 2 0 . \t ; a b o u
0054560 t 2 0 s e c o n d s \r \t J S
0054600 R \t D i s k W a i t \r \r \r ; \t N
0054620 o w s t a r t u p t h e
0054640 E c l s u p p l i e s a n d
0054660 w a i t \r ; \t u n t i l t h
0054700 e y a l l m e a s u r e O
0054720 K . \r \r D i s k O K : \r \t J S R
0054740 376 001 \0 372 002 \t D o A l l C o n v e
0054760 r s i o n s \r \t L D A \t P o w e
0055000 r O u t O f S p e c \r \t B E Q \t
0055020 S u p p l i e s A l l U p \r \r \t
0055040 L D X I \t P o w e r U p M i n u
0055060 s 5 A n d 1 2 \r \t J S R \t S e t
0055100 M a n i f o l d \r \r \t L D X I \t
0055120 4 . \r \t J S R \t D e l a y \r \r \t
0055140 L D X I \t P o w e r U p A l l S
0055160 u p p l i e s \r \t J S R \t S e t
0055200 M a n i f o l d \r \r C h e c k A
0055220 l l S u p p l i e s : \r \t L D A
0055240 \t P o w e r O u t O f S p e c \r
0055260 \t B E Q \t S u p p l i e s A l l
0055300 U p \r \r \t J S R \t P a c i f y W
0055320 a t c h d o g \r \r \t J S R \t I n
0055340 i t E n v 376 001 \0 \ 221 i r o n m e
0055360 n t \r \t L D A I \t C u r r e n t
0055400 P o w e r P r o b l e m \r \t J S
0055420 R \t S e t P r o b l e m \r \t J M
0055440 P \t C h e c k A l l S u p p l i
0055460 e s \r \f \r S u p p l i e s A l l
0055500 U p : \r \t L D A I \t C u r r e n
0055520 t P o w e r P r o b l e m \r \t J
0055540 S R \t C l e a r P r o b l e m \r
0055560 \r \t L D X I \t 1 . \r \t J S R \t D
0055600 e l a y \r \r ; \t S e t t h e
0055620 s t a n d a r d c l o c k s
0055640 p e e d \r \r \t L D X I \t S t d C
0055660 l o c k S p e e d H \r \t J S R \t
0055700 S e t M a n i f o l d \r \t L D X
0055720 I \t S t d C l o c k S p e e d L
0055740 \r \t J S R \t S e t M 376 001 \0 326 304 a
0055760 n i f o l d \r \r ; \t N o w w a
0056000 i t f o r t w o s e c o n
0056020 d s f o r t h e c l o c k
0056040 t o s e t t l e . \r \r \t L D
0056060 X I \t 2 . \r \t J S R \t D e l a y
0056100 \r \r ; \t N o w b o o t s t r a
0056120 p - l o a d t h e D o r a d
0056140 o p r o c e s s o r a n d
0056160 g e t i t r u n n i n g . \r
0056200 \r \t J S R \t L o a d D o r a d o
0056220 C o d e \r \r ; \t N o w d o w
0056240 h a t e v e r w e d o i n
0056260 s t e a d y - s t a t e . \r \r
0056300 \t L D A I \t N o r m a l W a i t
0056320 \r \t J S R \t C l e a r P r o b l
0056340 e m \r \t J M P \t C o n t i n u 376
0056360 001 \0 277 350 o u s \r \f \r ; \t D e l a
0056400 y X s e c o n l y i f
0056420 S k i p D i s k W a i t ' i s
0056440 h i g h . \r \r D i s k W a i t
0056460 : \r \t L D A \t M C P B u s L \r \t
0056500 A N D I \t S k i p D i s k W a i
0056520 t ' \r \t B E Q \t D e l a y F i n
0056540 i s h e d \r \r ; \t D e l a y X
0056560 s e c . \r \r D e l a y : \r \t S
0056600 E I \r \t L D A \t T i m e r 1 0 0
0056620 m s \r \t L D Y \t T i m e r 1 0 0
0056640 m s + 1 \r \t C L I \r \t S T A \t E
0056660 n d O f D e l a y \r \t S T Y \t E
0056700 n d O f D e l a y + 1 \r \r \t L D
0056720 Y I \t 1 0 . - 1 \t ; m u l t i
0056740 p l y s e c o n d s b y 1
0056760 0 t o 376 001 \0 j 334 g e t 1 0
0057000 2 . 4 m s " t i c k s " \r \r
0057020 M p y S e c o n d s : \r \t T X A
0057040 \r \t C L C \r \t A D C \t E n d O f
0057060 D e l a y \r \t S T A \t E n d O f
0057100 D e l a y \r \t L D A I \t 0 \r \t A
0057120 D C \t E n d O f D e l a y + 1 \r
0057140 \t S T A \t E n d O f D e l a y +
0057160 1 \r \t D E Y \r \t B P L \t M p y S
0057200 e c o n d s \r \t \r D e l a y L o
0057220 o p : \r \t J S R \t P a c i f y W
0057240 a t c h d o g \r \t L D A \t T i m
0057260 e r 1 0 0 m s + 1 \r \t C M P \t E
0057300 n d O f D e l a y + 1 \r \t B M I
0057320 \t D e l a y L o o p \r \t B N E \t
0057340 D e l a y F i n i s h e d \r \t L
0057360 D A \t T i m e r 1 376 001 \0 235 351 0 0
0057400 m s \r \t C M P \t E n d O f D e l
0057420 a y \r \t B C C \t D e l a y L o o
0057440 p \t ; b o r r o w \r \r D e l a
0057460 y F i n i s h e d : \r \t R T S \r
0057500 \r \r ; \t A d d t h e p r o b
0057520 l e m s i n A t o t h e
0057540 c u r r e n t p r o b l e m
0057560 s . \r \r S e t P r o b l e m : \r
0057600 \t O R A \t P r o b l e m s \r \t S
0057620 T A \t P r o b l e m s \r \t R T S
0057640 \r \r ; \t R e m o v e t h e p
0057660 r o b l e m s i n A f r o
0057700 m t h e c u r r e n t p r
0057720 o b l e m s . \r \r C l e a r P r
0057740 o b l e m : \r \t E O R I \t 0 f f
0057760 \r \t A N D \t P r o b l e m s 376 \0
0060000 035 204 8 \r \t S T A \t P r o b l e m
0060020 s \r \t R T S \r \r \t . E N D \r \r \r
0060040 377 \0 \0 d o r a d o c o n t i n u
0060060 o u s . m a s m \0 373 231 300 221 & \0 \0
0060100 376 001 \0 L 222 ; * * * * *
0060120 * * * * * * * *
*
0060200 * * * * \r ; \r ; \t D O
0060220 R A D O C o n
0060240 t r o l P r o
0060260 g r a m \r ; \r ; \t \t C o
0060300 n t i n u o u s
0060320 - R u n n i n g
0060340 C o d e \r ; \r ; *
0060360 * * * * * * * *
*
0060440 * * * * * * * * \r
0060460 \r ; \t f i l e d o n D o r a
0060500 d o C o n 376 001 \0 220 i t i n u o u
0060520 s . m a s m \r ; \t E . M c C r
0060540 e i g h t \r ; \t l a s t m o d
0060560 i f i e d S e p t e m b e r
0060600 2 8 , 1 9 8 2 1 0 : 1 1
0060620 A M \r \r \t . E X P O R T \t C o n
0060640 t i n u o u s , D o C a l l P t
0060660 r , C a l l P t r , O n c e O n
0060700 l y , S p i n \r \t . E X P O R T
0060720 \t P a c i f y W a t c h d o g ,
0060740 C h e c k B o o t B u t t o n \r
0060760 \t . E X P O R T \t P a c i f y W
0061000 a t c h d o g I f J u m p e r \r
0061020 \r \t . I M P O R T \t S e t P r o
0061040 b l e m , C l e a r P r o b l e
0061060 m , D e l a y \r \t . I M P O R T
0061100 \t T r a n s i e n t 376 001 \0 a u P
0061120 o w e r P r o b l e m , C u r r
0061140 e n t P o w e r P r o b l e m \r
0061160 \t . I M P O R T \t P r o b l e m
0061200 s , O v e r t e m p , S h u t d
0061220 o w n \r \t . I M P O R T \t P o w
0061240 e r O u t O f S p e c , B a d S
0061260 u p p l y S p e c \r \t . I M P O
0061300 R T \t L o a d D o r a d o C o d
0061320 e , R e b o o t D o r a d o \r \t
0061340 . I M P O R T \t T i m e r 1 0 0
0061360 m s , S u p p l y B a d T i m e
0061400 \r \t . I M P O R T \t D o A l l C
0061420 o n v e r s i o n s , B o o t T
0061440 i c k s O f f , B o o t P u s h
0061460 C o u n t \r \t . I M P O R T \t S
0061500 e t M a n i f o l d , S t o p 376
0061520 001 \0 362 021 D o r a d o , C l e a r
0061540 D M M a n i f o l d \r \t . I M P
0061560 O R T \t P o w e r D o w n D i s
0061600 k , U n l o a d D i s k H e a d
0061620 s \r \t . I M P O R T \t P o w e r
0061640 D o w n M i n u s 2 , P o w e r
0061660 D o w n E v e r y t h i n g \r \t
0061700 . I M P O R T \t D i s c o n n e
0061720 c t M u f M a n \r \t . I M P O R
0061740 T \t C B T e m p \r \t . I M P O R
0061760 T \t S t a r t D o r a d o A t I
0062000 n i t m a p , R e a d B N i b b
0062020 l e \r \t . I M P O R T \t M e l t
0062040 D o w n T e m p \r \r \t . S H O R
0062060 T \t T i m e r 1 0 0 m s , S u p
0062100 p l y B a d T i m e , P o w e r
0062120 O u t O 376 001 \0 005 6 f S p e c , C
0062140 B T e m p \r \r \t . P R E D E F I
0062160 N E \t " M C S 6 5 0 2 P R E D E
0062200 F S . S R " \r \t . G E T N O L I
0062220 S T \t " D o r a d o i o . m d e
0062240 f s " \r \r \t . L O C \t C o n t i
0062260 n u o u s D a t a \r \r D o C a l
0062300 l P t r : \r \t . B L K \t 1 \t ;
0062320 e q 0 m e a n s d o n ' t
0062340 d o i t ; n e 0 m e a
0062360 n s d o t h e c a l l \r C
0062400 a l l P t r : \r \t . B L K \t 2 \r
0062420 \r D M T e m p : \r \t . B L K \t 1
0062440 \r A l a r m C l o c k E n a b l
0062460 e d : \r \t . B L K \t 1 \r A l a r
0062500 m S e t T i m e : \r \t . B L K \t
0062520 6 \r \r W a t c h d 376 001 \0 031 331 o g
0062540 T e m p : \r \t . B L K \t 1 \r \r ;
0062560 \t T h i s i s t h e c o d
0062600 e t h a t r u n s a l l
0062620 t h e t i m e a f t e r t
0062640 h e D o r a d o \r ; \t h a s
0062660 b e e n s t a r t e d . \r \r \t
0062700 . L O C \t C o n t i n u o u s C
0062720 o d e \r \r C o n t i n u o u s :
0062740 \r \t J S R \t D o A l l C o n v e
0062760 r s i o n s \r \r \t L D A I \t 0 \r
0063000 \t S T A \t B o o t P u s h C o u
0063020 n t \r \t S T A \t A l a r m C l o
0063040 c k E n a b l e d \r \t S T A \t D
0063060 o C a l l P t r \r \r \t L D A I \t
0063100 2 0 0 0 , # L o w A d d r B y t
0063120 e \t ; E x t r a R a m \r 376 001
0063140 \0 360 z \t S T A \t C a l l P t r \r
0063160 \t L D A I \t 2 0 0 0 , # H i g h
0063200 A d d r B y t e \r \t S T A \t C a
0063220 l l P t r + 1 \r \r S p i n : \r \t
0063240 L D A \t D o C a l l P t r \t ;
0063260 t h i s a l l o w s d e b u
0063300 g g i n g s u b r o u t i n e
0063320 s , e t c . \r \t B E Q \t D o n
0063340 t C a l l T h e P t r \r \r \t J S
0063360 R \t C a l l I t \r \t J M P \t S p
0063400 i n \r \r C a l l I t : \r \t L D A
0063420 \t C a l l P t r + 1 \r \t P H A \r
0063440 \t L D A \t C a l l P t r \r \t P H
0063460 A \r \t P H P \r \t R T I \r \r D o n
0063500 t C a l l T h e P t r : \r \t J S
0063520 R \t C h e c k B o o t B u t t o
0063540 n \r \r 376 001 \0 253 A \t J S R \t D o A
0063560 l l C o n v e r s i o n s \r \t L
0063600 D A \t P o w e r O u t O f S p e
0063620 c \r \t B E Q \t S u p p l i e s S
0063640 e e m O K \r \r \t L D A I \t C u r
0063660 r e n t P o w e r P r o b l e m
0063700 \r \t J S R \t S e t P r o b l e m
0063720 \r \t L D A I \t T r a n s i e n t
0063740 P o w e r P r o b l e m \r \t J S
0063760 R \t S e t P r o b l e m \r \t S T
0064000 A \t B a d S u p p l y S p e c \r
0064020 \t L D X I \t 5 \t ; n o t e t
0064040 h e t i m e r s e t t i n g
0064060 w h e n s u p p l y w e n
0064100 t b a d \r \t S E I \t ; d o n
0064120 ' t a l l o w t i m e r t
0064140 o c h a n g e 376 001 \0 340 255 d u
0064160 r i n g c o p y \r \r C o p y T
0064200 i m e r T o S u p p l y B a d T
0064220 i m e : \r \t L D A X \t T i m e r
0064240 1 0 0 m s \r \t S T A X \t S u p p
0064260 l y B a d T i m e \r \t D E X \r \t
0064300 B P L \t C o p y T i m e r T o S
0064320 u p p l y B a d T i m e \r \r \t C
0064340 L I \r \t J M P \t C h e c k F o r
0064360 M e l t d o w n \r \r S u p p l i
0064400 e s S e e m O K : \r \t L D A I \t
0064420 C u r r e n t P o w e r P r o b
0064440 l e m \r \t J S R \t C l e a r P r
0064460 o b l e m \r \r C h e c k F o r M
0064500 e l t d o w n : \r \t L D A \t C B
0064520 T e m p \r \t C M P I \t - 1 \r \t B
0064540 E Q \t S p i n \t ; b o a 376 001 \0
0064560 354 306 r d n o t i n s t a l l
0064600 e d \r \t C M P \t M e l t D o w n
0064620 T e m p \t \r \t B C C \t S p i n \t
0064640 ; c o o l e n o u g h \r \r \t
0064660 L D A I \t O v e r T e m p \r \t J
0064700 S R \t S e t P r o b l e m \r \t J
0064720 M P \t S h u t D o w n T h e D o
0064740 r a d o \r \r \r D o C o n v e r s
0064760 i o n s O n c e : \r \t J S R \t D
0065000 o A l l C o n v e r s i o n s \r
0065020 \r O n c e O n l y : \r \t L D A I
0065040 \t 0 \r \t S T A \t D o C a l l P t
0065060 r \r \t R T S \r \f \r ; \t T h i s
0065100 c o d e s h u t s d o w n
0065120 t h e D o r a d o a n d i
0065140 t s d i s k , e x c e p t
0065160 f o 376 001 \0 351 314 r t h e \r ; \t +
0065200 5 v o l t p o w e r s u p
0065220 p l y a n d o n e f a n .
0065240 I t t h e n w a i t s f
0065260 o r a m e s s a g e \r ; \t f
0065300 r o m t h e b o o t b u t
0065320 t o n t o r e - a w a k e n
0065340 . \r \r S h u t D o w n T h e D o
0065360 r a d o : \r \t L D A I \t S h u t
0065400 D o w n \r \t J S R \t S e t P r o
0065420 b l e m \r \r \t J S R \t S t o p D
0065440 o r a d o \t ; s t o p t h e
0065460 D o r a d o \r \r \t L D X I \t C
0065500 l e a r D M M a n i f o l d \t ;
0065520 d e - a s s e r t a n y s
0065540 t o p c o m m a n d f r o m
0065560 D o r a d o 376 001 \0 017 # \r \t J S
0065600 R \t S e t M a n i f o l d \r \r \t
0065620 L D X I \t D i s c o n n e c t M
0065640 u f M a n \t ; a s s e r t I
0065660 O R e s e t , d e - a s s e r
0065700 t E c l U p \r \t J S R \t S e t
0065720 M a n i f o l d \r \r \t L D X I \t
0065740 U n l o a d D i s k H e a d s \t
0065760 ; u n l o a d t h e d i s
0066000 k h e a d s \r \t J S R \t S e t
0066020 M a n i f o l d \r \r \t L D X I \t
0066040 2 0 . \t ; w a i t f o r d
0066060 i s k t o b r a k e \r \t J S
0066100 R \t D e l a y \r \r \t L D X I \t P
0066120 o w e r D o w n D i s k \t ; s
0066140 h u t d o w n t h e d i s
0066160 k p o w e r s u p p 376 001 \0 363
0066200 245 l i e s \r \t J S R \t S e t M a
0066220 n i f o l d \r \r \t L D X I \t P o
0066240 w e r D o w n M i n u s 2 \t ;
0066260 s h u t d o w n t h e t e
0066300 r m i n a t o r p o w e r s
0066320 u p p l y \r \t J S R \t S e t M a
0066340 n i f o l d \r \r \t L D X I \t 2 .
0066360 \r \t J S R \t D e l a y \r \r \t L D
0066400 X I \t P o w e r D o w n E v e r
0066420 y t h i n g \t ; s h u t d o
0066440 w n t h e E c l p o w e r
0066460 s u p p l i e s \r \t J S R \t S
0066500 e t M a n i f o l d \r \r H a n g
0066520 O n B o o t B u t t o n : \t ;
0066540 w a i t f o r a b o o t
0066560 o p e r a t i o n \r \t J S R \t C
0066600 h 376 001 \0 ` R e c k B o o t B u t
0066620 t o n \r \t J S R \t D o A l l C o
0066640 n v e r s i o n s \r \t J M P \t H
0066660 a n g O n B o o t B u t t o n \r
0066700 \f \r ; \t R o u t i n e t o c
0066720 h e c k t h e b o o t b u
0066740 t t o n a n d i f i t ' s
0066760 j u s t b e e n \r ; \t r e l
0067000 e a s e d , e i t h e r r e
0067020 s t a r t t h e m a c h i n
0067040 e o r p o w e r i t d o
0067060 w n . \r ; \t A l s o c h e c k
0067100 s m a n i f o l d r e g i s
0067120 t e r a n d a l a r m c l
0067140 o c k . \r \r C h e c k B o o t B
0067160 u t t o n : \r \t J S R \t P a c i
0067200 f y W a t c 376 001 \0 332 Y h d o g \r
0067220 \r \t L D A \t P r o b l e m s \r \t
0067240 A N D I \t S h u t d o w n \r \t B
0067260 N E \t W e A r e S h u t d o w n
0067300 \r \r \t L D A I \t 0 \r \t S T A \t A
0067320 l a r m C l o c k E n a b l e d
0067340 \r \r \t L D A \t B o o t T i c k s
0067360 O f f \t ; m i g h t t h e
0067400 u s e r s t i l l b e s e
0067420 n d i n g ? \r \t C M P I \t 1 5 .
0067440 \t ; w a i t 1 . 5 s e c o
0067460 n d s f o r m o r e \r \t B M
0067500 I \t C h e c k M s g F r o m D o
0067520 r a d o \r \r \t L D A I \t 0 \r \t L
0067540 D X \t B o o t P u s h C o u n t
0067560 \t ; h e ' s d o n e . \r \t S
0067600 T A \t B o o t P u s h 376 001 \0 204 325
0067620 C o u n t \t ; r e s e t t h
0067640 e c o u n t \r \r \t C P X I \t 1
0067660 \r \t B P L \t H e B o o t e d \r \r
0067700 \r C h e c k M s g F r o m D o r
0067720 a d o : \r \t L D A \t M i s c B y
0067740 t e \t ; s y n c h r o n i z e
0067760 M i s c B y t e r e a d \r \t
0070000 A N D I \t 0 f \r \t S T A \t D M T
0070020 e m p \r \t L D A \t M i s c B y t
0070040 e \r \t A N D I \t 0 f \r \t C M P \t
0070060 D M T e m p \r \t B N E \t C h e c
0070100 k M s g F r o m D o r a d o \r \r
0070120 \t C M P I \t 0 2 \r \t B E Q \t S h
0070140 u t d o w n I f N o t D e b u g
0070160 \r \t C M P I \t 0 3 \r \t B E Q \t S
0070200 e t A l a r m A n d S h u t D o
0070220 376 001 \0 223 002 w n \r \t C M P I \t 0 4
0070240 \r \t B E Q \t C o o l B o o t \r \r
0070260 H o t B o o t : \r I g n o r e :
0070300 \r \t R T S \r \r \r H e B o o t e d
0070320 : \r \t D E X \r \t B E Q \t H o t B
0070340 o o t \t ; 1 p u s h : t h
0070360 e D o r a d o w i l l t a
0070400 k e c a r e o f i t \r \r \t
0070420 D E X \r \t B E Q \t W a r m B o o
0070440 t \t ; 2 p u s h e s : d o
0070460 I N I T M A P ; G \r \r \t C P X
0070500 I \t 5 \r \t B C C \t C o o l B o o
0070520 t \t ; < 7 p u s h e s : r
0070540 e l o a d m i c r o c o d e \r
0070560 \t B C S \t D o S h u t d o w n \t
0070600 ; > = 7 p u s h e s : s h
0070620 u t d o 376 001 \0 } 310 w n \r \r \r \r
0070640 S e t A l a r m A n d S h u t d
0070660 o w n : \r \t J S R \t S e t A l a
0070700 r m F r o m B M u x \r \r S h u t
0070720 d o w n I f N o t D e b u g : \r
0070740 \t L D A \t M C P B u s L \r \t A N
0070760 D I \t S k i p D i s k W a i t '
0071000 \r \t B E Q \t I g n o r e \r \r D o
0071020 S h u t d o w n : \r \t P L A \t ;
0071040 p o p t h e c a l l o f
0071060 f t h e s t a c k \r \t P L A
0071100 \r \t J M P \t S h u t D o w n T h
0071120 e D o r a d o \r \r W a r m B o o
0071140 t : \r \t J S R \t S t a r t D o r
0071160 a d o A t I n i t m a p \r \t R T
0071200 S \r \r C o o l B o o t : \r \t J S
0071220 R \t L o a d D o r a 376 001 \0 220 220 d
0071240 o C o d e \r \t R T S \r \f \r W e A
0071260 r e S h u t d o w n : \r \t L D A
0071300 \t B o o t T i c k s O f f \t ;
0071320 m i g h t t h e u s e r s
0071340 t i l l b e s e n d i n g ?
0071360 \r \t C M P I \t 1 5 . \t ; w a i
0071400 t 1 . 5 s e c o n d s f o
0071420 r m o r e \r \t B M I \t D o A l
0071440 a r m C h e c k \r \r \t L D A I \t
0071460 0 \r \t L D X \t B o o t P u s h C
0071500 o u n t \t ; h e ' s d o n e
0071520 . \r \t S T A \t B o o t P u s h C
0071540 o u n t \t ; r e s e t t h e
0071560 c o u n t \r \r \t C P X I \t 1 \t
0071600 ; b e t w e e n 1 a n d
0071620 7 p u s h e s m e a n s 376
0071640 001 \0 334 361 s t a r t u p \r \t B M
0071660 I \t D o A l a r m C h e c k \r \t
0071700 C P X I \t 7 \r \t B M I \t B o o t
0071720 F r o m S h u t d o w n \r \r D o
0071740 A l a r m C h e c k : \r \t J S R
0071760 \t C h e c k A l a r m \r \t B C C
0072000 \t I g n o r e \r \r B o o t F r o
0072020 m S h u t d o w n : \r \t L D A I
0072040 \t 0 \r \t S T A \t A l a r m C l o
0072060 c k E n a b l e d \t ; d i s a
0072100 b l e w a k e - u p \r \r \t P L
0072120 A \t ; r e m o v e a c a l
0072140 l f r o m t h e s t a c k
0072160 \r \t P L A \r \t J M P \t R e b o o
0072200 t D o r a d o \r \f \r S e t A l a
0072220 r m F r o m B M u x : \r \t J S R
0072240 \t S t o 376 001 \0 250 276 p D o r a d o
0072260 \r \r \t L D X I \t 5 \t ; z e r o
0072300 t h e a l a r m s e t t
0072320 i m e \r \t L D A I \t 0 \r \r Z e r
0072340 o S e t T i m e : \r \t S T A X \t
0072360 A l a r m S e t T i m e \r \t D E
0072400 X \r \t B P L \t Z e r o S e t T i
0072420 m e \r \r \t L D A I \t 3 \t ; r e
0072440 a d i n 1 6 b i t s f r
0072460 o m t h e B M u x a s 2
0072500 5 . 6 s e c o n d p e r i o
0072520 d s \r \t S T A \t D M T e m p \r \r
0072540 R e a d A n o t h e r N i b b l
0072560 e F r o m B : \r \t L D A \t D M T
0072600 e m p \t ; l o w - o r d e r
0072620 n i b b l e f i r s t \r \t J S
0072640 R \t R e a d B N i 376 001 \0 331 ? b b
0072660 l e \r \t P H A \r \t L D A \t D M T
0072700 e m p \r \t L S R A \r \t A N D I \t
0072720 1 \r \t E O R I \t 1 \t ; 3 , 2
0072740 = > 0 ; 1 , 0 = > 1 \r \t
0072760 T A X \r \t P L A \r \t L D Y I \t 3
0073000 \r \r S h i f t M o r e B B i t s
0073020 : \r \t L S R A \r \t R O R X \t A l
0073040 a r m S e t T i m e + 1 \r \t D E
0073060 Y \r \t B P L \t S h i f t M o r e
0073100 B B i t s \r \r \t D E C \t D M T e
0073120 m p \r \t B P L \t R e a d A n o t
0073140 h e r N i b b l e F r o m B \r \r
0073160 \t L D X I \t 5 \t ; a d d t h
0073200 e a l a r m s e t t i m e
0073220 t o t h e c u r r e n t
0073240 t i m e \r \t S T X \t D M T e 376 001
0073260 \0 z 034 m p \r \t L D X I \t 0 \r \t C
0073300 L C \r \t S E I \t ; t e m p o r
0073320 a r i l y d i s a b l e t i
0073340 m e r u p d a t e \r \r C o m p
0073360 u t e S e t T i m e : \r \t L D A
0073400 X \t T i m e r 1 0 0 m s \r \t A D
0073420 C X \t A l a r m S e t T i m e \r
0073440 \t S T A X \t A l a r m S e t T i
0073460 m e \r \t I N X \r \t D E C \t D M T
0073500 e m p \r \t B P L \t C o m p u t e
0073520 S e t T i m e \r \r \t L D A I \t 1
0073540 \r \t S T A \t A l a r m C l o c k
0073560 E n a b l e d \t ; e n a b l e
0073600 w a k e - u p \r \r \t C L I \t ;
0073620 r e - e n a b l e t i m e r
0073640 u p d a t e \r \t R T S \r \r \r C
0073660 h e c 376 001 \0 350 x k A l a r m : \r
0073700 \t C L C \r \t L D A \t A l a r m C
0073720 l o c k E n a b l e d \r \t B E Q
0073740 \t N o t T i m e Y e t \r \r \t L D
0073760 X I \t 5 \r C h e c k A n o t h e
0074000 r B y t e : \t \r \t L D A X \t T i
0074020 m e r 1 0 0 m s \r \t C M P X \t A
0074040 l a r m S e t T i m e \r \t B C C
0074060 \t N o t T i m e Y e t \r \t D E X
0074100 \r \t B P L \t C h e c k A n o t h
0074120 e r B y t e \r \r N o t T i m e Y
0074140 e t : \r \t R T S \r \r \r ; \t L e t
0074160 t h e w a t c h d o g t i
0074200 m e r k n o w w e ' r e s
0074220 t i l l a l i v e b y c o
0074240 p y i n g \r ; \t W a t c h d o g
0074260 I n t o W a 376 001 \0 1 @ t c h
0074300 d o g O u t e v e r y o n c
0074320 e i n a w h i l e . \r \r P
0074340 a c i f y W a t c h d o g I f J
0074360 u m p e r : \r \t L D A \t M C P B
0074400 u s L \r \t A N D I \t S k i p D i
0074420 s k W a i t ' \r \t B N E \t P a c
0074440 i f y F i n i s h e d \r \r P a c
0074460 i f y W a t c h d o g : \r \t L D
0074500 A \t W a t c h d o g \r \t A N D I
0074520 \t W a t c h d o g I n \r \t R O R
0074540 A \t ; c a r r i e s W a t c
0074560 h d o g I n t o W a t c h d
0074600 o g O u t \r \t S T A \t W a t c h
0074620 d o g T e m p \r \t S E I \r \t L D
0074640 A \t W a t c h d o g \r \t A N D I
0074660 \t 0 f f - W a t c h d o g 376 \0 F
0074700 307 315 O u t \r \t O R A \t W a t c h
0074720 d o g T e m p \r \t S T A \t W a t
0074740 c h d o g \r \t C L I \r \r P a c i
0074760 f y F i n i s h e d : \r \t R T S
0075000 \r \r \t . E N D \r 377 \0 \0 d o r a d
0075020 o m i d a s i n t . m a s m \0 373
0075040 231 300 221 313 \0 \0 376 001 \0 I 017 ; * *
0075060 * * * * * * * *
*
0075140 * * * * * * * \r ; \r
0075160 ; \t D O R A D O
0075200 C o n t r o l
0075220 P r o g r a m \r ; \r
0075240 ; \t \t M i d a s I
0075260 n t e r f a c e
0075300 \r ; \r ; * * * * * *
0075320 * * * * * * * *
*
0075400 * * * \r \r ; \t f i l e d o
0075420 n D o r a d o M i d a s I n t
0075440 . m a s m \r ; \t E . 376 001 \0 321 X
0075460 M c C r e i g h t \r ; \t l a s t
0075500 m o d i f i e d S e p t e m
0075520 b e r 2 8 , 1 9 8 2 1 0
0075540 : 1 6 A M \r \r \t . E X P O R T
0075560 \t M i d a s C a l l , M i d a s
0075600 S e t u p , T r a p E n c o u n
0075620 t e r e d \r \t . E X P O R T \t I
0075640 n h i b i t M i d a s , E n a b
0075660 l e M i d a s , M i d a s R e t
0075700 u r n P o i n t \r \t . E X P O R
0075720 T \t M i d a s I n h i b i t D e
0075740 p t h \r \r \t . I M P O R T \t P a
0075760 c i f y W a t c h d o g , P a c
0076000 i f y W a t c h d o g I f J u m
0076020 p e r \r \t . I M P O R T \t Z P t
0076040 r \r \t . I M P O R T \t Z P C , Z
0076060 376 001 \0 \n 214 S , Z P , Z A , Z X ,
0076100 Z Y \r \t . I M P O R T \t Z S u b
0076120 P C , Z S u b S , Z S u b P , Z
0076140 S u b A , Z S u b X , Z S u b Y
0076160 \r \t . I M P O R T \t Z S i m B l
0076200 k \r \r \t . S H O R T \t Z P t r \r
0076220 \t . S H O R T \t Z P C , Z S , Z
0076240 P , Z A , Z X , Z Y \r \t . S H O
0076260 R T \t Z S u b P C , Z S u b S ,
0076300 Z S u b P , Z S u b A , Z S u b
0076320 X , Z S u b Y \r \t . S H O R T \t
0076340 Z S i m B l k \r \r \r \t . P R E D
0076360 E F I N E " M C S 6 5 0 2 P R
0076400 E D E F S . S R " \r \t . G E T N
0076420 O L I S T \t " D o r a d o I O .
0076440 m d e f s " \r \r \f \r ; \t \t \t V
0076460 a r i 376 001 \0 \n [ a b l
0076500 e s \r \r \t . L O C \t M i d a
0076520 s D a t a \r \t . S H O R T \t M i
0076540 d a s D a t a \r \r ; \t M i d a s
0076560 n e e d n o t k n o w w
0076600 h e r e t h i s s t u f f
0076620 i s , b e c a u s e i t ' s
0076640 \r ; \t o n l y u s e d b y
0076660 t h e m i c r o c o m p u t e
0076700 r . \r \r M i d a s I n h i b i t
0076720 D e p t h : \t . B L K \t 1 \t ;
0076740 = 0 i f M i d a s i s e
0076760 n a b l e d \r M i d a s W a n t
0077000 s Y o u : \t . B L K \t 1 \t ; =
0077020 0 i f M i d a s d o e s n
0077040 ' t w a n t s e r v i c e \r
0077060 M i d a s S u b r D 376 001 \0 310 257 e
0077100 p t h : . B L K \t 1 \t ; > 0
0077120 i f w i t h i n M i d a s
0077140 s u b r c a l l \r ; C P I
0077160 B u s [ T r a p ' ] = 0 i
0077200 f t r a p l o o p w a n t
0077220 s M i d a s ' h e l p \r \r N
0077240 u m b e r O f T r a p s = 8
0077260 \r T r a p P o i n t s : \t . B L
0077300 K \t 3 * N u m b e r O f T r a p
0077320 s \t ; 8 s o f t w a r e b
0077340 r e a k p o i n t s \r R e s t a
0077360 r t T r a p : \t . B L K \t 1 \t ;
0077400 i n d e x o f r e s t a r
0077420 t p o i n t , i f a n y .
0077440 - 1 i f n o n e . \r \f \r ;
0077460 \t \t M i d a s I 376
0077500 001 \0 S 266 n t e r f a
0077520 c e \r \r \t . L O C \t 0 f f f
0077540 a \t ; N o n - m a s k a b l e
0077560 i n t e r r u p t l o c a t
0077600 i o n \r \t . A D R \t M i d a s C
0077620 a l l \r \r \r \t . L O C \t M i d a
0077640 s C o d e \r \r ; \t C o n t r o l
0077660 g e t s h e r e o n a
0077700 M i d a s - g e n e r a t e d
0077720 n o n - m a s k a b l e i n t
0077740 e r r u p t \r \r M i d a s C a l
0077760 l : \r \t C L D \r \t P H A \r \r \t L
0100000 D A \t M i d a s I n h i b i t D
0100020 e p t h \r \t B E Q \t O K F o r M
0100040 i d a s \r \t L D A I \t 0 f f \r \t
0100060 S T A \t M i d a s W a n t s Y o
0100100 u \r \t P 376 001 \0 030 - L A \r \t R T I
0100120 \r \r O K F o r M i d a s : \r \t I
0100140 N C \t M i d a s I n h i b i t D
0100160 e p t h \r \t C L I \t ; a l l o
0100200 w t i m e r i n t e r r u p
0100220 t s \r M i d a s A l r e a d y I
0100240 n h i b i t e d : \r \t P L A \r \t
0100260 S T A \t Z A \t ; U n l o a d
0100300 s t a t e t o m e m o r y \r
0100320 \t S T X \t Z X \r \t S T Y \t Z Y \r
0100340 \r S t o r e I n t e r r u p t S
0100360 t a t e : \r \t P L A \r \t S T A \t
0100400 Z P \r \t P L A \r \t S T A \t Z P C
0100420 \t ; l o w - o r d e r Z P C
0100440 b y t e \r \t P L A \r \t S T A \t
0100460 Z P C + 1 \t ; h i g h - o r d
0100500 e r Z P C b y 376 001 \0 226 215 t e
0100520 \r \t T S X \r \t S T X \t Z S \r \r \t
0100540 L D A I \t W a i t i n g F o r M
0100560 i d a s , # L o w A d d r B y t
0100600 e \r \t C M P \t Z P C \r \t B N E \t
0100620 N o T r a p \r \t L D A I \t W a i
0100640 t i n g F o r M i d a s , # H i
0100660 g h A d d r B y t e \r \t C M P \t
0100700 Z P C + 1 \r \t B E Q \t S t o r e
0100720 I n t e r r u p t S t a t e \t ;
0100740 i n t e r r u p t e d a t
0100760 t r a p j u m p , r e c o v
0101000 e r \r \t \t \t \t ; o r i g i n a
0101020 l s t a t e \r \r N o T r a p :
0101040 \r \t L D X I \t A l l O u t p u t
0101060 \t ; m a k e s u r e M i d
0101100 a s D D R ' s a r e r 376 001
0101120 \0 h 343 i g h t \r \t S T X \t D A C
0101140 + D D R \t ; s e t d a t a
0101160 d i r e c t i o n r e g i s t
0101200 e r s f o r o u t p u t \r \t
0101220 I N X \r \t S T X \t C P R e g H +
0101240 D D R \t ; s e t d a t a d
0101260 i r e c t i o n r e g i s t e
0101300 r s f o r i n p u t \r \t S T
0101320 X \t C P R e g L + D D R \r \t L D
0101340 X I \t C P I B u s D D R V a l u
0101360 e \r \t S T X \t C P I B u s + D D
0101400 R \t ; m i x e d I / O r e
0101420 g i s t e r \r \r \t J S R \t R e m
0101440 o v e T r a p s \r \r M i d a s W
0101460 a i t F o r S y n c : \r \t L D A
0101500 I \t 0 \r \t S T A \t M i d a s W a
0101520 n t s 376 001 \0 X 256 Y o u \r \r M i d
0101540 a s N o S y n c Y e t : \r \t L D
0101560 A \t C P R e g H \t \t ; w a i t
0101600 u n t i l A M S y n c n e
0101620 M A S y n c \r \t E O R \t C P I
0101640 B u s \r \t B P L \t M i d a s N o
0101660 S y n c Y e t \r \r \t L D A \t C P
0101700 R e g H \r \t A N D I \t M i d a s
0101720 C o m m a n d \r \t T A X \r \t L D
0101740 A \t C P R e g L \r \r \t D E X \r \t
0101760 B M I \t M i d a s C o m m a n d
0102000 D o n e \t ; C P R e g [ 5 - 7
0102020 ] = 0 ( n o - o p ) \r \t B
0102040 E Q \t M i d a s L d H i A d \t ;
0102060 = 1 \r \t D E X \r \t B E Q \t M
0102100 i d a s L d L o A d \t ; = 2
0102120 \r \t D E X \r \t B 376 001 \0 J 204 E Q \t
0102140 M i d a s L d L o A d F e t c h
0102160 \t ; = 3 \r \t D E X \r \t B E Q
0102200 \t M i d a s F e t c h I n c \t ;
0102220 = 4 \r \t D E X \r \t B E Q \t M
0102240 i d a s S t o r e I n c \t ; =
0102260 5 \r \t D E X \r \t B E Q \t M i d
0102300 a s M i s c \t ; = 6 \r \r M i
0102320 d a s C o m m a n d D o n e : \r
0102340 \t L D A \t C P R e g H \r \t T A X
0102360 \r \t L D A I \t M A S y n c \t ;
0102400 i n v e r t M A S y n c s o
0102420 M A S y n c = A M S y n c
0102440 \r \t E O R \t C P I B u s \r \t S T
0102460 A \t C P I B u s \r \r \t T X A \r \t
0102500 A N D I \t H o l d M C \t ; S e
0102520 e i f M i d a s w a 376 001 \0
0102540 034 002 n t s t o h o l d u s
0102560 i n t h e b r e a k \r \t B
0102600 E Q \t M i d a s N o H o l d \r \r
0102620 W a i t F o r N e x t I n t e r
0102640 r u p t : \r \t J S R \t P a c i f
0102660 y W a t c h d o g \r \t L D A \t M
0102700 i d a s W a n t s Y o u \r \t B E
0102720 Q \t W a i t F o r N e x t I n t
0102740 e r r u p t \r \t B N E \t M i d a
0102760 s W a i t F o r S y n c \r \r M i
0103000 d a s N o H o l d : \r \t J S R \t
0103020 I n s e r t T r a p s \r \t L D X
0103040 \t Z S \r \t T X S \r \t L D A \t Z P
0103060 C + 1 \t ; h i g h o r d e r
0103100 Z P C b y t e \r \t P H A \r \t
0103120 L D A \t Z P C \t ; l o w - o r
0103140 d e 376 001 \0 \b 331 r Z P C b y t
0103160 e \r \t P H A \r \t L D A \t Z P \r \t
0103200 P H A \r \t L D Y \t Z Y \r \t L D X
0103220 \t Z X \r \r \t L D A \t Z A \r \t P H
0103240 A \r \t L D A \t M i d a s W a n t
0103260 s Y o u \t ; a n i n t e r r
0103300 u p t b e t w e e n h e r e
0103320 & \r ; \t \t R T I m i g h t
0103340 b e s c r e w e d u p . \r \r
0103360 \t B E Q \t N o A p p a r e n t C
0103400 a l l s \r \r M i d a s W a n t e
0103420 d U s : \r \t J M P \t M i d a s A
0103440 l r e a d y I n h i b i t e d \r
0103460 \r N o A p p a r e n t C a l l s
0103500 : \r \t P L A \r \t D E C \t M i d a
0103520 s I n h i b i t D e p t h \r \t R
0103540 T I \r \f \r ; \t 376 001 \0 245 204 M i d a
0103560 s - I n v o k e d R o u t i n
0103600 e s \r \r \r M i d a s L d H i A d
0103620 : \r \t S T A \t Z P t r + 1 \r \t J
0103640 M P \t M i d a s C o m m a n d D
0103660 o n e \r \r \r M i d a s L d L o A
0103700 d : \r \t S T A \t Z P t r \r \t J M
0103720 P \t M i d a s C o m m a n d D o
0103740 n e \r \r \r M i d a s L d L o A d
0103760 F e t c h : \r \t S T A \t Z P t r
0104000 \r \t L D Y I \t 0 \r \t L D A @ Y \t
0104020 Z P t r \r \t S T A \t M A B y t e
0104040 \r \t J M P \t M i d a s C o m m a
0104060 n d D o n e \r \r \r M i d a s F e
0104100 t c h I n c : \r \t L D Y I \t 0 \r
0104120 \t L D A @ Y \t Z P t r \r \t S T A
0104140 \t M A B y t e \r \t J M P 376 001 \0 307
0104160 354 \t M i d a s I n c A d \r \r \r M
0104200 i d a s S t o r e I n c : \r \t L
0104220 D Y I \t 0 \r \t S T A @ Y \t Z P t
0104240 r \r \r \r M i d a s I n c A d : \r
0104260 \t I N C \t Z P t r \r \t B N E \t M
0104300 i d a s C o m m a n d D o n e \r
0104320 \t I N C \t Z P t r + 1 \r \r M i d
0104340 a s N o p : \r \t J M P \t M i d a
0104360 s C o m m a n d D o n e \r \r \r M
0104400 i d a s M i s c : \r \t T A X \r \t
0104420 B E Q \t M i d a s C o m m a n d
0104440 D o n e \t ; C P R e g [ 8 - 1
0104460 5 ] = 0 \r \t D E X \r \t B E Q
0104500 \t M i d a s C a l l S u b r o u
0104520 t i n e \t ; = 1 \r \t D E X \r
0104540 \t B E Q \t M i d a s R e s u m e
0104560 S 376 001 \0 356 i u b r o u t i n e \t
0104600 ; = 2 \r \t B N E \t M i d a s
0104620 N o p \t ; > 2 \r \f \r ; \t C o
0104640 d e t o c a l l a s u b
0104660 r o u t i n e f r o m t h e
0104700 M i d a s c o d e . T h e
0104720 \r ; \t s u b r o u t i n e i s
0104740 a s s u m e d t o s t a r
0104760 t a t l o c a t i o n Z S
0105000 u b P C , a n d t h e \r ; \t
0105020 S , P , A , X , a n d
0105040 Y r e g i s t e r s a r e
0105060 l o a d e d f r o m Z S u b
0105100 S , Z S u b P , Z S u b A ,
0105120 \r ; \t Z S u b X , a n d Z S
0105140 u b Y b e f o r e s t a r t
0105160 i n g . T 376 001 \0 o 251 h e s a
0105200 m e s t o r a g e l o c a t
0105220 i o n s a r e \r ; \t r e - l o
0105240 a d e d f r o m t h e i r
0105260 r e s p e c t i v e r e g i s
0105300 t e r s u p o n c o m p l e
0105320 t i o n o r \r ; \t t r a p . \r
0105340 \r M i d a s C a l l S u b r o u
0105360 t i n e : \r \t T S X \t ; c a l
0105400 c u l a t e a s a f e s u
0105420 b r o u t i n e s t a c k \r \t
0105440 T X A \r \t S E C \r \t S B C I \t 4
0105460 0 \r \t T A X \r \t T X S \t ; m o
0105500 v e t o n e w s t a c k \r
0105520 \t J S R \t M i d a s D o C a l l
0105540 \r \r B r e a k I n s i d e M i d
0105560 a s : \r \t B R K \t ; 376 001 \0 V 356
0105600 t h i s t r a p s a " p r
0105620 o c e e d " a f t e r a R
0105640 T S \r \r M i d a s D o C a l l :
0105660 \r \t J S R \t M i d a s R e a l l
0105700 y D o C a l l \r \r M i d a s R e
0105720 t u r n P o i n t : \r \t P H P \r
0105740 \r M i d a s T r a p R e t u r n
0105760 : \r \t I N C \t M i d a s I n h i
0106000 b i t D e p t h \r \t D E C \t M i
0106020 d a s S u b r D e p t h \r \t S T
0106040 A \t Z S u b A \r \t P L A \r \t S T
0106060 A \t Z S u b P \r \r \t C L D \t ;
0106100 a d d 1 t o r e c o v e r
0106120 e d P C t o f i x J S R
0106140 a d d r e s s e s \r \t C L C \r
0106160 \t P L A \r \t A D C I \t 1 \r \t S T
0106200 376 001 \0 n [ A \t Z S u b P C \r \t P
0106220 L A \r \t A D C I \t 0 \r \t S T A \t
0106240 Z S u b P C + 1 \r \r \t S T X \t Z
0106260 S u b X \r \t S T Y \t Z S u b Y \r
0106300 \t T S X \r \t S T X \t Z S u b S \t
0106320 ; s a v e s u b r o u t i n
0106340 e s t a c k \r \t L D X \t Z S \r
0106360 \t T X S \t ; r e c o v e r o
0106400 l d s t a c k \r \t J M P \t M i
0106420 d a s C o m m a n d D o n e \r \r
0106440 \r M i d a s R e s u m e S u b r
0106460 o u t i n e : \r \t L D X \t Z S u
0106500 b S \t ; r e s u m e o l d
0106520 s u b r o u t i n e s t a c k
0106540 \r \t T X S \r \r M i d a s R e a l
0106560 l y D o C a l l : \r \t L D A \t Z
0106600 S u b P C 376 001 \0 Z 235 + 1 \r \t P H
0106620 A \r \t L D A \t Z S u b P C \r \t P
0106640 H A \r \t L D A \t Z S u b P \r \t P
0106660 H A \r \t L D Y \t Z S u b Y \r \t L
0106700 D X \t Z S u b X \r \t L D A \t Z S
0106720 u b A \r \t D E C \t M i d a s I n
0106740 h i b i t D e p t h \r \t I N C \t
0106760 M i d a s S u b r D e p t h \r \t
0107000 R T I \r \r \f \r ; \t C o d e c a
0107020 l l e d f r o m m a s k a b
0107040 l e i n t e r r u p t w h e
0107060 n a t r a p d u e \r ; \t t
0107100 o a B R K i n s t r u c t
0107120 i o n ( 0 0 x ) \r ; \t i s d
0107140 i s c o v e r e d . S t a c k
0107160 h a s 0 : X , 1 : A ,
0107200 2 : P , 3 : 376 001 \0 305 6 P
0107220 C L o w , 4 : P C H i g h .
0107240 \r \r T r a p E n c o u n t e r e
0107260 d : \r \t J S R \t I n h i b i t M
0107300 i d a s \r \r \t L D A I \t - 2 \r \t
0107320 L D X \t M i d a s S u b r D e p
0107340 t h \r \t B E Q \t E x t e r n a l
0107360 T r a p \r \t L D A I \t - 3 \r \r E
0107400 x t e r n a l T r a p : \r \t C L
0107420 D \r \t C L C \r \t T S X \t ; b a
0107440 c k t h e P C u p t o
0107460 b e f o r e t h e t r a p \r
0107500 \t A D C X \t S t a c k T o p + 3
0107520 \r \t S T A X \t S t a c k T o p +
0107540 3 \r \t L D A X \t S t a c k T o p
0107560 + 4 \r \t S B C I \t 0 \r \t S T A X
0107600 \t S t a c k T o p + 4 \r \r \t P 376
0107620 001 \0 245 256 L A \r \t T A X \r \r \t L D
0107640 A \t M i d a s S u b r D e p t h
0107660 \r \t B E Q \t E x t e r n a l T r
0107700 a p 2 \r \r \t P L A \r \t J M P \t M
0107720 i d a s T r a p R e t u r n \r \r
0107740 E x t e r n a l T r a p 2 : \r \t
0107760 L D A I \t 0 f f - T r a p ' \t ;
0110000 n o t i f y M i d a s o f
0110020 t r a p \r \t A N D \t C P I B u
0110040 s \r \t S T A \t C P I B u s \r \r \t
0110060 P L A \r \t J S R \t E n a b l e M
0110100 i d a s \r \r W a i t i n g F o r
0110120 M i d a s : \r \t J S R \t P a c i
0110140 f y W a t c h d o g I f J u m p
0110160 e r \r \t \t ; o n l y p a c i
0110200 f y w a t c h d o g t i m e
0110220 r i f 376 001 \0 B 336 d e b u g g
0110240 i n g j u m p e r i s i n
0110260 s t a l l e d \r \t J M P \t W a i
0110300 t i n g F o r M i d a s \t ; w
0110320 a i t u n t i l M i d a s
0110340 n o t i c e s \r \f \r ; \t M i d a
0110360 s I n s t r u c t i o n S i
0110400 m u l a t i o n \r \r ; \t \t C o n
0110420 d i t i o n a l b r a n c h e
0110440 s a r e o f t h e f o r
0110460 m x x x 1 0 0 0 0 \r ; \t \t O
0110500 n e - b y t e i n s t r u c t
0110520 i o n s a r e o f t h e
0110540 f o r m x x x x 1 0 x 0 \r ;
0110560 \t \t T h r e e - b y t e i n s
0110600 t r u c t i o n s a r e o f
0110620 t h e f o r m 376 001 \0 004 5 x
0110640 x x x 1 1 x x \r ; \t \t T w o -
0110660 b y t e i n s t r u c t i o n
0110700 s a r e o f t h e f o r
0110720 m x x x x 0 x x x , e x c
0110740 e p t : \r ; \t \t \t B R K ( t r
0110760 a p ) i s 0 0 \r ; \t \t \t J S
0111000 R i s 2 0 \r ; \t \t \t R T I
0111020 i s 4 0 \r ; \t \t \t R T S i s
0111040 6 0 \r \r M i d a s B u i l d S
0111060 i m u l a t i o n : \r \t L D X \t
0111100 R e s t a r t T r a p \r \t B P L
0111120 \t S i m u l a t i o n N e e d e
0111140 d \r \r \t L D X I \t 0 3 a \t ; o
0111160 p c o d e f o r N O P \r \t L
0111200 D Y I \t 2 \r \t S T X \t Z S i m B
0111220 l k \t ; N O P i n f i 376 001
0111240 \0 336 355 r s t b y t e \r \t B N E
0111260 \t O n e B y t e r \r \r S i m u l
0111300 a t i o n N e e d e d : \r \t L D
0111320 A X \t T r a p P o i n t s + 2 \r
0111340 \t S T A \t Z S i m B l k \r \t L D
0111360 Y I \t 2 \r \r C o p y M o r e P a
0111400 r a m e t e r s : \r \t L D A @ Y
0111420 \t Z S u b P C \r \t S T A Y \t Z S
0111440 i m B l k \r \t D E Y \r \t B N E \t
0111460 C o p y M o r e P a r a m e t e
0111500 r s \r \r \t L D X I \t 0 e a \t ;
0111520 o p c o d e f o r N O P \r \t
0111540 L D Y I \t 3 \t ; i n s t r u c
0111560 t i o n l e n g t h \r \t L D A
0111600 \t Z S i m B l k \r \t C M P I \t 2
0111620 0 \r \t B E Q \t T h r e e B y t e
0111640 r \t ; 376 001 \0 ; 276 J S R i s
0111660 3 b y t e s l o n g \r \t A N
0111700 D I \t 8 \r \t B E Q \t T w o B y t
0111720 e r \r \t L D A \t Z S i m B l k \r
0111740 \t A N D I \t 5 \r \t B N E \t T h r
0111760 e e B y t e r \r \r O n e B y t e
0112000 r : \r \t D E Y \r \t S T X \t Z S i
0112020 m B l k + 1 \t ; N O P i n
0112040 s e c o n d b y t e \r \r T w o
0112060 B y t e r : \r \t D E Y \r \t S T X
0112100 \t Z S i m B l k + 2 \t ; N O P
0112120 i n t h i r d b y t e \r \r
0112140 T h r e e B y t e r : \t ; c o
0112160 m p u t e a d d r e s s o f
0112200 s u c c e s s o r i n s t r
0112220 u c t i o n \r \t T Y A \t ; l e
0112240 n g t h o f 376 001 \0 - 301 i n s
0112260 t r u c t i o n \r \t C L C \r \t A
0112300 D C \t Z S u b P C \r \t S T A \t Z
0112320 S i m B l k + 4 \r \t L D A \t Z S
0112340 u b P C + 1 \r \t A D C I \t 0 \r \t
0112360 S T A \t Z S i m B l k + 5 \r \r \t
0112400 L D A \t Z S i m B l k + 1 \t ;
0112420 c o m p u t e P C - r e l a t
0112440 i v e b r a n c h a d d r e
0112460 s s \r \t C L C \r \t A D C \t Z S i
0112500 m B l k + 4 \r \t S T A \t Z S i m
0112520 B l k + 7 \r \t L D A \t Z S i m B
0112540 l k + 1 \r \t A N D I \t 8 0 \r \t B
0112560 P L \t H O P C O f f s e t I n A
0112600 \r \t L D A I \t - 1 \r \r H O P C O
0112620 f f s e t I n A : \r \t A D C \t Z
0112640 S i m B l k + 5 \r \t S T A 376 001 \0
0112660 y 312 \t Z S i m B l k + 8 \r \r \t L
0112700 D A I \t 0 4 c \t ; o p c o d e
0112720 f o r a b s o l u t e j u
0112740 m p \r \t S T A \t Z S i m B l k +
0112760 3 \t ; J M P t o s u c c e
0113000 s s o r \r \t S T A \t Z S i m B l
0113020 k + 6 \t ; J M P i f P C -
0113040 r e l a t i v e b r a n c h
0113060 t a k e n \r \r \t L D A \t Z S i m
0113100 B l k \r \t A N D I \t 1 f \r \t C M
0113120 P I \t 1 0 \r \t B N E \t N o t C o
0113140 n d i t i o n a l B r a n c h \r
0113160 \r \t L D A I \t 3 \r \t S T A \t Z S
0113200 i m B l k + 1 \t ; c h a n g e
0113220 c o n d i t i o n a l b r a
0113240 n c h t a r g e t t o . +
0113260 6 \r 376 001 \0 262 017 \r N o t C o n d i
0113300 t i o n a l B r a n c h : \r \t R
0113320 T S \r \r \r \r M i d a s S t a r t
0113340 S i m u l a t i o n : \r \t L D A
0113360 \t Z S i m B l k \r \t C M P I \t 2
0113400 0 \t ; J S R \r \t B N E \t N o J
0113420 S R S i m u l a t i o n \r \r \t L
0113440 D A \t Z S i m B l k + 5 \t ; a
0113460 J S R l e a v e s N e x t
0113500 P C - 1 o n t h e s t a c
0113520 k \r \t P H A \r \t L D A \t Z S u b
0113540 P C + 4 \r \t P H A \r \r \t T S X \r
0113560 \t L D A X \t S t a c k T o p \r \t
0113600 D E C X \t S t a c k T o p \r \t T
0113620 A Y \r \t B N E \t S u b P C D e c
0113640 r e m e n t e d \r \t D E C X \t S
0113660 t a c k T o p 376 001 \0 = x + 1 \r \r
0113700 S u b P C D e c r e m e n t e d
0113720 : \r \t L D A I \t 0 4 c \t ; J M
0113740 P \r \t S T A \t Z S i m B l k \r \r
0113760 N o J S R S i m u l a t i o n :
0114000 \r \t L D A \t Z S u b P \r \t P H A
0114020 \r \t L D Y \t Z S u b Y \r \t L D X
0114040 \t Z S u b X \r \t L D A \t Z S u b
0114060 A \r \t D E C \t M i d a s I n h i
0114100 b i t D e p t h \r \t I N C \t M i
0114120 d a s S u b r D e p t h \r \t P L
0114140 P \r \t J M P \t Z S i m B l k \r \f
0114160 \r ; \t I n s t r u c t i o n t
0114200 r a p i n s e r t i o n / r e
0114220 m o v a l \r \r R e m o v e T r a
0114240 p s : \r \t L D A I \t T r a p ' \t
0114260 ; n o l o n g e r 376 001 \0 \a
0114300 W t r a p p e d , t r a p s
0114320 t a t e c a n b e i n f e
0114340 r r e d \r \t O R A \t C P I B u s
0114360 \t ; \t \t f r o m Z P \r \t S T A
0114400 \t C P I B u s \r \r \t L D X I \t 3
0114420 * ( N u m b e r O f T r a p s -
0114440 1 ) \t ; u n - t r a p a l l
0114460 t h e b r e a k p o i n t s
0114500 \r \r R e m o v e N e x t T r a p
0114520 : \r \t L D A I \t 0 f f \r \t C M P
0114540 X \t T r a p P o i n t s \r \t B N
0114560 E \t R e m o v e F o r m e r T r
0114600 a p \r \t C M P X \t T r a p P o i
0114620 n t s + 1 \r \t B E Q \t T r y R e
0114640 m o v i n g N e x t T r a p \r \r
0114660 R e m o v e F o r m e r T r a p
0114700 : 376 001 \0 316 \t \r \t L D A X @ \t T r
0114720 a p P o i n t s \r \t B E Q \t R e
0114740 m o v e R e a l T r a p \t ; t
0114760 r a p s t i l l t h e r e \r
0115000 \r \t L D A I \t 0 f f \t ; r e m
0115020 o v e i t f r o m t h e
0115040 t r a p l i s t ( s h o u l
0115060 d a l s o c o m p l a i n )
0115100 \r \t S T A X \t T r a p P o i n t
0115120 s \r \t S T A X \t T r a p P o i n
0115140 t s + 1 \r \t B N E \t T r y R e m
0115160 o v i n g N e x t T r a p \r \r R
0115200 e m o v e R e a l T r a p : \r \t
0115220 L D A X \t T r a p P o i n t s +
0115240 2 \t ; o p c o d e t h a t
0115260 s h o u l d b e t h e r e \r
0115300 \t S T A X @ 376 001 \0 223 R \t T r a p
0115320 P o i n t s \r \r T r y R e m o v
0115340 i n g N e x t T r a p : \r \t D E
0115360 X \r \t D E X \r \t D E X \r \t B P L
0115400 \t R e m o v e N e x t T r a p \r
0115420 \t R T S \r \r \r I n s e r t T r a
0115440 p s : \r \t L D A I \t - 1 \r \t S T
0115460 A \t R e s t a r t T r a p \r \r \t
0115500 L D X I \t 3 * ( N u m b e r O f
0115520 T r a p s - 1 ) \t ; t r a p
0115540 a l l t h e b r e a k p o i
0115560 n t s \r \r I n s e r t N e x t T
0115600 r a p : \r \t L D A I \t 0 f f \r \t
0115620 C M P X \t T r a p P o i n t s \r
0115640 \t B N E \t I n s e r t R e a l T
0115660 r a p \r \t C M P X \t T r a p P o
0115700 i n t s + 1 \r \t B E Q 376 001 \0 254 k
0115720 \t T r y I n s e r t i n g N e x
0115740 t T r a p \r \r I n s e r t R e a
0115760 l T r a p : \r \t L D A \t Z S u b
0116000 P C \r \t C M P X \t T r a p P o i
0116020 n t s \r \t B N E \t N o t R e s t
0116040 a r t A d d r \r \t L D A \t Z S u
0116060 b P C + 1 \r \t C M P X \t T r a p
0116100 P o i n t s + 1 \r \t B N E \t N o
0116120 t R e s t a r t A d d r \r \t S T
0116140 X \t R e s t a r t T r a p \r \r N
0116160 o t R e s t a r t A d d r : \r \t
0116200 L D A X @ \t T r a p P o i n t s
0116220 \r \t S T A X \t T r a p P o i n t
0116240 s + 2 \t ; o p c o d e t h a
0116260 t s h o u l d b e t h e r
0116300 e \r \t L D A I \t 0 \t ; B R K
0116320 376 001 \0 7 ? o p c o d e \r \t S T A
0116340 X @ \t T r a p P o i n t s \r \r T
0116360 r y I n s e r t i n g N e x t T
0116400 r a p : \r \t D E X \r \t D E X \r \t
0116420 D E X \r \t B P L \t I n s e r t N
0116440 e x t T r a p \r \t R T S \r \r \r \f
0116460 \r ; \t M i d a s U s e r - C a
0116500 l l a b l e U t i l i t i e s
0116520 \r \r M i d a s S e t u p : \r \t L
0116540 D A I \t T r a p ' \t ; w e a
0116560 r e r u n n i n g l i v e
0116600 c o d e , n o t t h e t r
0116620 a p l o o p \r \t O R A \t C P I
0116640 B u s \r \t S T A \t C P I B u s \r
0116660 \r \t L D X I \t 1 7 \r \t L D A I \t
0116700 0 f f \r \r I n v a l i d a t e M
0116720 o r e T r 376 001 \0 036 377 a p P o i n
0116740 t s : \r \t S T A X \t T r a p P o
0116760 i n t s \r \t D E X \r \t B P L \t I
0117000 n v a l i d a t e M o r e T r a
0117020 p P o i n t s \r \r \t L D A I \t 0
0117040 \r \t S T A \t M i d a s W a n t s
0117060 Y o u \t ; n o M i d a s i
0117100 n t e r r u p t s y e t \r \t S
0117120 T A \t M i d a s I n h i b i t D
0117140 e p t h \t ; b u t w e ' l l
0117160 a c c e p t t h e m \r \t S T
0117200 A \t M i d a s S u b r D e p t h
0117220 \t ; w e ' r e i n t h e
0117240 m a i n c o d e r o u t i n
0117260 e \r \t R T S \r \r \r I n h i b i t
0117300 M i d a s : \t ; m u s t s a
0117320 v e a l l p r o 376 001 \0 217 037 c
0117340 e s s o r s t a t e \r \t P H P
0117360 \r \t I N C \t M i d a s I n h i b
0117400 i t D e p t h \r \t P L P \r \t R T
0117420 S \r \r \r E n a b l e M i d a s :
0117440 \t ; m u s t s a v e a l l
0117460 p r o c e s s o r s t a t e
0117500 \r \t P H P \r \t P H A \r \t L D A I
0117520 \t 1 \r \t C M P \t M i d a s I n h
0117540 i b i t D e p t h \r \t B N E \t D
0117560 r o p A L e v e l \t ; n o t
0117600 r e a l l y e n a b l i n g ,
0117620 j u s t d r o p p i n g a
0117640 l e v e l \r \r ; \t * * * \t J
0117660 u l y 2 3 , 1 9 8 0 6 :
0117700 5 3 P M W h e n M i d a
0117720 s t a k e s / g i v e s c 376
0117740 001 \0 l 245 o n t r o l \r ; \t o f
0117760 t h e C P B u s f r o m / t
0120000 o t h e m i c r o c o m p u
0120020 t e r b y c h a n g i n g
0120040 t h e v a l u e \r ; \t o f A
0120060 H a s C P , t h e r e i s
0120100 a r a c e t h a t c l i p
0120120 s t h e s t r o b e a n d
0120140 \r ; \t s i m u l t a n e o u s l
0120160 y c h a n g e s t h e C P
0120200 B u s d a t a s o u r c e .
0120220 T h e f o l l o w i n g \r ;
0120240 \t c o d e g u a r a n t e e s
0120260 t h a t i f M i d a s o
0120300 b e y s t h e s t a n d a r
0120320 d " p o l i t e n e s s " \r ;
0120340 \t c o n 376 001 \0 p 215 v e n t i o n
0120360 , t h e c l i p p e d s t
0120400 r o b e w i l l d o n o
0120420 d a m a g e t o t h e \r ; \t
0120440 c o n t r o l s e c t i o n
0120460 b e c a u s e t h e M C P
0120500 a d d r e s s a n d d a t a
0120520 a r e b e n i g n . \r \t L D
0120540 A I \t 0 \r \t S T A \t M C P B u s
0120560 H \r \t L D A I \t C l o c k \r \t S
0120600 T A \t M C P B u s L \r \r \t D E C
0120620 \t M i d a s I n h i b i t D e p
0120640 t h \r \t L D A \t M i d a s W a n
0120660 t s Y o u \r \t B N E \t S i m u l
0120700 a t e M i d a s I n t e r r u p
0120720 t \r \t B E Q \t E n a b l e E x i
0120740 t P \t ; ( u n c 376 001 \0 240 330 o n
0120760 d i t i o n a l ) \r \r D r o p A
0121000 L e v e l : \r \t D E C \t M i d a
0121020 s I n h i b i t D e p t h \r \r E
0121040 n a b l e E x i t P : \r \t P L A
0121060 \r \t P L P \r \t R T S \r \r \r S i m
0121100 u l a t e M i d a s I n t e r r
0121120 u p t : \r \t S E I \r \t T X A \r \t
0121140 P H A \r \t T S X \r \t C L C \r \t C
0121160 L D \r \t L D A X \t S t a c k T o
0121200 p + 3 \t ; a d d 1 t o t
0121220 h e s t a c k e d Z P C ,
0121240 s o i t l o o k s \r \t A D C
0121260 I \t 1 \t ; l i k e a n i n
0121300 t e r r u p t \r \t S T A X \t S t
0121320 a c k T o p + 3 \r \t L D A X \t S
0121340 t a c k T o p + 4 \r \t A D C 376 \0
0121360 ; ~ 272 I \t 0 \r \t S T A X \t S t a
0121400 c k T o p + 4 \r \r \t P L A \r \t T
0121420 A X \r \t P L A \r \t J M P \t M i d
0121440 a s C a l l \r \r \t . E N D \r 377 \0
0121460 \0 d o r a d o a n a l o g . m a
0121500 s m \0 373 225 244 260 025 \0 \0 376 001 \0 334 340 ;
0121520 * * * * * * * *
*
0121620 * \r ; \r ; \t D O R A D
0121640 O C o n t r o
0121660 l P r o g r a
0121700 m \r ; \r ; \t \t A n a l o
0121720 g I n t e r f
0121740 a c e C o d e
0121760 \r ; \r ; * * * * * *
0122000 * * * * * * * *
*
0122060 * * * \r \r ; \t f i l e d o
0122100 n D o r a d o A n a l o g . 376
0122120 001 \0 Y # m a s m \r ; \t E . M c
0122140 C r e i g h t \r ; \t l a s t m
0122160 o d i f i e d J u l y 3 0 ,
0122200 1 9 8 0 1 1 : 3 1 A M \r
0122220 \r \t . E X P O R T \t I n i t E n
0122240 v i r o n m e n t \r \t . E X P O
0122260 R T \t D o A l l C o n v e r s i
0122300 o n s , A D C o n v e r t \r \t .
0122320 E X P O R T \t V o l t a g e C o
0122340 n v e r s i o n s , C u r r e n
0122360 t C o n v e r s i o n s \r \t . E
0122400 X P O R T \t T e m p e r a t u r
0122420 e C o n v e r s i o n s \r \t . E
0122440 X P O R T \t V I C o n v S e t u
0122460 p , D o C u r r e n t C o n v e
0122500 r s i o n \r \t . E X P O R T \t N
0122520 e x t B 376 001 \0 b { i t T e s t \r
0122540 \r \t . I M P O R T \t P o w e r O
0122560 u t O f S p e c \r \t . I M P O R
0122600 T \t V o l t a g e T a b l e , C
0122620 u r r e n t T a b l e , E n v i
0122640 r o n m e n t L e n \r \t . I M P
0122660 O R T \t V D D , V E E , V T T ,
0122700 V C C \r \t . I M P O R T \t I D D
0122720 , I E E , I T T , I C C \r \t . I
0122740 M P O R T \t T h e r m o m e t e
0122760 r s \r \t . I M P O R T \t B a s e
0123000 T e m p , C B T e m p , C A T e
0123020 m p \r \t . I M P O R T \t P r o c
0123040 L T e m p , P r o c H T e m p ,
0123060 I F U T e m p \r \t . I M P O R T
0123100 \t M e m C T e m p , M e m X T e
0123120 m p , M e m D T e 376 001 \0 272 241 m p
0123140 \r \t . I M P O R T \t C u r E n v
0123160 i r o n m e n t , F i r s t E n
0123200 v i r o n m e n t \r \t . I M P O
0123220 R T \t M i n E n v i r o n m e n
0123240 t , M a x E n v i r o n m e n t
0123260 \r \t . I M P O R T \t E c l U p M
0123300 u f f l e r , R e a d M u f f l
0123320 e r \r \r \t . S H O R T \t P o w e
0123340 r O u t O f S p e c \r \t . S H O
0123360 R T \t V o l t a g e T a b l e ,
0123400 C u r r e n t T a b l e , E n v
0123420 i r o n m e n t L e n \r \t . S H
0123440 O R T \t V D D , V E E , V T T ,
0123460 V C C \r \t . S H O R T \t I D D ,
0123500 I E E , I T T , I C C \r \t . S H
0123520 O R T \t T h e r m o m e t e 376 001
0123540 \0 344 002 r s \r \t . S H O R T \t B a
0123560 s e T e m p , C B T e m p , C A
0123600 T e m p \r \t . S H O R T \t P r o
0123620 c L T e m p , P r o c H T e m p
0123640 , I F U T e m p \r \t . S H O R T
0123660 \t M e m C T e m p , M e m X T e
0123700 m p , M e m D T e m p \r \t . S H
0123720 O R T \t C u r E n v i r o n m e
0123740 n t , F i r s t E n v i r o n m
0123760 e n t \r \t . S H O R T \t M i n E
0124000 n v i r o n m e n t , M a x E n
0124020 v i r o n m e n t \r \r \t . I M P
0124040 O R T \t I n h i b i t M i d a s
0124060 , E n a b l e M i d a s \r \t . I
0124100 M P O R T \t S e t M u f f l e r
0124120 A d d r e s s , M u f f l e r A
0124140 d d r 376 001 \0 . 032 e s s \r \t . I M
0124160 P O R T \t T h e r m o m M u f A
0124200 d d r , M a x T h e r m o m \r \r
0124220 \t . P R E D E F I N E " M C S
0124240 6 5 0 2 P R E D E F S . S R " \r
0124260 \t . G E T N O L I S T \t " D o r
0124300 a d o I O . m d e f s " \r \f \r ;
0124320 \t \t \t V a r i a b l
0124340 e s \r \r \t . L O C \t A n a l
0124360 o g D a t a \r \t . S H O R T \t A
0124400 n a l o g D a t a \r \r ; \t A n a
0124420 l o g T o D i g i t a l C
0124440 o n v e r s i o n V a r i a b
0124460 l e s \r \r C o m p a r a t o r s
0124500 P t r : \t . B L K \t 2 \r C o m p
0124520 a r a t o r M a s k : \t . B L K
0124540 \t 1 \r N e x t B 376 001 \0 375 374 i t T
0124560 e s t : \t . B L K \t 1 \r S e t t
0124600 l i n g D e l a y : \t . B L K \t
0124620 1 \r N o r m a l I O f f s e t :
0124640 \t . B L K \t 1 \r I O f f s e t :
0124660 \t . B L K \t 1 \r C u r r e n t O
0124700 u t O f S p e c : \t . B L K \t 1
0124720 \r V o l t a g e O u t O f S p e
0124740 c : \t . B L K \t 1 \r T h e r m o
0124760 m I n d e x : \t . B L K \t 1 \r \f
0125000 \r \t . L O C \t A n a l o g C o d
0125020 e \r \r ; \t \t \t C o n s t
0125040 a n t T a b l
0125060 e s \r \r V o l t a g e M a x
0125100 T a b l e : \r \t 0 e 0 \t ; 3 4
0125120 0 o c t a l \r \t 0 e 0 \r \t 0 e
0125140 0 \r \t 0 e 0 \r \r V o l t a 376 001 \0
0125160 " 372 g e M i n T a b l e : \r \t 0
0125200 a 0 \t ; 2 4 0 o c t a l \r \t
0125220 0 a 0 \r \t 0 a 0 \r \t 0 a 0 \r \r \r
0125240 C u r r e n t M a x T a b l e :
0125260 \r \t 0 f f \r \t 0 f f \r \t 0 f f \r
0125300 \t 0 f f \r \r C u r r e n t M i n
0125320 T a b l e : \r \t 0 \r \t 0 \r \t 0 \r
0125340 \t 0 \r \f \r ; \t S u b r o u t i n
0125360 e t o i n i t i a l i z e
0125400 t h e e n v i r o n m e n t .
0125420 \r \r I n i t E n v i r o n m e n
0125440 t : \r \t L D X I \t E n v i r o n
0125460 m e n t L e n - 1 \r \r M o r e E
0125500 n v i r o n m e n t : \r \t L D A
0125520 I \t 0 \r \t S T A X \t M a x E n v
0125540 i r o n m e n t \r \t L D A I \t 0
0125560 f f 376 001 \0 Q 034 \r \t S T A X \t M i
0125600 n E n v i r o n m e n t \r \t S T
0125620 A X \t C u r E n v i r o n m e n
0125640 t \r \t D E X \r \t B P L \t M o r e
0125660 E n v i r o n m e n t \r \r \t J S
0125700 R \t D o A l l C o n v e r s i o
0125720 n s \r \r \t L D X I \t E n v i r o
0125740 n m e n t L e n - 1 \r \r M o r e
0125760 F i r s t E n v i r o n m e n t
0126000 : \r \t L D A X \t C u r E n v i r
0126020 o n m e n t \r \t S T A X \t F i r
0126040 s t E n v i r o n m e n t \r \t D
0126060 E X \r \t B P L \t M o r e F i r s
0126100 t E n v i r o n m e n t \r \t R T
0126120 S \r \r \r ; \t S u b r o u t i n e
0126140 t o d o a l l A / D c
0126160 o n v e r s i 376 001 \0 375 035 o n s
0126200 a n d s t o r e \r ; \t t h e
0126220 r e s u l t s i n m e m o r
0126240 y \r \r D o A l l C o n v e r s i
0126260 o n s : \r \t J S R \t V o l t a g
0126300 e C o n v e r s i o n s \r \t J S
0126320 R \t C u r r e n t C o n v e r s
0126340 i o n s \r \t J S R \t T e m p e r
0126360 a t u r e C o n v e r s i o n s
0126400 \r \r \t L D X I \t E n v i r o n m
0126420 e n t L e n - 1 \r \r C h e c k E
0126440 n v i r o n m e n t L i m i t s
0126460 : \r \t L D A X \t C u r E n v i r
0126500 o n m e n t \r \t C M P X \t M i n
0126520 E n v i r o n m e n t \r \t B C S
0126540 \t M i n O K \r \t S T A X \t M i n
0126560 E n v i r o n m e n t \r 376 001 \0 347
0126600 Y \r M i n O K : \r \t C M P I \t 0
0126620 f f \t ; t h i s i s a s
0126640 p e c i a l v a l u e \r \t B E
0126660 Q \t M a x O K \r \r \t C M P X \t M
0126700 a x E n v i r o n m e n t \r \t B
0126720 C C \t M a x O K \r \t S T A X \t M
0126740 a x E n v i r o n m e n t \r \r M
0126760 a x O K : \r \t D E X \r \t B P L \t
0127000 C h e c k E n v i r o n m e n t
0127020 L i m i t s \r \r \t L D A \t C u r
0127040 r e n t O u t O f S p e c \r \t L
0127060 S R A \r \t L S R A \r \t L S R A \r
0127100 \t L S R A \r \t O R A \t V o l t a
0127120 g e O u t O f S p e c \r \t S T A
0127140 \t P o w e r O u t O f S p e c \r
0127160 \t R T S \r \f \r V o l t a g e C o
0127200 n 376 001 \0 034 241 v e r s i o n s : \r
0127220 \t L D A I \t 0 \r \t S T A \t V o l
0127240 t a g e O u t O f S p e c \r \t L
0127260 D A I \t C V E E \r \t J S R \t V I
0127300 C o n v S e t u p \r \r A n o t h
0127320 e r V o l t a g e C o n v e r s
0127340 i o n : \r \t J S R \t A D C o n v
0127360 e r t \r \t S T A X \t V o l t a g
0127400 e T a b l e \r \t C M P X \t V o l
0127420 t a g e M i n T a b l e \r \t B C
0127440 C \t V o l t a g e I s O u t O f
0127460 S p e c \r \t C M P X \t V o l t a
0127500 g e M a x T a b l e \r \t B C C \t
0127520 V o l t a g e I n S p e c \r \r V
0127540 o l t a g e I s O u t O f S p e
0127560 c : \r \t S E C \r \r V o l t a g e
0127600 I n S p e c 376 001 \0 361 227 : \r \t R O
0127620 R \t V o l t a g e O u t O f S p
0127640 e c \r \r \t A S L \t C o m p a r a
0127660 t o r M a s k \r \t D E X \r \t B P
0127700 L \t A n o t h e r V o l t a g e
0127720 C o n v e r s i o n \r \r \t R T S
0127740 \r \r \r V I C o n v S e t u p : \r
0127760 \t S T A \t C o m p a r a t o r M
0130000 a s k \r \t L D A I \t C o m p a r
0130020 a t o r s ^ - 8 \r \t S T A \t C o
0130040 m p a r a t o r s P t r + 1 \r \t
0130060 L D A I \t C o m p a r a t o r s
0130100 & 0 f f \r \t S T A \t C o m p a r
0130120 a t o r s P t r \r \t L D X I \t 3
0130140 \r \t R T S \r \f \r C u r r e n t C
0130160 o n v e r s i o n s : \r \t L D A
0130200 I \t 0 \r \t S T A \t C u 376 001 \0 , 356
0130220 r r e n t O u t O f S p e c \r \t
0130240 L D A I \t C I \r \t J S R \t V I C
0130260 o n v S e t u p \r \r \t L D A I \t
0130300 I G n d M a s k \r \t J S R \t D o
0130320 C u r r e n t C o n v e r s i o
0130340 n \r \t S T A \t N o r m a l I O f
0130360 f s e t \r \r \t L D A I \t I V E E
0130400 M a s k \r \t J S R \t D o C u r r
0130420 e n t C o n v e r s i o n \r \t S
0130440 T A \t I O f f s e t \r \r \t L D A
0130460 I \t I E E M a s k \t ; s e t
0130500 t h e a n a l o g m p x \r \r
0130520 A n o t h e r C u r r e n t C o
0130540 n v e r s i o n : \r \t J S R \t D
0130560 o C u r r e n t C o n v e r s i
0130600 o n \r \t S E C \r \t S B C \t I O f
0130620 376 001 \0 y 276 f s e t \r \t B C S \t R
0130640 e c o r d C u r r e n t \r \r \t L
0130660 D A I \t 0 \t ; c u r r e n t
0130700 w e n t n e g a t i v e , s
0130720 e t t o 0 \r \r R e c o r d C
0130740 u r r e n t : \r \t S T A X \t C u
0130760 r r e n t T a b l e \r \t C M P X
0131000 \t C u r r e n t M i n T a b l e
0131020 \r \t B C C \t C u r r e n t I s O
0131040 u t O f S p e c \r \t C M P X \t C
0131060 u r r e n t M a x T a b l e \r \t
0131100 B C C \t C u r r e n t I n S p e
0131120 c \r \r C u r r e n t I s O u t O
0131140 f S p e c : \r \t S E C \r \r C u r
0131160 r e n t I n S p e c : \r \t R O R
0131200 \t C u r r e n t O u t O f S p e
0131220 c \r \r \t L 376 001 \0 n x D A \t N o r
0131240 m a l I O f f s e t \r \t S T A \t
0131260 I O f f s e t \t ; e v e r y t
0131300 h i n g b u t I E E i s
0131320 G n d - r e f e r e n c e d \r \r
0131340 \t L D A \t C o m p a r a t o r s
0131360 \t ; l e a v e n e w a n a
0131400 l o g m p x a d d r i n
0131420 A \r \t A N D I \t I S e l \r \t S E
0131440 C \r \t S B C I \t I D e l t a \t ;
0131460 l e a v e r e s u l t i n
0131500 A \r \r \t D E X \r \t B P L \t A n
0131520 o t h e r C u r r e n t C o n v
0131540 e r s i o n \r \t R T S \r \r \r D o
0131560 C u r r e n t C o n v e r s i o
0131600 n : \r \t S T A \t C o m p a r a t
0131620 o r s \r \t L D A I \t 376 001 \0 376 E 0
0131640 b \t ; a b o u t 1 0 0 u s
0131660 \r \t S T A \t S e t t l i n g D e
0131700 l a y \r \r M o r e C u r r e n t
0131720 S e t t l i n g T i m e : \r \t D
0131740 E C \t S e t t l i n g D e l a y
0131760 \r \t B N E \t M o r e C u r r e n
0132000 t S e t t l i n g T i m e \r \r \t
0132020 J S R \t A D C o n v e r t \r \t R
0132040 T S \r \f \r ; \t T h e r e a r e
0132060 t w o k i n d s o f t h
0132100 e r m o m e t e r s . O n e ,
0132120 t y p i f i e d b y \r ; \t t
0132140 h a t o n t h e B a s e
0132160 b o a r d , i s d i r e c t
0132200 l y s e n s i b l e b y a
0132220 n I / O \r ; \t p i n o f 376
0132240 001 \0 036 O t h e m i c r o c o m
0132260 p u t e r . T h e o t h e r
0132300 , t y p i f i e d b y \r ; \t
0132320 t h a t o n t h e M e m D
0132340 b o a r d , i s s e n s i
0132360 b l e o n l y t h r o u g h
0132400 t h e \r ; \t m u f f l e r s
0132420 y s t e m , w h i c h i s
0132440 n o t a l w a y s c o n t r
0132460 o l l a b l e b y \r ; \t t h e
0132500 b a s e b o a r d . I n
0132520 t h e l a t t e r c a s e ,
0132540 i f t h e b a s e b o a
0132560 r d i s \r ; \t n o t i n c
0132600 o n t r o l , t h e m e a s
0132620 u r e m e n t i s n o t r
0132640 e c o r 376 001 \0 277 033 d e d . \r \r T
0132660 e m p e r a t u r e C o n v e r
0132700 s i o n s : \r \t L D A \t V o l t
0132720 a g e O u t O f S p e c \r \t A N
0132740 D I \t 7 0 \t ; + 5 v , - 2 v
0132760 , - 5 v m u s t b e O K
0133000 \r \t B N E \t U n k n o w n T e m
0133020 p \r \r \t L D A I \t M i s c B y t
0133040 e , # H i g h A d d r B y t e \t
0133060 ; d o d i r e c t c o n v
0133100 e r s i o n s \r \t S T A \t C o m
0133120 p a r a t o r s P t r + 1 \r \t L
0133140 D A I \t M i s c B y t e , # L o
0133160 w A d d r B y t e \r \t S T A \t C
0133200 o m p a r a t o r s P t r \r \r \t
0133220 L D A I \t T B a s e T e m p S e
0133240 n s e \r \t J S R \t 376 001 \0 [ 300 A D
0133260 C o n v e r t M a s k I n A \r \t
0133300 S T A \t B a s e T e m p \r \r \t L
0133320 D A I \t T C B T e m p S e n s e
0133340 \r \t J S R \t A D C o n v e r t M
0133360 a s k I n A \r \t S T A \t C B T e
0133400 m p \r \r \t L D A I \t C P I B u s
0133420 , # H i g h A d d r B y t e \t ;
0133440 n o w d o i n d i r e c t
0133460 c o n v e r s i o n s \r \t S T
0133500 A \t C o m p a r a t o r s P t r
0133520 + 1 \r \t L D A I \t C P I B u s ,
0133540 # L o w A d d r B y t e \r \t S T
0133560 A \t C o m p a r a t o r s P t r
0133600 \r \r \t L D A I \t D M u x D a t a
0133620 \r \t S T A \t C o m p a r a t o r
0133640 M a s k \r \t L D A I \t M a x 376 001
0133660 \0 , ` T h e r m o m \r \t S T A \t
0133700 T h e r m o m I n d e x \r \r A n
0133720 o t h e r T h e r m o m : \r \t L
0133740 D X I \t E c l U p M u f f l e r
0133760 \r \t J S R \t R e a d M u f f l e
0134000 r \r \t B C S \t C a n t R e a d T
0134020 h e r m o m \t ; D o r a d o
0134040 r u n n i n g \r \t B E Q \t C a n
0134060 t R e a d T h e r m o m \t ; B
0134100 a c k p a n e l m u f f l e r
0134120 n o t c o n n e c t e d \r \r
0134140 \t L D A \t T h e r m o m I n d e
0134160 x \r \t A S L A \r \t T A Y \r \t L D
0134200 A Y \t T h e r m o m M u f A d d
0134220 r + 1 \r \t S T A \t M u f f l e r
0134240 A d d r e s s + 1 \r \t L D A Y \t
0134260 T h e 376 001 \0 ` 034 r m o m M u f A
0134300 d d r \r \t S T A \t M u f f l e r
0134320 A d d r e s s \r \r \t J S R \t S e
0134340 t M u f f l e r A d d r e s s \t
0134360 ; o b t a i n s C P b u s
0134400 c o n t r o l \r \t B C S \t E n
0134420 a C a n t R e a d T h e r m o m
0134440 \t ; f a i l e d b e c a u s
0134460 e D o r a d o w a s r u n
0134500 n i n g \r \r \t J S R \t A D C o n
0134520 v e r t \r \t J S R \t E n a b l e
0134540 M i d a s \t ; r e l e a s e s
0134560 C P b u s c o n t r o l \r
0134600 \r S t o r e T e m p : \r \t L D X
0134620 \t T h e r m o m I n d e x \r \t S
0134640 T A X \t T h e r m o m e t e r s
0134660 \r \r \t D E C \t T 376 001 \0 225 343 h e r
0134700 m o m I n d e x \r \t L D A \t T h
0134720 e r m o m I n d e x \r \t C M P I
0134740 \t C A T e m p - T h e r m o m e
0134760 t e r s \r \t B P L \t A n o t h e
0135000 r T h e r m o m \r \r \t R T S \r \r
0135020 \r E n a C a n t R e a d T h e r
0135040 m o m : \r \t J S R \t E n a b l e
0135060 M i d a s \t ; r e l e a s e s
0135100 C P b u s c o n t r o l \r
0135120 \r C a n t R e a d T h e r m o m
0135140 : \r \t L D A I \t 0 \r \t B E Q \t S
0135160 t o r e T e m p \r \r \r U n k n o
0135200 w n T e m p : \r \t L D X I \t M a
0135220 x T h e r m o m \r \t L D A I \t 0
0135240 \r \r Z e r o A n o t h e r T h e
0135260 r m o m : \r \t S T A X \t T 376 001 \0
0135300 I 323 h e r m o m e t e r s \r \t D
0135320 E X \r \t B P L \t Z e r o A n o t
0135340 h e r T h e r m o m \r \r \t R T S
0135360 \r \f \r ; \t A n a l o g - t o - D
0135400 i g i t a l c o n v e r s i o
0135420 n s u b r o u t i n e . A s
0135440 s u m e s a s t a b l e \r ;
0135460 \t a n a l o g s i g n a l a
0135500 t a c o m p a r a t o r i
0135520 n p u t , a n 8 - b i t D
0135540 A C a t \r ; \t l o c a t i o n
0135560 D A C a n d a c o m p a
0135600 r a t o r i n b i t C o m
0135620 p a r a t o r M a s k o f l
0135640 o c a t i o n \r ; \t @ C o m p a
0135660 r a t o r s P t r w h o s e
0135700 v a 376 001 \0 i 210 l u e i s 1
0135720 i f t h e D A C i s m o
0135740 r e \r ; \t p o s i t i v e t h
0135760 a n t h e a n a l o g i n
0136000 p u t , a n d 0 o t h e r
0136020 w i s e . \r ; \t R e s u l t r
0136040 e t u r n e d \r ; \t i n r e g
0136060 i s t e r A . N e x t B i t
0136100 T e s t c a n s e r v e a
0136120 s a n i n t e r l o c k ;
0136140 n o n - z e r o \r ; \t m e a n s
0136160 d o n ' t m e s s w i t h
0136200 D A C . \r \r A D C o n v e r t
0136220 M a s k I n A : \r \t S T A \t C o
0136240 m p a r a t o r M a s k \r \r A D
0136260 C o n v e r t : \r \t J S R \t I n
0136300 h i b i t M i 376 001 \0 S I d a s \t
0136320 ; M i d a s c o d e m e s
0136340 s e s w i t h D A C r e g
0136360 i s t e r \r \t L D A \t D A C \t ;
0136400 s a v e M i d a s ' D A C
0136420 v a l u e \r \t P H A \r \t L D A
0136440 I \t 0 \r \t T A Y \r \t S T A \t N e
0136460 x t B i t T e s t \r \t S E C \r \t
0136500 B C S \t T r y N e x t A D B i t
0136520 \t ; ( u n c o n d i t i o n a
0136540 l ) \r \r N e x t A D B i t : \r \t
0136560 E O R \t N e x t B i t T e s t \r
0136600 \r \t S T A \t D A C \r \t L D A I \t
0136620 2 \t ; 2 u s \r \t S T A \t S e
0136640 t t l i n g D e l a y \t ; 4
0136660 u s \r \r M o r e S e t t l i n g
0136700 T i m e : \r \t D E C \t S 376 001 \0 271
0136720 250 e t t l i n g D e l a y \t ;
0136740 6 u s \r \t B N E \t M o r e S e
0136760 t t l i n g T i m e \t ; 3 u
0137000 s ( u s u a l l y ) \r \r ; \t *
0137020 * * W a r n i n g : D o n
0137040 o t r e v e r s e t h e L
0137060 D A a n d t h e A N D .
0137100 B e c a u s e \r ; \t o f t h e
0137120 a s y n c h r o n i s m o f
0137140 @ C o m p a r a t o r s P t r
0137160 , o n c e \r ; \t i n a b l
0137200 u e m o o n E Q i s t r
0137220 u e w h i l e A # 0 . T h
0137240 i s m a y o r m a y n o
0137260 t \r ; \t c o i n c i d e w i t
0137300 h a n i n t e r r u p t ;
0137320 I 376 001 \0 365 } d o n ' t k n o
0137340 w . \r \t L D A @ Y \t C o m p a r
0137360 a t o r s P t r \t ; 4 u s
0137400 b e f o r e l o a d \r \t A N D
0137420 \t C o m p a r a t o r M a s k \r
0137440 \t B E Q \t R e c o v e r D A C \r
0137460 \r \t L D A \t N e x t B i t T e s
0137500 t \r \r R e c o v e r D A C : \r \t
0137520 E O R \t D A C \r \r T r y N e x t
0137540 A D B i t : \r \t R O R \t N e x t
0137560 B i t T e s t \r \t B N E \t N e x
0137600 t A D B i t \r \r \t T A Y \t ; r
0137620 e c o v e r M i d a s ' D A
0137640 C r e g i s t e r \r \t P L A \r
0137660 \t S T A \t D A C \r \t T Y A \r \t J
0137700 M P \t E n a b l e M i d a s \r \r
0137720 \t . E N D \r 377 \0 \0 d o r a d o c
0137740 p i n t . m a s m \0 373 225 # } U \0
0137760 \0 376 001 \0 T a ; * * * * *
0140000 * * * * * * * *
*
0140060 * * * * \r ; \r ; \t D O
0140100 R A D O C o n
0140120 t r o l P r o
0140140 g r a m \r ; \r ; \t \t C
0140160 P B u s I n t
0140200 e r f a c e C
0140220 o d e \r ; \r ; * * * *
0140240 * * * * * * * *
*
0140320 * * * * * \r \r ; \t f i
0140340 l e d o n D o r a d o C P I
0140360 n t . m a s 376 001 \0 b 202 m \r ; \t E
0140400 . M c C r e i g h t \r ; \t l a
0140420 s t m o d i f i e d A p r i
0140440 l 1 4 , 1 9 8 1 1 : 3 1
0140460 P M \r \r \t . E X P O R T \t W a
0140500 i t F o r C P C o n t r o l , T
0140520 r y G e t t i n g M u f M a n C
0140540 o n t r o l \r \t . E X P O R T \t
0140560 R e a d B N i b b l e , S e t C
0140600 P R e g , S e t C P R e g ~ \r \t
0140620 . E X P O R T \t S e t C P R e g
0140640 1 , S e t C P R e g 0 , D o C l
0140660 o c k , D o C o n t r o l \r \t .
0140700 E X P O R T \t D o D o r a d o M
0140720 i c r o I n s t , R u n D o r a
0140740 d o I n s t r u c t i o n S t r
0140760 e a m \r \t . E X P O R 376 001 \0 \f $
0141000 T \t S e t M a n i f o l d , D a
0141020 t u m T o M a n i f o l d \r \t .
0141040 E X P O R T \t S e t M u f f l e
0141060 r A d d r e s s , M u f f l e r
0141100 A d d r e s s , R e a d M u f f
0141120 l e r \r \t . E X P O R T \t R e a
0141140 d M u f f l e r F i e l d \r \t .
0141160 E X P O R T \t L e f t 7 , L e f
0141200 t 6 , L e f t 5 , L e f t 4 , L
0141220 e f t 3 , L e f t 2 , L e f t 1
0141240 \r \r \t . E X P O R T \t M i c r o
0141260 , C D a t u m \r \t . E X P O R T
0141300 \t T o C P R e g , T o C P R e g
0141320 H , T o C P R e g L \r \t . E X P
0141340 O R T \t S t o p D o r a d o \r \r
0141360 \t . I M P O R T \t I n h i b i t
0141400 376 001 \0 r r M i d a s , E n a b l
0141420 e M i d a s , P a c i f y W a t
0141440 c h d o g \r \t . I M P O R T \t S
0141460 e t P r o b l e m , C l e a r P
0141500 r o b l e m , C a n t G e t C P
0141520