| changeset 2608 | cebfea02f8b5 |
| parent 2599 | c7153d2348f3 |
| child 2630 | 079ef82eac75 |
| 2607:dbeaba78e676 | 2608:cebfea02f8b5 |
|---|---|
171 |
171 |
172 procedure OnUsedAmmo(var Hedgehog: THedgehog); |
172 procedure OnUsedAmmo(var Hedgehog: THedgehog); |
173 begin |
173 begin |
174 with Hedgehog do |
174 with Hedgehog do |
175 begin |
175 begin |
176 MultiShootAttacks:= 0; |
|
176 with Ammo^[CurSlot, CurAmmo] do |
177 with Ammo^[CurSlot, CurAmmo] do |
177 if Count <> AMMO_INFINITE then |
178 if Count <> AMMO_INFINITE then |
178 begin |
179 begin |
179 dec(Count); |
180 dec(Count); |
180 if Count = 0 then |
181 if Count = 0 then |