equal
deleted
inserted
replaced
81 procedure RendererSetup(); |
81 procedure RendererSetup(); |
82 procedure RendererCleanup(); |
82 procedure RendererCleanup(); |
83 |
83 |
84 // TODO everything below this should not need a public interface |
84 // TODO everything below this should not need a public interface |
85 |
85 |
86 procedure CreateFramebuffer(var frame, depth, tex: GLuint); |
|
87 procedure DeleteFramebuffer(var frame, depth, tex: GLuint); |
|
88 |
|
89 procedure EnableTexture(enable:Boolean); |
86 procedure EnableTexture(enable:Boolean); |
90 |
87 |
91 procedure SetTexCoordPointer(p: Pointer;n: Integer); inline; |
88 procedure SetTexCoordPointer(p: Pointer;n: Integer); inline; |
92 procedure SetVertexPointer(p: Pointer;n: Integer); inline; |
89 procedure SetVertexPointer(p: Pointer;n: Integer); inline; |
93 procedure SetColorPointer(p: Pointer;n: Integer); inline; |
90 procedure SetColorPointer(p: Pointer;n: Integer); inline; |
131 |
128 |
132 {$IFDEF USE_S3D_RENDERING} |
129 {$IFDEF USE_S3D_RENDERING} |
133 // texture/vertex buffers for left/right/default eye modes |
130 // texture/vertex buffers for left/right/default eye modes |
134 texLRDtb, texLvb, texRvb: array [0..3] of TVertex2f; |
131 texLRDtb, texLvb, texRvb: array [0..3] of TVertex2f; |
135 {$ENDIF} |
132 {$ENDIF} |
|
133 |
|
134 procedure CreateFramebuffer(var frame, depth, tex: GLuint); forward; |
|
135 procedure DeleteFramebuffer(var frame, depth, tex: GLuint); forward; |
136 |
136 |
137 function isAreaOffscreen(X, Y, Width, Height: LongInt): boolean; inline; |
137 function isAreaOffscreen(X, Y, Width, Height: LongInt): boolean; inline; |
138 begin |
138 begin |
139 isAreaOffscreen:= (isDxAreaOffscreen(X, Width) <> 0) or (isDyAreaOffscreen(Y, Height) <> 0); |
139 isAreaOffscreen:= (isDxAreaOffscreen(X, Width) <> 0) or (isDyAreaOffscreen(Y, Height) <> 0); |
140 end; |
140 end; |