equal
deleted
inserted
replaced
232 // was considering pulsing on attack, Tiy thinks it should be permanent while in play |
232 // was considering pulsing on attack, Tiy thinks it should be permanent while in play |
233 //CurrentHedgehog^.Gear^.State:= CurrentHedgehog^.Gear^.State or gstVampiric; |
233 //CurrentHedgehog^.Gear^.State:= CurrentHedgehog^.Gear^.State or gstVampiric; |
234 inc(CurrentHedgehog^.Gear^.Health,vampDmg); |
234 inc(CurrentHedgehog^.Gear^.Health,vampDmg); |
235 str(vampDmg, s); |
235 str(vampDmg, s); |
236 s:= '+' + s; |
236 s:= '+' + s; |
237 AddCaption(Str2PChar(s), CurrentHedgehog^.Team^.Clan^.Color, capgrpAmmoinfo); |
237 AddCaption(s, CurrentHedgehog^.Team^.Clan^.Color, capgrpAmmoinfo); |
238 RenderHealth(CurrentHedgehog^); |
238 RenderHealth(CurrentHedgehog^); |
239 RecountTeamHealth(CurrentHedgehog^.Team); |
239 RecountTeamHealth(CurrentHedgehog^.Team); |
240 i:= 0; |
240 i:= 0; |
241 while i < vampDmg do |
241 while i < vampDmg do |
242 begin |
242 begin |
417 end |
417 end |
418 else |
418 else |
419 begin |
419 begin |
420 Gear^.doStep := @doStepDrowningGear; |
420 Gear^.doStep := @doStepDrowningGear; |
421 Gear^.State := Gear^.State and (not gstHHDriven); |
421 Gear^.State := Gear^.State and (not gstHHDriven); |
422 AddCaption(FormatPChar(GetEventString(eidDrowned), Str2PChar(Gear^.Hedgehog^.Name)), cWhiteColor, capgrpMessage); |
422 AddCaption(Format(GetEventString(eidDrowned), Gear^.Hedgehog^.Name), cWhiteColor, capgrpMessage); |
423 end |
423 end |
424 end |
424 end |
425 else |
425 else |
426 Gear^.doStep := @doStepDrowningGear; |
426 Gear^.doStep := @doStepDrowningGear; |
427 if Gear^.Kind = gtFlake then |
427 if Gear^.Kind = gtFlake then |