equal
deleted
inserted
replaced
200 begin |
200 begin |
201 for i:= 0 to cMaxHHIndex do |
201 for i:= 0 to cMaxHHIndex do |
202 if Hedgehogs[i].Gear <> nil then |
202 if Hedgehogs[i].Gear <> nil then |
203 begin |
203 begin |
204 Hedgehogs[i].Ammo:= GetAmmoByNum(Hedgehogs[i].AmmoStore); |
204 Hedgehogs[i].Ammo:= GetAmmoByNum(Hedgehogs[i].AmmoStore); |
205 if (GameFlags and gfPlaceHog) <> 0 then |
205 if ((GameFlags and gfPlaceHog) <> 0) or (((GameFlags and gfKing) <> 0) and (Hedgehogs[i].King = true)) then |
206 Hedgehogs[i].CurAmmoType:= amTeleport |
206 Hedgehogs[i].CurAmmoType:= amTeleport |
207 else |
207 else |
208 Hedgehogs[i].CurAmmoType:= amNothing |
208 Hedgehogs[i].CurAmmoType:= amNothing |
209 end |
209 end |
210 end |
210 end |