39 isTerminated : boolean = false; |
39 isTerminated : boolean = false; |
40 isInLag : boolean = false; |
40 isInLag : boolean = false; |
41 isSoundEnabled : boolean = true; |
41 isSoundEnabled : boolean = true; |
42 isInMultiShoot : boolean = false; |
42 isInMultiShoot : boolean = false; |
43 |
43 |
44 GameState : TGameState = gsLandGen; |
44 GameState : TGameState = Low(TGameState); |
45 GameType : TGameType = gmtLocal; |
45 GameType : TGameType = gmtLocal; |
46 GameFlags : Longword = 0; |
46 GameFlags : Longword = 0; |
47 TurnTimeLeft : Longword = 0; |
47 TurnTimeLeft : Longword = 0; |
48 cHedgehogTurnTime: Longword = 30000; |
48 cHedgehogTurnTime: Longword = 30000; |
49 |
49 |
50 cLandYShift : integer = 888; |
50 cLandYShift : integer = 888; |
51 cCloudsNumber : integer = 9; |
51 cCloudsNumber : integer = 9; |
52 cConsoleHeight : integer = 320; |
52 cConsoleHeight : integer = 320; |
53 cConsoleYAdd : integer = 0; |
53 cConsoleYAdd : integer = 0; |
54 cTimerInterval : Cardinal = 15; |
54 cTimerInterval : Cardinal = 5; |
55 cScreenWidth : integer = 1024; |
55 cScreenWidth : integer = 1024; |
56 cScreenHeight : integer = 768; |
56 cScreenHeight : integer = 768; |
57 cBits : integer = 16; |
57 cBits : integer = 16; |
58 cWaterLine : integer = 1024; |
58 cWaterLine : integer = 1024; |
59 cVisibleWater : integer = 64; |
59 cVisibleWater : integer = 64; |