Rev 13594 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 13594 | Rev 16998 | ||
---|---|---|---|
Line 9... | Line 9... | ||
9 | !exit |
9 | !exit |
10 | 10 | ||
11 | :proc |
11 | :proc |
12 | 12 | ||
13 | slib_data = !item 1 of $wims_read_parm |
13 | slib_data = !item 1 of $wims_read_parm |
14 | slib_option= !item -1 of |
14 | slib_option= !item -1 of $wims_read_parm |
15 | 15 | ||
16 | slib_atom= |
16 | slib_atom= |
17 | !default slib_cnt=0 |
17 | !default slib_cnt=0 |
18 | slib_cnt= $[$slib_cnt +1] |
18 | slib_cnt= $[$slib_cnt +1] |
19 | 19 | ||
Line 57... | Line 57... | ||
57 | slib_atom=!trim $slib_atom |
57 | slib_atom=!trim $slib_atom |
58 | slib_atom1=!lookup $slib_atom in slib/chemistry/atom |
58 | slib_atom1=!lookup $slib_atom in slib/chemistry/atom |
59 | !if $slib_atom1!=$empty |
59 | !if $slib_atom1!=$empty |
60 | slib_atom2=!item 4,3 of $slib_atom1 |
60 | slib_atom2=!item 4,3 of $slib_atom1 |
61 | slib_atom2 = !items2words $slib_atom2 |
61 | slib_atom2 = !items2words $slib_atom2 |
62 | slib_Atom=!append line ATOM $slib_atom $slib_atom2 |
62 | slib_Atom=!append line ATOM $slib_atom $slib_atom2 to $slib_Atom |
63 | !endif |
63 | !endif |
64 | !endif |
64 | !endif |
65 | !if $slib_nom issametext COMPND |
65 | !if $slib_nom issametext COMPND |
66 | slib_nommolecule=!words 2 of $slib_l |
66 | slib_nommolecule=!words 2 of $slib_l |
67 | !endif |
67 | !endif |
Line 101... | Line 101... | ||
101 | classid="java:LatticeViewer.class" width="$slib_width" height="$slib_height">\ |
101 | classid="java:LatticeViewer.class" width="$slib_width" height="$slib_height">\ |
102 | <param name="java_codebase" value="java/Lattice" />\ |
102 | <param name="java_codebase" value="java/Lattice" />\ |
103 | <param name="java_code" value="LatticeViewer.class" />\ |
103 | <param name="java_code" value="LatticeViewer.class" />\ |
104 | <param name="java_archive" value="Lattice.jar" />\ |
104 | <param name="java_archive" value="Lattice.jar" />\ |
105 | <param name="model" value="$slib_out" />\ |
105 | <param name="model" value="$slib_out" />\ |
106 | <param name="label" |
106 | <param name="label" value="$slib_label" />\ |
107 | <param name="scale" |
107 | <param name="scale" value="$slib_scale" />\ |
108 | <param name="box" |
108 | <param name="box" value="$slib_box" />\ |
109 | <param name="bonds" |
109 | <param name="bonds" value="$slib_bonds" />\ |
110 | <param name="bgcolor" |
110 | <param name="bgcolor" value="$slib_bgcolor" />\ |
111 | <param name="bondcolor" value="$slib_bondcolor" />\ |
111 | <param name="bondcolor" value="$slib_bondcolor" />\ |
112 | </object> |
112 | </object> |