equal
deleted
inserted
replaced
19 {$INCLUDE "options.inc"} |
19 {$INCLUDE "options.inc"} |
20 |
20 |
21 unit uVariables; |
21 unit uVariables; |
22 interface |
22 interface |
23 |
23 |
24 uses SDLh, uTypes, uFloat, GLunit, uConsts, Math, uMobile; |
24 uses SDLh, uTypes, uFloat, GLunit, uConsts, Math, uMobile, uMatrix; |
25 |
25 |
26 var |
26 var |
27 /////// init flags /////// |
27 /////// init flags /////// |
28 cMinScreenWidth : LongInt = 640; |
28 cMinScreenWidth : LongInt = 640; |
29 cMinScreenHeight : LongInt = 480; |
29 cMinScreenHeight : LongInt = 480; |
2463 |
2463 |
2464 DefaultBinds : TBinds; |
2464 DefaultBinds : TBinds; |
2465 |
2465 |
2466 lastTurnChecksum : Longword; |
2466 lastTurnChecksum : Longword; |
2467 |
2467 |
|
2468 mModelview: TMatrix4x4f; |
|
2469 mProjection: TMatrix4x4f; |
|
2470 |
2468 var trammo: array[TAmmoStrId] of ansistring; // name of the weapon |
2471 var trammo: array[TAmmoStrId] of ansistring; // name of the weapon |
2469 trammoc: array[TAmmoStrId] of ansistring; // caption of the weapon |
2472 trammoc: array[TAmmoStrId] of ansistring; // caption of the weapon |
2470 trammod: array[TAmmoStrId] of ansistring; // description of the weapon |
2473 trammod: array[TAmmoStrId] of ansistring; // description of the weapon |
2471 trmsg: array[TMsgStrId] of ansistring; // message of the event |
2474 trmsg: array[TMsgStrId] of ansistring; // message of the event |
2472 trgoal: array[TGoalStrId] of ansistring; // message of the goal |
2475 trgoal: array[TGoalStrId] of ansistring; // message of the goal |
2612 WaterOpacity:= $80; |
2615 WaterOpacity:= $80; |
2613 SDWaterOpacity:= $80; |
2616 SDWaterOpacity:= $80; |
2614 GrayScale:= false; |
2617 GrayScale:= false; |
2615 |
2618 |
2616 LuaGoals:= ''; |
2619 LuaGoals:= ''; |
|
2620 |
|
2621 MatrixLoadIdentity(mModelview); |
|
2622 MatrixLoadIdentity(mProjection); |
2617 end; |
2623 end; |
2618 |
2624 |
2619 procedure freeModule; |
2625 procedure freeModule; |
2620 begin |
2626 begin |
2621 // re-init flags so they will always contain safe values |
2627 // re-init flags so they will always contain safe values |