Draw smoke trail underneath of grenade
authorunc0rr
Fri, 19 Sep 2008 14:10:51 +0000
changeset 1270 ee024c14c904
parent 1269 9844a2afb3e5
child 1271 e64221369875
Draw smoke trail underneath of grenade
hedgewars/uConsts.pas
hedgewars/uGears.pas
--- a/hedgewars/uConsts.pas	Fri Sep 19 14:08:18 2008 +0000
+++ b/hedgewars/uConsts.pas	Fri Sep 19 14:10:51 2008 +0000
@@ -152,6 +152,8 @@
 	cHHRadius = 9;
 	cHHStepTicks = 29;
 
+	cUsualZ = 500;
+	cSmokeZ = 499;
 	cHHZ = 1000;
 	cCurrHHZ = Succ(cHHZ);
 	cOnHHZ = 2000;
--- a/hedgewars/uGears.pas	Fri Sep 19 14:08:18 2008 +0000
+++ b/hedgewars/uGears.pas	Fri Sep 19 14:10:51 2008 +0000
@@ -197,6 +197,7 @@
 Result^.doStep:= doStepHandlers[Kind];
 Result^.CollisionIndex:= -1;
 Result^.Timer:= Timer;
+Result^.Z:= cUsualZ;
 
 if CurrentTeam <> nil then
    begin
@@ -251,7 +252,8 @@
    gtEvilTrace: begin
                 Result^.X:= Result^.X - _16;
                 Result^.Y:= Result^.Y - _16;
-                Result^.State:= 8
+                Result^.State:= 8;
+                Result^.Z:= cSmokeZ
                 end;
         gtRope: begin
                 Result^.Radius:= 3;