[an error occurred while processing this directive]

<pre>
<!-- -->
<!-- -->
*--------------------------------------*
* õîé÷åòóáìøîáñ ðïäðòïçòáííá ïâòáâïôëé *
*               ïûéâïë                 *             
*--------------------------------------*
       
<!-- -->
;-------------------------------------------------------!
; DCERR                                                 !
; -----                                                 !
; ÷èïä: A,Y - ÁÄÒÅÓ ÓÏÏÂÝÅÎÉÑ Ï ÏÛÉÂËÅ (× DCI)         !
;       X   - ÖÅÌÁÅÍÙÊ ËÏÄ ÄÌÑ &curren;DE                      !
;                                                       !
; DCEXIT                                                !
; -------                                               !
; ÷èïä: A=3, C set DCERR                                !
;                                                       !
;-------------------------------------------------------! 
DCERR    STX RNDL   
         BIT ERRFLAG
         BMI DCERR2
DCERR1   PHA 
         TYA
         PHA
         LDA #&lt;ERR0
         LDY #&gt;ERR0
         JSR PRERR
         PLA
         TAY
         PLA
         JSR PRERR
         JSR CLREOP
         JSR CROUT
DCERR2   JSR DIALOG
DCERR3   LDX RNDL
         LDA#3
         RTS
PRERR    STA &curren;CA 
         STY &curren;C9 
         JSR CLREOP
         LDY#0
PRERR1   LDA (&curren;C9),Y
         PHA
         ORA#&curren;80
         JSR COUT
         INY
         PLA
         BPL PRERR1 
         RTS
;---------------------------------------------------------
DCEXIT   BCC DCEXIT1 
         JMP (PERR)
DCEXIT1  JMP (PWARM)
;---------------------------------------------------------
        
ERR0     DFB &curren;0D,&curren;07,&curren;8D
</pre>
<p>.ÓÔ òÁÚÄÅÌ II:1.1</p>

[an error occurred while processing this directive]