* @CRYPT   MAKPO -                                                      RYPT0001
* * * ðOCìEäHññ KOPPEKTéPOBKA:  äATA 22.01.90   BPEMñ 20.05   *  æOKõC  RYPT0002
*  ìEHéHçPAä éBã çõT  OTä. 07 ìATùûKO                   T: 310-98-12    RYPT0003
         MACRO                                                          RYPT0004
&NAME    @CRYPT &DCRYPTL                                                RYPT0005
&NAME    EX    0,&DCRYPTL+10                                            RYPT0006
         EX    0,&DCRYPTL+4                                             RYPT0007
         MVI   &DCRYPTL+4,X'58'                                         RYPT0008
         MEND                                                           RYPT0009