diff options
author | Karl Berry <karl@freefriends.org> | 2013-02-13 23:21:32 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2013-02-13 23:21:32 +0000 |
commit | a19e8fc23c74d8bb5f11c0fb7c135ab7e108c36a (patch) | |
tree | b4536f5f508b757969faa484ea16bd7b9234cd35 /Master/texmf-dist/bibtex | |
parent | 40c656a1741d7c4ff1434cae0232db497f49deb6 (diff) |
uestcthesis (13feb13)
git-svn-id: svn://tug.org/texlive/trunk@29101 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/bibtex')
-rw-r--r-- | Master/texmf-dist/bibtex/bst/uestcthesis/uestcthesis.bst (renamed from Master/texmf-dist/bibtex/bst/uestcthesis/GBT7714-2005NLang-UESTC.bst) | 524 |
1 files changed, 40 insertions, 484 deletions
diff --git a/Master/texmf-dist/bibtex/bst/uestcthesis/GBT7714-2005NLang-UESTC.bst b/Master/texmf-dist/bibtex/bst/uestcthesis/uestcthesis.bst index 77d2fce4502..ea7aeaf90d6 100644 --- a/Master/texmf-dist/bibtex/bst/uestcthesis/GBT7714-2005NLang-UESTC.bst +++ b/Master/texmf-dist/bibtex/bst/uestcthesis/uestcthesis.bst @@ -1,26 +1,35 @@ -% !Mode:: "BST:UTF-8" -% Copyright 2012-2013 Shi Fujun <shifujun@foxmail.com> -% -% This work may be distributed and/or modified under the -% conditions of the LaTeX Project Public License, either version 1.3 -% of this license or (at your option) any later version. -% The latest version of this license is in -% http://www.latex-project.org/lppl.txt -% and version 1.3 or later is part of all distributions of LaTeX -% version 2005/12/01 or later. -% -% This work has the LPPL maintenance status `maintained'. -% -% The Current Maintainer of this work is Shi Fujun <shifujun@foxmail.com>. -% -% This work consists of the files uestcthesis.dtx, uestcthesis.ins and -% GBT7714-2005NLang-UESTC.bst. -% and the derived file uestcthesis.cls. -% Other files in this work's package are belongs to the respective owners. - -%本文件基于吴凯制作的GBT7714-2005NLang.bst(1 Beta 2 测试版2012年9月20日)修改而成。 -%根据GBT7714-2005NLang.bst中copyright的要求,将文件名修改成GBT7714-2005NLang-UESTC.bst。 -%对吴凯的杰出工作表示感谢! +%% +%% This is file `uestcthesis.bst', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% uestcthesis.dtx (with options: `bst') +%% +%% This is a generated file. +%% +%% Copyright 2012-2013 Shi Fujun <shifujun@foxmail.com> +%% +%% This work may be distributed and/or modified under the +%% conditions of the LaTeX Project Public License, either version 1.3 +%% of this license or (at your option) any later version. +%% The latest version of this license is in +%% http://www.latex-project.org/lppl.txt +%% and version 1.3 or later is part of all distributions of LaTeX +%% version 2005/12/01 or later. +%% +%% This work has the LPPL maintenance status `maintained'. +%% +%% The Current Maintainer of this work is Shi Fujun <shifujun@foxmail.com>. +%% +%% This work consists of the files uestcthesis.dtx, uestcthesis.ins +%% and the derived file uestcthesis.cls and uestcthesis.bst. +%% Other files in this work's package are belongs to the respective owners. +%% + + %本文件基于吴凯制作的GBT7714-2005NLang.bst(1 Beta 2 测试版2012年9月20日)修改而成。 + %根据GBT7714-2005NLang.bst中copyright的要求,将文件名修改成uestcthesis.bst。 + %对吴凯的杰出工作表示感谢! ENTRY { address @@ -84,8 +93,6 @@ FUNCTION {init.state.consts} STRINGS { s t } - - FUNCTION {output.nonnull} { 's := output.state mid.sentence = @@ -107,7 +114,6 @@ FUNCTION {output.nonnull} s } - FUNCTION {coutput.nonnull} %wk { 's := output.state mid.sentence = @@ -191,7 +197,6 @@ FUNCTION {output.cyear.month.check} %wk if$ } - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% FUNCTION {output.modifydate.check} {modifydate @@ -207,7 +212,6 @@ FUNCTION {output.citedate.check} if$ } - FUNCTION {output.year.check} { year empty$ { "empty year in " cite$ * warning$ } @@ -259,7 +263,6 @@ endyear empty$ if$ } - FUNCTION {output.continue.cyear.check} %wk { endyear empty$ @@ -423,13 +426,6 @@ FUNCTION {boldface} if$ } -%FUNCTION {emphasize} -%{ duplicate$ empty$ -% { pop$ "" } -% { "{\em " swap$ * "}" * } -% if$ -%} - %%%%%%%%%%%%%%%%%%% Function{upcase} @@ -438,10 +434,6 @@ Function{upcase} { "u" change.case$ } if$ } -%FUNCTION {bib.name.font} -%{ upcase } -%FUNCTION {bib.fname.font} -%{ bib.name.font } %%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%% @@ -497,14 +489,9 @@ FUNCTION {format.names} } while$ %%%%%%%%%%% -% t "others" = %改为大写 -% 'skip$ %改为大写 -% { bib.name.font } %改为大写 -% if$ %改为大写 %%%%%%%%%%% } - FUNCTION {format.cnames} %wk { 's := #1 'nameptr := @@ -550,15 +537,10 @@ FUNCTION {format.cnames} %wk } while$ %%%%%%%%%%% -% t "others" = %改为大写 -% 'skip$ %改为大写 -% { bib.name.font } %改为大写 -% if$ %改为大写 %%%%%%%%%%% } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%不加大写的名字 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% FUNCTION {format.normal.names} @@ -606,7 +588,6 @@ FUNCTION {format.normal.names} while$ } - FUNCTION {format.normal.cnames} %wk { 's := #1 'nameptr := @@ -723,7 +704,6 @@ FUNCTION {format.ctitle} %wk % Nothing needs } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - FUNCTION {format.article.title} % Nothing needs {title empty$ % doing here in { "" } % authordate1.bst @@ -741,7 +721,6 @@ if$ % authordate3.bst. } - FUNCTION {format.carticle.title} % Nothing needs {title empty$ % doing here in { "" } % authordate1.bst @@ -777,7 +756,6 @@ if$ % authordate3.bst. } - FUNCTION {format.cbook.title} %wk % Nothing needs {title empty$ % doing here in { "" } % authordate1.bst @@ -856,7 +834,6 @@ if$ } - FUNCTION {format.cmisc.title} %wk % Nothing needs { patentid empty$ @@ -939,7 +916,6 @@ if$ % authordate3.bst. } - FUNCTION {format.cproceedings.title} % Nothing needs {title empty$ % doing here in { "" } % authordate1.bst @@ -976,7 +952,6 @@ if$ % authordate3.bst. } - FUNCTION {format.cincollection.title} % Nothing needs {title empty$ % doing here in { "" } % authordate1.bst @@ -1013,7 +988,6 @@ if$ % authordate3.bst. } - FUNCTION {format.cinproceedings.title} % Nothing needs {title empty$ % doing here in { "" } % authordate1.bst @@ -1264,7 +1238,6 @@ FUNCTION {cincollectionlike.series.volume.number.pages} %wk if$ } - FUNCTION {format.TypeofLit} %wk 完全改写 { TypeofLit empty$ { "" } @@ -1272,7 +1245,6 @@ FUNCTION {format.TypeofLit} %wk 完全改写 if$ } - FUNCTION {format.edition} { edition empty$ { @@ -1291,7 +1263,6 @@ FUNCTION {format.edition} if$ } - FUNCTION {format.cedition} %wk 完全改写 { edition empty$ { @@ -1310,9 +1281,6 @@ FUNCTION {format.cedition} %wk 完全改写 if$ } - - - FUNCTION {format.ctranslator} %wk 完全改写 { translator empty$ { "" } @@ -1380,7 +1348,6 @@ FUNCTION {format.vol.num.date.pages} %wk if$ } - FUNCTION {format.cvol.num.date.pages} %wk {volume empty$ %wk 被重新改过 'skip$ %wk 被重新改过 @@ -1433,8 +1400,6 @@ number empty$ %wk 被重 if$ } - - FUNCTION {format.carticle.vol.num.date.pages} %wk { volume empty$ %wk 被重新改过 @@ -1461,7 +1426,6 @@ number empty$ %wk 被重 if$ } - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% FUNCTION {format.book.continue.vol.num} %wk { @@ -1496,9 +1460,6 @@ endyear empty$ if$ } - - - FUNCTION {format.cbook.continue.vol.num} %wk { startyear empty$ @@ -1532,8 +1493,6 @@ endyear empty$ if$ } - - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% FUNCTION {format.date.modifydate.citedate} %wk { @@ -1564,7 +1523,6 @@ citedate empty$ %wk 被 if$ } - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% FUNCTION {format.chapter.pages.inbook} { chapter empty$ @@ -1598,8 +1556,6 @@ FUNCTION {format.cchapter.pages.inbook} if$ } - - FUNCTION {format.chapter.pages.incoll} { chapter empty$ { pages empty$ @@ -1670,7 +1626,6 @@ FUNCTION {format.in.ed.booktitle} % Achieves effect if$ % Don't change } % case. - FUNCTION {format.in.ced.booktitle} % Achieves effect %wk { booktitle empty$ % shown in 16.51 { "" } % of Chicago, at @@ -1710,7 +1665,6 @@ FUNCTION {format.in.proceedings.booktitle} % Achieves if$ % Don't change } % case. - FUNCTION {format.in.cproceedings.booktitle} % Achieves effect %wk { booktitle empty$ % shown in 16.51 { "" } % of Chicago, at @@ -1719,7 +1673,6 @@ FUNCTION {format.in.cproceedings.booktitle} % Achieve % Don't change } - FUNCTION {format.thesis.type} { type empty$ 'skip$ @@ -1921,10 +1874,8 @@ FUNCTION {format.cmisc.addr.pub} if$ } - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - FUNCTION {format.addr.pub.org} % If there's an { address empty$ % an organization { "[S.l.]:" *publisher * ", for " * organization * } % and a publisher @@ -1986,7 +1937,6 @@ FUNCTION {format.incoll.inproc.crossref} " \cite{" * crossref * "}" * } - FUNCTION {article} {language empty$ { output.bibitem @@ -2014,7 +1964,6 @@ FUNCTION {article} fin.entry } -%FUNCTION {carticle} %wk 本函数 { output.bibitem format.cauthors "author" output.check author format.key output @@ -2080,7 +2029,6 @@ FUNCTION {book} fin.entry } -%FUNCTION {cbook} %wk { output.bibitem author empty$ { format.ceditors "author and editor" output.check %wk format.editors->format.ceditors @@ -2119,7 +2067,6 @@ FUNCTION {book} if$ } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%未处理 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% FUNCTION {booklet} {language empty$ @@ -2140,7 +2087,6 @@ FUNCTION {booklet} fin.entry } -%FUNCTION {cbooklet} %wk { output.bibitem format.cauthors output %wk author format.key output @@ -2195,7 +2141,6 @@ FUNCTION {inbook} fin.entry } -%FUNCTION {cinbook} %wk { output.bibitem author empty$ { format.ceditors "author and editor" output.check %wk format.editors->format.ceditors @@ -2246,6 +2191,7 @@ FUNCTION {incollection} %wk format.incollection.title output crossref missing$ % Chapter and/or { + before.all 'output.state := format.in.ed.booktitle output % page numbers can format.edition output % come out via this %wk edition->cedition new.block @@ -2265,7 +2211,6 @@ FUNCTION {incollection} %wk fin.entry } -%FUNCTION {cincollection} %wk { output.bibitem author empty$ { format.ceditors "editor" output.check %wk format.editors->format.ceditors @@ -2299,21 +2244,6 @@ if$ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%图书book和 -%会议录inproceedings(会议conference与inproceedings一样), -%文献类型代码[C] -%硕士学位论文mastersthesis, -%文献类型代码[D] -%博士学位论文phdthesis, -%文献类型代码[D] -%技术报告techreport的类型是一样的, -%文献类型代码[R] -% -%因此我们直接拷贝book的相关内容即可。 -%原始部分可以参考authordate1.bst。 -% -%利用misc作为电子文献[EB/OL]所使用的类型 -%存在的问题:无法正常调用url,只能利用note来生成。 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% FUNCTION {inproceedings} %wk 改自incollection类型 @@ -2329,6 +2259,7 @@ FUNCTION {inproceedings} %wk 改自incollecti format.inproceedings.title output crossref missing$ % Chapter and/or { + before.all 'output.state := format.in.ed.booktitle output % page numbers can format.edition output % come out via this %wk edition->cedition new.block @@ -2347,7 +2278,6 @@ FUNCTION {inproceedings} %wk 改自incollecti fin.entry } -%FUNCTION {cinproceedings} %wk 改自incollection类型 { output.bibitem author empty$ { format.ceditors "editor" output.check %wk format.editors->format.ceditors @@ -2381,7 +2311,6 @@ if$ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% FUNCTION {conference} { inproceedings } -%FUNCTION {cconference} { cinproceedings } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% FUNCTION {TECHREPORT} %wk 改自book类型 {language empty$ @@ -2418,7 +2347,6 @@ FUNCTION {TECHREPORT} %wk 改自book类型 fin.entry } -%FUNCTION {cTECHREPORT} %wk 改自book类型 { output.bibitem author empty$ { format.ceditors "author and editor" output.check %wk format.editors->format.ceditors @@ -2454,7 +2382,6 @@ FUNCTION {TECHREPORT} %wk 改自book类型 if$ } - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% FUNCTION {mastersthesis} %wk 改自book类型 {language empty$ @@ -2477,7 +2404,6 @@ FUNCTION {mastersthesis} %wk 改自book类型 { format.edition output booklike.series.volume.number output new.block -% format.addr.pub "publisher" output.check format.school.pub "publisher" output.check output.year.check output format.pages output @@ -2492,7 +2418,6 @@ FUNCTION {mastersthesis} %wk 改自book类型 fin.entry } -%FUNCTION {cmastersthesis} %wk 改自book类型 { output.bibitem author empty$ { format.ceditors "author and editor" output.check %wk format.editors->format.ceditors @@ -2512,7 +2437,6 @@ FUNCTION {mastersthesis} %wk 改自book类型 { format.cedition output %wk edition->cedition new.block -% format.caddr.pub "publisher" output.check format.cschool.pub "publisher" output.check output.cyear.check %wk cbooklike.series.volume.number.pages output @@ -2550,7 +2474,6 @@ FUNCTION {phdthesis} %wk 改自book类型 { format.edition output booklike.series.volume.number output new.block -% format.addr.pub "publisher" output.check format.school.pub "publisher" output.check output.year.check output format.pages output @@ -2565,7 +2488,6 @@ FUNCTION {phdthesis} %wk 改自book类型 fin.entry } -%FUNCTION {cphdthesis} %wk 改自book类型 { output.bibitem author empty$ { format.ceditors "author and editor" output.check %wk format.editors->format.ceditors @@ -2585,7 +2507,6 @@ FUNCTION {phdthesis} %wk 改自book类型 { format.cedition output %wk edition->cedition new.block -% format.caddr.pub "publisher" output.check format.cschool.pub "publisher" output.check output.cyear.check %wk cbooklike.series.volume.number.pages output @@ -2602,8 +2523,6 @@ FUNCTION {phdthesis} %wk 改自book类型 if$ } - - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% FUNCTION {proceedings} %改自book类型 {language empty$ @@ -2641,7 +2560,6 @@ FUNCTION {proceedings} %改自book类型 fin.entry } -%FUNCTION {cproceedings} %改自book类型 { output.bibitem author empty$ { format.ceditors "author and editor" output.check %wk format.editors->format.ceditors @@ -2716,7 +2634,6 @@ FUNCTION {manual} %改自book类型 fin.entry } -%FUNCTION {cmanual} %wk { output.bibitem author empty$ { format.ceditors "author and editor" output.check %wk format.editors->format.ceditors @@ -2749,8 +2666,6 @@ FUNCTION {manual} %改自book类型 if$ } - - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% FUNCTION {misc} %作为非常规文献的格式,可靠性低,应该仔细检查,改自book类型 @@ -2775,9 +2690,7 @@ FUNCTION {misc} %作为非常规文献的格式,可靠性低, booklike.series.volume.number output new.block format.misc.addr.pub "publisher" output.check -% output.year.check output format.date.modifydate.citedate output -% format.pages output } { format.book.crossref output.nonnull } @@ -2789,7 +2702,6 @@ FUNCTION {misc} %作为非常规文献的格式,可靠性低, fin.entry } -%FUNCTION {cmisc} %作为非常规文献的格式,可靠性低,应该仔细检查,改自book类型 { output.bibitem author empty$ { format.ceditors "author and editor" output.check %wk format.editors->format.ceditors @@ -2811,8 +2723,6 @@ FUNCTION {misc} %作为非常规文献的格式,可靠性低, format.cedition output %wk edition->cedition new.block format.cmisc.addr.pub "publisher" output.check -% output.cyear.check %wk -% cbooklike.series.volume.number.pages output format.date.modifydate.citedate output } { format.book.crossref output.nonnull @@ -2843,7 +2753,6 @@ FUNCTION {unpublished} fin.entry } -%FUNCTION {cunpublished} %wk { output.bibitem format.cauthors "author" output.check %wk author format.key output @@ -2926,356 +2835,6 @@ MACRO {tcs} {"Theoretical Computer Science"} READ -%FUNCTION {sortify} -%{ purify$ -% "l" change.case$ -%} -% -%INTEGERS { len } -% -%FUNCTION {chop.word} -%{ 's := -% 'len := -% s #1 len substring$ = -% { s len #1 + global.max$ substring$ } -% 's -% if$ -%} -% -%FUNCTION {format.lab.names} %wk -%{ 's := -% s #1 "{vv~}{ll}" format.name$ -% s num.names$ duplicate$ -% #2 > -% { pop$ " {\em et~al.}" * } -% { #2 < -% 'skip$ -% { s #2 "{ff }{vv }{ll}{ jj}" format.name$ "others" = -% { " {\em et~al.}" * } -% { " and " * s #2 "{vv~}{ll}" format.name$ * } %wk -% if$ -% } -% if$ -% } -% if$ -%} -% -%FUNCTION {author.key.label} -%{ author empty$ -% { key empty$ -% { cite$ #1 #3 substring$ } -% 'key -% if$ -% } -% { author format.lab.names } -% if$ -%} -% -%FUNCTION {author.editor.key.label} -%{ author empty$ -% { editor empty$ -% { key empty$ -% { cite$ #1 #3 substring$ } -% 'key -% if$ -% } -% { editor format.lab.names } -% if$ -% } -% { author format.lab.names } -% if$ -%} -% -%FUNCTION {editor.key.label} -%{ editor empty$ -% { key empty$ -% { cite$ #1 #3 substring$ } -% 'key -% if$ -% } -% { editor format.lab.names } -% if$ -%} -% -%FUNCTION {calc.label} %wk修改 -% { type$ "book" = -% type$ "cbook" = -% type$ "inbook" = -% type$ "cinbook" = -% type$ "incollection" = % For sensible -% type$ "cincollection" = -% or or or or or % treatment of -% 'author.editor.key.label % Singer in -% { type$ "proceedings" = % BS 1629. -% 'editor.key.label -% 'author.key.label -% if$ -% type$ "cproceedings" = % BS 1629. -% 'editor.key.label -% 'author.key.label -% if$ -% -% } -% if$ -% duplicate$ -% year empty$ -% { -% "\protect\citename{" swap$ * ", }" * -% "n.d." * 'label := % Chicago, -% } % page 457. -% { -% "\protect\citename{" swap$ * ", }" * -% year -% * -% 'label := -% } -% if$ -% year field.or.null purify$ * -% sortify 'sort.label := -%} -% -% -%FUNCTION {sort.format.names} % To produce the -%{ 's := % order of entries -% #1 'nameptr := % specified in item -% "" % (3) on page 187 -% s num.names$ 'numnames := % of Butcher. -% numnames 'namesleft := -% { namesleft #0 > nameptr #3 < and } % Only 1st 2 names -% { nameptr #1 > % matter for -% { -% " " * } % sorting. -% 'skip$ -% if$ % Anything that's -% nameptr #2 = numnames #2 > and % "et al" goes -% { "zzzzz" * } % after works by 2 -% { % authors. -% s nameptr "{vv{ } }{ll{ }}{ f{ }}{ jj{ }}" format.name$ 't := -% nameptr numnames = t "others" = and -% { "zzzzz" * } -% { t sortify * } -% if$ -% } -% if$ -% nameptr #1 + 'nameptr := -% namesleft #1 - 'namesleft := -% } -% while$ -%} -% -%FUNCTION {sort.format.title} -%{ 't := -% "A " #2 -% "An " #3 -% "The " #4 t chop.word -% chop.word -% chop.word -% sortify -% #1 global.max$ substring$ -%} -% -%FUNCTION {author.sort} -%{ author empty$ -% { key empty$ -% { "to sort, need author or key in " cite$ * warning$ -% "" -% } -% { key sortify } -% if$ -% } -% { author sort.format.names } -% if$ -%} -% -%FUNCTION {author.editor.sort} -%{ author empty$ -% { editor empty$ -% { key empty$ -% { "to sort, need author, editor, or key in " cite$ * warning$ -% "" -% } -% { key sortify } -% if$ -% } -% { editor sort.format.names } -% if$ -% } -% { author sort.format.names } -% if$ -%} -% -%FUNCTION {editor.sort} -%{ editor empty$ -% { key empty$ -% { "to sort, need editor or key in " cite$ * warning$ -% "" -% } -% { key sortify } -% if$ -% } -% { editor sort.format.names } -% if$ -%} -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%-> -%INTEGERS { seq.num } -% -%FUNCTION {init.seq} -%{ #0 'seq.num :=} -% -%EXECUTE {init.seq} -% -%FUNCTION {int.to.fix} -%{ "000000000" swap$ int.to.str$ * -% #-1 #10 substring$ -%} -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%<- -% -%FUNCTION {presort} -%{ calc.label -% label sortify -% " " -% * -% seq.num #1 + 'seq.num := -% seq.num int.to.fix -% 'sort.label := -% sort.label * -% #1 entry.max$ substring$ -% 'sort.key$ := -%} -% -% -%%FUNCTION {presort} % Two sorting -%%{ calc.label % passes, from -%% label sortify % apalike.bst. -%% " " -%% * -%% type$ "book" = -%% type$ "inbook" = -%% type$ "incollection" = % For Singer -%% or or % in BS 1629. -%% 'author.editor.sort -%% { type$ "proceedings" = -%% 'editor.sort -%% 'author.sort -%% if$ -%% } -%% if$ -%% #1 entry.max$ substring$ -%% 'sort.label := -%% sort.label -%% * -%% " " -%% * -%% title field.or.null -%% sort.format.title -%% * -%% #1 entry.max$ substring$ -%% 'sort.key$ := -%%} -% -%ITERATE {presort} -% -%SORT -% -%STRINGS { last.label next.extra } -% -%INTEGERS { last.extra.num } -% -%FUNCTION {initialize.extra.label.stuff} -%{ #0 int.to.chr$ 'last.label := -% "" 'next.extra := -% #0 'last.extra.num := -%} -% -%FUNCTION {forward.pass} -%{ last.label label = -% { last.extra.num #1 + 'last.extra.num := -% last.extra.num int.to.chr$ 'extra.label := -% } -% { "a" chr.to.int$ 'last.extra.num := -% "" 'extra.label := -% label 'last.label := -% } -% if$ -%} -% -%FUNCTION {reverse.pass} -%{ next.extra "b" = -% { "a" 'extra.label := } -% 'skip$ -% if$ % Code needed here -% % if \citeauthor -% % and \citeyear -% label extra.label * 'label := % were supported. -% extra.label 'next.extra := -%} -% -%EXECUTE {initialize.extra.label.stuff} -% -%ITERATE {forward.pass} -% -%REVERSE {reverse.pass} -% -%FUNCTION {bib.sort.order} -%{ sort.label -% " " -% * -% year field.or.null sortify -% * -% " " -% * -% title field.or.null -% sort.format.title -% * -% #1 entry.max$ substring$ -% 'sort.key$ := -%} -% -%ITERATE {bib.sort.order} -% -%SORT -% -%FUNCTION {begin.bib} -%{ preamble$ empty$ -% 'skip$ -% { preamble$ write$ newline$ } -% if$ -% "\begin{thebibliography}{}" write$ newline$ -% -%%开始 -% "\providecommand{\url}[1]{\texttt{#1}}" -% write$ newline$ -% "\expandafter\ifx\csname urlstyle\endcsname\relax" -% write$ newline$ -% " \providecommand{\doi}[1]{doi: #1}\else" -% write$ newline$ -% " \providecommand{\doi}{doi: \begingroup \urlstyle{rm}\Url}\fi" -% write$ newline$ -%%结束 -% -%} -% -%EXECUTE {begin.bib} -% -%EXECUTE {init.state.consts} -% -%ITERATE {call.type$} -% -%FUNCTION {end.bib} -%{ newline$ -% "\end{thebibliography}" write$ newline$ -%} -% -%EXECUTE {end.bib} - - - - - - - - FUNCTION {sortify} { purify$ "l" change.case$ @@ -3292,9 +2851,6 @@ FUNCTION {chop.word} if$ } - - - FUNCTION {format.lab.names} %wk { 's := s #1 "{vv~}{ll}" format.name$ @@ -3338,7 +2894,6 @@ FUNCTION {author.key.label} 'key if$ } -% {author format.lab.names } {language empty$ {author format.lab.names} {author format.lab.cnames} @@ -3355,7 +2910,6 @@ FUNCTION {author.editor.key.label} 'key if$ } -% { editor format.lab.names } {language empty$ {editor format.lab.names} {editor format.lab.cnames} @@ -3363,7 +2917,6 @@ FUNCTION {author.editor.key.label} if$ } -% { author format.lab.names } {language empty$ {author format.lab.names} {author format.lab.cnames} @@ -3379,7 +2932,6 @@ FUNCTION {editor.key.label} 'key if$ } -% { editor format.lab.names } {language empty$ {editor format.lab.names} {editor format.lab.cnames} @@ -3462,7 +3014,6 @@ FUNCTION {int.to.fix} #-1 #10 substring$ } - FUNCTION {presort} { calc.label label sortify @@ -3540,7 +3091,9 @@ FUNCTION {begin.bib} 'skip$ { preamble$ write$ newline$ } if$ - "\begin{thebibliography}{" number.label int.to.str$ * "}\setlength{\baselineskip}{20bp plus 2bp minus 1bp}\setlength{\itemsep}{0bp}\setlength{\parskip}{0pt}" * %加入三个setlength以符合电子科技大学关于参考文献行距的要求。 + "\begin{thebibliography}{" number.label int.to.str$ * + "}\setlength{\baselineskip}{20bp plus 2bp minus 1bp}\setlength{\itemsep}{0bp}\setlength{\parskip}{0pt}" * + %加入三个setlength以符合电子科技大学关于参考文献行距的要求。 write$ newline$ "\providecommand{\natexlab}[1]{#1}" write$ newline$ @@ -3566,3 +3119,6 @@ FUNCTION {end.bib} } EXECUTE {end.bib} +\endinput +%% +%% End of file `uestcthesis.bst'. |