equal
deleted
inserted
replaced
1010 //If any of these are set as permanent toggles in the frontend, that needs to be checked and skipped here. |
1010 //If any of these are set as permanent toggles in the frontend, that needs to be checked and skipped here. |
1011 procedure EndTurnCleanup; |
1011 procedure EndTurnCleanup; |
1012 var i: LongInt; |
1012 var i: LongInt; |
1013 t: PGear; |
1013 t: PGear; |
1014 begin |
1014 begin |
|
1015 AttackBar:= 0; // rare case where they drowned while attacking |
1015 SpeechText:= ''; // in case it has not been consumed |
1016 SpeechText:= ''; // in case it has not been consumed |
1016 |
1017 |
1017 if (GameFlags and gfLowGravity) = 0 then |
1018 if (GameFlags and gfLowGravity) = 0 then |
1018 begin |
1019 begin |
1019 cGravity:= cMaxWindSpeed * 2; |
1020 cGravity:= cMaxWindSpeed * 2; |