アミノ酸

$\tdplotsetmaincoords{200+8}{190-5}\begin{tikzpicture}[scale=1,tdplot_main_coords,rotate=-20,declare function = {opc=0.9;Cvdw=1.70 cm; Nvdw=1.55 cm; Ovdw=1.52 cm; Hvdw=1.20 cm; Bvdw=1.92 cm; Clvdw=1.75 cm; Fvdw=1.47 cm; Svdw=1.80 cm; Pvdw=1.80cm; Brvdw=1.85 cm; Ivdw=1.98 cm; Ptvdw=1.75 cm; Mgvdw=0.86 cm;vdw=1/5; lw=3;_PubChemID = 18218197;_compound_name=L-Cysteinyl-L-Isoluecine;x0=-0.7044454; y0=-0.1988125; z0=0.2633088;}]\coordinate (S) at (2.637094-z0, 2.171750-y0, 1.781310-z0);\coordinate (O1) at (-1.193039-z0, -2.598875-y0, -1.459388-z0);\coordinate (O2) at (-2.129919-z0, -2.948692-y0, 0.563350-z0);\coordinate (O3) at (2.047243-z0, 0.336488-y0, -0.664293-z0);\coordinate (N1) at (-0.009859-z0, -0.492679-y0, -0.541926-z0);\coordinate (N2) at (1.595191-z0, -1.787726-y0, 1.840215-z0);\coordinate (C1) at (-2.405984-z0, -0.036314-y0, -0.006280-z0);\coordinate (C2) at (-1.195255-z0, -1.013545-y0, 0.147032-z0);\coordinate (C3) at (-2.058953-z0, 1.321350-y0, 0.635903-z0);\coordinate (C4) at (-2.870061-z0, 0.126116-y0, -1.480613-z0);\coordinate (C5) at (-1.538397-z0, -2.404501-y0, -0.327407-z0);\coordinate (C6) at (1.178520-z0, -0.153044-y0, 0.044943-z0);\coordinate (C7) at (1.473661-z0, -0.352921-y0, 1.534835-z0);\coordinate (C8) at (2.767016-z0, 0.364831-y0, 1.984869-z0);\coordinate (C9) at (-4.144827-z0, 0.958691-y0, -1.633519-z0);\coordinate (H1) at (-0.083406-z0, -0.341488-y0, -1.559921-z0);\coordinate (H2) at (1.750301-z0, -1.921343-y0, 2.866001-z0);\coordinate (H3) at (2.404617-z0, -2.198852-y0, 1.319748-z0);\coordinate (H4) at (0.738755-z0, -2.320316-y0, 1.577539-z0);\coordinate (H5) at (-3.253368-z0, -0.469622-y0, 0.571806-z0);\coordinate (H6) at (-1.005272-z0, -1.062349-y0, 1.239612-z0);\coordinate (H7) at (0.652448-z0, 0.096356-y0, 2.134880-z0);\coordinate (H8) at (2.944196-z0, 0.168850-y0, 3.063896-z0);\coordinate (H9) at (3.645893-z0, -0.010144-y0, 1.417650-z0);\coordinate (H10) at (-3.988627-z0, 2.007149-y0, -1.310274-z0);\coordinate (H11) at (-4.972280-z0, 0.507880-y0, -1.045567-z0);\coordinate (H12) at (-4.442622-z0, 0.980448-y0, -2.703172-z0);\coordinate (H13) at (-3.097761-z0, -0.875430-y0, -1.901658-z0);\coordinate (H14) at (-2.071587-z0, 0.591287-y0, -2.095461-z0);\coordinate (H15) at (-1.231591-z0, 1.819590-y0, 0.087313-z0);\coordinate (H16) at (-1.748523-z0, 1.176821-y0, 1.692602-z0);\coordinate (H17) at (-2.935856-z0, 1.998235-y0, 0.651855-z0);\foreach \labelx /\labely in {C2/H6, C3/H15, C3/H16, C4/H13, C4/H14, C8/H8, C8/H9, C9/H10, C9/H11, C9/H12, N1/H1, N2/H2, N2/H3, N2/H4} \draw[line width = lw, Pink1] (\labelx) -- (\labely);\foreach \labelx /\labely in {C1/H5, C7/H7, C3/H17} \draw[line width = lw, Pink1, opacity=0.3] (\labelx) -- (\labely);\foreach \label in {H5, H7, H17} \shade[ball color = white, opacity=0.3] (\label) circle (vdw*Hvdw);\draw[line width = lw, gray] (C8) -- (C7) -- (C6);\draw[line width = lw, gray] (N1) -- (C2) -- (C1) -- (C4) -- (C9);\draw[line width = lw, gray] (C2) -- (C5);\draw[line width = lw, gray] (C1) -- (C3);\draw[line width = lw, gray] (N2) -- (C7) -- (C6);\draw[line width = lw, green] (O3) -- (C6) -- (N1);\draw[line width = lw, green] (O1) -- (C5) -- (O2);\draw[line width = lw, Gold1] (C8) -- (S);\foreach \label in {O1, O2, O3} \shade[ball color = red, opacity=opc] (\label) circle (vdw*Ovdw);\foreach \label in {H1, H2, H3, H4, H6, H8, H9, H10, H11, H12, H13, H14, H15, H16} \shade[ball color = white, opacity=opc] (\label) circle (vdw*Hvdw);\foreach \label in {C1, C2, C3, C4, C5, C6, C7, C8, C9} \shade[ball color = black, opacity=opc] (\label) circle (vdw*Cvdw);\foreach \label in {O1, O2, O3} \shade[ball color = red, opacity=opc] (\label) circle (vdw*Ovdw);\foreach \label in {N1, N2} \shade[ball color = blue, opacity=opc] (\label) circle (vdw*Nvdw);\foreach \label in {S} \shade[ball color = Gold1, opacity=opc] (\label) circle (vdw*Svdw);\end{tikzpicture}$

\tdplotsetmaincoords{200+8}{190-5}
\begin{tikzpicture}[scale=1,tdplot_main_coords,rotate=-20,
declare function = {
opc=0.9;
Cvdw=1.70 cm; Nvdw=1.55 cm; Ovdw=1.52 cm; Hvdw=1.20 cm; Bvdw=1.92 cm; Clvdw=1.75 cm; Fvdw=1.47 cm; Svdw=1.80 cm; Pvdw=1.80cm; Brvdw=1.85 cm; Ivdw=1.98 cm; Ptvdw=1.75 cm; Mgvdw=0.86 cm;
vdw=1/5; lw=3;
_PubChemID = 18218197;
_compound_name=L-Cysteinyl-L-Isoluecine;
x0=-0.7044454; y0=-0.1988125; z0=0.2633088;
}]
\coordinate (S) at (2.637094-z0, 2.171750-y0, 1.781310-z0);
\coordinate (O1) at (-1.193039-z0, -2.598875-y0, -1.459388-z0);
\coordinate (O2) at (-2.129919-z0, -2.948692-y0, 0.563350-z0);
\coordinate (O3) at (2.047243-z0, 0.336488-y0, -0.664293-z0);
\coordinate (N1) at (-0.009859-z0, -0.492679-y0, -0.541926-z0);
\coordinate (N2) at (1.595191-z0, -1.787726-y0, 1.840215-z0);
\coordinate (C1) at (-2.405984-z0, -0.036314-y0, -0.006280-z0);
\coordinate (C2) at (-1.195255-z0, -1.013545-y0, 0.147032-z0);
\coordinate (C3) at (-2.058953-z0, 1.321350-y0, 0.635903-z0);
\coordinate (C4) at (-2.870061-z0, 0.126116-y0, -1.480613-z0);
\coordinate (C5) at (-1.538397-z0, -2.404501-y0, -0.327407-z0);
\coordinate (C6) at (1.178520-z0, -0.153044-y0, 0.044943-z0);
\coordinate (C7) at (1.473661-z0, -0.352921-y0, 1.534835-z0);
\coordinate (C8) at (2.767016-z0, 0.364831-y0, 1.984869-z0);
\coordinate (C9) at (-4.144827-z0, 0.958691-y0, -1.633519-z0);
\coordinate (H1) at (-0.083406-z0, -0.341488-y0, -1.559921-z0);
\coordinate (H2) at (1.750301-z0, -1.921343-y0, 2.866001-z0);
\coordinate (H3) at (2.404617-z0, -2.198852-y0, 1.319748-z0);
\coordinate (H4) at (0.738755-z0, -2.320316-y0, 1.577539-z0);
\coordinate (H5) at (-3.253368-z0, -0.469622-y0, 0.571806-z0);
\coordinate (H6) at (-1.005272-z0, -1.062349-y0, 1.239612-z0);
\coordinate (H7) at (0.652448-z0, 0.096356-y0, 2.134880-z0);
\coordinate (H8) at (2.944196-z0, 0.168850-y0, 3.063896-z0);
\coordinate (H9) at (3.645893-z0, -0.010144-y0, 1.417650-z0);
\coordinate (H10) at (-3.988627-z0, 2.007149-y0, -1.310274-z0);
\coordinate (H11) at (-4.972280-z0, 0.507880-y0, -1.045567-z0);
\coordinate (H12) at (-4.442622-z0, 0.980448-y0, -2.703172-z0);
\coordinate (H13) at (-3.097761-z0, -0.875430-y0, -1.901658-z0);
\coordinate (H14) at (-2.071587-z0, 0.591287-y0, -2.095461-z0);
\coordinate (H15) at (-1.231591-z0, 1.819590-y0, 0.087313-z0);
\coordinate (H16) at (-1.748523-z0, 1.176821-y0, 1.692602-z0);
\coordinate (H17) at (-2.935856-z0, 1.998235-y0, 0.651855-z0);
\foreach \labelx /\labely in {C2/H6, C3/H15, C3/H16, C4/H13, C4/H14, C8/H8, C8/H9, C9/H10, C9/H11, C9/H12, N1/H1, N2/H2, N2/H3, N2/H4}
 \draw[line width = lw, Pink1] (\labelx) -- (\labely);
\foreach \labelx /\labely in {C1/H5, C7/H7, C3/H17}
 \draw[line width = lw, Pink1, opacity=0.3] (\labelx) -- (\labely);
\foreach \label in {H5, H7, H17}
 \shade[ball color = white, opacity=0.3] (\label) circle (vdw*Hvdw);
\draw[line width = lw, gray] (C8) -- (C7) -- (C6);
\draw[line width = lw, gray] (N1) -- (C2) -- (C1) -- (C4) -- (C9);
\draw[line width = lw, gray] (C2) -- (C5);
\draw[line width = lw, gray] (C1) -- (C3);
\draw[line width = lw, gray] (N2) -- (C7) -- (C6);
\draw[line width = lw, green] (O3) -- (C6) -- (N1);
\draw[line width = lw, green] (O1) -- (C5) -- (O2);
\draw[line width = lw, Gold1] (C8) -- (S);
\foreach \label in {O1, O2, O3}
 \shade[ball color = red, opacity=opc] (\label) circle (vdw*Ovdw);
\foreach \label in {H1, H2, H3, H4, H6, H8, H9, H10, H11, H12, H13, H14, H15, H16}
 \shade[ball color = white, opacity=opc] (\label) circle (vdw*Hvdw);
\foreach \label in {C1, C2, C3, C4, C5, C6, C7, C8, C9}
 \shade[ball color = black, opacity=opc] (\label) circle (vdw*Cvdw);
\foreach \label in {O1, O2, O3}
 \shade[ball color = red, opacity=opc] (\label) circle (vdw*Ovdw);
\foreach \label in {N1, N2}
 \shade[ball color = blue, opacity=opc] (\label) circle (vdw*Nvdw);
\foreach \label in {S}
 \shade[ball color = Gold1, opacity=opc] (\label) circle (vdw*Svdw);
\end{tikzpicture}