Technical Info concerning Interiors

[sandor]

<span style="font-size: 16px;"><b>How to make a buyable house for Elder Scrolls IV: Oblivion Part III</b></span><br />
By Smokindan and adapted by sandor.<br />
<br />
<br />
<br />
<i>Scripts</i><br />
Don&rsquo;t worry, it may sound scary but it isn&rsquo;t. Most of the work has been done for you. <br />

<br />
An example of your quest script (which goes on the door of your house) is as follows (remember to replace &lsquo;HouseRiftenWealthy&rsquo; with the name of your own quest):<br />
<br />
Comments are preceded by &quot;;&quot; in green.<br />
<br />
<span style="color: Blue;">ScriptName HouseRiftenWealthyScript<br />
<span style="color: green;">; Attached to the HouseForSale door.</span><br />

<br />
Begin OnLoad<br />
If GetStage HouseRiftenWealthy == 10<br />
If Player.GetInCell 1SKxxSDRiftenTowerforSaleKitchen == 1<br />
<span style="color: green;">; if you&rsquo;ve just entered your house</span><br />
SetStage HouseRiftenWealthy 20<br />
<span style="color: green;">; go buy some furniture</span><br />

EndIf<br />
EndIf<br />
End<br />
<br />
<hr width="100%" height="2" color="---------------" noshade ><br />
<br />
<span style="color: green;">;An example of your purchasable furniture script is as follows (remember to replace &lsquo;HouseRiftenTowerFurnScript&rsquo; with the name of your own quest)</span><br />
<br />

Scriptname HouseRiftenTowerFurnScript<br />
<br />
short TotalCount<br />
short MerchSetup<br />
short Doonce1<br />
<span style="color: green;">; You need &quot;Doonce&quot; for each receipt you have, for the second one Doonce2 etc.</span><br />
short Doonce2<br />
float fQuestDelayTime<br />

<br />
<br />
begin gamemode<br />
<br />
<span style="color: green;">;Kill script if conditions aren't met (if you haven&rsquo;t bought the house).</span><br />
<br />
if ( GetStage HouseRiftenWealthy &lt; 10 )<br />
Return<br />
endif<br />

<br />
<br />
<br />
<span style="color: green;">;Enables the receipt container, so the receipts are available for sale </span><br />
<br />
if ( GetStage HouseRiftenWealthy == 20 ) &amp;&amp; ( MerchSetup == 0 )<br />
HouseRiftenAddons01Ref.Enable<br />
<span style="color: green;">; replace HouseRiftenAdddons01Ref with your receipts chest reference</span><br />
HouseRiftenAddons01Ref.SetOwnership 1SKxxSDBarynIndarys<br />

<span style="color: green;">; replace 1SKxxSDxBarynIndarys with the ID of your vendor</span><br />
set MerchSetup to 1<br />
endif<br />
<br />
<span style="color: green;">;These are the variable triggers that are set when a voucher (receipt) is acquired</span><br />
<br />
if ( Player.GetItemCount 1SKxxSDHouseRiftenDecorReceipt == 1 ) &amp;&amp; ( Doonce1 == 0 )<br />
<span style="color: green;">;replace 1SKxxSDHouseRiftenDecorReceipt by your own receipt etc.</span><br />

SDParentTapsandPaints.Enable <br />
<span style="color: green;">;replace SDParentTapsandPaints by your own parent etc.</span><br />
set TotalCount to ( TotalCount + 1 )<br />
set Doonce1 to 1<br />
endif<br />
<br />
if ( Player.GetItemCount 1SKxxSDHouseRiftenDisplayReceipt == 1 ) &amp;&amp; ( Doonce1 == 0 )<br />

SDParentDisplay.Enable <br />
set TotalCount to ( TotalCount + 1 )<br />
set Doonce2 to 1<br />
<br />
<br />
<span style="color: green;">;Ends Quest if All Bought</span><br />
<br />
if ( TotalCount &lt; 3 )<br />

<span style="color: green;">; TotalCount here should be one more than the number of receipts you have</span><br />
if ( TotalCount == 2 )<br />
<span style="color: green;">; TotalCount should equal the number of receipts you have for purchase</span><br />
setstage HouseRiftenWealthy 30<br />
<span style="color: green;">; this ends the quest (stage 30)</span><br />
set fQuestDelayTime to 0<br />
endif<br />

endif<br />
<br />
end</span><br />
<br />
<br />
<u>Step 5 &ndash; Playtesting</u><br />
<br />
Always playtest your quest/ interior. <br />

<br />
Congratulations!! You&rsquo;ve made your first buyable house!!<br />
<hr width="100%" height="2" color="--" noshade ><br />


<br><br>
<table align="center" width="98%" cellpadding="4" cellspacing="1" class="tableinborder">
<tr>
<td align="left" class="tablecat"><span class="smallfont"><b>Attachments:</b></span></td>
</tr>
<tr class="normalfont">
<td class="inposttable" align="left"><img src="images/filetypes/txt.gif" border="0" alt="txt" /><span class="normalfont"> <a href="http://www.silgradtower.net/PublicForumAttachments/Forum2/7z/attachment-5129.7z">Scripts Tower for Sale.txt</a> </span><span class="smallfont">(<b>3.04 KB</b>, <b>5</b> downloads)</span><br /></td>

</tr>
</table>