home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 13 / AACD13.ISO / AACD / Programming / cfasm / Codetest / test.s
Text File  |  2000-04-27  |  1KB  |  69 lines
  1.  
  2.     ; Simple extended code test for cfasm
  3.  
  4.     org $f8000000
  5.  
  6.       structure test1,0
  7.     fixed    ts_value1
  8.     float    ts_value2
  9.     ulong    ts_value3
  10.     label    ts_SIZEOF
  11.  
  12.     ; MAC Accumulator
  13.     move.l    ACC,d0
  14.     move.l    d0,ACC
  15.     move.l    #12345678,ACC
  16.  
  17.     ; MAC Mask
  18.     move.l    MASK,d0
  19.     move.l    d0,MASK
  20.     move.l    #12345678,MASK
  21.     
  22.     ; MAC SR
  23.     move.l    MACSR,d0
  24.     move.l    d0,MACSR
  25.     move.l    #12345678,MACSR
  26.     
  27.     ; Move MACSR to CCR
  28.     move.l    MACSR,CCR
  29.     
  30.     ; MAC
  31.     mac.w    d0,d1<<1
  32.     mac.l    d0,d1
  33.  
  34.     msac.w    d0,d1
  35.     msac.l    d0,d1
  36.  
  37.     mac.w    d0.u,d1.u>>1
  38.  
  39.     msac.w    d0,d1>>1
  40.     msac.w    d0,d1<<1
  41.  
  42.     macl.w    d0,d1,(a0),d2
  43.     macl.w    d0,d1,(a4),d6
  44.     macl.w    d0.u,d1.u<<1,(a0),d2
  45.     macl.w    d0.u,d1.u>>1,(a4),d6
  46.  
  47.     macl.l    d0,d1,(a0),d2
  48.  
  49.     ;
  50.     macl.w    d0,d1,(a2),d6
  51.     macl.w    d0,d1,(a2)+,d6
  52.     macl.w    d0,d1,-(a2),d6
  53.     macl.w    d0,d1,(10,a2),d6
  54.     macl.w    d0,d1<<1,(10,a2),d6
  55.  
  56.     macl.w    d0,d1,(a2)&,d6
  57.     macl.w    d0,d1,-(a2)&,d6
  58.     macl.w    d0,d1,(a2)+&,d6
  59.     macl.w    d0,d1,(8,a2)&,d6
  60.  
  61.     macl.w    d0,d1>>1,(a2)&,d6
  62.     macl.w    d0,d1>>1,-(a2)&,d6
  63.     macl.w    d0,d1>>1,(a2)+&,d6
  64.     macl.w    d0,d1>>1,(8,a2)&,d6
  65.  
  66.     move.l    #ts_value1,d0
  67.     move.l    #ts_value2,d0
  68.     move.l    #ts_value3,d0
  69.