hedgewars/uAIMisc.pas
changeset 8961 b157302674cf
parent 8960 bc8295dc8970
child 8962 9780e79619ed
equal deleted inserted replaced
8960:bc8295dc8970 8961:b157302674cf
   488     Point.x:= hwRound(Me^.X);
   488     Point.x:= hwRound(Me^.X);
   489     Point.y:= hwRound(Me^.Y);
   489     Point.y:= hwRound(Me^.Y);
   490     skip:= false;
   490     skip:= false;
   491     matters:= true;
   491     matters:= true;
   492     Kind:= gtHedgehog;
   492     Kind:= gtHedgehog;
       
   493     Density:= 1;
   493     Score:= - ThinkingHH^.Health
   494     Score:= - ThinkingHH^.Health
   494     end;
   495     end;
   495 // rate explosion
   496 // rate explosion
   496 dmgBase:= r + cHHRadius div 2;
   497 dmgBase:= r + cHHRadius div 2;
   497 
   498 
   660     Point.x:= hwRound(Me^.X);
   661     Point.x:= hwRound(Me^.X);
   661     Point.y:= hwRound(Me^.Y);
   662     Point.y:= hwRound(Me^.Y);
   662     skip:= false;
   663     skip:= false;
   663     matters:= true;
   664     matters:= true;
   664     Kind:= gtHedgehog;
   665     Kind:= gtHedgehog;
       
   666     Density:= 1;
   665     Score:= - ThinkingHH^.Health
   667     Score:= - ThinkingHH^.Health
   666     end;
   668     end;
   667 // rate shot
   669 // rate shot
   668 baseDmg:= cHHRadius + cShotgunRadius + 4;
   670 baseDmg:= cHHRadius + cShotgunRadius + 4;
   669 
   671