equal
deleted
inserted
replaced
280 begin |
280 begin |
281 if CheckNoTeamOrHH then exit; |
281 if CheckNoTeamOrHH then exit; |
282 bShowFinger:= false; |
282 bShowFinger:= false; |
283 with CurrentHedgehog^.Gear^ do |
283 with CurrentHedgehog^.Gear^ do |
284 begin |
284 begin |
285 {$IFDEF DEBUGFILE}AddFileLog('/+attack: Gear^.State = '+inttostr(State));{$ENDIF} |
285 {$IFDEF DEBUGFILE}AddFileLog('/+attack: hedgehog''s Gear^.State = '+inttostr(State));{$ENDIF} |
286 if ((State and gstHHDriven) <> 0) then |
286 if ((State and gstHHDriven) <> 0) then |
287 begin |
287 begin |
288 FollowGear:= CurrentHedgehog^.Gear; |
288 FollowGear:= CurrentHedgehog^.Gear; |
289 if not CurrentTeam^.ExtDriven then SendIPC('A'); |
289 if not CurrentTeam^.ExtDriven then SendIPC('A'); |
290 Message:= Message or gm_Attack |
290 Message:= Message or gm_Attack |