equal
deleted
inserted
replaced
1751 else UndampenAudio(); |
1751 else UndampenAudio(); |
1752 end; |
1752 end; |
1753 |
1753 |
1754 procedure SetUtilityWidgetState(ammoType: TAmmoType); |
1754 procedure SetUtilityWidgetState(ammoType: TAmmoType); |
1755 begin |
1755 begin |
1756 {$IFDEF TOUCH_INTERFACE} |
1756 {$IFDEF USE_TOUCH_INTERFACE} |
1757 if(ammoType = amNothing)then |
1757 if(ammoType = amNothing)then |
1758 ammoType:= CurrentHedgehog^.CurAmmoType; |
1758 ammoType:= CurrentHedgehog^.CurAmmoType; |
1759 |
1759 |
1760 if(CurrentHedgehog <> nil)then |
1760 if(CurrentHedgehog <> nil)then |
1761 if (Ammoz[ammoType].Ammo.Propz and ammoprop_Timerable) <> 0 then |
1761 if (Ammoz[ammoType].Ammo.Propz and ammoprop_Timerable) <> 0 then |