home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 113 / EnigmaAmiga113CD.iso / software / sviluppo / quake_src / r_miscppc.s < prev    next >
Text File  |  2000-06-17  |  2KB  |  80 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. ## Quake for AMIGA
  22. ##
  23. ## d_miscPPC.s
  24. ##
  25. ## Define WOS for PowerOpen ABI, otherwise SVR4-ABI is used.
  26. ##
  27.  
  28. .set NOLR,1
  29. .include        "macrosPPC.i"
  30.  
  31. #
  32. # external references
  33. #
  34.  
  35.     xrefa    vright
  36.     xrefa    vup
  37.     xrefa    vpn
  38.  
  39.  
  40.  
  41.  
  42. ###########################################################################
  43. #
  44. #       void TransformVector (vec3_t in, vec3_t out)
  45. #
  46. ###########################################################################
  47.  
  48.     funcdef    TransformVector
  49.  
  50.     lxa     r5,vright
  51.     lfs     f1,0(r3)
  52.     lfs     f4,0(r5)
  53.     fmuls   f0,f1,f4
  54.     lfs     f2,4(r3)
  55.     lfs     f5,4(r5)
  56.     fmadds  f0,f2,f5,f0
  57.     lfs     f3,8(r3)
  58.     lfs     f6,8(r5)
  59.     fmadds  f0,f3,f6,f0
  60.     stfs    f0,0(r4)
  61.     lxa     r5,vup
  62.     lfs     f4,0(r5)
  63.     fmuls   f0,f1,f4
  64.     lfs     f5,4(r5)
  65.     fmadds  f0,f2,f5,f0
  66.     lfs     f6,8(r5)
  67.     fmadds  f0,f3,f6,f0
  68.     stfs    f0,4(r4)
  69.     lxa     r5,vpn
  70.     lfs     f4,0(r5)
  71.     fmuls   f0,f1,f4
  72.     lfs     f5,4(r5)
  73.     fmadds  f0,f2,f5,f0
  74.     lfs     f6,8(r5)
  75.     fmadds  f0,f3,f6,f0
  76.     stfs    f0,8(r4)
  77.     blr
  78.  
  79.     funcend    TransformVector
  80.