\define set-input-actions()
<$list filter="[{!!selected-input}match[allobject]]">
<$action-setfield $field="input" $value="[!is[system]object-type{!!selected-object}]"/>
</$list>
<$list filter="[{!!selected-input}match[object]]">
<$action-setfield $field="input" $value="[!is[system]object-type{!!selected-object}]"/>
</$list>
<$list filter="[{!!selected-input}match[list]]">
<$action-setfield $field="input" $value="[!is[system]object-type{!!selected-list}]"/>
</$list>
<$list filter="[{!!selected-input}match[lists]]">
<$action-setfield $field="input" $value="{{!!selected-lists}}"/>
</$list>
<$list filter="[{!!selected-input}match[filter]]">
<$action-setfield $field="input" $value="{{!!selected-filter}}"/>
</$list>
\end
\define select-input()
<$select field=selected-input actions=<<set-input-actions>> >
<option value="allobject">All Instances of Object</option>
<option value="objects">Selected Objects</option>
<option value="list" >Use "a" list</option>
<option value="lists" >Input List{s}</option>
<option value="filter" >Input Filter</option>
</$select>
\end
<<select-input>>