directxgraphics.pas.svn-base

这是一段游戏修改工具的源代码.ring3功能由dephi开发,驱动是C开发.希望对大家有帮助

       D3DSHADE_GOURAUD            = 2{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DSHADE_PHONG              = 3{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DSHADE_FORCE_DWORD        = $7fffffff{$IFNDEF NOENUMS}){$ENDIF}; (* force 32-bit size enum *)

type TD3DFillMode = {$IFNDEF NOENUMS}({$ELSE}LongWord;{$ENDIF}
{$IFDEF NOENUMS}const{$ENDIF}
       D3DFILL_POINT               = 1{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DFILL_WIREFRAME           = 2{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DFILL_SOLID               = 3{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DFILL_FORCE_DWORD         = $7fffffff{$IFNDEF NOENUMS}){$ENDIF}; (* force 32-bit size enum *)

type
  PD3DLinePattern = ^TD3DLinePattern;
  TD3DLinePattern = packed record
    wRepeatFactor : Word;
    wLinePattern  : Word;
  end;

type TD3DBlend = {$IFNDEF NOENUMS}({$ELSE}LongWord;{$ENDIF}
{$IFDEF NOENUMS}const{$ENDIF}
       D3DBLEND_ZERO               = 1{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLEND_ONE                = 2{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLEND_SRCCOLOR           = 3{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLEND_INVSRCCOLOR        = 4{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLEND_SRCALPHA           = 5{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLEND_INVSRCALPHA        = 6{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLEND_DESTALPHA          = 7{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLEND_INVDESTALPHA       = 8{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLEND_DESTCOLOR          = 9{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLEND_INVDESTCOLOR       = 10{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLEND_SRCALPHASAT        = 11{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLEND_BOTHSRCALPHA       = 12{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLEND_BOTHINVSRCALPHA    = 13{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLEND_FORCE_DWORD        = $7fffffff{$IFNDEF NOENUMS}){$ENDIF}; (* force 32-bit size enum *)

type TD3DBLendOp = {$IFNDEF NOENUMS}({$ELSE}LongWord;{$ENDIF}
{$IFDEF NOENUMS}const{$ENDIF}
       D3DBLENDOP_ADD              = 1{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLENDOP_SUBTRACT         = 2{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLENDOP_REVSUBTRACT      = 3{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLENDOP_MIN              = 4{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLENDOP_MAX              = 5{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DBLENDOP_FORCE_DWORD      = $7fffffff{$IFNDEF NOENUMS}){$ENDIF}; (* force 32-bit size enum *)

type TD3DTextureAddress = {$IFNDEF NOENUMS}({$ELSE}LongWord;{$ENDIF}
{$IFDEF NOENUMS}const{$ENDIF}
       D3DTADDRESS_WRAP            = 1{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DTADDRESS_MIRROR          = 2{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DTADDRESS_CLAMP           = 3{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DTADDRESS_BORDER          = 4{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DTADDRESS_MIRRORONCE      = 5{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DTADDRESS_FORCE_DWORD     = $7fffffff{$IFNDEF NOENUMS}){$ENDIF}; (* force 32-bit size enum *)

type TD3DCull = {$IFNDEF NOENUMS}({$ELSE}LongWord;{$ENDIF}
{$IFDEF NOENUMS}const{$ENDIF}
       D3DCULL_NONE                = 1{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DCULL_CW                  = 2{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DCULL_CCW                 = 3{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DCULL_FORCE_DWORD         = $7fffffff{$IFNDEF NOENUMS}){$ENDIF}; (* force 32-bit size enum *)

type TD3DCmpFunc = {$IFNDEF NOENUMS}({$ELSE}LongWord;{$ENDIF}
{$IFDEF NOENUMS}const{$ENDIF}
       D3DCMP_NEVER                = 1{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DCMP_LESS                 = 2{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DCMP_EQUAL                = 3{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DCMP_LESSEQUAL            = 4{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DCMP_GREATER              = 5{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DCMP_NOTEQUAL             = 6{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DCMP_GREATEREQUAL         = 7{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DCMP_ALWAYS               = 8{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DCMP_FORCE_DWORD          = $7fffffff{$IFNDEF NOENUMS}){$ENDIF}; (* force 32-bit size enum *)

type TD3DStencilOp = {$IFNDEF NOENUMS}({$ELSE}LongWord;{$ENDIF}
{$IFDEF NOENUMS}const{$ENDIF}
       D3DSTENCILOP_KEEP           = 1{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DSTENCILOP_ZERO           = 2{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DSTENCILOP_REPLACE        = 3{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DSTENCILOP_INCRSAT        = 4{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DSTENCILOP_DECRSAT        = 5{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DSTENCILOP_INVERT         = 6{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DSTENCILOP_INCR           = 7{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DSTENCILOP_DECR           = 8{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DSTENCILOP_FORCE_DWORD    = $7fffffff{$IFNDEF NOENUMS}){$ENDIF}; (* force 32-bit size enum *)

type TD3DFogMode = {$IFNDEF NOENUMS}({$ELSE}LongWord;{$ENDIF}
{$IFDEF NOENUMS}const{$ENDIF}
       D3DFOG_NONE                 = 0{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DFOG_EXP                  = 1{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DFOG_EXP2                 = 2{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DFOG_LINEAR               = 3{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DFOG_FORCE_DWORD          = $7fffffff{$IFNDEF NOENUMS}){$ENDIF}; (* force 32-bit size enum *)

type TD3DZBufferType = {$IFNDEF NOENUMS}({$ELSE}LongWord;{$ENDIF}
{$IFDEF NOENUMS}const{$ENDIF}
       D3DZB_FALSE                 = 0{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DZB_TRUE                  = 1{$IFNDEF NOENUMS},{$ELSE};{$ENDIF} // Z buffering
       D3DZB_USEW                  = 2{$IFNDEF NOENUMS},{$ELSE};{$ENDIF} // W buffering
       D3DZB_FORCE_DWORD           = $7fffffff{$IFNDEF NOENUMS}){$ENDIF}; (* force 32-bit size enum *)

// Primitives supported by draw-primitive API
type TD3DPrimitiveType = {$IFNDEF NOENUMS}({$ELSE}LongWord;{$ENDIF}
{$IFDEF NOENUMS}const{$ENDIF}
       D3DPT_POINTLIST             = 1{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DPT_LINELIST              = 2{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DPT_LINESTRIP             = 3{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DPT_TRIANGLELIST          = 4{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DPT_TRIANGLESTRIP         = 5{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DPT_TRIANGLEFAN           = 6{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DPT_FORCE_DWORD           = $7fffffff{$IFNDEF NOENUMS}){$ENDIF}; (* force 32-bit size enum *)

type TD3DTransformStateType = {$IFNDEF NOENUMS}({$ELSE}LongWord;{$ENDIF}
{$IFDEF NOENUMS}const{$ENDIF}
       D3DTS_VIEW          = 2{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DTS_PROJECTION    = 3{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DTS_TEXTURE0      = 16{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DTS_TEXTURE1      = 17{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DTS_TEXTURE2      = 18{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DTS_TEXTURE3      = 19{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DTS_TEXTURE4      = 20{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DTS_TEXTURE5      = 21{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DTS_TEXTURE6      = 22{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DTS_TEXTURE7      = 23{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}

       D3DTS_WORLD         = 0 + 256{$IFNDEF NOENUMS},{$ELSE};{$ENDIF} // D3DTS_WORLDMATRIX(0)
       D3DTS_WORLD1        = 1 + 256{$IFNDEF NOENUMS},{$ELSE};{$ENDIF} // D3DTS_WORLDMATRIX(1)
       D3DTS_WORLD2        = 2 + 256{$IFNDEF NOENUMS},{$ELSE};{$ENDIF} // D3DTS_WORLDMATRIX(2)
       D3DTS_WORLD3        = 3 + 256{$IFNDEF NOENUMS},{$ELSE};{$ENDIF} // D3DTS_WORLDMATRIX(3)

       D3DTS_FORCE_DWORD   = $7fffffff{$IFNDEF NOENUMS}){$ENDIF}; (* force 32-bit size enum *)

function D3DTS_WORLDMATRIX(index : LongWord) : TD3DTransformStateType; // (D3DTRANSFORMSTATETYPE)(index + 256)

type TD3DRenderStateType = {$IFNDEF NOENUMS}({$ELSE}LongWord;{$ENDIF}
{$IFDEF NOENUMS}const{$ENDIF}
       D3DRS_ZENABLE                   = 7{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}    (* D3DZBUFFERTYPE (or TRUE/FALSE for legacy) *)
       D3DRS_FILLMODE                  = 8{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}    (* D3DFILL_MODE        *)
       D3DRS_SHADEMODE                 = 9{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}    (* D3DSHADEMODE *)
       D3DRS_LINEPATTERN               = 10{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* D3DLINEPATTERN *)
       D3DRS_ZWRITEENABLE              = 14{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* TRUE to enable z writes *)
       D3DRS_ALPHATESTENABLE           = 15{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* TRUE to enable alpha tests *)
       D3DRS_LASTPIXEL                 = 16{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* TRUE for last-pixel on lines *)
       D3DRS_SRCBLEND                  = 19{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* D3DBLEND *)
       D3DRS_DESTBLEND                 = 20{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* D3DBLEND *)
       D3DRS_CULLMODE                  = 22{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* D3DCULL *)
       D3DRS_ZFUNC                     = 23{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* D3DCMPFUNC *)
       D3DRS_ALPHAREF                  = 24{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* D3DFIXED *)
       D3DRS_ALPHAFUNC                 = 25{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* D3DCMPFUNC *)
       D3DRS_DITHERENABLE              = 26{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* TRUE to enable dithering *)
       D3DRS_ALPHABLENDENABLE          = 27{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* TRUE to enable alpha blending *)
       D3DRS_FOGENABLE                 = 28{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* TRUE to enable fog blending *)
       D3DRS_SPECULARENABLE            = 29{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* TRUE to enable specular *)
       D3DRS_ZVISIBLE                  = 30{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* TRUE to enable z checking *)
       D3DRS_FOGCOLOR                  = 34{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* D3DCOLOR *)
       D3DRS_FOGTABLEMODE              = 35{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* D3DFOGMODE *)
       D3DRS_FOGSTART                  = 36{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* Fog start (for both vertex and pixel fog) *)
       D3DRS_FOGEND                    = 37{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* Fog end      *)
       D3DRS_FOGDENSITY                = 38{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* Fog density  *)
       D3DRS_EDGEANTIALIAS             = 40{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* TRUE to enable edge antialiasing *)
       D3DRS_ZBIAS                     = 47{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* LONG Z bias *)
       D3DRS_RANGEFOGENABLE            = 48{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* Enables range-based fog *)
       D3DRS_STENCILENABLE             = 52{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* BOOL enable/disable stenciling *)
       D3DRS_STENCILFAIL               = 53{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* D3DSTENCILOP to do if stencil test fails *)
       D3DRS_STENCILZFAIL              = 54{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* D3DSTENCILOP to do if stencil test passes and Z test fails *)
       D3DRS_STENCILPASS               = 55{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* D3DSTENCILOP to do if both stencil and Z tests pass *)
       D3DRS_STENCILFUNC               = 56{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* D3DCMPFUNC fn.  Stencil Test passes if ((ref & mask) stencilfn (stencil & mask)) is true *)
       D3DRS_STENCILREF                = 57{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* Reference value used in stencil test *)
       D3DRS_STENCILMASK               = 58{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* Mask value used in stencil test *)
       D3DRS_STENCILWRITEMASK          = 59{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* Write mask applied to values written to stencil buffer *)
       D3DRS_TEXTUREFACTOR             = 60{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}   (* D3DCOLOR used for multi-texture blend *)
       D3DRS_WRAP0                     = 128{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* wrap for 1st texture coord. set *)
       D3DRS_WRAP1                     = 129{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* wrap for 2nd texture coord. set *)
       D3DRS_WRAP2                     = 130{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* wrap for 3rd texture coord. set *)
       D3DRS_WRAP3                     = 131{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* wrap for 4th texture coord. set *)
       D3DRS_WRAP4                     = 132{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* wrap for 5th texture coord. set *)
       D3DRS_WRAP5                     = 133{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* wrap for 6th texture coord. set *)
       D3DRS_WRAP6                     = 134{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* wrap for 7th texture coord. set *)
       D3DRS_WRAP7                     = 135{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* wrap for 8th texture coord. set *)
       D3DRS_CLIPPING                  = 136{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DRS_LIGHTING                  = 137{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DRS_AMBIENT                   = 139{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DRS_FOGVERTEXMODE             = 140{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DRS_COLORVERTEX               = 141{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DRS_LOCALVIEWER               = 142{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DRS_NORMALIZENORMALS          = 143{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DRS_DIFFUSEMATERIALSOURCE     = 145{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DRS_SPECULARMATERIALSOURCE    = 146{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DRS_AMBIENTMATERIALSOURCE     = 147{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DRS_EMISSIVEMATERIALSOURCE    = 148{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DRS_VERTEXBLEND               = 151{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DRS_CLIPPLANEENABLE           = 152{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DRS_SOFTWAREVERTEXPROCESSING  = 153{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DRS_POINTSIZE                 = 154{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* float point size *)
       D3DRS_POINTSIZE_MIN             = 155{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* float point size min threshold *)
       D3DRS_POINTSPRITEENABLE         = 156{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* BOOL point texture coord control *)
       D3DRS_POINTSCALEENABLE          = 157{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* BOOL point size scale enable *)
       D3DRS_POINTSCALE_A              = 158{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* float point attenuation A value *)
       D3DRS_POINTSCALE_B              = 159{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* float point attenuation B value *)
       D3DRS_POINTSCALE_C              = 160{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* float point attenuation C value *)
       D3DRS_MULTISAMPLEANTIALIAS      = 161{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  // BOOL - set to do FSAA with multisample buffer *)
       D3DRS_MULTISAMPLEMASK           = 162{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  // DWORD - per-sample enable/disable
       D3DRS_PATCHEDGESTYLE            = 163{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  // Sets whether patch edges will use float style tessellation
       D3DRS_PATCHSEGMENTS             = 164{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  // Number of segments per edge when drawing patches
       D3DRS_DEBUGMONITORTOKEN         = 165{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  // DEBUG ONLY - token to debug monitor
       D3DRS_POINTSIZE_MAX             = 166{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  (* float point size max threshold *)
       D3DRS_INDEXEDVERTEXBLENDENABLE  = 167{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}
       D3DRS_COLORWRITEENABLE          = 168{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  // per-channel write enable
       D3DRS_TWEENFACTOR               = 170{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  // float tween factor
       D3DRS_BLENDOP                   = 171{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  // D3DBLENDOP setting
{$IFNDEF DX8}
       D3DRS_POSITIONORDER             = 172{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  // NPatch position interpolation order. D3DORDER_LINEAR or D3DORDER_CUBIC (default)
       D3DRS_NORMALORDER               = 173{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}  // NPatch normal interpolation order. D3DORDER_LINEAR (default) or D3DORDER_QUADRATIC
{$ENDIF}
       D3DRS_FORCE_DWORD               = $7fffffff{$IFNDEF NOENUMS}){$ENDIF}; (* force 32-bit size enum *)

// Values for material source
type TD3DMaterialColorSource = {$IFNDEF NOENUMS}({$ELSE}LongWord;{$ENDIF}
{$IFDEF NOENUMS}const{$ENDIF}
       D3DMCS_MATERIAL         = 0{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}    // Color from material is used
       D3DMCS_COLOR1           = 1{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}    // Diffuse vertex color is used
       D3DMCS_COLOR2           = 2{$IFNDEF NOENUMS},{$ELSE};{$ENDIF}    // Specular vertex color is used
       D3DMCS_FORCE_DWORD      = $7fffffff{$IFNDEF NOENUMS}){$ENDIF};   // force 32-bit size enum


const
// Bias to apply to the texture coordinate set to apply a wrap to.
  D3DRENDERSTATE_WRAPBIAS  = 128;

(* Flags to construct the WRAP render states *)
  D3DWRAP_U = $00000001;
  D3DWRAP_V = $00000002;
  D3DWRAP_W = $00000004;

(* Flags to construct the WRAP render states for 1D thru 4D texture coordinates *)
  D3DWRAPCOORD_0  = $00000001;    // same as D3DWRAP_U
  D3DWRAPCOORD_1  = $00000002;    // same as D3DWRAP_V
  D3DWRAPCOORD_2  = $00000004;    // same as D3DWRAP_W
  D3DWRAPCOORD_3  = $00000008;

(* Flags to construct D3DRS_COLORWRITEENABLE *)
  D3DCOLORWRITEENABLE_RED   = 1;  // (1L<<0)
  D3DCOLORWRITEENABLE_GREEN = 2;  // (1L<<1)
  D3DCOLORWRITEENABLE_BLUE  = 4;  // (1L<<2)
  D3DCOLORWRITEENABLE_ALPHA = 8;  // (1L<<3)

(*
 * State enumerants for per-stage texture processing.
 *)