equal
deleted
inserted
replaced
815 var i: LongInt; |
815 var i: LongInt; |
816 begin |
816 begin |
817 SpeechText:= ''; // in case it has not been consumed |
817 SpeechText:= ''; // in case it has not been consumed |
818 |
818 |
819 if (GameFlags and gfLowGravity) = 0 then |
819 if (GameFlags and gfLowGravity) = 0 then |
820 cGravity:= cMaxWindSpeed; |
820 cGravity:= cMaxWindSpeed * 2; |
821 |
821 |
822 if (GameFlags and gfVampiric) = 0 then |
822 if (GameFlags and gfVampiric) = 0 then |
823 cVampiric:= false; |
823 cVampiric:= false; |
824 |
824 |
825 cDamageModifier:= _1; |
825 cDamageModifier:= _1; |
1840 FindPlace(Gear, false, 0, LAND_WIDTH); |
1840 FindPlace(Gear, false, 0, LAND_WIDTH); |
1841 end; |
1841 end; |
1842 end; |
1842 end; |
1843 |
1843 |
1844 if (GameFlags and gfLowGravity) <> 0 then |
1844 if (GameFlags and gfLowGravity) <> 0 then |
1845 cGravity:= cMaxWindSpeed / 2; |
1845 cGravity:= cMaxWindSpeed; |
1846 |
1846 |
1847 if (GameFlags and gfVampiric) <> 0 then |
1847 if (GameFlags and gfVampiric) <> 0 then |
1848 cVampiric:= true; |
1848 cVampiric:= true; |
1849 |
1849 |
1850 Gear:= GearsList; |
1850 Gear:= GearsList; |