Subversion Repositories pentevo

Rev

Blame | Last modification | View Log | Download | RSS feed | ?url?

  1.         cpu     z380
  2.         include regz380
  3.  
  4.         extmode on
  5.  
  6.         page    0
  7.         relaxed on
  8.  
  9.         ddir    w
  10.         ddir    ib,w
  11.         ddir    iw,w
  12.         ddir    ib
  13.         ddir    lw
  14.         ddir    ib,lw
  15.         ddir    iw,lw
  16.         ddir    iw
  17.  
  18.         cpl
  19.         cpl     a
  20.         neg
  21.         neg     a
  22.  
  23.         ei
  24.         ei      $40
  25.         di
  26.         di      $bf
  27.  
  28.         btest
  29.         exall
  30.         exxx
  31.         exxy
  32.         indw
  33.         indrw
  34.         iniw
  35.         inirw
  36.         lddw
  37.         lddrw
  38.         ldiw
  39.         ldirw
  40.         mtest
  41.         otdrw
  42.         otirw
  43.         outdw
  44.         outiw
  45.         retb
  46.  
  47.         cplw
  48.         cplw    hl
  49.         negw
  50.         negw    hl
  51.  
  52.         ret
  53.         ret     nz
  54.         ret     z
  55.         ret     nc
  56.         ret     c
  57.         ret     po
  58.         ret     nv
  59.         ret     pe
  60.         ret     v
  61.         ret     p
  62.         ret     ns
  63.         ret     m
  64.         ret     s
  65.  
  66.         jp      1234h
  67.         jp      123456h
  68.         ddir    ib
  69.         jp      123456h
  70.         ddir    iw
  71.         jp      123456h
  72.         ddir    w
  73.         jp      123456h
  74.         ddir    lw
  75.         jp      123456h
  76.         ddir    w,iw
  77.         jp      123456h
  78.         jp      12345678h
  79.         ddir    lw
  80.         jp      12345678h
  81.         jp      z,4321h
  82.         jp      nc,654321h
  83.         jp      pe,87654321h
  84.         jp      (hl)
  85.         jp      (ix)
  86.         jp      (iy)
  87.  
  88.         call    $1234
  89.         call    $123456
  90.         call    $12345678
  91.         call    nz,$4321
  92.         call    m,$654321
  93.         call    po,$87654321
  94.  
  95.         jr      $+20
  96.         jr      c,$-20
  97.         jr      $-200
  98.         jr      z,$+200
  99.         jr      $+$200000
  100.         jr      nc,$-$200000
  101.  
  102.         calr    $+20
  103.         calr    c,$-20
  104.         calr    $-200
  105.         calr    z,$+200
  106.         calr    $+$200000
  107.         calr    nc,$-$200000
  108.  
  109.         djnz    $+20
  110.         djnz    $-200
  111.         djnz    $+$200000
  112.  
  113.         exts    a
  114.         exts
  115.         extsw   hl
  116.         extsw
  117.  
  118.         and     a
  119.         and     a,b
  120.         and     a,c
  121.         and     a,d
  122.         and     a,e
  123.         and     a,h
  124.         and     a,l
  125.         and     a,ixl
  126.         and     a,ixu
  127.         and     a,iyl
  128.         and     a,iyu
  129.         and     a,$55
  130.         and     a,(hl)
  131.         and     a,(ix+20)
  132.         and     a,(iy-300)
  133.         and     a,(ix+100000)
  134.  
  135.         andw    ix
  136.         andw    hl,ix
  137.         andw    hl,iy
  138.         andw    hl,bc
  139.         andw    hl,de
  140.         andw    hl,hl
  141.         andw    hl,(ix+5)
  142.         andw    hl,(iy-200)
  143.         andw    hl,55aah
  144.  
  145.         cp      a
  146.         cp      a,b
  147.         cp      a,c
  148.         cp      a,d
  149.         cp      a,e
  150.         cp      a,h
  151.         cp      a,l
  152.         cp      a,ixl
  153.         cp      a,ixu
  154.         cp      a,iyl
  155.         cp      a,iyu
  156.         cp      a,$34
  157.         cp      a,(hl)
  158.         cp      a,(ix-20)
  159.         cp      a,(iy+$300)
  160.         cp      a,(ix+100000h)
  161.  
  162.         cpw     ix
  163.         cpw     hl,ix
  164.         cpw     hl,iy
  165.         cpw     hl,bc
  166.         cpw     hl,de
  167.         cpw     hl,hl
  168.         cpw     hl,(ix+17)
  169.         cpw     hl,(iy-200)
  170.         cpw     hl,$aa55
  171.  
  172.         or      a
  173.         or      a,b
  174.         or      a,c
  175.         or      a,d
  176.         or      a,e
  177.         or      a,h
  178.         or      a,l
  179.         or      a,ixl
  180.         or      a,ixu
  181.         or      a,iyl
  182.         or      a,iyu
  183.         or      a,$34
  184.         or      a,(hl)
  185.         or      a,(ix-20)
  186.         or      a,(iy+$300)
  187.         or      a,(ix+100000h)
  188.  
  189.         orw     ix
  190.         orw     hl,ix
  191.         orw     hl,iy
  192.         orw     hl,bc
  193.         orw     hl,de
  194.         orw     hl,hl
  195.         orw     hl,(ix+17)
  196.         orw     hl,(iy-200)
  197.         orw     hl,$aa55
  198.  
  199.         xor     a
  200.         xor     a,b
  201.         xor     a,c
  202.         xor     a,d
  203.         xor     a,e
  204.         xor     a,h
  205.         xor     a,l
  206.         xor     a,ixl
  207.         xor     a,ixu
  208.         xor     a,iyl
  209.         xor     a,iyu
  210.         xor     a,$34
  211.         xor     a,(hl)
  212.         xor     a,(ix-20)
  213.         xor     a,(iy+$300)
  214.         xor     a,(ix+100000h)
  215.  
  216.         xorw    ix
  217.         xorw    hl,ix
  218.         xorw    hl,iy
  219.         xorw    hl,bc
  220.         xorw    hl,de
  221.         xorw    hl,hl
  222.         xorw    hl,(ix+17)
  223.         xorw    hl,(iy-200)
  224.         xorw    hl,$aa55
  225.  
  226.         sub     a
  227.         sub     a,b
  228.         sub     a,c
  229.         sub     a,d
  230.         sub     a,e
  231.         sub     a,h
  232.         sub     a,l
  233.         sub     a,ixl
  234.         sub     a,ixu
  235.         sub     a,iyl
  236.         sub     a,iyu
  237.         sub     a,$34
  238.         sub     a,(hl)
  239.         sub     a,(ix-20)
  240.         sub     a,(iy+$300)
  241.         sub     a,(ix+100000h)
  242.  
  243.         sub     hl,(1234h)
  244.         sub     hl,(123456h)
  245.         sub     hl,(12345678h)
  246.         sub     sp,3412o
  247.  
  248.         subw    ix
  249.         subw    hl,ix
  250.         subw    hl,iy
  251.         subw    hl,bc
  252.         subw    hl,de
  253.         subw    hl,hl
  254.         subw    hl,(ix+17)
  255.         subw    hl,(iy-200)
  256.         subw    hl,$aa55
  257.  
  258.         add     a,b
  259.         add     a,iyu
  260.         add     a,' '
  261.         add     a,(hl)
  262.         add     a,(ix+10)
  263.         add     a,(ix+1000)
  264.         add     hl,bc
  265.         add     ix,de
  266.         add     iy,iy
  267.         add     ix,sp
  268.         add     hl,(12345678h)
  269.         add     sp,3412o
  270.  
  271.         addw    bc
  272.         addw    hl,hl
  273.         addw    hl,iy
  274.         addw    hl,2314h
  275.         addw    hl,(ix+128)
  276.  
  277.         adc     a,h
  278.         adc     a,ixu
  279.         adc     a,20
  280.         adc     a,(hl)
  281.         adc     a,(ix-500)
  282.         adc     hl,sp
  283.  
  284.         adcw    hl,bc
  285.         adcw    hl,iy
  286.         adcw    hl,$abcd
  287.         adcw    hl,(iy-30)
  288.  
  289.         sbc     a,d
  290.         sbc     a,iyl
  291.         sbc     a,20h
  292.         sbc     a,(hl)
  293.         sbc     a,(ix+500)
  294.         sbc     hl,sp
  295.  
  296.         sbcw    hl,bc
  297.         sbcw    hl,iy
  298.         sbcw    hl,$abcd
  299.         sbcw    hl,(iy-30)
  300.  
  301.         dec     a
  302.         dec     (hl)
  303.         dec     ixu
  304.         dec     (ix+35)
  305.  
  306.         decw    de
  307.         dec     iy
  308.  
  309.         inc     a
  310.         inc     (hl)
  311.         inc     ixu
  312.         inc     (ix+35)
  313.  
  314.         incw    de
  315.         inc     iy
  316.  
  317.         rl      d
  318.         rl      (hl)
  319.         rl      (ix+200)
  320.         rlw     ix
  321.         rlw     iy
  322.         rlw     de
  323.         rlw     hl
  324.         rlw     (hl)
  325.         rlw     (iy+$100000)
  326.  
  327.         rlc     d
  328.         rlc     (hl)
  329.         rlc     (ix+200)
  330.         rlcw    ix
  331.         rlcw    iy
  332.         rlcw    de
  333.         rlcw    hl
  334.         rlcw    (hl)
  335.         rlcw    (iy+$100000)
  336.  
  337.         rr      d
  338.         rr      (hl)
  339.         rr      (ix+200)
  340.         rrw     ix
  341.         rrw     iy
  342.         rrw     de
  343.         rrw     hl
  344.         rrw     (hl)
  345.         rrw     (iy+$100000)
  346.  
  347.         rrc     d
  348.         rrc     (hl)
  349.         rrc     (ix+200)
  350.         rrcw    ix
  351.         rrcw    iy
  352.         rrcw    de
  353.         rrcw    hl
  354.         rrcw    (hl)
  355.         rrcw    (iy+$100000)
  356.  
  357.         sla     d
  358.         sla     (hl)
  359.         sla     (ix+200)
  360.         slaw    ix
  361.         slaw    iy
  362.         slaw    de
  363.         slaw    hl
  364.         slaw    (hl)
  365.         slaw    (iy+$100000)
  366.  
  367.         sra     d
  368.         sra     (hl)
  369.         sra     (ix+200)
  370.         sraw    ix
  371.         sraw    iy
  372.         sraw    de
  373.         sraw    hl
  374.         sraw    (hl)
  375.         sraw    (iy+$100000)
  376.  
  377.         srl     d
  378.         srl     (hl)
  379.         srl     (ix+200)
  380.         srlw    ix
  381.         srlw    iy
  382.         srlw    de
  383.         srlw    hl
  384.         srlw    (hl)
  385.         srlw    (iy+$100000)
  386.  
  387.         bit     5,a
  388.         bit     6,(hl)
  389.         bit     3,(ix+67)
  390.  
  391.         res     5,a
  392.         res     6,(hl)
  393.         res     3,(ix+67)
  394.  
  395.         set     5,a
  396.         set     6,(hl)
  397.         set     3,(ix+67)
  398.  
  399.         mlt     bc
  400.         mlt     hl
  401.         mlt     sp
  402.  
  403.         ld      a,c
  404.         ld      a,h
  405.         ld      a,iyu
  406.         ld      a,ixl
  407.         ld      a,(hl)
  408.         ld      a,(ix+20)
  409.         ld      a,(iy-300)
  410.         ld      a,(bc)
  411.         ld      a,(de)
  412.         ld      a,'A'
  413.         ld      a,(2000h)
  414.         ld      a,(10000h)
  415.         ld      a,r
  416.         ld      a,i
  417.         ld      d,a
  418.         ld      d,e
  419.         ld      d,ixl
  420.         ld      d,(hl)
  421.         ld      d,(iy+15)
  422.         ld      d,'D'
  423.         ld      ixl,a
  424.         ld      iyu,'I'
  425.         ld      iyl,iyu
  426.         ld      ixu,ixl
  427.         ld      ixl,e
  428.         ld      (hl),a
  429.         ld      (hl),c
  430.         ld      (ix+100),a
  431.         ld      (iy-200),d
  432.         ld      (hl),'H'
  433.         ld      (ix),'X'
  434.         ld      (hl),hl
  435.         ld      (hl),de
  436.         ld      (hl),bc
  437.         ld      (hl),ix
  438.         ld      (hl),iy
  439.         ld      (ix),hl
  440.         ld      (ix),de
  441.         ld      (ix),bc
  442.         ld      (iy),hl
  443.         ld      (iy),de
  444.         ld      (iy),bc
  445.         ld      (iy),ix
  446.         ld      (ix+123456h),iy
  447.         ld      sp,hl
  448.         ld      sp,iy
  449.         ddir    lw
  450.         ld      sp,123456h
  451.         ld      sp,(6)
  452.         ld      bc,(hl)
  453.         ld      de,(hl)
  454.         ld      hl,(hl)
  455.         ld      bc,(ix)
  456.         ld      de,(ix)
  457.         ld      hl,(ix)
  458.         ld      bc,(iy)
  459.         ld      de,(iy)
  460.         ld      hl,(iy)
  461.         ld      bc,hl
  462.         ld      de,bc
  463.         ld      de,ix
  464.         ld      hl,iy
  465.         ld      de,(bc)
  466.         ld      hl,(de)
  467.         ld      hl,2000h
  468.         ddir    lw
  469.         ld      hl,12345687h
  470.         ld      hl,(2000h)
  471.         ld      de,(20000h)
  472.         ld      hl,(sp+5)
  473.         ld      de,(sp-200)
  474.         ld      ix,(hl)
  475.         ld      iy,(hl)
  476.         ld      ix,(iy)
  477.         ld      iy,(ix)
  478.         ld      iy,hl
  479.         ld      ix,bc
  480.         ld      ix,iy
  481.         ld      iy,ix
  482.         ld      ix,(bc)
  483.         ld      iy,(de)
  484.         ddir    lw
  485.         ld      ix,123456h
  486.         ld      iy,0
  487.         ld      ix,(2000h)
  488.         ld      iy,(87654321h)
  489.         ld      ix,(sp)
  490.         ld      (bc),a
  491.         ld      (de),a
  492.         ld      (bc),de
  493.         ld      (de),hl
  494.         ld      (de),iy
  495.         ld      ($20001),a
  496.         ld      (123456h),hl
  497.         ld      (123456h),ix
  498.         ld      (123456h),de
  499.         ld      (123456h),sp
  500.         ld      i,a
  501.         ld      i,hl
  502.         ld      r,a
  503.         ld      hl,i
  504.         ld      (sp),de
  505.         ld      (sp),ix
  506.         ld      (hl),10
  507.         ldw     (hl),1000
  508.         ddir    lw
  509.         ldw     (hl),100000
  510.         ldw     (bc),30
  511.         ldw     (de),40
  512.  
  513.         pop     af
  514.         pop     sr
  515.         pop     bc
  516.         pop     de
  517.         pop     hl
  518.         pop     ix
  519.         pop     iy
  520.         push    af
  521.         push    sr
  522.         push    300
  523.         push    bc
  524.         push    de
  525.         push    hl
  526.         push    ix
  527.         push    iy
  528.  
  529.         ; The AF' syntax for the alternate register bank is
  530.         ; really nasty.  This requires a quotation qualifier
  531.         ; for the parser:
  532.  
  533.         ex      af,af'          ; will comment be recognized?
  534.         ex      af',af          ; will comment be recognized?
  535.  
  536.         ex      (sp),hl
  537.         ex      hl,(sp)
  538.         ex      (sp),ix
  539.         ex      ix,(sp)
  540.         ex      (sp),iy
  541.         ex      iy,(sp)
  542.         ex      de,hl
  543.         ex      hl,de
  544.         ex      a,a'
  545.         ex      c,c'
  546.         ex      a,h
  547.         ex      d,a
  548.         ex      a,(hl)
  549.         ex      (hl),a
  550.         ex      bc,de
  551.         ex      bc,hl
  552.         ex      bc,ix
  553.         ex      bc,iy
  554.         ex      de,bc
  555.         ex      de,hl
  556.         ex      de,ix
  557.         ex      de,iy
  558.         ex      hl,bc
  559.         ex      hl,de
  560.         ex      hl,ix
  561.         ex      hl,iy
  562.         ex      ix,bc
  563.         ex      ix,de
  564.         ex      ix,hl
  565.         ex      ix,iy
  566.         ex      iy,bc
  567.         ex      iy,de
  568.         ex      iy,hl
  569.         ex      iy,ix
  570.         ex      bc,bc'
  571.         ex      de,de'
  572.         ex      hl,hl'
  573.         ex      ix,ix'
  574.         ex      iy,iy'
  575.  
  576.         im      0
  577.         im      1
  578.         im      2
  579.         im      3
  580.  
  581.         in      a,(12h)
  582.         out     (12h),a
  583.         in      c,(c)
  584.         out     (c),c
  585.         out     (c),12h
  586.  
  587.         inw     bc,(c)
  588.         outw    (c),bc
  589.         inw     de,(c)
  590.         outw    (c),de
  591.         inw     hl,(c)
  592.         outw    (c),hl
  593.         outw    (c),$2002
  594.  
  595.         in0     d,(20h)
  596.         in0     (20h)
  597.         out0    (20h),e
  598.  
  599.         ina     a,(12h)
  600.         inaw    hl,(1234h)
  601.         outa    (123456h),a
  602.         outaw   (12345678h),hl
  603.  
  604.         tstio   1<<7
  605.  
  606.         tst     a
  607.         tst     (hl)
  608.         tst     33h
  609.  
  610.         divuw   (ix+5)
  611.         multw   hl,(iy-3)
  612.         multuw  hl,(iy+100)
  613.         divuw   hl,bc
  614.         multw   hl,de
  615.         multuw  hl,hl
  616.         divuw   hl,ix
  617.         multw   hl,iy
  618.         multuw  hl,ix
  619.         divuw   hl,10
  620.         multw   hl,100
  621.         multuw  hl,1000
  622.  
  623.         ldctl   sr,a
  624.         ldctl   xsr,a
  625.         ldctl   a,xsr
  626.         ldctl   dsr,a
  627.         ldctl   a,dsr
  628.         ldctl   ysr,a
  629.         ldctl   a,ysr
  630.         ldctl   sr,20h
  631.         ldctl   xsr,31h
  632.         ldctl   dsr,42h
  633.         ldctl   ysr,53h
  634.         ldctl   sr,hl
  635.         ldctl   hl,sr
  636.  
  637.         resc    lw
  638.         setc    lw
  639.         resc    lck
  640.         setc    lck
  641.         setc    xm
  642.  
  643.         swap    bc
  644.         swap    de
  645.         swap    hl
  646.         swap    ix
  647.         swap    iy
  648.  
  649.        out     (c),0
  650.  
  651.        cpu     z80undoc
  652.  
  653.        slia    d
  654.        slia    (ix+5)
  655.        slia    (hl)
  656.        slia    a
  657.        inc     ixl
  658.        inc     iyu
  659.        dec     ixu
  660.        dec     iyl
  661.        ld      iyl,'a'
  662.        ld      b,ixl
  663.        ld      ixu,c
  664.        ld      iyl,iyu
  665.        add     a,ixl
  666.        adc     a,ixu
  667.        sub     a,iyl
  668.        sbc     a,iyu
  669.        and     a,ixl
  670.        xor     a,ixu
  671.        or      a,iyl
  672.        cp      a,iyu
  673.        rlc     (ix+3)
  674.         rrc     b,(iy-3)        ; extra dest reg may be first or last arg
  675.         rrc     (iy-3),b
  676.         slia    a,(ix-100)      ; several namings in use (no standard from Zilog!)
  677.         sli     a,(ix-100)
  678.         sl1     a,(ix-100)
  679.         sls     a,(ix-100)
  680.        res     5,h
  681.        set     6,(ix+6)
  682.        bit     3,(hl)
  683.         res     c,4,(ix-1)      ; extra dest reg may be first or last arg
  684.         res     4,(ix-1),c
  685.        set     l,6,(iy+17)
  686.         set     6,(iy+17),l
  687.        out     (c),0
  688.        in      (c)
  689.        tsti
  690.