Scriptname Bulwark_ThaneChest_Solitude extends ObjectReference
;Script Authors: GrandBulwark

;V1

;Properties
GlobalVariable Property BulwarkOptOut Auto

MiscObject Property Gold001 Auto ;-Just some gold here

ObjectReference Property BulwarkStashSolitude Auto   ;-Watcher Objects
ObjectReference Property BulwarkStashQasmoke Auto ;-Player Stash

Quest Property Favor252 Auto ;-The Quests


;Quest Key-------------------------------------------------
;-Favor252 = Master Property; assigned in instances to one of the below listed quests in the Creation Kit on the references themselves.  Not the parent.
;-Also itself if the case of Solitude X

;-Favor254 = Windhelm X
;-Favor258 = Falkreath X
;-Favor255 = Morthal X
;-Favor256 = Dawnstar X
;-Favor250 = Markarth X
;-FreeformRiftenThane = Riften
;-Favor253 = Whiterun X
;-Favor257 = Winterhold X

;Container/Watcher Key-------------------------------------
;-BulwarkStashQasmoke = Stash Chest Chest, set to itself always

;-BulwarkStashSolitude = Master Watcher.  Set to to one of the below in the Creation kit again, on the reference not the parent.
;-Also itself if the case of Solitude X

;BulwarkStashWindhelm X
;BulwarkStashFalkreath X
;BulwarkStashMortal X
;BulwarkStashDawnstar X
;BulwarkStashMarkarth X
;BulwarkStashRiften X Handled in Seperate Script, but left for reference
;BulwarkStashWhiterun X
;BulwarkStashWinterhold X

;Functions-------------------------------------------------
Function OnCellAttach() ; As soon as this object is in view
	If (BulwarkStashQasmoke.GetParentCell().IsAttached() == Game.GetPlayer().GetParentCell().IsAttached())
		Debug.Trace("Chest is in same parent cell as player. No Charge, No Movement.")
	Elseif (Favor252.IsObjectiveCompleted(15) == True) && (BulwarkStashQasmoke.GetParentCell().IsAttached() != Game.GetPlayer().GetParentCell().IsAttached()) ;Working Set, general Release.
		BulwarkStashQasmoke.Moveto(BulwarkStashSolitude)
		BulwarkStashQasmoke.Enable()
		Debug.Notification("Your stash has been transported")
		Utility.Wait(0.1)
		Debug.Notification("coutesy of the Jarl, Thane.")

	Elseif (Favor252.IsObjectiveCompleted(15) == False) && (Game.GetPlayer().GetItemCount(Gold001) >= 50) && BulwarkOptOut.GetValueInt() != 1 && (BulwarkStashQasmoke.GetParentCell().IsAttached() != Game.GetPlayer().GetParentCell().IsAttached())
		Game.GetPlayer().RemoveItem(Gold001, 50)
		BulwarkStashQasmoke.Moveto(BulwarkStashSolitude)
		BulwarkStashQasmoke.Enable()
		Debug.Notification("You pay the local carriages 50")
		Utility.Wait(0.1)
		Debug.Notification("gold to trasport your stash for you")

	Elseif (Favor252.IsObjectiveCompleted(15) == False) && (Game.GetPlayer().GetItemCount(Gold001) <= 49) && BulwarkOptOut.GetValueInt() != 1 && (BulwarkStashQasmoke.GetParentCell().IsAttached() != Game.GetPlayer().GetParentCell().IsAttached())
		Debug.Notification("You couldn't afford to trasfer your stash,")
		Utility.Wait(0.1)
		Debug.Notification("travel again with 50 Gold to have your Stash shipped.")

	Elseif (Favor252.IsObjectiveCompleted(15) == False) && (Game.GetPlayer().GetItemCount(Gold001) <= 49) && BulwarkOptOut.GetValueInt() == 1 && (BulwarkStashQasmoke.GetParentCell() != Game.GetPlayer().GetParentCell()) ;Debug Set, Optional file?
		BulwarkStashQasmoke.Moveto(BulwarkStashSolitude)
		BulwarkStashQasmoke.Enable()
		Debug.Notification("Your stash has been trasported by the public carriage system")
		Utility.Wait(0.1)
		Debug.Notification("coutesy of Temple of the Divines.")

	Endif
EndFunction