home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 4: Demo 1 / almathera_demo1.bin / sourcecode / dexion / put_block.s < prev    next >
Text File  |  1995-03-17  |  596b  |  33 lines
  1.  
  2. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  3. ; a0    Source           ;
  4. ; a1    Destination       ;
  5. ; a2    Source size       ;
  6. ; a3     Destination size   ;
  7. ;                ;
  8. ; d1    Source        Modulo ;
  9. ; d2     Destination Modulo ;
  10. ; d3    Højde           ;    
  11. ; d4    Brede           ;    
  12. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  13.  
  14. put_block:
  15.     mulu    #64,d3
  16.     add.w    d3,d4
  17. put_block_:
  18.     btst    #14,$dff002
  19.     bne    put_block_
  20.     move.l    a0,$dff050    ;bltapth
  21.     move.l    a1,$dff054    ;bltdpth
  22.     move.w    d1,$dff064    ;bltamod
  23.     move.w    d2,$dff066    ;bltdmod
  24.     move.w    #$0000,$dff042    ;bltcon1
  25.     move.w    #$09f0,$dff040    ;bltcon0
  26.     move.w    d4,$dff058    ;bltsize
  27.     add.w    a2,a0
  28.     add.w    a3,a1
  29.     sub.b    #1,d0
  30.     bne    put_block_
  31.     rts
  32.  
  33.