equal
deleted
inserted
replaced
278 if random(2) = 0 then dy := -dy; |
278 if random(2) = 0 then dy := -dy; |
279 FrameTicks:= 650 + random(250); |
279 FrameTicks:= 650 + random(250); |
280 Frame:= 1 |
280 Frame:= 1 |
281 end; |
281 end; |
282 vgtHealthTag: begin |
282 vgtHealthTag: begin |
283 gear^.Timer:= 1500; |
283 Frame:= 0; |
|
284 Timer:= 1500; |
284 //gear^.Z:= 2002; |
285 //gear^.Z:= 2002; |
285 end; |
286 end; |
286 vgtSmokeTrace, |
287 vgtSmokeTrace, |
287 vgtEvilTrace: begin |
288 vgtEvilTrace: begin |
288 gear^.X:= gear^.X - 16; |
289 gear^.X:= gear^.X - 16; |
477 DrawCentered(round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Tex); |
478 DrawCentered(round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Tex); |
478 end; |
479 end; |
479 vgtSmallDamageTag: DrawCentered(round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Tex); |
480 vgtSmallDamageTag: DrawCentered(round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Tex); |
480 vgtHealthTag: if Gear^.Tex <> nil then |
481 vgtHealthTag: if Gear^.Tex <> nil then |
481 begin |
482 begin |
482 if Gear^.State = 0 then |
483 if Gear^.Frame = 0 then |
483 DrawCentered(round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Tex) |
484 DrawCentered(round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Tex) |
484 else |
485 else |
485 begin |
486 begin |
486 SetScale(cDefaultZoomLevel); |
487 SetScale(cDefaultZoomLevel); |
487 DrawTexture(round(Gear^.X), round(Gear^.Y), Gear^.Tex); |
488 DrawTexture(round(Gear^.X), round(Gear^.Y), Gear^.Tex); |