ScriptName 0ITUBuyShopMenuSript

int iAktivBash
int iAktivStolb
int iAktivTurret
int iAktivBarrack
int iAktivFF
int iAktivLight

int  iButton

Begin onactivate

    ShowMessage 0ITUBaseBuyMenu

End

Begin GameMode

    set iButton to GetButtonPressed

set iAktivBash to ITUMarketBashRef.GetDisabled
set iAktivStolb to ITUMarketStolbRef.GetDisabled
set iAktivTurret to ITUMarketTurretRef.GetDisabled
set iAktivBarrack to ITUMarketBarrackRef.GetDisabled
set iAktivFF to ITUMarketFFRef.GetDisabled

    if iButton == -1    
     Return

     elseif iButton == 0 ; bashni
      if iAktivBash == 0
       showmessage 0ITUBusy
      else
       if player.GetItemCount caps001 >= 1000
        player.removeitem caps001 1000
        ITUMarketBashRef.enable
        playsound OBJSwitchLights2D
                 else
                 showmessage 0ITUNotEnoughCaps
               endif
              endif

     elseif iButton == 1 ; Stolby for pole

      if iAktivStolb == 0
       showmessage 0ITUBusy
      else

       if player.GetItemCount caps001 >=1000
        player.removeitem caps001 1000
        ITUMarketStolbRef.enable
        ITUFFRubilnikOnRef.enable
        ITUFFRubilnikOffRef.disable
        playsound OBJSwitchLights2D
                else
                 showmessage 0ITUNotEnoughCaps
                endif
              endif

     elseif iButton == 2 ; turret

      if iAktivStolb == 0
       if player.GetItemCount caps001 >= 1000
        player.removeitem caps001 1000
        ITUMarketTurretRef.enable
        ITUMarketTurretRef.resurrect
        playsound OBJSwitchLights2D
                 else
                showmessage 0ITUNotEnoughCaps
                 endif
      else
       showmessage 0ITUNotFF
      endif

     elseif iButton == 3 ; Other

      if iAktivStolb == 0
       showmessage 0ITUBusy
      else
       if player.GetItemCount caps001 >= 1000
        player.removeitem caps001 1000
        ITUMarketBarrackRef.enable
        playsound OBJSwitchLights2D
       else
                 showmessage 0ITUNotEnoughCaps
                 endif
      endif

elseif iButton == 4 ; Light

      if iAktivLight == 0
       showmessage 0ITUBusy
      else
       if player.GetItemCount caps001 >= 1000
        player.removeitem caps001 1000
        ITUMarketLightRef.enable
        playsound OBJSwitchLights2D
       else
                 showmessage 0ITUNotEnoughCaps
       endif
      endif

elseif iButton == 5 ; exit
      RemoveMe
endif

RemoveMe
End

ScriptName название

Begin OnTriggerEnter
playsound название_звука
END

short  peremenaya

set NPCARef.peremenaya to 1
set NPCBRef.peremenaya to 1
set NPCCRef.peremenaya to 1