home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / CPM / DISASM / REVAS25.LBR / Z80.LZB / Z80.LIB
Text File  |  2000-06-30  |  10KB  |  601 lines
  1. ;
  2. ;    Z-80 MACRO LIBRARY
  3. ;
  4. ;    THE FOLLOWING MACROS ENABLE ASSEMBLING Z-80 INSTRUCTIONS
  5. ;    WITH THE DIGITAL RESEARCH MACRO ASSEMBLER.
  6. ;
  7. ;  INVOKE WITH "MACLIB Z80"
  8. ;
  9. ;
  10. ;
  11. ;            MACRO FORMATS
  12. ;            ----- -------
  13. ;
  14. ;
  15. ;    MACRO            ZILOG            TDL
  16. ;    -----            -----            ---
  17. ;
  18. ;    LDX    R,D        LD    R,(IX+D)    MOV    R,D(IX)
  19. ;    LDY    R,D        LD    R,(IY+D)    MOV    R,D(IY)
  20. ;    STX    R,D        LD    (IX+D),R    MOV    D(IX),R
  21. ;    STY    R,D        LD    (IY+D),R    MOV    D(IY),R
  22. ;    MVIX    NN,D        LD    (IX+D),NN    MVI    D(IX)
  23. ;    MVIY    NN,D        LD    (IY+D),NN    MVI    D(IY)
  24. ;    LDAI            LD    A,I        LDAI
  25. ;    LDAR            LD    A,R        LDAR
  26. ;    STAI            LD    I,A        STAI
  27. ;    STAR            LD    R,A        STAR
  28. ;    LXIX    NNNN        LD    IX,NNNN        LXI    IX,NNNN
  29. ;    LXIY    NNNN        LD    IY,NNNN        LXI    IY,NNNN
  30. ;    LBCD    NNNN        LD    BC,(NNNN)    LBCD    NNNN
  31. ;    LDED    NNNN        LD    DE,(NNNN)    LDED    NNNN
  32. ;    LSPD    NNNN        LD    SP,(NNNN)    LSPD    NNNN
  33. ;    LIXD    NNNN        LD    IX,(NNNN)    LIXD    NNNN
  34. ;    LIYD    NNNN        LD    IY,(NNNN)    LIYD    NNNN
  35. ;    SBCD    NNNN        LD    (NNNN),BC    SBCD    NNNN
  36. ;    SDED    NNNN        LD    (NNNN),DE    SDED    NNNN
  37. ;    SSPD    NNNN        LD    (NNNN),SP    SSPD    NNNN
  38. ;    SIXD    NNNN        LD    (NNNN),IX    SIXD    NNNN
  39. ;    SIYD    NNNN        LD    (NNNN),IY    SIYD    NNNN
  40. ;    SPIX            LD    SP,IX        SPIX
  41. ;    SPIY            LD    SP,IY        SPIY
  42. ;    PUSHIX            PUSH    IX        PUSH    IX
  43. ;    PUSHIY            PUSH    IY        PUSH    IY
  44. ;    POPIX            POP    IX        POP    IX
  45. ;    POPIY            POP    IY        POP    IY
  46. ;    EXAF            EX    AF,AF'        EXAF
  47. ;    EXX            EXX            EXX
  48. ;    XTIX            EX    (SP),IX        XTIX
  49. ;    XTIY            EX    (SP),IY        XTIY
  50. ;    LDI            LDI            LDI
  51. ;    LDIR            LDIR            LDIR
  52. ;    LDD            LDD            LDD
  53. ;    LDDR            LDDR            LDDR
  54. ;    CCI            CPI            CCI
  55. ;    CCIR            CPIR            CCIR
  56. ;    CCD            CPD            CCD
  57. ;    CCDR            CPDR            CCDR
  58. ;    ADDX    D        ADD    (IX+D)        ADD    D(IX)
  59. ;    ADDY    D        ADD    (IY+D)        ADD    D(IY)
  60. ;    ADCX    D        ADC    (IX+D)        ADC    D(IX)
  61. ;    ADCY    D        ADC    (IY+D)        ADC    D(IY)
  62. ;    SUBX    D        SUB    (IX+D)        SUB    D(IX)
  63. ;    SUBY    D        SUB    (IY+D)        SUB    D(IY)
  64. ;    SBCX    D        SBC    (IX+D)        SBB    D(IX)
  65. ;    SBCY    D        SBC    (IY+D)        SBB    D(IY)
  66. ;    ANDX    D        AND    (IX+D)        ANA    D(IX)
  67. ;    ANDY    D        AND    (IY+D)        ANA    D(IY)
  68. ;    XORX    D        XOR    (IX+D)        XRA    D(IX)
  69. ;    XORY    D        XOR    (IY+D)        XRA    D(IY)
  70. ;    ORX    D        OR    (IX+D)        ORA    D(IX)
  71. ;    ORY    D        OR    (IY+D)        ORA    D(IY)
  72. ;    CMPX    D        CP    (IX+D)        CMP    D(IX)
  73. ;    CMPY    D        CP    (IY+D)        CMP    D(IY)
  74. ;    INRX    D        INC    (IX+D)        INR    D(IX)
  75. ;    INRY    D        INC    (IY+D)        INR    D(IY)
  76. ;    DCRX    D        INC    (IX+D)        INR    D(IX)
  77. ;    DCRY    D        DEC    (IY+D)        DCR    D(IY)
  78. ;    NEG            NEG            NEG
  79. ;    IM0            IM0            IM0
  80. ;    IM1            IM1            IM1
  81. ;    IM2            IM2            IM2
  82. ;    DADC    RR        ADC    HL,RR        DADC    RR
  83. ;    DSBC    RR        SBC    HL,RR        DSBC    RR
  84. ;    DADX    RR        ADD    IX,RR        DADX    RR
  85. ;    DADY    RR        ADD    IY,RR        DADY    RR
  86. ;    INXIX            INC    IX        INX    IX
  87. ;    INXIY            INC    IY        INX    IY
  88. ;    DCXIX            DEC    IX        DCX    IX
  89. ;    DCXIY            DEC    IY        DCX    IY
  90. ;    BIT    B,R        BIT    B,R        BIT    B,R
  91. ;    SETB    B,R        SET    B,R        SET    B,R
  92. ;    RES    B,R        RES    B,R        RES    B,R
  93. ;    BITX    B,D        BIT    B,(IX+D)    BIT    B,D(IX)
  94. ;    BITY    B,D        BIT    B,(IY+D)    BIT    B,D(IY)
  95. ;    SETX    B,D        SET    B,(IX+D)    SET    B,D(IX)
  96. ;    SETY    B,D        SET    B,(IY+D)    SET    B,D(IY)
  97. ;    RESX    B,D        RES    B,(IX+D)    RES    B,D(IX)
  98. ;    RESY    B,D        RES    B,(IY+D)    RES    B,D(IY)
  99. ;    JR    ADDR        JR    ADDR-$        JMPR    ADDR
  100. ;    JRC    ADDR        JR    C,ADDR-$    JRC    ADDR
  101. ;    JRNC    ADDR        JR    NC,ADDR-$    JRNC    ADDR
  102. ;    JRZ    ADDR        JR    Z,ADDR-$    JRC    ADDR
  103. ;    JRNZ    ADDR        JR    NZ,ADDR-$    JRNZ    ADDR
  104. ;    DJNZ    ADDR        DJNZ    ADDR-$        DJNZ    ADDR
  105. ;    PCIX            JMP    (IX)        PCIX
  106. ;    PCIY            JMP    (IY)        PCIY
  107. ;    RETI            RETI            RETI
  108. ;    RETN            RETN            RETN
  109. ;    INP    R        IN    R,(C)        INP    R
  110. ;    OUTP    R        OUT    (C),R        OUTP    R
  111. ;    INI            INI            INI
  112. ;    INIR            INIR            INIR
  113. ;    OUTI            OTI            OUTI
  114. ;    OUTIR            OTIR            OUTIR
  115. ;    IND            IND            IND
  116. ;    INDR            INDR            INDR
  117. ;    OUTD            OTD            OUTD
  118. ;    OUTDR            OTDR            OUTDR
  119. ;    RLCR    R        RLC    R        RLCR    R
  120. ;    RLCX    D        RLC    (IX+D)        RLCR    D(IX)
  121. ;    RLCY    D        RLC    (IY+D)        RLCR    D(IY)
  122. ;    RALR    R        RL    R        RALR    R
  123. ;    RALX    D        RL    (IX+D)        RALR    D(IX)
  124. ;    RALY    D        RL    (IY+D)        RALR    D(IY)
  125. ;    RRCR    R        RRC    R        RRCR    R
  126. ;    RRCX    D        RRC    (IX+D)        RRCR    D(IX)
  127. ;    RRCY    D        RRC    (IY+D)        RRCR    D(IY)
  128. ;    RARR    R        RR    R        RARR    R
  129. ;    RARX    D        RR    (IX+D)        RARR    D(IX)
  130. ;    RARY    D        RR    (IY+D)        RARR    D(IY)
  131. ;    SLAR    R        SLA    R        SLAR    R
  132. ;    SLAX    D        SLA    (IX+D)        SLAR    D(IX)
  133. ;    SLAY    D        SLA    (IY+D)        SLAR    D(IY)
  134. ;    SRAR    R        SRA    R        SRAR    R
  135. ;    SRAX    D        SRA    (IX+D)        SRAR    D(IX)
  136. ;    SRAY    D        SRA    (IY+D)        SRAR    D(IY)
  137. ;    SRLR    R        SRL    R        SRLR    R
  138. ;    SRLX    D        SRL    (IX+D)        SRLR    D(IX)
  139. ;    SRLY    D        SRL    (IY+D)        SRLR    D(IY)
  140. ;    RLD            RLD            RLD
  141. ;    RRD            RRD            RRD
  142. ;
  143. ;
  144. ;
  145. ;    @CHK MACRO USED FOR CHECKING 8 BIT DISPLACMENTS
  146. ;
  147. @CHK    MACRO    ?DD    ; USED FOR CHECKING RANGE OF 8-BIT DISP.S
  148.     IF (?DD GT 7FH) AND (?DD LT 0FF80H)
  149.  'DISPLACEMENT RANGE ERROR - Z80 LIB'
  150.     ENDIF
  151.     ENDM
  152. LDX    MACRO    ?R,?D    
  153.     @CHK    ?D
  154.     DB    0DDH,?R*8+46H,?D
  155.     ENDM
  156. LDY    MACRO    ?R,?D    
  157.     @CHK    ?D
  158.     DB    0FDH,?R*8+46H,?D
  159.     ENDM
  160. STX    MACRO    ?R,?D    
  161.     @CHK    ?D
  162.     DB    0DDH,70H+?R,?D
  163.     ENDM
  164. STY    MACRO    ?R,?D    
  165.     @CHK    ?D
  166.     DB    0FDH,70H+?R,?D
  167.     ENDM
  168. MVIX    MACRO    ?N,?D    
  169.     @CHK    ?D
  170.     DB    0DDH,36H,?D,?N
  171.     ENDM
  172. MVIY    MACRO    ?N,?D    
  173.     @CHK    ?D
  174.     DB    0FDH,36H,?D,?N
  175.     ENDM
  176. LDAI    MACRO        
  177.     DB    0EDH,57H
  178.     ENDM
  179. LDAR    MACRO        
  180.     DB    0EDH,5FH
  181.     ENDM
  182. STAI    MACRO        
  183.     DB    0EDH,47H
  184.     ENDM
  185. STAR    MACRO        
  186.     DB    0EDH,4FH
  187.     ENDM
  188.  
  189. LXIX    MACRO    ?NNNN    
  190.     DB    0DDH,21H
  191.     DW    ?NNNN
  192.     ENDM
  193. LXIY    MACRO    ?NNNN    
  194.     DB    0FDH,21H
  195.     DW    ?NNNN
  196.     ENDM
  197. LDED    MACRO    ?NNNN    
  198.     DB    0EDH,5BH
  199.     DW    ?NNNN
  200.     ENDM
  201. LBCD    MACRO    ?NNNN    
  202.     DB    0EDH,4BH
  203.     DW    ?NNNN
  204.     ENDM
  205. LSPD    MACRO    ?NNNN    
  206.     DB    0EDH,07BH
  207.     DW    ?NNNN
  208.     ENDM
  209. LIXD    MACRO    ?NNNN    
  210.     DB    0DDH,2AH
  211.     DW    ?NNNN
  212.     ENDM
  213. LIYD    MACRO    ?NNNN    
  214.     DB    0FDH,2AH
  215.     DW    ?NNNN
  216.     ENDM
  217. SBCD    MACRO    ?NNNN    
  218.     DB    0EDH,43H
  219.     DW    ?NNNN
  220.     ENDM
  221. SDED    MACRO    ?NNNN    
  222.     DB    0EDH,53H
  223.     DW    ?NNNN
  224.     ENDM
  225. SSPD    MACRO    ?NNNN    
  226.     DB    0EDH,73H
  227.     DW    ?NNNN
  228.     ENDM
  229. SIXD    MACRO    ?NNNN    
  230.     DB    0DDH,22H
  231.     DW    ?NNNN
  232.     ENDM
  233. SIYD    MACRO    ?NNNN    
  234.     DB    0FDH,22H
  235.     DW    ?NNNN
  236.     ENDM
  237. SPIX    MACRO        
  238.     DB    0DDH,0F9H
  239.     ENDM
  240. SPIY    MACRO        
  241.     DB    0FDH,0F9H
  242.     ENDM
  243. PUSHIX    MACRO        
  244.     DB    0DDH,0E5H
  245.     ENDM
  246. PUSHIY    MACRO        
  247.     DB    0FDH,0E5H
  248.     ENDM
  249. POPIX    MACRO        
  250.     DB    0DDH,0E1H
  251.     ENDM
  252. POPIY    MACRO        
  253.     DB    0FDH,0E1H
  254.     ENDM
  255. EXAF    MACRO        
  256.     DB    08H
  257.     ENDM
  258. EXX    MACRO        
  259.     DB    0D9H
  260.     ENDM
  261. XTIX    MACRO        
  262.     DB    0DDH,0E3H
  263.     ENDM
  264. XTIY    MACRO        
  265.     DB    0FDH,0E3H
  266.     ENDM
  267.  
  268. LDI    MACRO        
  269.     DB    0EDH,0A0H
  270.     ENDM
  271. LDIR    MACRO        
  272.     DB    0EDH,0B0H
  273.     ENDM
  274. LDD    MACRO        
  275.     DB    0EDH,0A8H
  276.     ENDM
  277. LDDR    MACRO        
  278.     DB    0EDH,0B8H
  279.     ENDM
  280. CCI    MACRO        
  281.     DB    0EDH,0A1H
  282.     ENDM
  283. CCIR    MACRO        
  284.     DB    0EDH,0B1H
  285.     ENDM
  286. CCD    MACRO        
  287.     DB    0EDH,0A9H
  288.     ENDM
  289. CCDR    MACRO        
  290.     DB    0EDH,0B9H
  291.     ENDM
  292.  
  293. ADDX    MACRO    ?D    
  294.     @CHK    ?D
  295.     DB    0DDH,86H,?D
  296.     ENDM
  297. ADDY    MACRO    ?D    
  298.     @CHK    ?D
  299.     DB    0FDH,86H,?D
  300.     ENDM
  301. ADCX    MACRO    ?D    
  302.     @CHK    ?D
  303.     DB    0DDH,8EH,?D
  304.     ENDM
  305. ADCY    MACRO    ?D    
  306.     @CHK    ?D
  307.     DB    0FDH,8EH,?D
  308.     ENDM
  309. SUBX    MACRO    ?D    
  310.     @CHK    ?D
  311.     DB    0DDH,96H,?D
  312.     ENDM
  313. SUBY    MACRO    ?D    
  314.     @CHK    ?D
  315.     DB    0FDH,96H,?D
  316.     ENDM
  317. SBCX    MACRO    ?D    
  318.     @CHK    ?D
  319.     DB    0DDH,9EH,?D
  320.     ENDM
  321. SBCY    MACRO    ?D    
  322.     @CHK    ?D
  323.     DB    0FDH,9EH,?D
  324.     ENDM
  325. ANDX    MACRO    ?D    
  326.     @CHK    ?D
  327.     DB    0DDH,0A6H,?D
  328.     ENDM
  329. ANDY    MACRO    ?D    
  330.     @CHK    ?D
  331.     DB    0FDH,0A6H,?D
  332.     ENDM
  333. XORX    MACRO    ?D    
  334.     @CHK    ?D
  335.     DB    0DDH,0AEH,?D
  336.     ENDM
  337. XORY    MACRO    ?D    
  338.     @CHK    ?D
  339.     DB    0FDH,0AEH,?D
  340.     ENDM
  341. ORX    MACRO    ?D    
  342.     @CHK    ?D
  343.     DB    0DDH,0B6H,?D
  344.     ENDM
  345. ORY    MACRO    ?D    
  346.     @CHK    ?D
  347.     DB    0FDH,0B6H,?D
  348.     ENDM
  349. CMPX    MACRO    ?D    
  350.     @CHK    ?D
  351.     DB    0DDH,0BEH,?D
  352.     ENDM
  353. CMPY    MACRO    ?D    
  354.     @CHK    ?D
  355.     DB    0FDH,0BEH,?D
  356.     ENDM
  357. INRX    MACRO    ?D    
  358.     @CHK    ?D
  359.     DB    0DDH,34H,?D
  360.     ENDM
  361. INRY    MACRO    ?D    
  362.     @CHK    ?D
  363.     DB    0FDH,34H,?D
  364.     ENDM
  365. DCRX    MACRO    ?D    
  366.     @CHK    ?D
  367.     DB    0DDH,035H,?D
  368.     ENDM
  369. DCRY    MACRO    ?D    
  370.     @CHK    ?D
  371.     DB    0FDH,35H,?D
  372.     ENDM
  373.  
  374. NEG    MACRO        
  375.     DB    0EDH,44H
  376.     ENDM
  377. IM0    MACRO        
  378.     DB    0EDH,46H
  379.     ENDM
  380. IM1    MACRO        
  381.     DB    0EDH,56H
  382.     ENDM
  383. IM2    MACRO        
  384.     DB    0EDH,5EH
  385.     ENDM
  386.  
  387.  
  388. BC    EQU    0
  389. DE    EQU    2
  390. HL    EQU    4
  391. IX    EQU    4    
  392. IY    EQU    4    
  393. DADC    MACRO    ?R    
  394.     DB    0EDH,?R*8+4AH
  395.     ENDM
  396. DSBC    MACRO    ?R    
  397.     DB    0EDH,?R*8+42H
  398.     ENDM
  399. DADX    MACRO    ?R    
  400.     DB    0DDH,?R*8+09H
  401.     ENDM
  402. DADY    MACRO    ?R    
  403.     DB    0FDH,?R*8+09H
  404.     ENDM
  405. INXIX    MACRO        
  406.     DB    0DDH,23H
  407.     ENDM
  408. INXIY    MACRO        
  409.     DB    0FDH,23H
  410.     ENDM
  411. DCXIX    MACRO        
  412.     DB    0DDH,2BH
  413.     ENDM
  414. DCXIY    MACRO        
  415.     DB    0FDH,2BH
  416.     ENDM
  417.  
  418. BIT    MACRO    ?N,?R    
  419.     DB    0CBH,?N*8+?R+40H
  420.     ENDM
  421. SETB    MACRO    ?N,?R
  422.     DB    0CBH,?N*8+?R+0C0H
  423.     ENDM
  424. RES    MACRO    ?N,?R
  425.     DB    0CBH,?N*8+?R+80H
  426.     ENDM
  427.  
  428. BITX    MACRO    ?N,?D    
  429.     @CHK    ?D
  430.     DB    0DDH,0CBH,?D,?N*8+46H
  431.     ENDM
  432. BITY    MACRO    ?N,?D    
  433.     @CHK    ?D
  434.     DB    0FDH,0CBH,?D,?N*8+46H
  435.     ENDM
  436. SETX    MACRO    ?N,?D    
  437.     @CHK    ?D
  438.     DB    0DDH,0CBH,?D,?N*8+0C6H
  439.     ENDM
  440. SETY    MACRO    ?N,?D    
  441.     @CHK    ?D
  442.     DB    0FDH,0CBH,?D,?N*8+0C6H
  443.     ENDM
  444. RESX    MACRO    ?N,?D    
  445.     @CHK    ?D
  446.     DB    0DDH,0CBH,?D,?N*8+86H
  447.     ENDM
  448. RESY    MACRO    ?N,?D    
  449.     @CHK    ?D
  450.     DB    0FDH,0CBH,?D,?N*8+86H
  451.     ENDM
  452.  
  453. JR    MACRO    ?N
  454.     DB    18H,?N-$-1
  455.     ENDM
  456. JRC    MACRO    ?N
  457.     DB    38H,?N-$-1
  458.     ENDM
  459. JRNC    MACRO    ?N
  460.     DB    30H,?N-$-1
  461.     ENDM
  462. JRZ    MACRO    ?N
  463.     DB    28H,?N-$-1
  464.     ENDM
  465. JRNZ    MACRO    ?N
  466.     DB    20H,?N-$-1
  467.     ENDM
  468. DJNZ    MACRO    ?N
  469.     DB    10H,?N-$-1
  470.     ENDM
  471.  
  472. PCIX    MACRO        
  473.     DB    0DDH,0E9H
  474.     ENDM
  475. PCIY    MACRO        
  476.     DB    0FDH,0E9H
  477.     ENDM
  478.  
  479. RETI    MACRO        
  480.     DB    0EDH,4DH
  481.     ENDM
  482. RETN    MACRO        
  483.     DB    0EDH,45H
  484.     ENDM
  485.  
  486. INP    MACRO    ?R    
  487.     DB    0EDH,?R*8+40H
  488.     ENDM
  489. OUTP    MACRO    ?R    
  490.     DB    0EDH,?R*8+41H
  491.     ENDM
  492. INI    MACRO        
  493.     DB    0EDH,0A2H
  494.     ENDM
  495. INIR    MACRO        
  496.     DB    0EDH,0B2H
  497.     ENDM
  498. IND    MACRO        
  499.     DB    0EDH,0AAH
  500.     ENDM
  501. INDR    MACRO        
  502.     DB    0EDH,0BAH
  503.     ENDM
  504. OUTI    MACRO        
  505.     DB    0EDH,0A3H
  506.     ENDM
  507. OUTIR    MACRO        
  508.     DB    0EDH,0B3H
  509.     ENDM
  510. OUTD    MACRO        
  511.     DB    0EDH,0ABH
  512.     ENDM
  513. OUTDR    MACRO        
  514.     DB    0EDH,0BBH
  515.     ENDM
  516.  
  517.  
  518. RLCR    MACRO    ?R    
  519.     DB    0CBH, 00H + ?R
  520.     ENDM
  521. RLCX    MACRO    ?D    
  522.     @CHK    ?D
  523.     DB    0DDH, 0CBH, ?D, 06H
  524.     ENDM
  525. RLCY    MACRO    ?D    
  526.     @CHK    ?D
  527.     DB    0FDH, 0CBH, ?D, 06H
  528.     ENDM
  529. RALR    MACRO    ?R    
  530.     DB    0CBH, 10H+?R
  531.     ENDM
  532. RALX    MACRO    ?D    
  533.     @CHK    ?D
  534.     DB    0DDH, 0CBH, ?D, 16H
  535.     ENDM
  536. RALY    MACRO    ?D    
  537.     @CHK    ?D
  538.     DB    0FDH, 0CBH, ?D, 16H
  539.     ENDM
  540. RRCR    MACRO    ?R    
  541.     DB    0CBH, 08H + ?R
  542.     ENDM
  543. RRCX    MACRO    ?D    
  544.     @CHK    ?D
  545.     DB    0DDH, 0CBH, ?D, 0EH
  546.     ENDM
  547. RRCY    MACRO    ?D    
  548.     @CHK    ?D
  549.     DB    0FDH, 0CBH, ?D, 0EH
  550.     ENDM
  551. RARR    MACRO    ?R    
  552.     DB    0CBH, 18H + ?R
  553.     ENDM
  554. RARX    MACRO    ?D    
  555.     @CHK    ?D
  556.     DB    0DDH, 0CBH, ?D, 1EH
  557.     ENDM
  558. RARY    MACRO    ?D    
  559.     @CHK    ?D
  560.     DB    0FDH, 0CBH, ?D, 1EH
  561.     ENDM
  562. SLAR    MACRO    ?R    
  563.     DB    0CBH, 20H + ?R
  564.     ENDM
  565. SLAX    MACRO    ?D    
  566.     @CHK    ?D
  567.     DB    0DDH, 0CBH, ?D, 26H
  568.     ENDM
  569. SLAY    MACRO    ?D    
  570.     @CHK    ?D
  571.     DB    0FDH, 0CBH, ?D, 26H
  572.     ENDM
  573. SRAR    MACRO    ?R    
  574.     DB    0CBH, 28H+?R
  575.     ENDM
  576. SRAX    MACRO    ?D    
  577.     @CHK    ?D
  578.     DB    0DDH, 0CBH, ?D, 2EH
  579.     ENDM
  580. SRAY    MACRO    ?D    
  581.     @CHK    ?D
  582.     DB    0FDH, 0CBH, ?D, 2EH
  583.     ENDM
  584. SRLR    MACRO    ?R    
  585.     DB    0CBH, 38H + ?R
  586.     ENDM
  587. SRLX    MACRO    ?D    
  588.     @CHK    ?D
  589.     DB    0DDH, 0CBH, ?D, 3EH
  590.     ENDM
  591. SRLY    MACRO    ?D    
  592.     @CHK    ?D
  593.     DB    0FDH, 0CBH, ?D, 3EH
  594.     ENDM
  595. RLD    MACRO        
  596.     DB    0EDH, 6FH
  597.     ENDM
  598. RRD    MACRO        
  599.     DB    0EDH, 67H
  600.     ENDM
  601.