equal
deleted
inserted
replaced
230 begin |
230 begin |
231 if CheckNoTeamOrHH then exit; |
231 if CheckNoTeamOrHH then exit; |
232 with CurrentTeam.Hedgehogs[CurrentTeam.CurrHedgehog].Gear^, |
232 with CurrentTeam.Hedgehogs[CurrentTeam.CurrHedgehog].Gear^, |
233 CurrentTeam.Hedgehogs[CurrentTeam.CurrHedgehog] do |
233 CurrentTeam.Hedgehogs[CurrentTeam.CurrHedgehog] do |
234 begin |
234 begin |
235 {$IFDEF DEBUGFILE}AddFileLog('/-attack: Gear.State = '+inttostr(State)+' CurAmmoGear = '+inttostr(longword(CurAmmoGear)));{$ENDIF} |
|
236 Message:= Message and not gm_Attack; |
235 Message:= Message and not gm_Attack; |
237 if not CurrentTeam.ExtDriven then SendIPC('a') |
236 if not CurrentTeam.ExtDriven then SendIPC('a') |
238 end |
237 end |
239 end; |
238 end; |
240 |
239 |