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 / BEEHIVE / OS / SUPER8.ARC / T.S8 < prev    next >
Text File  |  1990-09-21  |  5KB  |  501 lines

  1. ; Super8 assembly test file
  2.  
  3.     adc    r3,r5
  4.     adc    r3,@r5
  5.     adc    r3,64
  6.     adc    32,r5
  7.     adc    32,64
  8.     adc    r3,@64
  9.     adc    32,@r5
  10.     adc    32,@64
  11.     adc    r3,#64
  12.     adc    32,#64
  13.  
  14.     add    r3,r5
  15.     add    r3,@r5
  16.     add    r3,64
  17.     add    32,r5
  18.     add    32,64
  19.     add    r3,@64
  20.     add    32,@r5
  21.     add    32,@64
  22.     add    r3,#64
  23.     add    32,#64
  24.  
  25.     and    r3,r5
  26.     and    r3,@r5
  27.     and    r3,64
  28.     and    32,r5
  29.     and    32,64
  30.     and    r3,@64
  31.     and    32,@r5
  32.     and    32,@64
  33.     and    r3,#64
  34.     and    32,#64
  35.  
  36.     band    r3,r5,#7
  37.     band    r3,64,#7
  38.     band    r3,#7,r5
  39.     band    32,#7,r5
  40.  
  41.     bcp    r3,r5,#7
  42.     bcp    r3,64,#7
  43.  
  44.     bitc    r3,#7
  45.  
  46.     bitr    r3,#7
  47.  
  48.     bits    r3,#7
  49.  
  50.     bor    r3,r5,#7
  51.     bor    r3,64,#7
  52.     bor    r3,#7,r5
  53.     bor    32,#7,r5
  54.  
  55.     btjrf    $,r5,#7
  56.     btjrt    $,r5,#7
  57.  
  58.     bxor    r3,r5,#7
  59.     bxor    r3,64,#7
  60.     bxor    r3,#7,r5
  61.     bxor    32,#7,r5
  62.  
  63.     call    #32
  64.     call    @rr2
  65.     call    @32
  66.     call    64
  67.  
  68.     ccf
  69.  
  70.     clr    r3
  71.     clr    32
  72.     clr    @r3
  73.     clr    @32
  74.  
  75.     com    r3
  76.     com    32
  77.     com    @r3
  78.     com    @32
  79.  
  80.     cp    r3,r5
  81.     cp    r3,@r5
  82.     cp    r3,64
  83.     cp    32,r5
  84.     cp    32,64
  85.     cp    r3,@64
  86.     cp    32,@r5
  87.     cp    32,@64
  88.     cp    r3,#64
  89.  
  90.     cpijne    r3,@r5,$
  91.  
  92.     cpije    r3,@r5,$
  93.  
  94.     da    r3
  95.     da    32
  96.     da    @r3
  97.     da    @32
  98.  
  99.     dec    r3
  100.     dec    32
  101.     dec    @r3
  102.     dec    @32
  103.  
  104.     decw    rr2
  105.     decw    32
  106.     decw    @r3
  107.     decw    @32
  108.  
  109.     di
  110.  
  111.     div    rr2,r5
  112.     div    rr2,64
  113.     div    32,r5
  114.     div    32,64
  115.     div    rr2,@r5
  116.     div    rr2,@64
  117.     div    32,@r5
  118.     div    32,@64
  119.     div    rr2,#64
  120.     div    32,#64
  121.  
  122.     djnz    r3,$
  123.  
  124.     ei
  125.  
  126.     enter
  127.  
  128.     exit
  129.  
  130.     inc    r3
  131.     inc    32
  132.     inc    @r3
  133.     inc    @32
  134.  
  135.     incw    rr2
  136.     incw    32
  137.     incw    @r3
  138.     incw    @32
  139.  
  140.     iret
  141.  
  142.     jp    1024
  143.     jp    nz,1024
  144.     jp    @rr2
  145.     jp    @32
  146.  
  147.     jr    $
  148.     jr    nz,$
  149.  
  150.     ld    r3,#64
  151.  
  152.     ld    r3,r5
  153.     ld    r3,64
  154.     ld    32,r5
  155.  
  156.     ld    r3,@r5
  157.     ld    @r3,r5
  158.  
  159.     ld    32,64
  160.  
  161.     ld    r3,@r5    ; duplicate
  162.     ld    r3,@64
  163.     ld    32,@r5
  164.     ld    32,@64
  165.  
  166.     ld    r3,#64
  167.     ld    32,#64
  168.     ld    @r3,#64
  169.     ld    @32,#64
  170.  
  171.     ld    @r3,r5    ; duplicate
  172.     ld    @r3,64
  173.     ld    @32,r5
  174.     ld    @32,64
  175.  
  176.     ld    r3,64(r5)
  177.     ld    64(r5),r3
  178.  
  179.     ldb    r3,r5,#7
  180.     ldb    r3,64,#7
  181.     ldb    r3,#7,r5
  182.     ldb    32,#7,r5
  183.  
  184.     ldc    r3,1024(rr4)
  185.     ldc    r3,64(rr4)
  186.     ldc    1024(rr2),r5
  187.     ldc    64(rr2),r5
  188.     ldc    32,r5
  189.     ldc    r5,64
  190.     ldc    r3,@rr4
  191.     ldc    @rr2,r5
  192.  
  193.     ldcd    r3,@rr4
  194.     ldci    r3,@rr4
  195.     ldcpd    @rr2,r5
  196.     ldcpi    @rr2,r5
  197.  
  198.     lde    r3,1024(rr4)
  199.     lde    r3,64(rr4)
  200.     lde    1024(rr2),r5
  201.     lde    64(rr2),r5
  202.     lde    32,r5
  203.     lde    r5,64
  204.     lde    r3,@rr4
  205.     lde    @rr2,r5
  206.  
  207.     lded    r3,@rr4
  208.     ldei    r3,@rr4
  209.     ldepd    @rr2,r5
  210.     ldepi    @rr2,r5
  211.  
  212.     ldw    rr2,rr4
  213.     ldw    rr2,64
  214.     ldw    32,rr4
  215.  
  216.     ldw    32,64
  217.     ldw    rr2,@r4
  218.     ldw    rr2,@64
  219.     ldw    32,@r4
  220.     ldw    32,@64
  221.  
  222.     ldw    rr2,#1024
  223.     ldw    32,#1024
  224.  
  225.     mult    rr2,r5
  226.     mult    rr2,64
  227.     mult    32,r5
  228.     mult    32,64
  229.     mult    rr2,@r5
  230.     mult    rr2,@64
  231.     mult    32,@r5
  232.     mult    32,@64
  233.     mult    rr2,#64
  234.     mult    32,#64
  235.  
  236.     next
  237.  
  238.     nop
  239.  
  240.     or    r3,r5
  241.     or    r3,@r5
  242.     or    r3,64
  243.     or    32,r5
  244.     or    32,64
  245.     or    r3,@64
  246.     or    32,@r5
  247.     or    32,@64
  248.     or    r3,#64
  249.     or     32,#64
  250.  
  251.     pop    r3
  252.     pop    32
  253.     pop    @r3
  254.     pop    @32
  255.  
  256.     popud    r3,@r5
  257.     popud    r3,@64
  258.     popud    32,@r5
  259.     popud    32,@64
  260.  
  261.     popui    r3,@r5
  262.     popui    r3,@64
  263.     popui    32,@r5
  264.     popui    32,@64
  265.  
  266.     push    r3
  267.     push    32
  268.     push    @r3
  269.     push    @32
  270.  
  271.     pushud    @r3,r5
  272.     pushud    @r3,64
  273.     pushud    @32,r5
  274.     pushud    @32,64
  275.  
  276.     pushui    @r3,r5
  277.     pushui    @r3,64
  278.     pushui    @32,r5
  279.     pushui    @32,64
  280.  
  281.     rcf
  282.  
  283.     dw    0        ; rdr in book
  284.  
  285.     ret
  286.  
  287.     rl    r3
  288.     rl    32
  289.     rl    @r3
  290.     rl    @32
  291.  
  292.     rlc    r3
  293.     rlc    32
  294.     rlc    @r3
  295.     rlc    @32
  296.  
  297.     rr    r3
  298.     rr    32
  299.     rr    @r3
  300.     rr    @32
  301.  
  302.     rrc    r3
  303.     rrc    32
  304.     rrc    @r3
  305.     rrc    @32
  306.  
  307.     sb0
  308.  
  309.     sb1
  310.  
  311.     sbc    r3,r5
  312.     sbc    r3,@r5
  313.     sbc    r3,64
  314.     sbc    32,r5
  315.     sbc    32,64
  316.     sbc    r3,@64
  317.     sbc    32,@r5
  318.     sbc    32,@64
  319.     sbc    r3,#64
  320.     sbc     32,#64
  321.  
  322.     scf
  323.  
  324.     sra    r3
  325.     sra    32
  326.     sra    @r3
  327.     sra    @32
  328.  
  329.     srp    #128
  330.     srp1    #128
  331.     srp0    #128
  332.  
  333.     sub    r3,r5
  334.     sub    r3,@r5
  335.     sub    r3,64
  336.     sub    32,r5
  337.     sub    32,64
  338.     sub    r3,@64
  339.     sub    32,@r5
  340.     sub    32,@64
  341.     sub    r3,#64
  342.     sub     32,#64
  343.  
  344.     swap    r3
  345.     swap    32
  346.     swap    @r3
  347.     swap    @32
  348.  
  349.     tcm    r3,r5
  350.     tcm    r3,@r5
  351.     tcm    r3,64
  352.     tcm    32,r5
  353.     tcm    32,64
  354.     tcm    r3,@64
  355.     tcm    32,@r5
  356.     tcm    32,@64
  357.     tcm    r3,#64
  358.     tcm     32,#64
  359.  
  360.     tm    r3,r5
  361.     tm    r3,@r5
  362.  
  363.     tm    r3,64
  364.     tm    32,r5
  365.     tm    32,64
  366.     tm    r3,@64
  367.     tm    32,@r5
  368.     tm    32,@64
  369.     tm    r3,#64
  370.     tm      32,#64
  371.  
  372.     xor    r3,r5
  373.     xor    r3,@r5
  374.     xor    r3,64
  375.     xor    32,r5
  376.     xor    32,64
  377.     xor    r3,@64
  378.     xor    32,@r5
  379.     xor    32,@64
  380.     xor    r3,#64
  381.     xor       32,#64
  382.  
  383. lcode:    wfi            ; $308
  384.  
  385. ; Defined register names
  386.  
  387.     ld    r3,sym
  388.     ld    r3,imr
  389.     ld    r3,irq        ; Was irr in test listing
  390.     ldw    rr3,ip
  391.     ld    r3,ipl
  392.     ld    r3,iph
  393.     ldw    rr3,sp
  394.     ld    r3,spl
  395.     ld    r3,sph
  396.     ld    r3,rp1
  397.     ld    r3,rp0
  398.     ld    r3,flags
  399.     ld    r3,p4
  400.     ld    r3,p3
  401.     ld    r3,p2
  402.     ld    r3,p1
  403.     ld    r3,p0
  404.  
  405. ; Bank 0 special registers
  406.  
  407.     ld    r3,ipr
  408.     ld    r3,emt
  409.     ld    r3,p2bip
  410.     ld    r3,p2aip
  411.     ld    r3,p2dm
  412.     ld    r3,p2cm
  413.     ld    r3,p2bm
  414.     ld    r3,p2am
  415.     ld    r3,p4od
  416.     ld    r3,p4d
  417.     ld    r3,h1c
  418.     ld    r3,h0c
  419.     ld    r3,pm
  420.     ld    r3,p1
  421.     ld    r3,p0m
  422.     ld    r3,uie
  423.     ld    r3,urc
  424.     ld    r3,utc
  425.     ld    r3,sio
  426.     ld    r3,sie
  427.     ld    r3,srcb
  428.     ld    r3,srca
  429.     ld    r3,stc
  430.     ldw    rr2,c1c
  431.     ld    r3,c1cl
  432.     ld    r3,c1ch
  433.     ldw    rr2,c0c
  434.     ld    r3,c0cl
  435.     ld    r3,c0ch
  436.     ld    r3,c1ct
  437.     ld    r3,c0ct
  438.  
  439. ; Bank 1 special registers
  440.  
  441.     ld    r3,wumsk
  442.     ld    r3,wumch
  443.     ld    r3,umb
  444.     ld    r3,uma
  445.     ldw    rr2,ubg
  446.     ld    r3,ubgl
  447.     ld    r3,ubgh
  448.     ldw    rr2,dc
  449.     ld    r3,dcl
  450.     ld    r3,dch
  451.     ldw    rr2,syn
  452.     ld    r3,synh
  453.     ld    r3,synl
  454.     ld    r3,smd
  455.     ld    r3,smc
  456.     ld    r3,smb
  457.     ld    r3,sma
  458.     ldw    rr2,sbg
  459.     ld    r3,sbgl
  460.     ld    r3,sbgh
  461.     ldw    rr2,c1tc
  462.     ld    r3,c1tcl
  463.     ld    r3,c1tch
  464.     ldw    rr2,c0tc
  465.     ld    r3,c0tcl
  466.     ld    r3,c0tch
  467.     ld    r3,c1m
  468.     ld    r3,c0m
  469.  
  470. ; Test for conditionals
  471.  
  472.     jp    f,128
  473.  
  474.     jp    z,128
  475.     jp    nz,128
  476.     jp    eq,128
  477.     jp    ne,128
  478.     jp    c,128
  479.     jp    nc,128
  480.  
  481.     jp    gt,128
  482.     jp    lt,128
  483.     jp    ge,128
  484.     jp    le,128
  485.  
  486.     jp    pl,128
  487.     jp    mi,128
  488.  
  489.     jp    nov,128
  490.     jp    ov,128
  491.  
  492.     jp    ugt,128
  493.     jp    ult,128
  494.     jp    uge,128
  495.     jp    ule,128
  496.     
  497.  
  498.     end
  499.  
  500.  
  501.