equal
deleted
inserted
replaced
747 |
747 |
748 case crate of |
748 case crate of |
749 HealthCrate: |
749 HealthCrate: |
750 begin |
750 begin |
751 FollowGear^.Pos := posCaseHealth; |
751 FollowGear^.Pos := posCaseHealth; |
|
752 // health crate is smaller than the other crates |
|
753 FollowGear^.Radius := cCaseHealthRadius; |
752 FollowGear^.Health := content; |
754 FollowGear^.Health := content; |
753 AddCaption(GetEventString(eidNewHealthPack), cWhiteColor, capgrpAmmoInfo); |
755 AddCaption(GetEventString(eidNewHealthPack), cWhiteColor, capgrpAmmoInfo); |
754 end; |
756 end; |
755 AmmoCrate: |
757 AmmoCrate: |
756 begin |
758 begin |
785 |
787 |
786 case crate of |
788 case crate of |
787 HealthCrate: |
789 HealthCrate: |
788 begin |
790 begin |
789 FollowGear^.Pos := FollowGear^.Pos + posCaseHealth; |
791 FollowGear^.Pos := FollowGear^.Pos + posCaseHealth; |
|
792 // health crate is smaller than the other crates |
|
793 FollowGear^.Radius := cCaseHealthRadius; |
790 AddCaption(GetEventString(eidNewHealthPack), cWhiteColor, capgrpAmmoInfo); |
794 AddCaption(GetEventString(eidNewHealthPack), cWhiteColor, capgrpAmmoInfo); |
791 end; |
795 end; |
792 AmmoCrate: |
796 AmmoCrate: |
793 begin |
797 begin |
794 FollowGear^.Pos := FollowGear^.Pos + posCaseAmmo; |
798 FollowGear^.Pos := FollowGear^.Pos + posCaseAmmo; |