equal
deleted
inserted
replaced
334 currHedgehogIndex:= CurrentTeam^.CurrHedgehog; |
334 currHedgehogIndex:= CurrentTeam^.CurrHedgehog; |
335 itHedgehog:= currHedgehogIndex; |
335 itHedgehog:= currHedgehogIndex; |
336 switchesNum:= 0; |
336 switchesNum:= 0; |
337 |
337 |
338 switchImmediatelyAvailable:= (CurAmmoGear <> nil) and (CurAmmoGear^.Kind = gtSwitcher); |
338 switchImmediatelyAvailable:= (CurAmmoGear <> nil) and (CurAmmoGear^.Kind = gtSwitcher); |
339 switchCount:= HHHasAmmo(PGear(Me)^.Hedgehog^, amSwitch); |
339 if PGear(Me)^.Hedgehog^.BotLevel <> 5 then |
|
340 switchCount:= HHHasAmmo(PGear(Me)^.Hedgehog^, amSwitch) |
|
341 else switchCount:= 0; |
340 |
342 |
341 if (PGear(Me)^.State and gstAttacked) = 0 then |
343 if (PGear(Me)^.State and gstAttacked) = 0 then |
342 if Targets.Count > 0 then |
344 if Targets.Count > 0 then |
343 begin |
345 begin |
344 // iterate over current team hedgehogs |
346 // iterate over current team hedgehogs |
388 else |
390 else |
389 begin |
391 begin |
390 BackMe:= PGear(Me)^; |
392 BackMe:= PGear(Me)^; |
391 while (not StopThinking) and (BestActions.Count = 0) do |
393 while (not StopThinking) and (BestActions.Count = 0) do |
392 begin |
394 begin |
|
395 (* |
|
396 // Maybe this would get a bit of movement out of them? Hopefully not *toward* water. Need to check how often he'd choose that strategy |
|
397 if SuddenDeathDmg and ((hwRound(BackMe.Y)+cWaterRise*2) > cWaterLine) then |
|
398 AddBonus(hwRound(BackMe.X), hwRound(BackMe.Y), 250, -40); |
|
399 *) |
393 FillBonuses(true); |
400 FillBonuses(true); |
394 WalkMe:= BackMe; |
401 WalkMe:= BackMe; |
395 Actions.Count:= 0; |
402 Actions.Count:= 0; |
396 Actions.Pos:= 0; |
403 Actions.Pos:= 0; |
397 Actions.Score:= 0; |
404 Actions.Score:= 0; |