hedgewars/uTeams.pas
changeset 2579 e5e4ebf528b5
parent 2431 23242609c44b
child 2586 204e6b2885bc
equal deleted inserted replaced
2578:ec8e69b23097 2579:e5e4ebf528b5
   231 g:= AddGear(0, 0, gtATSmoothWindCh, 0, _0, _0, 1);
   231 g:= AddGear(0, 0, gtATSmoothWindCh, 0, _0, _0, 1);
   232 g^.Tag:= hwRound(cWindSpeed * 72 / cMaxWindSpeed);
   232 g^.Tag:= hwRound(cWindSpeed * 72 / cMaxWindSpeed);
   233 {$IFDEF DEBUGFILE}AddFileLog('Wind = '+FloatToStr(cWindSpeed));{$ENDIF}
   233 {$IFDEF DEBUGFILE}AddFileLog('Wind = '+FloatToStr(cWindSpeed));{$ENDIF}
   234 ApplyAmmoChanges(CurrentHedgehog^);
   234 ApplyAmmoChanges(CurrentHedgehog^);
   235 
   235 
       
   236 {$IFNDEF IPHONEOS}
   236 if not CurrentTeam^.ExtDriven then SetBinds(CurrentTeam^.Binds);
   237 if not CurrentTeam^.ExtDriven then SetBinds(CurrentTeam^.Binds);
       
   238 {$ENDIF}
   237 
   239 
   238 bShowFinger:= true;
   240 bShowFinger:= true;
   239 
   241 
   240 if (CurrentTeam^.ExtDriven or (CurrentHedgehog^.BotLevel > 0)) then
   242 if (CurrentTeam^.ExtDriven or (CurrentHedgehog^.BotLevel > 0)) then
   241 	PlaySound(sndIllGetYou, false, CurrentTeam^.voicepack)
   243 	PlaySound(sndIllGetYou, false, CurrentTeam^.voicepack)