Template:LBS/FormatSugar: Difference between revisions
mNo edit summary |
mNo edit summary |
||
Line 7: | Line 7: | ||
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: | ret = ret .. '<span style="color:gold"><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>" | ||
Line 15: | Line 15: | ||
ret = ret .. '<span style="color:pink"><b>' .. p .. "</b></span>" | ret = ret .. '<span style="color:pink"><b>' .. p .. "</b></span>" | ||
else | else | ||
ret = ret .. p | ret = ret .. '<b>' .. p .. '</b>' | ||
end | end | ||
Revision as of 11:48, 5 March 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 if (o) then ret = ret .. o end 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
if (q == "a") then ret = ret .. "α" elseif (q == "b") then ret = ret .. "β" else ret = ret .. "" .. q end
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}}