Oblivion Game Data

Scriptname HouseSkingradFurnScript

short TotalCount
short MerchSetup
short Doonce1
short Doonce2
short Doonce3
short Doonce4
short Doonce5
short Doonce6
short Doonce7
short Doonce8
short Doonce9
short Doonce10
short Doonce11
short Doonce12
short Doonce13
short Doonce14
short Doonce15
short MaidGo
short FoodOK
float fQuestDelayTime

begin gamemode

;Kill script if conditions aren't met

if ( GetStage HouseSkingrad < 10 )
	Return
endif

;Merch Container Stuff

if ( GetStage HouseSkingrad == 10 ) && ( MerchSetup == 0 )
	HouseSkingradAddonsRef.Enable
	HouseSkingradAddonsRef.SetOwnership Gunder
	set MerchSetup to 1
endif

;These are the variable triggers that are set when a voucher is acquired

if ( Player.GetItemCount HouseSkingradBedroomAreaReceipt == 1 ) && ( Doonce1 == 0 )
	ParentBedroomAreaSkingrad.Enable
	set TotalCount to ( TotalCount + 1 )
	set Doonce1 to 1
endif

if ( Player.GetItemCount HouseSkingradKitchenAreaReceipt == 1 ) && ( Doonce2 == 0 )
	ParentKitchenAreaSkingrad.Enable
	set FoodOK to 1
	set TotalCount to ( TotalCount + 1 )
	set Doonce2 to 1
endif

if ( Player.GetItemCount HouseSkingradDiningAreaReceipt == 1 ) && ( Doonce3 == 0 )
	ParentDiningAreaSkingrad.Enable
	set TotalCount to ( TotalCount + 1 )
	set Doonce3 to 1
endif

if ( Player.GetItemCount HouseSkingradBalconyUpgradeReceipt == 1 ) && ( Doonce4 == 0 )
	ParentBalconyShelvesUpgradeSkingrad.Enable
	set TotalCount to ( TotalCount + 1 )
	set Doonce4 to 1
endif

if ( Player.GetItemCount HouseSkingradWallHangL1Receipt == 1 ) && ( Doonce5 == 0 )
	ParentWallHangL1Skingrad.Enable
	set TotalCount to ( TotalCount + 1 )
	set Doonce5 to 1
endif

if ( Player.GetItemCount HouseSkingradWallHangL2Receipt == 1 ) && ( Doonce6 == 0 )
	ParentWallHangL2Skingrad.Enable
	set TotalCount to ( TotalCount + 1 )
	set Doonce6 to 1
endif

if ( Player.GetItemCount HouseSkingradBalconyAreaReceipt == 1 ) && ( Doonce7 == 0 )
	ParentBalconyAreaSkingrad.Enable
	set TotalCount to ( TotalCount + 1 )
	set Doonce7 to 1
endif

if ( Player.GetItemCount HouseSkingradDenAreaReceipt == 1 ) && ( Doonce8 == 0 )
	ParentDenAreaSkingrad.Enable
	set TotalCount to ( TotalCount + 1 )
	set Doonce8 to 1
endif

if ( Player.GetItemCount HouseSkingradServantsQuartersReceipt == 1 ) && ( Doonce9 == 0 )
	ParentServantsQuartersSkingrad.Enable
	set MaidGo to 1
	set TotalCount to ( TotalCount + 1 )
	set Doonce9 to 1
endif

if ( Player.GetItemCount HouseSkingradSittingAreaReceipt == 1 ) && ( Doonce10 == 0 )
	ParentSittingAreaSkingrad.Enable
	set TotalCount to ( TotalCount + 1 )
	set Doonce10 to 1
endif

if ( Player.GetItemCount HouseSkingradStudyAreaReceipt == 1 ) && ( Doonce11 == 0 )
	ParentStudyAreaSkingrad.Enable
	set TotalCount to ( TotalCount + 1 )
	set Doonce11 to 1
endif

if ( Player.GetItemCount HouseSkingradUpperHallAreaReceipt == 1 ) && ( Doonce12 == 0 )
	ParentUpperHallAreaSkingrad.Enable
	set TotalCount to ( TotalCount + 1 )
	set Doonce12 to 1
endif

if ( Player.GetItemCount HouseSkingradSittingAreaL2Receipt == 1 ) && ( Doonce13 == 0 )
	ParentUpperSittingAreaSkingrad.Enable
	set TotalCount to ( TotalCount + 1 )
	set Doonce13 to 1
endif

if ( Player.GetItemCount HouseSkingradStorageAreaReceipt == 1 ) && ( Doonce14 == 0 )
	ParentStorageAreaSkingrad.Enable
	set TotalCount to ( TotalCount + 1 )
	set Doonce14 to 1
endif

if ( Player.GetItemCount HouseSkingradDisplayCaseUpgradeReceipt == 1 ) && ( Doonce15 == 0 )
	ParentDisplayCasesUpgradeSkingrad.Enable
	set TotalCount to ( TotalCount + 1 )
	set Doonce15 to 1
endif

;Kicks off Butler Quest

if ( MaidGo == 1 )
	StartQuest HouseServant
	set MaidGo to 2
endif

;Ends Quest if All Bought

if ( TotalCount < 16 )
	if ( TotalCount == 15 )
		setstage HouseSkingrad 30
		set fQuestDelayTime to 0
	endif
endif

end