Guest User

Untitled

a guest
Feb 18th, 2018
77
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.19 KB | None | 0 0
  1. scn ScavWFirewoodCampfireScript
  2.  
  3. short awaitinginput
  4. short buttonvar
  5. short Woodcount
  6. ref CampfireOffREF
  7.  
  8.  
  9.  
  10.  
  11.  
  12.  
  13. Begin OnActivate
  14. ; below line returns the number of Firewoods in the dropped stack, then places it in the campfire container
  15. set Woodcount to Getrefcount
  16.  
  17. if player.issneaking == 0
  18. ;if player is NOT sneaking when activated pick up item normally
  19. activate
  20. player.additem ScavWFirewood Woodcount
  21. player.removeitem ScavWFirewood 1 1
  22.  
  23.  
  24. elseif GetQuestRunning ScavWCampfireOffQuest == 1 || GetQuestRunning ScavWCampfireOnQuest == 1
  25. ;MENU You already have a campfire, would you like to start a fresh one? (This will delete old campfire)
  26. Showmessage ScavWCampfireAlreadyMENU
  27. set Awaitinginput to 2
  28.  
  29. elseif player.isincombat == 1
  30. Showmessage ScavWCampfireCombatMSG
  31.  
  32. Else
  33. showmessage ScavWFireplaceCreationMENU
  34. ;MENU would you like to make a fireplace out of this wood?
  35. set awaitinginput to 1
  36.  
  37.  
  38.  
  39. endif
  40. End
  41.  
  42.  
  43. Begin menumode
  44. if awaitingInput == 1 && player.getdead == 0
  45. set buttonVar to getbuttonpressed
  46.  
  47. if buttonVar > -1
  48. set awaitingInput to 0
  49.  
  50. if buttonVar == 0
  51. ;If Yes
  52. Startquest ScavWCampfireOffQuest
  53. ScavWFireplaceOffREF.RemoveAllitems
  54. ScavWFireplaceOffREF.additem ScavWFirewood Woodcount
  55. set CampfireOffREF to placeatme ScavWCampfireOff 1 0 0
  56.  
  57. CampfireOffREF.setangle z 0
  58. CampfireOffREF.setangle y 0
  59. CampfireOffREF.setangle x 0
  60. activate
  61.  
  62.  
  63.  
  64. elseif buttonVar == 1
  65. ;If No - do nothing
  66.  
  67.  
  68. endif
  69. endif
  70. endif
  71.  
  72. if awaitingInput == 2 && player.getdead == 0
  73. set buttonVar to getbuttonpressed
  74.  
  75. if buttonVar > -1
  76. set awaitingInput to 0
  77.  
  78. if buttonVar == 0
  79. ;If Yes
  80. ScavWFireplaceOffREF.RemoveAllitems
  81. StopQuest ScavWCampfireOffQuest
  82. ScavWFireplaceOnREF.RemoveAllitems
  83. StopQuest ScavWCampfireOnQuest
  84. ScavWFireplaceOffREF.additem ScavWFirewood Woodcount
  85. set CampfireOffREF to placeatme ScavWCampfireOff 1 0 0
  86.  
  87. CampfireOffREF.setangle z 0
  88. CampfireOffREF.setangle y 0
  89. CampfireOffREF.setangle x 0
  90. activate
  91.  
  92.  
  93.  
  94. elseif buttonVar == 1
  95. ;If No - do nothing
  96. endif
  97. endif
  98. endif
  99. End
Add Comment
Please, Sign In to add comment