equal
deleted
inserted
replaced
1743 else UndampenAudio(); |
1743 else UndampenAudio(); |
1744 end; |
1744 end; |
1745 |
1745 |
1746 procedure SetUtilityWidgetState(ammoType: TAmmoType); |
1746 procedure SetUtilityWidgetState(ammoType: TAmmoType); |
1747 begin |
1747 begin |
1748 {$IFDEF TOUCH_INTERFACE} |
1748 {$IFDEF USE_TOUCH_INTERFACE} |
1749 if(ammoType = amNothing)then |
1749 if(ammoType = amNothing)then |
1750 ammoType:= CurrentHedgehog^.CurAmmoType; |
1750 ammoType:= CurrentHedgehog^.CurAmmoType; |
1751 |
1751 |
1752 if(CurrentHedgehog <> nil)then |
1752 if(CurrentHedgehog <> nil)then |
1753 if (Ammoz[ammoType].Ammo.Propz and ammoprop_Timerable) <> 0 then |
1753 if (Ammoz[ammoType].Ammo.Propz and ammoprop_Timerable) <> 0 then |