Oblivion Game Data

Select game:

Search:

Select a record type:

HouseChorrolFurnScript (0x000b15e2)

  • Record Type: SCPT
  • Editor ID: HouseChorrolFurnScript
  • Form ID: 0x000b15e2
  • Source File: Oblivion.noSI.esm.mod
  • Patch Status: FormID has not been modified.
Parameter Value
SCTX
Scriptname HouseChorrolFurnScript

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
float fQuestDelayTime

begin gamemode

;Kill script if conditions aren't met

if ( GetStage HouseChorrol < 10 )
	Return
endif

;Merch Container Stuff

if ( GetStage HouseChorrol == 10 ) && ( MerchSetup == 0 )
	HouseChorrolAddonsRef.Enable
	HouseChorrolAddonsRef.SetOwnership SeedNeeus
	set MerchSetup to 1
endif

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

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

if ( Player.GetItemCount HouseChorrolKitchenAreaReceipt == 1 ) && ( Doonce2 == 0 )
	ParentKitchenAreaChorrol.Enable
	set TotalCount to ( TotalCount + 1 )
	set Doonce2 to 1
endif

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

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

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

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

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

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

if ( Player.GetItemCount HouseChorrolServantsQuartersReceipt == 1 ) && ( Doonce9 == 0 )
	ParentServantQuartersChorrol.Enable
	set TotalCount to ( TotalCount + 1 )
	set Doonce9 to 1
endif

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

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

;Ends Quest if All Bought

if ( TotalCount < 12 )
	if ( TotalCount == 11 )
		setstage HouseChorrol 30
		set fQuestDelayTime to 0
	endif
endif

end

Database last updated 11/02/2011
SCPT records last updated 10/31/2011