hedgewars/uTeams.pas
changeset 3663 8c28abf427f5
parent 3407 dcc129c4352e
child 3697 d5b30d6373fc
equal deleted inserted replaced
3662:a44406f4369b 3663:8c28abf427f5
   266 g:= AddGear(0, 0, gtATSmoothWindCh, 0, _0, _0, 1);
   266 g:= AddGear(0, 0, gtATSmoothWindCh, 0, _0, _0, 1);
   267 g^.Tag:= hwRound(cWindSpeed * 72 / cMaxWindSpeed);
   267 g^.Tag:= hwRound(cWindSpeed * 72 / cMaxWindSpeed);
   268 {$IFDEF DEBUGFILE}AddFileLog('Wind = '+FloatToStr(cWindSpeed));{$ENDIF}
   268 {$IFDEF DEBUGFILE}AddFileLog('Wind = '+FloatToStr(cWindSpeed));{$ENDIF}
   269 ApplyAmmoChanges(CurrentHedgehog^);
   269 ApplyAmmoChanges(CurrentHedgehog^);
   270 
   270 
   271 {$IFNDEF IPHONEOS}
       
   272 if not CurrentTeam^.ExtDriven then SetBinds(CurrentTeam^.Binds);
   271 if not CurrentTeam^.ExtDriven then SetBinds(CurrentTeam^.Binds);
   273 {$ENDIF}
       
   274 
   272 
   275 bShowFinger:= true;
   273 bShowFinger:= true;
   276 
   274 
   277 if (CurrentTeam^.ExtDriven or (CurrentHedgehog^.BotLevel > 0)) then
   275 if (CurrentTeam^.ExtDriven or (CurrentHedgehog^.BotLevel > 0)) then
   278     PlaySound(sndIllGetYou, CurrentTeam^.voicepack)
   276     PlaySound(sndIllGetYou, CurrentTeam^.voicepack)