equal
deleted
inserted
replaced
25 |
25 |
26 procedure initModule; |
26 procedure initModule; |
27 procedure freeModule; |
27 procedure freeModule; |
28 |
28 |
29 procedure InitWorld; |
29 procedure InitWorld; |
|
30 procedure ResetWorldTex; |
|
31 |
30 procedure DrawWorld(Lag: LongInt); |
32 procedure DrawWorld(Lag: LongInt); |
31 procedure DrawWorldStereo(Lag: LongInt; RM: TRenderMode); |
33 procedure DrawWorldStereo(Lag: LongInt; RM: TRenderMode); |
32 procedure ShowMission(caption, subcaption, text: ansistring; icon, time : LongInt); |
34 procedure ShowMission(caption, subcaption, text: ansistring; icon, time : LongInt); |
33 procedure HideMission; |
35 procedure HideMission; |
34 procedure ShakeCamera(amount: LongInt); |
36 procedure ShakeCamera(amount: LongInt); |
208 end; |
210 end; |
209 |
211 |
210 procedure InitCameraBorders; |
212 procedure InitCameraBorders; |
211 begin |
213 begin |
212 cGearScrEdgesDist:= min(2 * cScreenHeight div 5, 2 * cScreenWidth div 5); |
214 cGearScrEdgesDist:= min(2 * cScreenHeight div 5, 2 * cScreenWidth div 5); |
|
215 end; |
|
216 |
|
217 // for uStore texture resetting |
|
218 procedure ResetWorldTex; |
|
219 begin |
|
220 FreeTexture(fpsTexture); |
|
221 fpsTexture:= nil; |
|
222 FreeTexture(timeTexture); |
|
223 timeTexture:= nil; |
|
224 FreeTexture(missionTex); |
|
225 missionTex:= nil; |
213 end; |
226 end; |
214 |
227 |
215 procedure ShowAmmoMenu; |
228 procedure ShowAmmoMenu; |
216 const MENUSPEED = 15; |
229 const MENUSPEED = 15; |
217 const BORDERSIZE = 2; |
230 const BORDERSIZE = 2; |