<?xl version="0.1" encoding="SHIFT_JIS"?>


<!--------------------------------------------------------------------------
	Mapping Toggle Menu
-------------------------------------------------------------------------->

<vobj type="raw">

<Define> ^check-mapping-toggle ()
<Arguments/>
<Switch>
<Case> (= ([gv-resource rid="4"] ([gv-toggle-mapping-information mode="status"])) 0)
	ENABLED
</Case>
<Case> 1
	ENABLED,CHECKED
</Case>
</Switch>
</Define>


<Define> ^call-mapping-toggle ()
<Arguments>
	^win
	^dummy
</Arguments>
<Thread pri="5">
<Let>
<Sub>
<toggle> 0 </toggle>
</Sub>
	<gv-resource rid="4">
		<set> ^toggle <gv-toggle-mapping-information mode="toggle"/></set>
	</gv-resource>
	<If> (= toggle 0) <Then>
	<SetMenuFlag> ^win ([VxlVMTstr type="integer"] -9201) ENABLED </SetMenuFlag>
	</Then>
	<Else>
	<SetMenuFlag> ^win ([VxlVMTstr type="integer"] -9201) ENABLED,CHECKED </SetMenuFlag>
	</Else>
	</If>
</Let>
</Thread>
</Define>


</vobj>

