Template:LBS/FormatSugar: Difference between revisions

mNo edit summary
No edit summary
Line 7: Line 7:
     ---Process sugar name---
     ---Process sugar name---
     if (string.match(p, "^Glc")) then
     if (string.match(p, "^Glc")) then
       ret = ret .. '<span style="color:blue"><b>' .. p .. "</b></span>"
       ret = ret .. '<span style="color:Blue"><b>' .. p .. "</b></span>"
     elseif (string.match(p, "^Gal")) then
     elseif (string.match(p, "^Gal")) then
       ret = ret .. '<span style="color:gold"><b>' .. p .. "</b></span>"
       ret = ret .. '<span style="color:GoldenRod"><b>' .. p .. "</b></span>"
     elseif (string.match(p, "^Man")) then
     elseif (string.match(p, "^Man")) then
       ret = ret .. '<span style="color:green"><b>' .. p .. "</b></span>"
       ret = ret .. '<span style="color:Green"><b>' .. p .. "</b></span>"
     elseif (string.match(p, "^Fuc")) then
     elseif (string.match(p, "^Fuc")) then
       ret = ret .. '<span style="color:red"><b>' .. p .. "</b></span>"
       ret = ret .. '<span style="color:Red"><b>' .. p .. "</b></span>"
     elseif (string.match(p, "^Neu")) then
     elseif (string.match(p, "^Neu")) then
       ret = ret .. '<span style="color:pink"><b>' .. p .. "</b></span>"
       ret = ret .. '<span style="color:MediumVioletRed"><b>' .. p .. "</b></span>"
     else
     else
       ret = ret .. '<b>' .. p .. '</b>'
       ret = ret .. '<b>' .. p .. '</b>'

Revision as of 15:10, 23 October 2011

{{#lua:

 local seq = stdin:match("[%S()%[%]]+");
 local ret = "";
 for o,p,q,r,s,t in string.gmatch(seq, "([%[%(]?)(%a+)([?ab%-])([1-9]?)%-?([1-9])([%]%)]?)") do
   ---Process ( ---
   if (o) then ret = ret .. o end
   ---Process sugar name---
   if (string.match(p, "^Glc")) then
     ret = ret .. '' .. p .. ""
   elseif (string.match(p, "^Gal")) then
     ret = ret .. '' .. p .. ""
   elseif (string.match(p, "^Man")) then
     ret = ret .. '' .. p .. ""
   elseif (string.match(p, "^Fuc")) then
     ret = ret .. '' .. p .. ""
   elseif (string.match(p, "^Neu")) then
     ret = ret .. '' .. p .. ""
   else
     ret = ret .. '' .. p .. ''
   end
   ---Process alpha or beta---
   if (q == "a") then ret = ret .. "α"
   elseif (q == "b") then ret = ret .. "β"
   elseif (q == "-") then ret = ret .. "*"
   else ret = ret .. "" .. q end
   ---Process bond position---
   ret = ret .. r .. "-" .. s .. ""
   if (t) then ret = ret .. t end
 end
 if (string.match(seq,"Cer$")) then
     ret = ret .. "Cer"
 end
 print(ret)

|GlcNAcb1-3Galb1-3GalNAca1-4GalNAcb1-4(EtnP-6)GlcNAcb1-3Manb1-4Glcb1-1Cer}}