Module:Citation/CS1: Difference between revisions

checked for more blank codes; cut dots after page-numbers.
m>Wikid77
(checked to omit blank codes (asin= | doi= etc.); fixed prior "Script error" after edit-conflict.)
m>Wikid77
(checked for more blank codes; cut dots after page-numbers.)
Line 570: Line 570:
         Page = ""  
         Page = ""  
     elseif ( Periodical ~= nil ) then
     elseif ( Periodical ~= nil ) then
         Page = ": " .. Page .. "."
         Page = ": " .. Page
     else
     else
         Page = " " .. PPrefix .. Page .. "."
         Page = sepc .." " .. PPrefix .. Page
     end
     end
     if ( nil == Pages ) then  
     if ( nil == Pages ) then  
         Pages = ""  
         Pages = ""  
     elseif ( Periodical ~= nil ) then
     elseif ( Periodical ~= nil ) then
         Pages = ": " .. Pages .. "."
         Pages = ": " .. Pages
     else
     else
         if ( tonumber(Pages) ~= nil ) then
         if ( tonumber(Pages) ~= nil ) then
           Pages = " " .. PPrefix .. Pages .. "."
           Pages = sepc .." " .. PPrefix .. Pages
         else Pages = " " .. PPPrefix .. Pages .. "."
         else Pages = sepc .." " .. PPPrefix .. Pages
         end
         end
     end
     end
     if ( At ~= nil ) then At = " " .. At .. "."
     if ( At ~= nil ) then At = sepc .. " " .. At
     else At = "" end
     else At = "" end
     if ( Coauthors ~= nil ) then
     if ( Coauthors ~= nil ) then
Line 635: Line 635:
     if ( MR ~= nil and MR ~="" ) then
     if ( MR ~= nil and MR ~="" ) then
         MR = sepc .." " .. externallinkid(frame, {label="MR",link="Mathematical Reviews",prefix="http://www.ams.org/mathscinet-getitem?mr=",id=MR}) else MR = "" end
         MR = sepc .." " .. externallinkid(frame, {label="MR",link="Mathematical Reviews",prefix="http://www.ams.org/mathscinet-getitem?mr=",id=MR}) else MR = "" end
     if ( OCLC ~= nil ) then OCLC = " " .. externallinkid(frame, {label="OCLC",link="OCLC",prefix="//www.worldcat.org/oclc/",id=OCLC}) else OCLC = "" end
     if ( OCLC ~= nil and OCLC ~="") then  
     if ( OL ~= nil ) then OL = " " .. openlibrary(frame, OL) else OL = "" end
        OCLC = sepc .." " .. externallinkid(frame, {label="OCLC",link="OCLC",prefix="//www.worldcat.org/oclc/",id=OCLC}) else OCLC = "" end
     if ( OSTI ~= nil ) then OSTI = " " .. externallinkid(frame, {label="OSTI",link="Office of Scientific and Technical Information",prefix="http://www.osti.gov/energycitations/product.biblio.jsp?osti_id=",id=OSTI}) else OSTI = "" end
     if ( OL ~= nil and OL ~="") then
     if ( PMC ~= nil ) then PMC = " " .. externallinkid(frame, {label="PMC",link="PubMed Central",prefix="//www.ncbi.nlm.nih.gov/pmc/articles/PMC",suffix="/?tool=pmcentrez",id=PMC}) else PMC = "" end
        OL = sepc .." " .. openlibrary(frame, OL) else OL = "" end
     if ( PMID ~= nil ) then PMID = " " .. externallinkid(frame, {label="PMID",link="PubMed Identifier",prefix="//www.ncbi.nlm.nih.gov/pubmed/",id=PMID}) else PMID = "" end
     if ( OSTI ~= nil and OSTI ~="") then
     if ( RFC ~= nil ) then RFC = " " .. externallinkid(frame, {label="RFC",link="Request for Comments",prefix="//tools.ietf.org/html/rfc",id=RFC}) else RFC = "" end
        OSTI = sepc .." " .. externallinkid(frame, {label="OSTI",link="Office of Scientific and Technical Information",prefix="http://www.osti.gov/energycitations/product.biblio.jsp?osti_id=",id=OSTI}) else OSTI = "" end
     if ( SSRN ~= nil ) then SSRN = " " .. externallinkid(frame, {label="SSRN",link="Social Science Research Network",prefix="http://ssrn.com/abstract=",id=SSRN}) else SSRN = "" end
     if ( PMC ~= nil and PMC ~="") then
     if ( URL ~= nil ) then URL = " " .. url(frame, URL) else URL = "" end
        PMC = sepc .." " .. externallinkid(frame, {label="PMC",link="PubMed Central",prefix="//www.ncbi.nlm.nih.gov/pmc/articles/PMC",suffix="/?tool=pmcentrez",id=PMC}) else PMC = "" end
     if ( ZBL ~= nil ) then ZBL = " " .. externallinkid(frame, {label="ZBL",link="Zentralblatt MATH",prefix="http://www.zentralblatt-math.org/zmath/en/search/?format=complete&q=an:",id=ZBL}) else ZBL = "" end
     if ( PMID ~= nil and PMID ~="") then
        PMID = sepc .." " .. externallinkid(frame, {label="PMID",link="PubMed Identifier",prefix="//www.ncbi.nlm.nih.gov/pubmed/",id=PMID}) else PMID = "" end
     if ( RFC ~= nil and RFC ~="") then
        RFC = sepc .." " .. externallinkid(frame, {label="RFC",link="Request for Comments",prefix="//tools.ietf.org/html/rfc",id=RFC}) else RFC = "" end
     if ( SSRN ~= nil and RFC ~="") then
        SSRN = sepc .." " .. externallinkid(frame, {label="SSRN",link="Social Science Research Network",prefix="http://ssrn.com/abstract=",id=SSRN}) else SSRN = "" end
     if ( URL ~= nil and URL ~="") then
      URL = sepc .." " .. url(frame, URL)
    else
      if (PMC ~= nil and PMC ~="")
        then URL = "http://www.ncbi.nlm.nih.gov/pmc/articles/PMC" .. PMC .. "/?tool=pmcentrez"
        else URL = ""
      end
    end
     if ( ZBL ~= nil and ZBL ~="") then
        ZBL = sepc .." " .. externallinkid(frame, {label="Zbl",link="Zentralblatt MATH",prefix="http://www.zentralblatt-math.org/zmath/en/search/?format=complete&q=an:",id=ZBL}) else ZBL = "" end
     if ( Quote ~= nil ) then  
     if ( Quote ~= nil ) then  
         Quote = " \"" .. Quote .. "\""  
         Quote = sepc .." \"" .. Quote .. "\""  
         PostScript = ""
         PostScript = ""
     else  
     else  
         if ( PostScript ~= nil ) then PostScript = " " .. PostScript else PostScript = "" end
         if ( PostScript ~= nil ) then PostScript = PostScript else PostScript = "" end
         Quote = ""  
         Quote = ""  
     end
     end
Line 725: Line 740:
         text = Editors .. Date .. Chapter .. tcommon .. Page .. Pages .. At .. idcommon
         text = Editors .. Date .. Chapter .. tcommon .. Page .. Pages .. At .. idcommon
     else
     else
         if ( "" ~= Date ) then Date = " " .. Date .. sepc end
         if ( "" ~= Date ) then Date = " " .. Date end
         text = Chapter .. tcommon .. Date .. Page .. Pages .. At .. idcommon
         text = Chapter .. tcommon .. Date .. Page .. Pages .. At .. idcommon
     end
     end
Anonymous user