ScriptName Bulwark_CloudStorage_MCM Extends SKI_ConfigBase

Int OID_ChestSlider
GlobalVariable Property BulwarkOptOut Auto

Event OnConfigInit()
	ModName = "Thane's Stash"
    Pages = new string[1]
    Pages[0] = "General"
EndEvent

Event OnGameReload()
    Parent.OnGameReload()
Endevent

Event OnPageReset(String page)
	If (page == "")
		LoadCustomContent("Chest.dds")
		Return
	Else
		UnloadCustomContent()
	Endif

	If (page == "General")
		SetCursorFillMode(TOP_TO_BOTTOM)
		AddHeaderOption("Options")
		OID_ChestSlider = AddSliderOption("How The Chest Works", BulwarkOptOut.GetValueInt())
	Endif
EndEvent

Event OnOptionHighlight(int option)
	If (option == OID_ChestSlider)
		SetInfoText ("0 = Thane or Paid, 1 = Thane or Free, 2 = Thane Only")
	Endif
EndEvent

Event OnOptionSliderOpen(int option)
	If (option == OID_ChestSlider)
		;ChestSliderFunction(BulwarkOptOut, 1, 0, 0, 2) ; Variable, Default, Min, Max, Increment
		SetSliderDialogStartValue (BulwarkOptOut.GetValueInt())
		SetSliderDialogDefaultValue (0)
		SetSliderDialogRange (0, 2)
		SetSliderDialogInterval (1)
	Endif
EndEvent

Event OnOptionSliderAccept(int option, Float Value)
	If (option == OID_ChestSlider)
		BulwarkOptOut.SetValueInt(Value As Int)
		SetSliderOptionValue (OID_ChestSlider, BulwarkOptOut.GetValueInt())
	Endif
EndEvent

;Function ChestSliderFunction(GlobalVariable BulwarkOptOut, Int VarDef, Int VarMin, Int Max, Int VarInt)
	;If BulwarkOptOut.GetValueInt() > VarMax
		;VarMax = BulwarkOptOut.GetValueInt()
	;Else
	;Endif
	;SetSliderDialogStartValue (OptionProperty.GetValueInt())
	;SetSliderDialogDefaultValue (VarDef)
	;SetSliderDialogRange (VarMin, VarMax)
	;SetSliderDialogInterval (VarInt)
;Endfunction