Subversion Repositories wimsdev

!if $wims_read_parm!=slib_header

  !goto proc

!endif

slib_author=Yves, Noël; Bernadette, Perrin-Riou

slib_comment=

slib_example=select all;color atoms blue; select none\

bleu

!exit

:proc

!distribute items $wims_read_parm into slib_script,slib_sep

slib_script=!replace internal $\

$\ by $ $ in $slib_script

!!slib_script=[['wireframe off',null],\

            'wireframe on',\

                 'wireframe 0.1',\

                 'wireframe 0.125',\

                 ['wireframe 0.15', null, 'checked'],\

                 'wireframe 0.25',\

                 'wireframe 0.3',\

                 'wireframe 0.5']

slib_out=<script>\

/*<![CDATA[*/\

jmolRadioGroup($slib_script,'$slib_sep')\

/*]]>*/\

</script>

  jmolMenu(arrayOfMenuItems, {menuHeight}, {id})