<command name="character_information_screen">
<pattern>info</pattern>
<script>
ClearScreen
msg ("Name: " + player.alias)
msg ("Sex: " + player.sex)
msg (Age: " + player.age)
msg ("Race: " + player.race)
msg ("Class: " + player.class)
wait {
ClearScreen
}
</script>
</command><!--Saved by Quest 5.6.5783.24153-->
<asl version="550">
<include ref="English.aslx" />
<include ref="Core.aslx" />
<include ref="InvPane2.aslx" />
<include ref="ScopeLib.aslx" />
<game name="Listing Test 2">
<gameid>566c4bda-7e52-4763-898d-3ae4cb788aca</gameid>
<version>1.0</version>
<firstpublished>2016</firstpublished>
<showscore type="boolean">false</showscore>
<showhealth type="boolean">false</showhealth>
<showcommandbar type="boolean">false</showcommandbar>
<autodescription />
<attr name="autodescription_youarein_useprefix" type="boolean">false</attr>
<showpanes />
<showlocation />
<attr name="autodescription_description" type="int">2</attr>
<attr name="autodescription_youcansee" type="int">3</attr>
<attr name="autodescription_youcango" type="int">4</attr>
<attr name="autodescription_youarein" type="int">0</attr>
<echocommand type="boolean">false</echocommand>
<feature_pictureframe />
<autodescription_description_newline />
<pov type="object">player</pov>
<start type="script">
SetInventory2Label ("Character Traits")
SetInventory2 (GetDirectChildren (Character Traits))
</start>
</game>
<object name="Start">
<inherit name="editor_room" />
<description><![CDATA[Here you select a trait.<br/><br/><br/>{object:Page 1:Here we go}<br/>]]></description>
<usedefaultprefix type="boolean">false</usedefaultprefix>
<exitslistprefix>You may</exitslistprefix>
<enter type="script">
</enter>
<object name="player">
<inherit name="editor_object" />
<inherit name="editor_player" />
<inherit name="female" />
<statusattributes type="stringdictionary">
<item>
<key>Mental</key>
<value>Mental: !</value>
</item>
<item>
<key>Physical</key>
<value>Physical: !</value>
</item>
<item>
<key>Social</key>
<value>Social: !</value>
</item>
</statusattributes>
<Mental type="int">0</Mental>
<Physical type="int">0</Physical>
<Social type="int">0</Social>
</object>
<object name="Neutral">
<inherit name="editor_object" />
<alias>Trait: Neutral</alias>
<drop type="boolean">false</drop>
<take />
<inventoryverbs type="stringlist">
<value>Look at</value>
<value>Use</value>
</inventoryverbs>
<ontake type="script">
MoveObject (player, Page 1)
</ontake>
<look>Character is neutral towards laws.</look>
<useindividualverblist />
<checkit>Character is neutral towards laws.</checkit>
<selectit type="script">
MoveObject (Neutral, Character Traits)
SetInventory2 (GetDirectChildren (Character Traits))
MoveObject (player, Page 1)
</selectit>
</object>
<object name="Lawful">
<inherit name="editor_object" />
<alias>Trait: Lawful</alias>
<drop type="boolean">false</drop>
<look>The character follows all rules, laws and moral codes.</look>
<useindividualverblist />
<usestandardverblist type="boolean">false</usestandardverblist>
<take />
<inventoryverbs type="stringlist">
<value>Look at</value>
<value>Use</value>
</inventoryverbs>
<ontake type="script">
MoveObject (player, Page 1)
</ontake>
<checkit>The character follows all rules, laws and moral codes.</checkit>
<selectit type="script">
MoveObject (Lawful, Character Traits)
SetInventory2 (GetDirectChildren (Character Traits))
MoveObject (player, Page 1)
</selectit>
</object>
<object name="Chaotic">
<inherit name="editor_object" />
<alias>Trait: Chaotic</alias>
<drop type="boolean">false</drop>
<inventoryverbs type="stringlist">
<value>Look at</value>
<value>Use</value>
</inventoryverbs>
<look>The character does not follows the law and estabilished rules.</look>
<useindividualverblist />
<usedefaultprefix type="boolean">false</usedefaultprefix>
<usestandardverblist type="boolean">false</usestandardverblist>
<take />
<ontake type="script">
MoveObject (player, Page 1)
</ontake>
<checkit>The character does not follows the law and estabilished rules.</checkit>
<selectit type="script">
MoveObject (Chaotic, Character Traits)
SetInventory2 (GetDirectChildren (Character Traits))
MoveObject (player, Page 1)
</selectit>
</object>
</object>
<object name="Page 1">
<inherit name="editor_room" />
<description>Select a Skill.</description>
<usedefaultprefix type="boolean">false</usedefaultprefix>
<exitslistprefix>Select a skill</exitslistprefix>
<enter type="script">
if (Contains (Character Traits,Lawful)) {
msg ("This is a Lawful Character.")
}
</enter>
<exit alias="Mental" to="Page 2">
<runscript />
<script type="script">
IncreaseObjectCounter (player, "Mental")
MoveObject (player, Page 2)
</script>
</exit>
<exit alias="Physical" to="Page 2">
<runscript />
<script type="script">
IncreaseObjectCounter (player, "Physical")
MoveObject (player, Page 2)
</script>
</exit>
<exit alias="Social" to="Page 2">
<runscript />
<script type="script">
IncreaseObjectCounter (player, "Social")
MoveObject (player, Page 2)
</script>
</exit>
</object>
<object name="Character Traits">
<inherit name="container_open" />
<inherit name="editor_room" />
<drop type="boolean">false</drop>
<feature_container />
<inventoryverbs type="stringlist">
<value>Look at</value>
<value>Use</value>
</inventoryverbs>
<listchildren type="boolean">false</listchildren>
<open type="boolean">false</open>
<close type="boolean">false</close>
<isopen />
<hidechildren type="boolean">false</hidechildren>
</object>
<object name="Page 2">
<inherit name="editor_room" />
<usedefaultprefix type="boolean">false</usedefaultprefix>
<description>The game begins.</description>
</object>
<verb>
<property>checkit</property>
<pattern>check it</pattern>
<defaultexpression>"You can't check it " + object.article + "."</defaultexpression>
</verb>
<verb>
<property>selectit</property>
<pattern>select it</pattern>
<defaultexpression>"You can't select it " + object.article + "."</defaultexpression>
</verb>
<javascript src="InvPane2.js" />
</asl>
<!--Saved by Quest 5.6.5783.24153-->
<asl version="550">
<include ref="English.aslx" />
<include ref="Core.aslx" />
<include ref="InvPane2.aslx" />
<include ref="ScopeLib.aslx" />
<game name="Listing Test 2">
<gameid>566c4bda-7e52-4763-898d-3ae4cb788aca</gameid>
<version>1.0</version>
<firstpublished>2016</firstpublished>
<showscore type="boolean">false</showscore>
<showhealth type="boolean">false</showhealth>
<showcommandbar type="boolean">false</showcommandbar>
<autodescription />
<attr name="autodescription_youarein_useprefix" type="boolean">false</attr>
<showpanes />
<showlocation />
<attr name="autodescription_description" type="int">2</attr>
<attr name="autodescription_youcansee" type="int">3</attr>
<attr name="autodescription_youcango" type="int">4</attr>
<attr name="autodescription_youarein" type="int">0</attr>
<echocommand type="boolean">false</echocommand>
<feature_pictureframe />
<autodescription_description_newline />
<pov type="object">player</pov>
<start type="script">
SetInventory2Label ("Character Traits")
SetInventory2 (GetDirectChildren (Character Traits))
</start>
</game>
<object name="Start">
<inherit name="editor_room" />
<description><![CDATA[Here you select a trait.<br/><br/><br/>{object:Page 1:Here we go}<br/>]]></description>
<usedefaultprefix type="boolean">false</usedefaultprefix>
<exitslistprefix>You may</exitslistprefix>
<enter type="script">
</enter>
<object name="player">
<inherit name="editor_object" />
<inherit name="editor_player" />
<inherit name="female" />
<statusattributes type="stringdictionary">
<item>
<key>Mental</key>
<value>Mental: !</value>
</item>
<item>
<key>Physical</key>
<value>Physical: !</value>
</item>
<item>
<key>Social</key>
<value>Social: !</value>
</item>
</statusattributes>
<Mental type="int">0</Mental>
<Physical type="int">0</Physical>
<Social type="int">0</Social>
</object>
<object name="Neutral">
<inherit name="editor_object" />
<alias>Trait: Neutral</alias>
<drop type="boolean">false</drop>
<take />
<inventoryverbs type="stringlist">
<value>Look at</value>
<value>Use</value>
</inventoryverbs>
<look>Character is neutral towards laws.</look>
<useindividualverblist />
<checkit>Character is neutral towards laws.</checkit>
<ontake type="script">
MoveObject (player, Page 1)
</ontake>
<selectit type="script">
MoveObject (Neutral, Character Traits)
SetInventory2 (GetDirectChildren (Character Traits))
MoveObject (player, Page 1)
</selectit>
</object>
<object name="Lawful">
<inherit name="editor_object" />
<alias>Trait: Lawful</alias>
<drop type="boolean">false</drop>
<look>The character follows all rules, laws and moral codes.</look>
<useindividualverblist />
<usestandardverblist type="boolean">false</usestandardverblist>
<take />
<inventoryverbs type="stringlist">
<value>Look at</value>
<value>Use</value>
</inventoryverbs>
<checkit>The character follows all rules, laws and moral codes.</checkit>
<ontake type="script">
MoveObject (player, Page 1)
</ontake>
<selectit type="script">
MoveObject (Lawful, Character Traits)
SetInventory2 (GetDirectChildren (Character Traits))
MoveObject (player, Page 1)
</selectit>
</object>
<object name="Chaotic">
<inherit name="editor_object" />
<alias>Trait: Chaotic</alias>
<drop type="boolean">false</drop>
<inventoryverbs type="stringlist">
<value>Look at</value>
<value>Use</value>
</inventoryverbs>
<look>The character does not follows the law and estabilished rules.</look>
<useindividualverblist />
<usedefaultprefix type="boolean">false</usedefaultprefix>
<usestandardverblist type="boolean">false</usestandardverblist>
<take />
<checkit>The character does not follows the law and estabilished rules.</checkit>
<ontake type="script">
MoveObject (player, Page 1)
</ontake>
<selectit type="script">
MoveObject (Chaotic, Character Traits)
SetInventory2 (GetDirectChildren (Character Traits))
MoveObject (player, Page 1)
</selectit>
</object>
<object name="hat">
<inherit name="editor_object" />
</object>
</object>
<object name="Page 1">
<inherit name="editor_room" />
<description>Select a Skill.</description>
<usedefaultprefix type="boolean">false</usedefaultprefix>
<exitslistprefix>Select a skill</exitslistprefix>
<enter type="script">
if (Contains (Character Traits,Lawful)) {
msg ("This is a Lawful Character.")
}
</enter>
<exit alias="Mental" to="Page 2">
<runscript />
<script type="script">
IncreaseObjectCounter (player, "Mental")
MoveObject (player, Page 2)
</script>
</exit>
<exit alias="Physical" to="Page 2">
<runscript />
<script type="script">
IncreaseObjectCounter (player, "Physical")
MoveObject (player, Page 2)
</script>
</exit>
<exit alias="Social" to="Page 2">
<runscript />
<script type="script">
IncreaseObjectCounter (player, "Social")
MoveObject (player, Page 2)
</script>
</exit>
<object name="ball">
<inherit name="editor_object" />
</object>
</object>
<object name="Character Traits">
<inherit name="container_open" />
<inherit name="editor_room" />
<drop type="boolean">false</drop>
<feature_container />
<inventoryverbs type="stringlist">
<value>Look at</value>
<value>Use</value>
</inventoryverbs>
<listchildren type="boolean">false</listchildren>
<open type="boolean">false</open>
<close type="boolean">false</close>
<isopen />
<hidechildren type="boolean">false</hidechildren>
</object>
<object name="Page 2">
<inherit name="editor_room" />
<usedefaultprefix type="boolean">false</usedefaultprefix>
<description>The game begins.</description>
</object>
<verb>
<property>checkit</property>
<pattern>check it</pattern>
<defaultexpression>"You can't check it " + object.article + "."</defaultexpression>
</verb>
<verb>
<property>selectit</property>
<pattern>select it</pattern>
<defaultexpression>"You can't select it " + object.article + "."</defaultexpression>
</verb>
<function name="ScopeInventory" type="objectlist">
result = NewObjectList()
// Next line modified to include second inventory
foreach (obj, ListCombine(GetAllChildObjects(game.pov), GetAllChildObjects(Character Traits))) {
if (ContainsVisible(game.pov, obj)) {
list add (result, obj)
}
}
return (result)
</function>
<function name="ScopeReachableInventory" type="objectlist">
result = NewObjectList()
// Next line modified to include second inventory
foreach (obj, ListCombine(GetAllChildObjects(game.pov), GetAllChildObjects(Character Traits))) {
if (ContainsReachable(game.pov, obj)) {
list add (result, obj)
}
}
return (result)
</function>
<function name="ContainsAccessible" parameters="parentObj, searchObj, onlyReachable" type="boolean">
// Next three lines added
if (searchObj.parent = Character Traits) {
return (true)
}
if (not HasObject(searchObj, "parent")) {
return (false)
}
else if (not searchObj.visible) {
return (false)
}
else if (GetBoolean(parentObj, "darklevel") and not GetBoolean(searchObj, "lightsource")) {
return (false)
}
else {
if (searchObj.parent = null) {
return (false)
}
else if (searchObj.parent = parentObj) {
return (true)
}
else {
if (onlyReachable) {
canAdd = CanReachThrough(searchObj.parent)
}
else {
canAdd = CanSeeThrough(searchObj.parent)
}
if (canAdd) {
return (ContainsAccessible(parentObj, searchObj.parent, onlyReachable))
}
else {
return (false)
}
}
}
</function>
<javascript src="InvPane2.js" />
</asl>