scn DLC05schematicsWorkbenchScript

;workbench to create customized weapons
; 1. Which schematics does the player have? Display as buttons.
; 2. If has items needed to create, do it; otherwise display "error" message

short HasItems
short Button

short item1
short item2
short item3
short item4

float weaponCondition      ; calculate what condition the weapon is at when  created

; how many of these weapons has the player made?
;short countBottlecap
;short countDartGun
;short countDeathclaw
;short countNuka
;short countRailway
;short countRockit
;short countShishkebab
;short countNVDLC03AuralStealthSuit
;short countNVDLC03AuralStealthSuit2
ref link

BEGIN ONLOAD
   set link to getLinkedRef

END

Begin OnActivate
;   if ( IsActionRef player == 1 || IsActionRef link == 1 )
      ; display message box of possible weapons
      set HasItems to 0

      if GetHasNote SchematicsBottlecapMineNote == 1  || GetHasNote  SchematicsDartGunNote == 1  || GetHasNote SchematicsDeathclawGauntletNote == 1
         set HasItems to 1
      endif
      if GetHasNote SchematicsNukaCocktailNote == 1  || GetHasNote  SchematicsRailwayRifleNote == 1  || GetHasNote SchematicsRockitLauncherNote == 1  ||  GetHasNote SchematicsShishkebabNote == 1
         set HasItems to 1
      endif
      if GetHasNote SchematicsBottlecapMineNote10 == 1  || GetHasNote  SchematicsDartGunNote10 == 1  || GetHasNote SchematicsDeathclawGauntletNote10 == 1
         set HasItems to 1
      endif
      if GetHasNote SchematicsNukaCocktailNote10 == 1  || GetHasNote  SchematicsRailwayRifleNote10 == 1  || GetHasNote SchematicsRockitLauncherNote10 == 1   || GetHasNote SchematicsShishkebabNote10 == 1
         set HasItems to 1
      endif
      if GetHasNote SchematicsBottlecapMineNote20 == 1  || GetHasNote  SchematicsDartGunNote20 == 1  || GetHasNote SchematicsDeathclawGauntletNote20 == 1 ||  GetHasNote SchematicsRockitLauncherNote30 == 1
         set HasItems to 1
      endif
      if GetHasNote SchematicsNukaCocktailNote20 == 1  || GetHasNote  SchematicsRailwayRifleNote20 == 1  || GetHasNote SchematicsRockitLauncherNote20 == 1   || GetHasNote SchematicsShishkebabNote20 == 1
         set HasItems to 1
      endif

      if GetHasNote DLC05AuralStealthSuitUpgrade1 == 1 || GetHasNote DLC05AlienShieldUpgrade2 == 1
         set HasItems to 1
      endif

      if HasItems == 1
         ShowMessage SchematicsWorkbenchMsg
      else
         ShowMessage SchematicsWorkbenchNoneMsg
      endif
;   endif

End

Begin GameMode

   set Button to GetButtonPressed

   if ( Button >0 )
      ; base condition is just repair skill
      set weaponCondition to (player.getav Repair)/100

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
      elseif button == 7
         ; Shishkebab
         ; 1. check for schematics
         if GetHasNote SchematicsShishkebabNote == 0 && GetHasNote  SchematicsShishkebabNote10 == 0 && GetHasNote SchematicsShishkebabNote20 == 0
            ShowMessage SchematicsWorkbenchFailureGenericMsg
         else
         ; 2. check for components
            if ( player.GetItemCount MotorcycleGasTank > 0 ) && (  player.GetItemCount PilotLight > 0 ) && ( player.GetItemCount LawnmowerBlade > 0 ) &&  ( player.GetItemCount MotorcycleHandbrake > 0 )
         ; 3. make it
               ;message "Shishkebab created."
               ShowMessage  SchematicsWorkbenchSuccessShishkebabMsg
               player.RemoveItem MotorcycleGasTank 1 1
               player.RemoveItem PilotLight 1 1
               player.RemoveItem LawnmowerBlade 1 1
               player.RemoveItem MotorcycleHandBrake 1 1
               ; calculate condition
               set weaponCondition to (weaponCondition *  countShishkebabBonus )
               if weaponCondition > 100
                  set weaponCondition to 100
               endif
               player.AddItemHealthPercent WeapShishkebab 1  weaponCondition
               PlaySound UIRepairWeapon
               ; increment count
               ModPCMiscStat "Weapons Created" 1
               set countShishkebab to countShishkebab + 1

               ;If the player has made one of each item, add  Achievement 40
               if countWeapAchievement == 0
                  if countBottlecap >= 1 && countDartgun  >= 1 && countDeathclaw >= 1 && countNuka >= 1 && countRailway >= 1 && countRockit >= 1  && countShishkebab >= 1
                     addachievement 40
                     set countWeapAchievement to 1
                  endif
               endif

            else
         ; 4. failure message
               set item1 to player.GetItemCount  MotorcycleGasTank
               set item2 to player.GetItemCount PilotLight
               set item3 to player.GetItemCount  LawnmowerBlade
               set item4 to player.GetItemCount  MotorcycleHandbrake

               ShowMessage  SchematicsWorkbenchFailureShishkebabMsg, item1, item2, item3, item4
               ShowMessage SchematicsWorkbenchMsg
            
         elseif button == 8
         ; AuralStealthSuit Upgrade 1
         ; 1. check for schematics
         if GetHasNote DLC05AuralStealthSuitUpgrade1 == 0
            ShowMessage SchematicsWorkbenchFailureGenericMsg
         else
         ; 2. check for components
            if ( player.GetItemCount NVDLC03AuralStealthSuit > 0 )
         ; 3. make it
               ;message "StealthSuit Upgraded."
               ShowMessage  SchematicsWorkbenchSuccessStealthSuit
               player.RemoveItem NVDLC03AuralStealthSuit 1 1
               
            endif
               endif
   
               player.AddItem NVDLC03AuralStealthSuit2 1  
               player.AddNote AuralStealthSuitUpgrade1
               PlaySound UIRepairWeapon
               

               

            else
         ; 4. failure message
               set item1 to player.GetItemCount  NVDLC03AuralStealthSuit
                

               ShowMessage  SchematicsWorkbenchFailureStealthSuit, item1
               ShowMessage SchematicsWorkbenchMsg

         elseif button == 9
         ; AuralStealthSuit Upgrade 2
         ; 1. check for schematics
         if GetHasNote DLC05AlienShieldUpgrade2 == 0
            ShowMessage SchematicsWorkbenchFailureGenericMsg
         else
         ; 2. check for components
            if ( player.GetItemCount NVDLC03AuralStealthSuit2 > 0 )
         ; 3. make it
               ;message "StealthSuit Upgraded."
               ShowMessage  SchematicsWorkbenchSuccessStealthSuit
               player.RemoveItem NVDLC03AuralStealthSuit2 1 1
               
            endif
               endif
   
               player.AddItem NVDLC03AuralStealthSuit2 1  
               player.AddNote AuralStealthSuitUpgrade2
               PlaySound UIRepairWeapon
               

               

            else
         ; 4. failure message
               set item1 to player.GetItemCount  NVDLC03AuralStealthSuit
                

               ShowMessage SchematicsWorkbenchFailureStealthSuit2, item1
               ShowMessage SchematicsWorkbenchMsg

            else
         ; 5. already upgraded
               if ( Player.GetHasNote AuralStealthSuitUpgrade2 == 1 )

               ShowMessage SchematicsWorkbenchFailureStealthSuitAlreadyUpgraded
               ShowMessage SchematicsWorkbenchMsg
               
            endif

endif
         endif
      endif
   endif   

End