load ./../1/gatc-b.pdb
restrict DNA
color cpk
cartoon 30
wireframe
cpk off
background [240,240,240] 
rotate X 90
rotate Y 90
rotate Z 90
zoom 100
select *:B.P
cpk 150
select all
color translucent 0.55 
set measurements 5 
measure  ([G]25:B.P) ([T]35:B.P)  "helix step,A = %0.1VALUE //A"
measure  ([G]37:B.P) ([G]1:A.P)  "major groove,A = %0.1VALUE //A"
measure  ([A]34:B.P) ([T]11:A.P)  "minor groove,A = %0.1VALUE //A"
write image 3000 900 pngT fig_8.png
load ./../1/gatc-a.pdb
restrict DNA
color cpk
cartoon 20
wireframe
cpk off
background [240,240,240] 
rotate X 90
rotate Y 90
rotate Z 90
zoom 100
select *:B.P
cpk 150
select all
color translucent 0.55 
set measurements 5
measure  ([A]34:B.P) ([T]23:B.P)  "helix step,A = %0.1VALUE //A"
measure  ([A]34:B.P) ([A]10:A.P)  "major groove,A = %0.1VALUE //A"
measure  ([G]25:B.P) ([A]10:A.P)  "minor groove,A = %0.1VALUE //A"
write image 3000 900 pngT fig_9.png
load ./../1/gatc-z.pdb
restrict DNA
color cpk
cartoon 30
wireframe
cpk off
background [240,240,240] 
rotate X 90
rotate Y 90
rotate Z 90
zoom 100
select *:B.P
cpk 150
select all
color translucent 0.55 
set measurements 5 
measure  ([C]26:B.P) ([C]38:B.P) "helix step,A = %0.1VALUE //A"
measure  ([G]31:B.P) ([G]13:A.P)  "major groove,A = %0.1VALUE //A"
measure  ([C]24:B.P) ([G]17:A.P)  "minor groove,A = %0.1VALUE //A"
write image 3000 900 pngT fig_10.png