equal
deleted
inserted
replaced
946 begin |
946 begin |
947 Tint($f5, $db, $35, $20); |
947 Tint($f5, $db, $35, $20); |
948 DrawSprite(sprVampiric, sx - 24, sy - 24, 0); |
948 DrawSprite(sprVampiric, sx - 24, sy - 24, 0); |
949 end; |
949 end; |
950 |
950 |
951 if Gear^.Invulnerable then |
951 if (Gear^.Hedgehog^.Effects[heInvulnerable] <> 0) then |
952 begin |
952 begin |
953 Tint($FF, $FF, $FF, max($40, round($FF * abs(1 - ((RealTicks div 2 + Gear^.uid * 491) mod 1500) / 750)))); |
953 Tint($FF, $FF, $FF, max($40, round($FF * abs(1 - ((RealTicks div 2 + Gear^.uid * 491) mod 1500) / 750)))); |
954 DrawSprite(sprInvulnerable, sx - 24, sy - 24, 0); |
954 DrawSprite(sprInvulnerable, sx - 24, sy - 24, 0); |
955 end; |
955 end; |
956 |
956 |