Recipe: Mutate All To 1.02

created by drjr

Profile

• Name: Mutate All To 1.02
• ID: 100365
• Shared with: Public
• Parent: Mutate All To 1.01
• Children:
  • Mutate All To 1.02 Reefy
• Created on: December 07, 2014 at 15:14 PM UTC
• Updated on: December 07, 2014 at 15:14 PM UTC
• Description:

  mutates all

Code

function DoMutateDialog()
opt = dialog.CreateDialog("Mutate All To:")


opt.F=dialog.AddCheckbox('Phenylalanine (F)', false)
opt.Y=dialog.AddCheckbox('Tyrosine (Y)', false)
opt.W=dialog.AddCheckbox('Tryptophan (W)', false)
opt.G=dialog.AddCheckbox('Glycine (G)', false)
opt.A=dialog.AddCheckbox('Alanine (A)', false)
opt.C=dialog.AddCheckbox('Cysteine (C)', false)
opt.V=dialog.AddCheckbox('Valine (V)', false)
opt.L=dialog.AddCheckbox('Leucine (L)', false)
opt.I=dialog.AddCheckbox('Isoleucine (I)', false)
opt.M=dialog.AddCheckbox('Methionine (M)', false)
opt.P=dialog.AddCheckbox('Proline (P)', false)
opt.S=dialog.AddCheckbox('Serine (S)', false)
opt.T=dialog.AddCheckbox('Threonine (T)', false)
opt.N=dialog.AddCheckbox('Asparagine (N)', false)
opt.D=dialog.AddCheckbox('Aspartate (D)', false)
opt.Q=dialog.AddCheckbox('Glutamine (Q)', false)
opt.E=dialog.AddCheckbox('Glutamate (E)', false)
opt.H=dialog.AddCheckbox('Hystidine (H)', false)
opt.K=dialog.AddCheckbox('Lysine (K)', false)
opt.R=dialog.AddCheckbox('Arginine (R)', false)

opt.Proceed = dialog.AddButton("OK",1)
returnValue = dialog.Show( opt )


Phenylalanine=opt.F.value
Tyrosine=opt.Y.value
Tryptophan=opt.W.value
Glycine=opt.G.value
Alanine=opt.A.value
Cysteine=opt.C.value
Valine=opt.V.value
Leucine=opt.L.value
Isoleucine=opt.I.value
Methionine=opt.M.value
Proline=opt.P.value
Serine=opt.S.value
Threonine=opt.T.value
Asparagine=opt.N.value
Aspartate=opt.D.value
Glutamine=opt.Q.value
Glutamate=opt.E.value
Hystidine=opt.H.value
Lysine=opt.K.value
Arginine=opt.R.value


if Phenylalanine==true then AminoAcid="F" end
if Tyrosine==true then AminoAcid="Y" end
if Tryptophan==true then AminoAcid="W" end
if Glycine==true then AminoAcid="G" end
if Alanine==true then AminoAcid="A" end
if Cysteine==true then AminoAcid="C" end
if Valine==true then AminoAcid="V" end
if Leucine==true then AminoAcid="L" end
if Isoleucine==true then AminoAcid="I" end
if Methionine==true then AminoAcid="M" end
if Proline==true then AminoAcid="P" end
if Serine==true then AminoAcid="S" end
if Threonine==true then AminoAcid="T" end
if Asparagine==true then AminoAcid="N" end
if Aspartate==true then AminoAcid="D" end
if Glutamine==true then AminoAcid="Q" end
if Glutamate==true then AminoAcid="E" end
if Hystidine==true then AminoAcid="H" end
if Lysine==true then AminoAcid="K" end
if Lysine==true then AminoAcid="R" end


return AminoAcid

end





DoMutateDialog()
for zed=1,structure.GetCount() do
	if structure.CanMutate(zed, AminoAcid) then
		structure.SetAminoAcid(zed, AminoAcid)
	end
end

Comments

[robgee]

Little bug here:
if Lysine==true then AminoAcid="R" end
Should be:
if Arginine==true then AminoAcid="R" end
Edit:
Ah..reefyrob has made the fix.