zap
load 1hdd.pdb
restrict dna or :H
wireframe off 
backbone 50
pause
define set1 nitrogen or oxygen
define set2 carbon or sulphur or *.P
define set1_dnk dna and set1
define set2_dnk dna and set2
define set1_prot set1 and :H
define set2_prot set2 and :H
define riboza *.C1*, *.C2*, *.C3*, *.C4*, *.C5*, *.03*, *.04*, *.05*
define set2_riboza riboza and set2
define set1_riboza riboza and set1
define fos *.P, *.O1P, *.O2P
define set1_fos fos and set1
define set2_fos fos and set2
define major_b (*.N4,*.C4,*.C5,*.C6,*.C5M and pyrimidine)or (*.N7,*.N6,*.O4,*.C5,*.C6,*.C8 and purine)
define set1_maj_bor major_b and set1
define set2_maj_bor major_b and set2
define minor_b (*.N1,*.O2,*.C2 and pyrimidine)or (*.N3,*.N2,*.C4,*.C2 and purine)
define set1_min_bor minor_b and set1
define set2_min_bor minor_b and set2
define p_prot_rib set1_prot and within (3.5, set1_riboza)
define set2_prot_rib set2_prot and within (4.5, set2_riboza)
define p_prot_fos set1_prot and within (3.5, set1_fos)
define set2_prot_fos set2_prot and within (4.5, set2_fos)
define p_prot_majbor set1_prot and within (3.5, set1_maj_bor)
define set2_prot_majbor set2_prot and within (4.5, set2_maj_bor)
define p_prot_minbor set1_prot and within (3.5, set1_min_bor)
define set2_prot_minbor set2_prot and within (4.5, set2_min_bor)



