Code
newprog = "648 comment structs"
--
-- autogenerated code
local Struct_Types = {
["L"] = "Loop",
["E"] = "Sheet",
["H"] = "Helix",
["M"] = "Ligand" }
function Make_All_Loop()
selection.SelectAll()
structure.SetSecondaryStructureSelected("L")
print("everything has been changed to a loop")
selection.DeselectAll()
end -- function Make_All_Loop
function Restore_One_Stuct(s_start,s_end,s_type)
selection.SelectRange(s_start,s_end)
print(Struct_Types[s_type].."("..s_start..","..s_end..")")
structure.SetSecondaryStructureSelected(s_type)
selection.DeselectAll()
end -- function Restore_One_Stuct
function Restore_Structs()
Restore_One_Stuct(1,3,"E")
Restore_One_Stuct(4,6,"L")
Restore_One_Stuct(7,9,"H")
Restore_One_Stuct(10,21,"L")
Restore_One_Stuct(22,23,"E")
Restore_One_Stuct(24,28,"L")
Restore_One_Stuct(29,30,"H")
Restore_One_Stuct(31,33,"L")
Restore_One_Stuct(34,36,"H")
Restore_One_Stuct(37,42,"E")
Restore_One_Stuct(43,51,"L")
Restore_One_Stuct(52,55,"H")
Restore_One_Stuct(56,59,"E")
Restore_One_Stuct(60,63,"L")
Restore_One_Stuct(64,65,"E")
Restore_One_Stuct(66,70,"L")
Restore_One_Stuct(71,74,"E")
Restore_One_Stuct(75,77,"L")
Restore_One_Stuct(78,85,"E")
Restore_One_Stuct(86,88,"L")
Restore_One_Stuct(89,92,"E")
Restore_One_Stuct(93,94,"L")
Restore_One_Stuct(95,99,"E")
Restore_One_Stuct(100,104,"L")
Restore_One_Stuct(105,115,"H")
Restore_One_Stuct(116,127,"L")
end -- function Restore_Structs
print("begin ",newprog)
if structure.GetCount() == 127 then -- num segs match
Make_All_Loop()
Restore_Structs()
else -- print warning line
print("segment number mismatch -- no action taken")
end
print("end ",newprog)