equal
deleted
inserted
replaced
71 procedure SetVertexPointer(p: Pointer;n: Integer); |
71 procedure SetVertexPointer(p: Pointer;n: Integer); |
72 procedure SetColorPointer(p: Pointer;n: Integer); |
72 procedure SetColorPointer(p: Pointer;n: Integer); |
73 |
73 |
74 procedure updateViewLimits(); |
74 procedure updateViewLimits(); |
75 |
75 |
|
76 {$IFDEF GL2} |
|
77 var |
|
78 shaderMain: GLuint; |
|
79 shaderWater: GLuint; |
|
80 {$ENDIF} |
|
81 |
76 implementation |
82 implementation |
77 uses uMisc, uConsole, uVariables, uUtils, uTextures, uRender, uRenderUtils, |
83 uses uMisc, uConsole, uVariables, uUtils, uTextures, uRender, uRenderUtils, |
78 uCommands, uPhysFSLayer, uDebug |
84 uCommands, uPhysFSLayer, uDebug |
79 {$IFDEF GL2}, uMatrix{$ENDIF} |
85 {$IFDEF GL2}, uMatrix{$ENDIF} |
80 {$IFDEF USE_CONTEXT_RESTORE}, uWorld{$ENDIF} |
86 {$IFDEF USE_CONTEXT_RESTORE}, uWorld{$ENDIF} |
88 SDLPrimSurface: PSDL_Surface; |
94 SDLPrimSurface: PSDL_Surface; |
89 {$ENDIF} |
95 {$ENDIF} |
90 squaresize : LongInt; |
96 squaresize : LongInt; |
91 numsquares : LongInt; |
97 numsquares : LongInt; |
92 ProgrTex: PTexture; |
98 ProgrTex: PTexture; |
93 |
|
94 {$IFDEF GL2} |
|
95 shaderMain: GLuint; |
|
96 shaderWater: GLuint; |
|
97 |
|
98 // attributes |
|
99 {$ENDIF} |
|
100 |
99 |
101 prevHat: shortstring; |
100 prevHat: shortstring; |
102 tmpHatSurf: PSDL_Surface; |
101 tmpHatSurf: PSDL_Surface; |
103 |
102 |
104 const |
103 const |