source: trunk/Packages/bgrabitmap/lineartexscan2.inc

      {$IFDEF PARAM_USESSE} {$asmmode intel}
      asm
         xorps xmm4,xmm4
         xorps xmm5,xmm5
         movlps xmm4, texPos
         movlps xmm5, texStep
         {$IFNDEF PARAM_USEINTERPOLATION}
           {$IFDEF PARAM_USESSE2}
           cvtps2dq xmm3,xmm4
           movlps intTexPos,xmm3
           {$ENDIF}
         {$ENDIF}
      end;
      {$ENDIF}

      for i := ix1 to ix2 do
      begin
        DrawPixelInlineWithAlphaCheck(pdest,
          {$IFDEF PARAM_USELIGHTING} ApplyLightnessFast( {$ENDIF}
          {$IFDEF PARAM_USEINTERPOLATION}
            scanAtFunc(texPos.x,texPos.y)
          {$ELSE}
            {$IFDEF PARAM_USESSE2}
              scanAtIntegerFunc(intTexPos.x,intTexPos.y)
            {$ELSE}
              scanAtIntegerFunc(round(texPos.x),round(texPos.y))
            {$ENDIF}
          {$ENDIF}
          {$IFDEF PARAM_USELIGHTING} ,light) {$ENDIF}
          );
        {$IFDEF PARAM_USESSE}
        asm
           addps xmm4,xmm5
           {$IFNDEF PARAM_USEINTERPOLATION}
             {$IFDEF PARAM_USESSE2}
             cvtps2dq xmm3,xmm4
             movlps intTexPos,xmm3
             {$ELSE}
             movlps texPos,xmm4
             {$ENDIF}
           {$ELSE}
             movlps texPos,xmm4
           {$ENDIF}
        end;
        {$ELSE}
          texPos += texStep;
        {$ENDIF}

        {$IFDEF PARAM_USELIGHTING}
          NextLight;
        {$ENDIF}
        inc(pdest);
      end;