hedgewars/uWorld.pas
changeset 6941 228c0ab239f1
parent 6924 57b66ee3bff3
child 6957 ab8034208fcd
equal deleted inserted replaced
6940:211aca8c1f4f 6941:228c0ab239f1
   711                 bShowAmmoMenu:= false;
   711                 bShowAmmoMenu:= false;
   712                 SetWeapon(Ammo^[Slot, Pos].AmmoType);
   712                 SetWeapon(Ammo^[Slot, Pos].AmmoType);
   713                 bSelected:= false;
   713                 bSelected:= false;
   714                 FreeWeaponTooltip;
   714                 FreeWeaponTooltip;
   715 {$IFDEF USE_TOUCH_INTERFACE}//show the aiming buttons + animation
   715 {$IFDEF USE_TOUCH_INTERFACE}//show the aiming buttons + animation
   716                 if (Ammo^[Slot, Pos].Propz and ammoprop_NoCrosshair) = 0 then
   716                 if (Ammo^[Slot, Pos].Propz and ammoprop_NeedUpDown) <> 0 then
   717                     begin
   717                     begin
   718                     if not(arrowUp.show) then
   718                     if not(arrowUp.show) then
   719                         begin
   719                         begin
   720                         animateWidget(@arrowUp, true, true);
   720                         animateWidget(@arrowUp, true, true);
   721                         animateWidget(@arrowDown, true, true);
   721                         animateWidget(@arrowDown, true, true);