home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 113 / EnigmaAmiga113CD.iso / software / sviluppo / quake_src / vid_turboupd68k.s < prev    next >
Text File  |  2000-06-17  |  2KB  |  95 lines
  1. * 
  2. * Copyright (C) 1996-1997 Id Software, Inc. 
  3. * 
  4. * This program is free software; you can redistribute it and/or 
  5. * modify it under the terms of the GNU General Public License 
  6. * as published by the Free Software Foundation; either version 2 
  7. * of the License, or (at your option) any later version. 
  8. * 
  9. * This program is distributed in the hope that it will be useful, 
  10. * but WITHOUT ANY WARRANTY; without even the implied warranty of 
  11. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.   
  12. * 
  13. * See the GNU General Public License for more details. 
  14. * 
  15. * You should have received a copy of the GNU General Public License 
  16. * along with this program; if not, write to the Free Software 
  17. * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA. 
  18. * 
  19.  
  20. **
  21. ** vid_turboupd68k.s
  22. **
  23. ** turbo video buffer update for Quake-Amiga68k (68040/060 only!)
  24. **
  25. ** Written by Frank Wille <frank@phoenix.owl.de>
  26. **
  27.  
  28.     code
  29.  
  30.     xdef    _TurboUpdate68k
  31.     xdef    _ChunkyCopy68k
  32.  
  33.  
  34.     cnop    0,4
  35. _ChunkyCopy68k:
  36. ; 4(sp) = ModeScreen
  37. ; 8(sp) = gfxaddr
  38. ; 12(sp) = vid_buffer
  39. ; rest is irrelevant
  40.  
  41.     movem.l    d2-d4,-(sp)
  42.     move.l    12+4(sp),a0
  43.     moveq    #0,d1
  44.     move.l    8(a0),d4    ; ms.bpr
  45.     moveq    #0,d0
  46.     move.l    544(a0),d2    ; ms.SCREENWIDTH
  47.     mulu    d4,d1
  48.     move.l    548(a0),d3    ; ms.SCREENHEIGHT
  49.     sub.l    d2,d4
  50.     move.l    12+8(sp),a1
  51.     lsr.l    #6,d2
  52.     move.l    12+12(sp),a0
  53.     add.l    d0,a1
  54.     add.l    d1,a1
  55. 1$:    move.l    d2,d0
  56. 2$:    move16    (a0)+,(a1)+
  57.     move16    (a0)+,(a1)+
  58.     move16    (a0)+,(a1)+
  59.     move16    (a0)+,(a1)+
  60.     subq.l    #1,d0
  61.     bne.b    2$
  62.     add.l    d4,a1
  63.     subq.l    #1,d3
  64.     bne.b    1$
  65.     movem.l    (sp)+,d2-d4
  66.     rts
  67.  
  68.  
  69.     cnop    0,4
  70. _TurboUpdate68k:
  71. ; a0 = vid_buffer
  72. ; a1 = gfxaddr
  73. ; d4 = bytesperrow
  74. ; d0 = x
  75. ; d1 = y
  76. ; d2 = width
  77. ; d3 = height
  78.  
  79.     mulu    d4,d1
  80.     add.l    d0,a1
  81.     sub.l    d2,d4
  82.     add.l    d1,a1
  83.     lsr.l    #6,d2
  84. 1$:    move.l    d2,d0
  85. 2$:    move16    (a0)+,(a1)+
  86.     move16    (a0)+,(a1)+
  87.     move16    (a0)+,(a1)+
  88.     move16    (a0)+,(a1)+
  89.     subq.l    #1,d0
  90.     bne.b    2$
  91.     add.l    d4,a1
  92.     subq.l    #1,d3
  93.     bne.b    1$
  94.     rts
  95.