load "=1rio"

cpk off
wireframe off
cartoon on
select dna
color [224,122,95]
select protein
color [129,178,154]
rotate -x 90
rotate -y 20
spin on
echo "all structure"

pause

restrict dna
cartoon off
wireframe on
color cpk
echo "dna"

pause

define set1 *.O?' and dna
define set2 *.OP? and dna
define set3 *.N? and dna

select set1
cpk 0.5
color [200,85,61]
echo "oxygen in desoxyribose"

pause

cpk off
color cpk
select set2
color [125,207,182]
cpk 0.5
echo "oxygen in phosphates"

pause

cpk off
color cpk
select set3
color [118,120,237]
cpk 0.5
echo "nitrogen in nucleobases"