home *** CD-ROM | disk | FTP | other *** search
/ 17 Bit Software 2: Collection B / 17Bit_Collection_B.iso / files / 1797.dms / in.adf / FPUcode.a < prev    next >
Encoding:
Text File  |  1992-03-13  |  4.7 KB  |  270 lines
  1. ;    'AllInstructionTypes'
  2. ;    FPUCode V0.02 for BeerMon
  3. ;    can assembled with the OMA 2.0 Assembler
  4. ;
  5.     mc68882
  6.     mc68030
  7.     output    "ram:fpu"
  8.  
  9.  
  10. start:    fdbf    d0,start    ;oma bug: all offsets are 2 bytes ahead...
  11.     fdbeq    d0,start
  12.     fdbogt    d0,start
  13.     fdboge    d0,start
  14.     fdbolt    d0,start
  15.     fdbole    d0,start
  16.     fdbogl    d0,start
  17.     fdbor    d0,start
  18.     fdbun    d0,start
  19.     fdbueq    d0,start
  20.     fdbugt    d0,start
  21.     fdbuge    d0,start
  22.     fdbult    d0,start
  23.     fdbule    d0,start
  24.     fdbne    d0,start
  25.     fdbt    d0,start
  26.     fdbsf    d0,start
  27.     fdbseq    d0,start
  28.     fdbgt    d0,start
  29.     fdbge    d0,start
  30.     fdblt    d0,start
  31.     fdble    d0,start
  32.     fdbgl    d0,start
  33.     fdbgle    d0,start
  34.     fdbngle    d0,start
  35.     fdbngl    d0,start
  36.     fdbnle    d0,start
  37.     fdbnlt    d0,start
  38.     fdbnge    d0,start
  39.     fdbngt    d0,start
  40.     fdbsne    d0,start
  41.     fdbst    d0,start
  42.  
  43.     fnop
  44.     ;fmovem.x fp0-fp7,(a0)
  45.     ;fmovem.x (a0),fp0-fp7
  46.     ;fmovem.l fpcr/fpsr/fpiar,(a0)
  47.     ;fmovem.l (a0),fpcr/fpsr/fpiar
  48.     fmovecr #$00,fp0
  49.     fmovecr #$0b,fp1
  50.     fmovecr #$0c,fp2
  51.     fmovecr #$0d,fp3
  52.     fmovecr #$0e,fp4
  53.     fmovecr #$0f,fp5
  54.     fmovecr #$30,fp0
  55.     fmovecr #$31,fp1
  56.     fmovecr #$32,fp2
  57.     fmovecr #$33,fp3
  58.     fmovecr #$34,fp4
  59.     fmovecr #$35,fp5
  60.     fmovecr #$36,fp6
  61.     fmovecr #$37,fp7
  62.     fmovecr #$38,fp0
  63.     fmovecr #$39,fp1
  64.     fmovecr #$3a,fp2
  65.     fmovecr #$3b,fp3
  66.     fmovecr #$3c,fp4
  67.     fmovecr #$3d,fp5
  68.     fmovecr #$3e,fp6
  69.     fmovecr #$3f,fp7
  70.  
  71.     fsave        (a1)
  72.     fsave        -(a1)
  73.     fsave        ($1234,a1)
  74.     fsave        ($12,a1,d2.w)
  75.     fsave        ($12,a1,d2.l)
  76.     fsave        ($12,a1,a2.w)
  77.     fsave        ($12,a1,a2.l)
  78.     fsave        ($12,a1,d2.w*2)
  79.     fsave        ($12,a1,d2.l*2)
  80.     fsave        ($12,a1,a2.w*2)
  81.     fsave        ($12,a1,a2.l*2)
  82.     fsave        ($12,a1,d2.w*4)
  83.     fsave        ($12,a1,d2.l*4)
  84.     fsave        ($12,a1,a2.w*4)
  85.     fsave        ($12,a1,a2.l*4)
  86.     fsave        ($12,a1,d2.w*8)
  87.     fsave        ($12,a1,d2.l*8)
  88.     fsave        ($12,a1,a2.w*8)
  89.     fsave        ($12,a1,a2.l*8)
  90.     fsave        $1234.w
  91.     fsave        $12345678
  92.     frestore    (a1)
  93.     frestore    (a1)+
  94.     frestore    ($1234,a1)
  95.     frestore    ($12,a1,d2.w)
  96.     frestore    ($12,a1,d2.l)
  97.     frestore    ($12,a1,a2.w)
  98.     frestore    ($12,a1,a2.l)
  99.     frestore    ($12,a1,d2.w*2)
  100.     frestore    ($12,a1,d2.l*2)
  101.     frestore    ($12,a1,a2.w*2)
  102.     frestore    ($12,a1,a2.l*2)
  103.     frestore    ($12,a1,d2.w*4)
  104.     frestore    ($12,a1,d2.l*4)
  105.     frestore    ($12,a1,a2.w*4)
  106.     frestore    ($12,a1,a2.l*4)
  107.     frestore    ($12,a1,d2.w*8)
  108.     frestore    ($12,a1,d2.l*8)
  109.     frestore    ($12,a1,a2.w*8)
  110.     frestore    ($12,a1,a2.l*8)
  111.     frestore    $1234.w
  112.     frestore    $12345678
  113.     frestore    (start,pc)
  114. label1:    frestore    (label1,pc,d2.w)
  115.     frestore    (label1,pc,d2.l)
  116.     frestore    (label1,pc,a2.w)
  117.     frestore    (label1,pc,a2.l)
  118.  
  119.     fsf        (a1)
  120.     fsf        -(a1)
  121.     fsf        ($1234,a1)
  122.     fsf        ($12,a1,d2.w)
  123.     fsf        ($12,a1,d2.l)
  124.     fsf        ($12,a1,a2.w)
  125.     fsf        ($12,a1,a2.l)
  126.     fsf        ($12,a1,d2.w*2)
  127.     fsf        ($12,a1,d2.l*2)
  128.     fsf        ($12,a1,a2.w*2)
  129.     fsf        ($12,a1,a2.l*2)
  130.     fsf        ($12,a1,d2.w*4)
  131.     fsf        ($12,a1,d2.l*4)
  132.     fsf        ($12,a1,a2.w*4)
  133.     fsf        ($12,a1,a2.l*4)
  134.     fsf        ($12,a1,d2.w*8)
  135.     fsf        ($12,a1,d2.l*8)
  136.     fsf        ($12,a1,a2.w*8)
  137.     fsf        ($12,a1,a2.l*8)
  138.     fsf        $1234.w
  139.     fsf        $12345678
  140.     fsf        (a1)
  141.     fseq        (a1)
  142.     fsogt        (a1)
  143.     fsoge        (a1)
  144.     fsolt        (a1)
  145.     fsole        (a1)
  146.     fsogl        (a1)
  147.     fsor        (a1)
  148.     fsun        (a1)
  149.     fsueq        (a1)
  150.     fsugt        (a1)
  151.     fsuge        (a1)
  152.     fsult        (a1)
  153.     fsule        (a1)
  154.     fsne        (a1)
  155.     fst        (a1)
  156.     fssf        (a1)
  157.     fsseq        (a1)
  158.     fsgt        (a1)
  159.     fsge        (a1)
  160.     fslt        (a1)
  161.     fsle        (a1)
  162.     fsgl        (a1)
  163.     fsgle        (a1)
  164.     fsngle        (a1)
  165.     fsngl        (a1)
  166.     fsnle        (a1)
  167.     fsnlt        (a1)
  168.     fsnge        (a1)
  169.     fsngt        (a1)
  170.     fssne        (a1)
  171.     fsst        (a1)
  172.  
  173.     ftrapf
  174.     ftrapeq
  175.     ftrapogt
  176.     ftrapoge
  177.     ftrapolt
  178.     ftrapole
  179.     ftrapogl
  180.     ftrapor
  181.     ftrapun
  182.     ftrapueq
  183.     ftrapugt
  184.     ftrapuge
  185.     ftrapult
  186.     ftrapule
  187.     ftrapne
  188.     ftrapt
  189.     ftrapsf
  190.     ftrapseq
  191.     ftrapgt
  192.     ftrapge
  193.     ftraplt
  194.     ftraple
  195.     ftrapgl
  196.     ftrapgle
  197.     ftrapngle
  198.     ftrapngl
  199.     ftrapnle
  200.     ftrapnlt
  201.     ftrapnge
  202.     ftrapngt
  203.     ftrapsne
  204.     ftrapst
  205.     ftrapf.w    #$1234
  206.     ftrapeq.w    #$1234
  207.     ftrapogt.w    #$1234
  208.     ftrapoge.w    #$1234
  209.     ftrapolt.w    #$1234
  210.     ftrapole.w    #$1234
  211.     ftrapogl.w    #$1234
  212.     ftrapor.w    #$1234
  213.     ftrapun.w    #$1234
  214.     ftrapueq.w    #$1234
  215.     ftrapugt.w    #$1234
  216.     ftrapuge.w    #$1234
  217.     ftrapult.w    #$1234
  218.     ftrapule.w    #$1234
  219.     ftrapne.w    #$1234
  220.     ftrapt.w    #$1234
  221.     ftrapsf.w    #$1234
  222.     ftrapseq.w    #$1234
  223.     ftrapgt.w    #$1234
  224.     ftrapge.w    #$1234
  225.     ftraplt.w    #$1234
  226.     ftraple.w    #$1234
  227.     ftrapgl.w    #$1234
  228.     ftrapgle.w    #$1234
  229.     ftrapngle.w    #$1234
  230.     ftrapngl.w    #$1234
  231.     ftrapnle.w    #$1234
  232.     ftrapnlt.w    #$1234
  233.     ftrapnge.w    #$1234
  234.     ftrapngt.w    #$1234
  235.     ftrapsne.w    #$1234
  236.     ftrapst.w    #$1234
  237.     ftrapf.l    #$12345678
  238.     ftrapeq.l    #$12345678
  239.     ftrapogt.l    #$12345678
  240.     ftrapoge.l    #$12345678
  241.     ftrapolt.l    #$12345678
  242.     ftrapole.l    #$12345678
  243.     ftrapogl.l    #$12345678
  244.     ftrapor.l    #$12345678
  245.     ftrapun.l    #$12345678
  246.     ftrapueq.l    #$12345678
  247.     ftrapugt.l    #$12345678
  248.     ftrapuge.l    #$12345678
  249.     ftrapult.l    #$12345678
  250.     ftrapule.l    #$12345678
  251.     ftrapne.l    #$12345678
  252.     ftrapt.l    #$12345678
  253.     ftrapsf.l    #$12345678
  254.     ftrapseq.l    #$12345678
  255.     ftrapgt.l    #$12345678
  256.     ftrapge.l    #$12345678
  257.     ftraplt.l    #$12345678
  258.     ftraple.l    #$12345678
  259.     ftrapgl.l    #$12345678
  260.     ftrapgle.l    #$12345678
  261.     ftrapngle.l    #$12345678
  262.     ftrapngl.l    #$12345678
  263.     ftrapnle.l    #$12345678
  264.     ftrapnlt.l    #$12345678
  265.     ftrapnge.l    #$12345678
  266.     ftrapngt.l    #$12345678
  267.     ftrapsne.l    #$12345678
  268.     ftrapst.l    #$12345678
  269.     end
  270.