load enzyme

restrict none
select all
strands
color structure

echo "press any key to continue"
pause

script r-y-5.r

script r-y-5.r

echo "press any key to continue"
pause


#active site
select glu165,his95,glu97
color CPK
script space.r

script space.r

echo "press any key to continue"
pause

script r-y-5.r
script r-x-5.r

script r-x-5.r
script r-y-5.r

echo "press any key to continue"
pause


#residues
restrict none
define active glu165b,his95b,glu97b
select active
wireframe 0.4

translate y 14
translate x -13
zoom 400
center his95b
rotate y -50
rotate x 10
rotate z 30
refresh

echo "press any key to continue"
pause


#atom
select glu97b.oe2,his95b.ne2,glu165b.oe1
script space2.r
script space2.r



#script r-x-5.r

rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh^M
rotate x 5^M
refresh


#script r-y-5.r

rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M
rotate y 5^M
refresh^M


#script space.r

spacefill^M
refresh^M
spacefill 300^M
refresh^M
spacefill 250^M
refresh^M
spacefill 200^M
refresh^M
spacefill 250^M
refresh^M
spacefill 300^M
refresh^M
spacefill 350^M
refresh^M
spacefill 400^M
refresh^M
spacefill 450^M
refresh^M
spacefill 500^M
refresh^M
spacefill 450^M
refresh^M
spacefill 400^M
refresh^M
spacefill 450^M
refresh^M
spacefill 500^M
refresh^M
spacefill 450^M
refresh^M
spacefill 400^M
refresh^M
spacefill 350^M
pacefill^M