448 |
448 |
449 with PHedgehog(Gear^.Hedgehog)^ do |
449 with PHedgehog(Gear^.Hedgehog)^ do |
450 if (Gear^.State{ and not gstAnimation}) = 0 then |
450 if (Gear^.State{ and not gstAnimation}) = 0 then |
451 begin |
451 begin |
452 t:= hwRound(Gear^.Y) - cHHRadius - 10 + WorldDy; |
452 t:= hwRound(Gear^.Y) - cHHRadius - 10 + WorldDy; |
453 dec(t, HealthTag^.h + 2); |
453 if (cTagsMask and 1) <> 0 then |
454 DrawCentered(hwRound(Gear^.X) + WorldDx, t, HealthTag, Surface); |
454 begin |
455 dec(t, NameTag^.h + 2); |
455 dec(t, HealthTag^.h + 2); |
456 DrawCentered(hwRound(Gear^.X) + WorldDx, t, NameTag, Surface); |
456 DrawCentered(hwRound(Gear^.X) + WorldDx, t, HealthTag, Surface) |
457 dec(t, Team^.NameTag^.h + 2); |
457 end; |
458 DrawCentered(hwRound(Gear^.X) + WorldDx, t, Team^.NameTag, Surface) |
458 if (cTagsMask and 2) <> 0 then |
|
459 begin |
|
460 dec(t, NameTag^.h + 2); |
|
461 DrawCentered(hwRound(Gear^.X) + WorldDx, t, NameTag, Surface) |
|
462 end; |
|
463 if (cTagsMask and 4) <> 0 then |
|
464 begin |
|
465 dec(t, Team^.NameTag^.h + 2); |
|
466 DrawCentered(hwRound(Gear^.X) + WorldDx, t, Team^.NameTag, Surface) |
|
467 end |
459 end else // Current hedgehog |
468 end else // Current hedgehog |
460 if (Gear^.State and gstHHDriven) <> 0 then |
469 if (Gear^.State and gstHHDriven) <> 0 then |
461 begin |
470 begin |
462 if bShowFinger and ((Gear^.State and gstHHDriven) <> 0) then |
471 if bShowFinger and ((Gear^.State and gstHHDriven) <> 0) then |
463 DrawSprite(sprFinger, hwRound(Gear^.X) - 16 + WorldDx, hwRound(Gear^.Y) - 64 + WorldDy, |
472 DrawSprite(sprFinger, hwRound(Gear^.X) - 16 + WorldDx, hwRound(Gear^.Y) - 64 + WorldDy, |