equal
deleted
inserted
replaced
4110 DrawCentered(hwRound(hh^.Gear^.X) + WorldDx, hwRound(hh^.Gear^.Y) + WorldDy - |
4110 DrawCentered(hwRound(hh^.Gear^.X) + WorldDx, hwRound(hh^.Gear^.Y) + WorldDy - |
4111 cHHRadius - 14 - hh^.HealthTagTex^.h, hh^.HealthTagTex); |
4111 cHHRadius - 14 - hh^.HealthTagTex^.h, hh^.HealthTagTex); |
4112 (*DrawCircle(hwRound(Gear^.X), hwRound(Gear^.Y), Gear^.Radius, 1.5, 0, 0, $FF, |
4112 (*DrawCircle(hwRound(Gear^.X), hwRound(Gear^.Y), Gear^.Radius, 1.5, 0, 0, $FF, |
4113 $FF);*) |
4113 $FF);*) |
4114 |
4114 |
4115 if hh^.Gear^.Damage <> 0 then doStepHedgehogMoving(hh^.Gear); |
|
4116 |
|
4117 if ((Gear^.Message and gmUp) <> 0) then |
4115 if ((Gear^.Message and gmUp) <> 0) then |
4118 begin |
4116 begin |
4119 if (GameTicks and $F) <> 0 then exit; |
4117 if (GameTicks and $F) <> 0 then exit; |
4120 end |
4118 end |
4121 else if (GameTicks and $1FF) <> 0 then exit; |
4119 else if (GameTicks and $1FF) <> 0 then exit; |
4174 LoadImage(Pathz[ptHats] + '/Reserved/Zombie', ifNone), |
4172 LoadImage(Pathz[ptHats] + '/Reserved/Zombie', ifNone), |
4175 True) |
4173 True) |
4176 end |
4174 end |
4177 end; |
4175 end; |
4178 |
4176 |
|
4177 hh^.Gear^.dY := _0; |
|
4178 hh^.Gear^.dX := _0; |
4179 doStepHedgehogMoving(hh^.Gear); |
4179 doStepHedgehogMoving(hh^.Gear); |
4180 StopSound(Gear^.SoundChannel); |
4180 StopSound(Gear^.SoundChannel); |
4181 Gear^.Timer := 250; |
4181 Gear^.Timer := 250; |
4182 Gear^.doStep := @doStepIdle; |
4182 Gear^.doStep := @doStepIdle; |
4183 end |
4183 end |