changeset 6792 | f72c8b5d421c |
parent 6787 | 8a4cd042d191 |
child 6803 | 0e70f3ea3bf8 |
6791:6907194f2c57 | 6792:f72c8b5d421c |
---|---|
2903 dy := -dy; |
2903 dy := -dy; |
2904 FrameTicks:= random(400) + 250 |
2904 FrameTicks:= random(400) + 250 |
2905 end |
2905 end |
2906 end; |
2906 end; |
2907 AfterAttack; |
2907 AfterAttack; |
2908 DeleteGear(HHGear); |
|
2908 DeleteGear(Gear); |
2909 DeleteGear(Gear); |
2909 DeleteGear(HHGear); |
|
2910 end |
2910 end |
2911 else |
2911 else |
2912 begin |
2912 begin |
2913 dec(Gear^.Health, Gear^.Damage); |
2913 dec(Gear^.Health, Gear^.Damage); |
2914 Gear^.Damage := 0 |
2914 Gear^.Damage := 0 |