home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 113 / EnigmaAmiga113CD.iso / software / sviluppo / quake_src / r_surfppc.s < prev    next >
Encoding:
Text File  |  2000-06-17  |  6.8 KB  |  316 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. ## r_surfPPC.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.     xrefv    pbasesource
  36.     xrefv    prowdestbase
  37.     xrefv    r_lightptr
  38.     xrefv    r_lightwidth
  39.     xrefv    r_numvblocks
  40.     xrefv    r_sourcemax
  41.     xrefv    r_stepback
  42.     xrefv    sourcetstep
  43.     xrefv    surfrowbytes
  44.     xrefa    vid
  45.  
  46. .set    VID_COLORMAP,4
  47.  
  48.  
  49.  
  50.  
  51. ###########################################################################
  52. #
  53. #       void R_DrawSurfaceBlock8_mip0
  54. #
  55. ###########################################################################
  56.  
  57.     funcdef    R_DrawSurfaceBlock8_mip0
  58.  
  59.     init    0,0,7,0
  60.     stmw    r25,gb(r1)
  61.  
  62.     lxa     r11,vid
  63.     lw      r3,pbasesource
  64.     lw      r4,prowdestbase
  65.     lw      r5,r_lightptr
  66.     lwz     r11,VID_COLORMAP(r11)
  67.     lw      r31,r_numvblocks
  68.     lw      r28,sourcetstep
  69.     lw      r27,surfrowbytes
  70.     lw      r26,r_sourcemax
  71.     lw      r25,r_stepback
  72.     lw      r8,r_lightwidth
  73.     slwi    r8,r8,2
  74. .m0loop:
  75.     li      r0,16
  76.     lwz     r6,0(r5)                #r6 = lightleft
  77.     lwz     r7,4(r5)                #r7 = lightright
  78.     add     r5,r5,r8
  79.     lwz     r9,0(r5)
  80.     lwz     r10,4(r5)
  81.     subf    r9,r6,r9
  82.     subf    r10,r7,r10
  83.     srawi   r9,r9,4                 #r9 = lightleftstep
  84.     srawi   r10,r10,4               #r10 = lightrightstep
  85.     mtctr   r0
  86. .m0loop2:
  87.     li      r0,15
  88.     subf    r12,r7,r6
  89.     srawi   r12,r12,4               #r12 = lightstep
  90.     mr      r30,r7                  #r30 = light
  91. .m0loop3:
  92.     lbzx    r29,r3,r0               #r29 = pix
  93.     rlwimi  r29,r30,0,16,23
  94.     lbzx    r29,r11,r29
  95.     stbx    r29,r4,r0
  96.     subic.  r0,r0,1
  97.     add     r30,r30,r12
  98.     bge     .m0loop3
  99.     add     r3,r3,r28
  100.     add     r6,r6,r9
  101.     add     r7,r7,r10
  102.     add     r4,r4,r27
  103.     bdnz    .m0loop2
  104.     cmpw    r3,r26
  105.     blt     .m0next
  106.     sub     r3,r3,r25
  107. .m0next:
  108.     subic.  r31,r31,1
  109.     bne     .m0loop
  110.     lmw    r25,gb(r1)
  111.     exit
  112.  
  113.     funcend    R_DrawSurfaceBlock8_mip0
  114.  
  115.  
  116.  
  117.  
  118. ###########################################################################
  119. #
  120. #       void R_DrawSurfaceBlock8_mip1
  121. #
  122. ###########################################################################
  123.  
  124.     funcdef    R_DrawSurfaceBlock8_mip1
  125.  
  126.     init    0,0,7,0
  127.     stmw    r25,gb(r1)
  128.  
  129.     lxa     r11,vid
  130.     lw      r3,pbasesource
  131.     lw      r4,prowdestbase
  132.     lw      r5,r_lightptr
  133.     lwz     r11,VID_COLORMAP(r11)
  134.     lw      r31,r_numvblocks
  135.     lw      r28,sourcetstep
  136.     lw      r27,surfrowbytes
  137.     lw      r26,r_sourcemax
  138.     lw      r25,r_stepback
  139.     lw      r8,r_lightwidth
  140.     slwi    r8,r8,2
  141. .m1loop:
  142.     li      r0,8
  143.     lwz     r6,0(r5)                #r6 = lightleft
  144.     lwz     r7,4(r5)                #r7 = lightright
  145.     add     r5,r5,r8
  146.     lwz     r9,0(r5)
  147.     lwz     r10,4(r5)
  148.     subf    r9,r6,r9
  149.     subf    r10,r7,r10
  150.     srawi   r9,r9,3                 #r9 = lightleftstep
  151.     srawi   r10,r10,3               #r10 = lightrightstep
  152.     mtctr   r0
  153. .m1loop2:
  154.     li      r0,7
  155.     subf    r12,r7,r6
  156.     srawi   r12,r12,3               #r12 = lightstep
  157.     mr      r30,r7                  #r30 = light
  158. .m1loop3:
  159.     lbzx    r29,r3,r0               #r29 = pix
  160.     rlwimi  r29,r30,0,16,23
  161.     lbzx    r29,r11,r29
  162.     stbx    r29,r4,r0
  163.     subic.  r0,r0,1
  164.     add     r30,r30,r12
  165.     bge     .m1loop3
  166.     add     r3,r3,r28
  167.     add     r6,r6,r9
  168.     add     r7,r7,r10
  169.     add     r4,r4,r27
  170.     bdnz    .m1loop2
  171.     cmpw    r3,r26
  172.     blt     .m1next
  173.     sub     r3,r3,r25
  174. .m1next:
  175.     subic.  r31,r31,1
  176.     bne     .m1loop
  177.     lmw    r25,gb(r1)
  178.     exit
  179.  
  180.     funcend    R_DrawSurfaceBlock8_mip1
  181.  
  182.  
  183.  
  184.  
  185. ###########################################################################
  186. #
  187. #       void R_DrawSurfaceBlock8_mip2
  188. #
  189. ###########################################################################
  190.  
  191.     funcdef    R_DrawSurfaceBlock8_mip2
  192.  
  193.     init    0,0,7,0
  194.     stmw    r25,gb(r1)
  195.  
  196.     lxa     r11,vid
  197.     lw      r3,pbasesource
  198.     lw      r4,prowdestbase
  199.     lw      r5,r_lightptr
  200.     lwz     r11,VID_COLORMAP(r11)
  201.     lw      r31,r_numvblocks
  202.     lw      r28,sourcetstep
  203.     lw      r27,surfrowbytes
  204.     lw      r26,r_sourcemax
  205.     lw      r25,r_stepback
  206.     lw      r8,r_lightwidth
  207.     slwi    r8,r8,2
  208. .m2loop:
  209.     li      r0,4
  210.     lwz     r6,0(r5)                #r6 = lightleft
  211.     lwz     r7,4(r5)                #r7 = lightright
  212.     add     r5,r5,r8
  213.     lwz     r9,0(r5)
  214.     lwz     r10,4(r5)
  215.     subf    r9,r6,r9
  216.     subf    r10,r7,r10
  217.     srawi   r9,r9,2                 #r9 = lightleftstep
  218.     srawi   r10,r10,2               #r10 = lightrightstep
  219.     mtctr   r0
  220. .m2loop2:
  221.     li      r0,3
  222.     subf    r12,r7,r6
  223.     srawi   r12,r12,2               #r12 = lightstep
  224.     mr      r30,r7                  #r30 = light
  225. .m2loop3:
  226.     lbzx    r29,r3,r0               #r29 = pix
  227.     rlwimi  r29,r30,0,16,23
  228.     lbzx    r29,r11,r29
  229.     stbx    r29,r4,r0
  230.     subic.  r0,r0,1
  231.     add     r30,r30,r12
  232.     bge     .m2loop3
  233.     add     r3,r3,r28
  234.     add     r6,r6,r9
  235.     add     r7,r7,r10
  236.     add     r4,r4,r27
  237.     bdnz    .m2loop2
  238.     cmpw    r3,r26
  239.     blt     .m2next
  240.     sub     r3,r3,r25
  241. .m2next:
  242.     subic.  r31,r31,1
  243.     bne     .m2loop
  244.     lmw    r25,gb(r1)
  245.     exit
  246.  
  247.     funcend    R_DrawSurfaceBlock8_mip2
  248.  
  249.  
  250.  
  251.  
  252. ###########################################################################
  253. #
  254. #       void R_DrawSurfaceBlock8_mip3
  255. #
  256. ###########################################################################
  257.  
  258.     funcdef    R_DrawSurfaceBlock8_mip3
  259.  
  260.     init    0,0,7,0
  261.     stmw    r25,gb(r1)
  262.  
  263.     lxa     r11,vid
  264.     lw      r3,pbasesource
  265.     lw      r4,prowdestbase
  266.     lw      r5,r_lightptr
  267.     lwz     r11,VID_COLORMAP(r11)
  268.     lw      r31,r_numvblocks
  269.     lw      r28,sourcetstep
  270.     lw      r27,surfrowbytes
  271.     lw      r26,r_sourcemax
  272.     lw      r25,r_stepback
  273.     lw      r8,r_lightwidth
  274.     slwi    r8,r8,2
  275. .m3loop:
  276.     li      r0,2
  277.     lwz     r6,0(r5)                #r6 = lightleft
  278.     lwz     r7,4(r5)                #r7 = lightright
  279.     add     r5,r5,r8
  280.     lwz     r9,0(r5)
  281.     lwz     r10,4(r5)
  282.     subf    r9,r6,r9
  283.     subf    r10,r7,r10
  284.     srawi   r9,r9,1                 #r9 = lightleftstep
  285.     srawi   r10,r10,1               #r10 = lightrighctstep
  286.     mtctr   r0
  287. .m3loop2:
  288.     subf    r12,r7,r6
  289.     srawi   r12,r12,1               #r12 = lightstep
  290.  
  291.     lbz     r29,1(r3)               #r29 = pix
  292.     rlwimi  r29,r7,0,16,23
  293.     lbzx    r29,r11,r29
  294.     stb     r29,1(r4)
  295.     add     r30,r7,r12
  296.     lbz     r29,0(r3)               #r29 = pix
  297.     rlwimi  r29,r30,0,16,23
  298.     lbzx    r29,r11,r29
  299.     stb     r29,0(r4)
  300.  
  301.     add     r3,r3,r28
  302.     add     r6,r6,r9
  303.     add     r7,r7,r10
  304.     add     r4,r4,r27
  305.     bdnz    .m3loop2
  306.     cmpw    r3,r26
  307.     blt     .m3next
  308.     sub     r3,r3,r25
  309. .m3next:
  310.     subic.  r31,r31,1
  311.     bne     .m3loop
  312.     lmw    r25,gb(r1)
  313.     exit
  314.  
  315.     funcend    R_DrawSurfaceBlock8_mip3
  316.