load ./../1/gatc-a.pdb
restrict [A]2:A or (3:A and backbone)
color cpk
cartoon off
wireframe
cpk 40
background [240,240,240] 
zoom 500
center [A]2:A.C1'
rotate Y -25
measure ([A]2:A.O1P) ([A]2:A.P) ([A]2:A.O5') ([A]2:A.C5') "alpha %0.1VALUE "
measure ([A]2:A.P) ([A]2:A.O5') ([A]2:A.C5') ([A]2:A.C4') "beta %0.1VALUE"
measure ([A]2:A.O5') ([A]2:A.C5') ([A]2:A.C4') ([A]2:A.C3') "gamma %0.1VALUE"
measure ([A]2:A.C5') ([A]2:A.C4') ([A]2:A.C3') ([A]2:A.O3')"delta %0.1VALUE"
measure ([T]3:A.P) ([A]2:A.O3') ([A]2:A.C3') ([A]2:A.C4') "epsilon %0.1VALUE"
measure ([T]3:A.O5') ([T]3:A.P) ([A]2:A.O3') ([A]2:A.C3') "zeta %0.1VALUE"
measure ([A]2:A.O4') ([A]2:A.C1') ([A]2:A.N9) ([A]2:A.C4) "chi %0.1VALUE"
zoom 500
write image 1000 1000 png fig_12.png
pause
load ./../1/gatc-b.pdb
restrict [A]2:A or (3:A and backbone)
color cpk
cartoon off
wireframe
cpk 40
background [240,240,240] 
zoom 500
rotate Y 25
rotate X -45
measure ([A]2:A.O1P) ([A]2:A.P) ([A]2:A.O5') ([A]2:A.C5') "alpha %0.1VALUE"
measure ([A]2:A.P) ([A]2:A.O5') ([A]2:A.C5') ([A]2:A.C4') "beta %0.1VALUE"
measure ([A]2:A.O5') ([A]2:A.C5') ([A]2:A.C4') ([A]2:A.C3') "gamma %0.1VALUE"
measure ([A]2:A.C5') ([A]2:A.C4') ([A]2:A.C3') ([A]2:A.O3')"delta %0.1VALUE"
measure ([T]3:A.P) ([A]2:A.O3') ([A]2:A.C3') ([A]2:A.C4') "epsilon %0.1VALUE"
measure ([T]3:A.O5') ([T]3:A.P) ([A]2:A.O3') ([A]2:A.C3') "zeta %0.1VALUE"
measure ([A]2:A.O4') ([A]2:A.C1') ([A]2:A.N9) ([A]2:A.C4) "chi %0.1VALUE"
center [A]2:A.C1'
write image 1000 1000 png fig_13.png
pause