From 8e67627292db6c05cc4b8c6bfe591ece5d6ab2ef Mon Sep 17 00:00:00 2001 From: KAAAsS Date: Wed, 30 Mar 2022 02:04:13 +0800 Subject: [PATCH] =?UTF-8?q?=E5=8F=82=E8=80=83=E6=96=87=E7=8C=AE=E6=A0=BC?= =?UTF-8?q?=E5=BC=8F?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- gbt7714-2005.bst | 1956 ---------------------------------------------- jlucswthesis.cls | 2 +- jlucswthesis.lyx | 10 +- jlucswthesis.tex | 18 +- 4 files changed, 15 insertions(+), 1971 deletions(-) delete mode 100644 gbt7714-2005.bst diff --git a/gbt7714-2005.bst b/gbt7714-2005.bst deleted file mode 100644 index a7a2807..0000000 --- a/gbt7714-2005.bst +++ /dev/null @@ -1,1956 +0,0 @@ -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% 符合 GB/T 7714-2005 规范的 BibTeX 样式文件 -% -% 作者： 胡海星 南京大学计算机科学与技术系 -% 版本： v2.1.1 2015年6月15日 -% 项目主页: http://haixing-hu.github.io/nju-thesis/ -% -% 参考资料: -% [1] 中国国家标准化管理委员会. GB/T 7714-2005 文后参考文献着录规则[S]. 2005. -% [2] PATASHNIK O. BiBTeXing[R/OL]. 1988[2013-08-27]. -% ftp://tug.ctan.org/pub/tex-archive/biblio/bibtex/contrib/doc/btxdoc.pdf -% [3] PATASHNIK O. Designing BibTeX Styles[R/OL]. 1998[2013-08-27]. -% ftp://tug.ctan.org/pub/tex-archive/biblio/bibtex/contrib/doc/btxhak.pdf -% -% This program is free software; you can redistribute it and/or modify -% it under the terms of the GNU General Public License as published by -% the Free Software Foundation; either version 2 of the License, or -% (at your option) any later version. -% -% This program is distributed in the hope that it will be useful, -% but WITHOUT ANY WARRANTY; without even the implied warranty of -% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -% GNU General Public License for more details. -% -% You should have received a copy of the GNU General Public License along -% with this program; if not, write to the Free Software Foundation, Inc., -% 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -ENTRY % class Entry { -{ % public: - author % String author; - editor % String editor; - translator % String translator; - title % String title; - edition % String edition; - address % String address; - publisher % String publisher; - pages % String pages; - year % String year; - date % String date; - modifydate % String modifydate; - citedate % String citedate; - url % String url; - doi % String doi; - language % String language; - booktitle % String booktitle; - journal % String journal; - chapter % String chapter; - series % String series; - volume % String volume; - number % String number; - version % String version; - month % String month; - school % String school; - institution % String institution; - organization % String organization; - type % String type; - howpublished % String howpublished; - eid % String eid; - key % String key; - country % String country; - patentid % String patentid; - media % String media; -} { % // declare integer variables - required % int required; // withther the bibfield is required -} { % // declare String variables - label % String label; // label for the entry - mark % String mark; // mark for the entry - % // there is ahidden entry variable sort.key$ - % String sort_key; -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -INTEGERS { % // declare global int variables - entry.count % static int entry_count; // number of entries - longest.label.width % static int longest_label_width; // width of the longest label - i % static int i; - j % static int j; - k % static int k; -} % - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -STRINGS { % // declare global String variables - longest.label % static String longest_label; // the longest label - s % static String s; - t % static String t; -} % - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - -% define global static constants -FUNCTION {true} {#1} -FUNCTION {false} {#0} -FUNCTION {debug.enabled} {true} -FUNCTION {cap.volume.en} {"Vol~"} -FUNCTION {cap.volume.zh} {"卷"} -FUNCTION {cap.edition.en} {"~ed"} -FUNCTION {cap.edition.zh} {"版"} -FUNCTION {cap.anonymous.en} {"Anon"} -FUNCTION {cap.anonymous.zh} {"佚名"} -FUNCTION {cap.no.address.en} {"[S.l.]"} -FUNCTION {cap.no.address.zh} {"[出版地不详]"} -FUNCTION {cap.no.publisher.en} {"[s.n.]"} -FUNCTION {cap.no.publisher.zh} {"[出版者不详]"} -FUNCTION {cap.et.al.en} {", et~al"} -FUNCTION {cap.et.al.zh} {", 等"} -FUNCTION {cap.translate.en} {"~trans"} -FUNCTION {cap.translate.zh} {"译"} -FUNCTION {cap.doi.url} {"http://dx.doi.org/"} -FUNCTION {cap.st.en} {"st"} -FUNCTION {cap.nd.en} {"nd"} -FUNCTION {cap.rd.en} {"rd"} -FUNCTION {cap.th.en} {"th"} - -FUNCTION {cap.space} {" "} -FUNCTION {cap.period} {"\@. "} -FUNCTION {cap.comma} {"\@, "} -FUNCTION {cap.colon} {"\thinspace{}\textnormal{: }"} -FUNCTION {cap.double.slash} {" //\thinspace{}"} -FUNCTION {cap.dash} {"\thinspace{}\textnormal{--}\thinspace{}"} - -% Predefined latex command used to format the style of bibitems -FUNCTION {env.bibbegin} { "\begin{thebibliography}" } -FUNCTION {env.bibend} { "\end{thebibliography}" } -FUNCTION {cmd.bibauthor} { "\providecommand{\bibauthor}[1]{#1}" } -FUNCTION {cmd.bibeditor} { "\providecommand{\bibeditor}[1]{#1}" } -FUNCTION {cmd.bibtranslator} { "\providecommand{\bibtranslator}[1]{#1}" } -FUNCTION {cmd.bibtitle} { "\providecommand{\bibtitle}[1]{#1}" } -FUNCTION {cmd.bibbooktitle} { "\providecommand{\bibbooktitle}[1]{#1}" } -FUNCTION {cmd.bibjournal} { "\providecommand{\bibjournal}[1]{#1}" } -FUNCTION {cmd.bibmark} { "\providecommand{\bibmark}[1]{#1}" } -FUNCTION {cmd.bibcountry} { "\providecommand{\bibcountry}[1]{#1}" } -FUNCTION {cmd.bibpatentid} { "\providecommand{\bibpatentid}[1]{#1}" } -FUNCTION {cmd.bibedition} { "\providecommand{\bibedition}[1]{#1}" } -FUNCTION {cmd.biborganization} { "\providecommand{\biborganization}[1]{#1}" } -FUNCTION {cmd.bibaddress} { "\providecommand{\bibaddress}[1]{#1}" } -FUNCTION {cmd.bibpublisher} { "\providecommand{\bibpublisher}[1]{#1}" } -FUNCTION {cmd.bibinstitution} { "\providecommand{\bibinstitution}[1]{#1}" } -FUNCTION {cmd.bibschool} { "\providecommand{\bibschool}[1]{#1}" } -FUNCTION {cmd.bibvolume} { "\providecommand{\bibvolume}[1]{#1}" } -FUNCTION {cmd.bibnumber} { "\providecommand{\bibnumber}[1]{#1}" } -FUNCTION {cmd.bibversion} { "\providecommand{\bibversion}[1]{#1}" } -FUNCTION {cmd.bibpages} { "\providecommand{\bibpages}[1]{#1}" } -FUNCTION {cmd.bibmodifydate} { "\providecommand{\bibmodifydate}[1]{#1}" } -FUNCTION {cmd.bibcitedate} { "\providecommand{\bibcitedate}[1]{#1}" } -FUNCTION {cmd.bibyear} { "\providecommand{\bibyear}[1]{#1}" } -FUNCTION {cmd.bibdate} { "\providecommand{\bibdate}[1]{#1}" } -FUNCTION {cmd.biburl} { "\providecommand{\biburl}[1]{\newline\url{#1}}" } - -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {log.str} { % void Entry::log_str(String value, String message) - debug.enabled { % if (debug_enabled == 1) { - "DEBUG: " swap$ * " - '" * % message = "DEBUG: " + message + " - '"; - swap$ * % message = message + value; - "'" * % message = message + "'"; - top$ % log(message); - } { % } else { - pop$ pop$ % return; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {log.int} { % int Entry::log_int(int value, String message) - debug.enabled { % if (debug_enabled == 1) { - "DEBUG: " swap$ * " - " * % message = "DEBUG: " + message + " - "; - swap$ int.to.str$ * % message = message + int_to_str(value); - top$ % log(message); - } { % } else { - pop$ pop$ % return; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {not} { % int Entry::not(int x) { - { % if (x == 1) { - false % return false; - } { % } else { - true % return true; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {and} { % int Entry::and(int x, int y) { - { % if (y == 1) { - skip$ % return x; - } { % } else { - pop$ false % return false; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {or} { % int Entry::or(int x, int y) { - { % if (y == 1) { - pop$ true % return true; - } { % } else { - skip$ % return x; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % // calculate the length in characters of a string - % // We need this function since text.length$ is NOT - % // the length in characters. -INTEGERS {length.i} % static int length_i; -FUNCTION {length} { % int Entry::length(String str) { - duplicate$ empty$ { % if (empty(str)) { - pop$ #0 % return 0; - } { % } else { - #1 'length.i := % length_i = 1; - false % int stop = false; - {not} { % while (! stop) { - duplicate$ length.i #1 substring$ % String tmp = substring(str, length_i, 1); - "" = { % if (tmp == "") { - true % stop = true; - } { % } else { - length.i #1 + 'length.i := % length_i = length_i + 1; - false % stop = false; - } if$ % } - } while$ % } - pop$ length.i #1 - % return length_i - 1; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {is.digit} { % int Entry::is_digit(String ch) { - chr.to.int$ % int ascii = chr_to_int(ch); - duplicate$ "0" chr.to.int$ < { % if (ascii < chr_to_int("0")) { - pop$ false % return false; - } { % } else { - "9" chr.to.int$ > { % if (ascii > chr_to_int("9")) { - false % return false; - } { % } else { - true % return true; - } if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % // test if str is a number -FUNCTION {is.number} { % int Entry::is_number(String str) { - duplicate$ empty$ not swap$ % int result = (! empty(str)); - { duplicate$ empty$ not} { % while (! empty(str)) { - duplicate$ #1 #1 substring$ is.digit { % if (is_digit(substring(str, 1, 1))) { - #2 global.max$ substring$ % str = substring(str, 2, global_max); - } { % } else { - pop$ pop$ false % result = false; - "" % str = ""; - } if$ % } - } while$ % } - pop$ % return result; -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % // extract the number prefix of str -FUNCTION {extract.number} { % String Entry::extract_number(String str) { - duplicate$ % String suffix = str; - duplicate$ length swap$ % int n = length(str); - duplicate$ empty$ % int stop = empty(suffix); - { not } { % while (! stop) { - duplicate$ #1 #1 substring$ is.digit { % if (is_digit(substring(suffix, 1, 1))) { - #2 global.max$ substring$ % suffix = substring(suffix, 2, global_max); - duplicate$ empty$ % stop = empty(suffix); - } { % } else { - true % stop = true; - } if$ % } - } while$ % } - length - % int n = n - length(suffix); - #1 swap$ substring$ % return substring(str, 1, n); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {get.last.chr} { % String Entry::get_last_chr(String str) { - duplicate$ length % int n = length(str); - duplicate$ #0 = { % if (n == 0) { - pop$ % return str; - } { % } else { - #1 substring$ % return substring(str, n, 1); - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {get.ordinal.suffix.en} { % String Entry::get_ordinal_suffix_en(String ch) { - duplicate$ "1" = { % if (num == "1") { - pop$ cap.st.en % return cap_st_en; - } { % } else { - duplicate$ "2" = { % if (num == "2") { - pop$ cap.nd.en % return cap_nd_en; - } { % } else { - duplicate$ "3" = { % if (num == "3") { - pop$ cap.rd.en % return cap_rd_en; - } { % } else { - pop$ cap.th.en % return cap_th_en; - } if$ % } - } if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {num.to.ordinal.en} { % String Entry::num_to_ordinal_en(String num) { - duplicate$ empty$ { % if (empty(num)) { - skip$ % return num; - } { % } else { - duplicate$ get.last.chr % String ch = get_last_chr(num); - get.ordinal.suffix.en % String str = get_ordinal_suffix_en(ch); - * % reutrn num + str; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -STRINGS {remove.dots.result} % static String remove_dots_result; - % -FUNCTION {remove.dots} { % String Entry::remove_dots(String str) { - "" 'remove.dots.result := % remove_dots_result = ""; - { duplicate$ empty$ not } { % while (! empty(str)) { - duplicate$ #1 #2 substring$ % String tmp = substring(str, 1, 2); - "\." = { % if (tmp == "\.") { - #3 global.max$ substring$ % str = substring(str, 3, global_max); - } { % } else { - duplicate$ #1 #1 substring$ % tmp = substring(str, 1, 1); - duplicate$ "." = { % if (tmp == ".") { - pop$ #2 global.max$ substring$ % str = substring(str, 2, global_max); - } { % } else { - remove.dots.result swap$ * % tmp = remove_dots_result + tmp; - 'remove.dots.result := % remove_dots_result = tmp; - #2 global.max$ substring$ % str = substring(str, 2, global_max); - } if$ % } - } if$ % } - } while$ % } - pop$ remove.dots.result % return remove_dots_result; -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {add.brace} { % String Entry::add_brace(String str) { - "{" swap$ * "}" * % return "{" + str + "}"; -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {add.bracket} { % String Entry::bracket(String str) { - "(" swap$ * ")" * % return "(" + str + ")"; -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {add.squarebracket} { % String Entry::add_squarebracket(String str) { - "[" swap$ * "]" * % return "[" + str + "]"; -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {add.textit} { % String Entry::add_textit(String str) { - "\textit{" swap$ * "}" * % return "\textit{" + str + "}"; -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {add.textbf} { % String Entry::add_textbf(String str) { - "\textbf{" swap$ * "}" * % return "\textbf{" + str + "}"; -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % // test if str contains a dash '-' -FUNCTION {contain.dash} { % int Entry::contain_dash(String str) { - false swap$ % int result = false; - { duplicate$ empty$ not} { % while (! empty(str)) { - duplicate$ #1 #1 substring$ "-" = { % if (substring(str, 1, 1) == "-") { - pop$ pop$ true % result = true; - "" % str = ""; - } { % } else { - #2 global.max$ substring$ % str = substring(str, 2, global_max); - } if$ % } - } while$ % } - pop$ % return result; -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % // extract the substring before the first '-' - % // returns the string itself if no '-' -FUNCTION {extract.before.first.dash} { % String Entry::extract_before_first_dash(String str) { - duplicate$ % String suffix = str; - duplicate$ length swap$ % int n = length(str); - duplicate$ empty$ % int stop = empty(suffix); - { not } { % while (! stop) { - duplicate$ #1 #1 substring$ "-" = { % if (substring(suffix, 1, 1) == "-") { - true % stop = true; - } { % } else {4r - #2 global.max$ substring$ % suffix = substring(suffix, 2, global_max); - duplicate$ empty$ % stop = empty(suffix); - } if$ % } - } while$ % } - length - % int n = n - length(suffix); - #1 swap$ substring$ % return substring(str, 1, n); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % // extract the substring after the first '-' - % // returns the string itself if no '-' -FUNCTION {extract.after.first.dash} { % String Entry::extract_after_first_dash(String str) { - duplicate$ % String suffix = str; - duplicate$ empty$ % int stop = empty(suffix); - { not } { % while (! stop) { - duplicate$ #1 #1 substring$ "-" = { % if (substring(suffix, 1, 1) == "-") { - true % stop = true; - } { % } else {4r - #2 global.max$ substring$ % suffix = substring(suffix, 2, global_max); - duplicate$ empty$ % stop = empty(suffix); - } if$ % } - } while$ % } - duplicate$ empty$ { % if (empty(suffix)) { - pop$ % return str; - } { % } else { - swap$ pop$ #2 global.max$ substring$ % return substring(suffix, 2, global_max); - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % // extract the substring after the last '-' - % // returns the empty string if no '-' -FUNCTION {extract.after.last.dash} { % String Entry::extract_after_last_dash(String str) { - duplicate$ contain.dash not { % if (! contain_dash(str)) { - pop$ "" % return ""; - } { % } else { - {duplicate$ contain.dash} { % while (contain_dash(str)) { - extract.after.first.dash % str = extract_after_first_dash(str); - } while$ % } - % return str; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {trim.start} { % String Entry::trim_start(String str) { - {duplicate$ #1 #1 substring$ " " =} { % while (substring(str, 1, 1) == " ") { - #2 global.max$ substring$ % str = substring(str, 2, global_max); - } while$ % } - % return str; -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {trim.end} { % String Entry::trim_end(String str) { - {duplicate$ get.last.chr " " =} { % while (get_last_chr(str) == " ") { - duplicate$ length #1 - % int n = length(str) - 1; - #1 swap$ substring$ % str = substring(str, 1, n); - } while$ % } - % return str; -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {trim} { % String Entry::trim(String str) { - trim.start % str = trim_start(str); - trim.end % return trim_end(str); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {start.bibitem} { % void Entry::start_bibitem() { - newline$ % writeln(); - "\bibitem{" cite$ * "}" * write$ % write("\bibitem{" + this.cite + "}"); - newline$ % writeln(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {end.bibitem} { % void Entry::end_bibitem() { - cap.period write$ % write(cap_period); - newline$ % writeln(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {is.in.chinese} { % int Entry::is_in_chinese() { - language empty$ { % if (empty(this.language)) { - false % return false; - } { % } else { - language "zh" = { % if (this.language == "zh") { - true % return true; - } { % } else { - false % return false; - } if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {is.online} { % int Entry::is_online() { - url empty$ not { % if (! empty(this.url)) { - true % return true; - } { % } else { - doi empty$ not { % if (! empty(this.doi)) { - true % return true; - } { % } else { - false % return false; - } if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {set.mark} { % void Entry::set_mark(String mark) { - 'mark := % this.mark = mark; - is.online { % if (is_online()) { - mark "/OL" * 'mark := % this.mark = this.mark + "/OL"; - } { % } else { - media empty$ not { % if (! empty(this.media)) { - mark "/" * media * 'mark := % this.mark = this.mark + "/" + this.media; - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {cap.volume} { % String Entry::cap_volume() { - is.in.chinese { % if (is_in_chinese()) { - cap.volume.zh % return cap_volume_zh; - } { % } else { - cap.volume.en % return cap_volume_en; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {cap.edition} { % String Entry::cap_edition() { - is.in.chinese { % if (is_in_chinese()) { - cap.edition.zh % return cap_edition_zh; - } { % } else { - cap.edition.en % return cap_edition_en; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {cap.anonymous} { % String Entry::cap_anonymous() { - is.in.chinese { % if (is_in_chinese()) { - cap.anonymous.zh % return cap_anonymous_zh; - } { % } else { - cap.anonymous.en % return cap_anonymous_en; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {cap.no.address} { % String Entry::cap_no_address() { - is.in.chinese { % if (is_in_chinese()) { - cap.no.address.zh % return cap_no_address_zh; - } { % } else { - cap.no.address.en % return cap_no_address_en; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {cap.no.publisher} { % String Entry::cap_no_publisher() { - is.in.chinese { % if (is_in_chinese()) { - cap.no.publisher.zh % return cap_no_publisher_zh; - } { % } else { - cap.no.publisher.en % return cap_no_publisher_en; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {cap.et.al} { % String Entry::cap_et_al() { - is.in.chinese { % if (is_in_chinese()) { - cap.et.al.zh % return cap_et_al_zh; - } { % } else { - cap.et.al.en % return cap_et_al_en; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {cap.translate} { % String Entry::cap_translate() { - is.in.chinese { % if (is_in_chinese()) { - cap.translate.zh % return cap_translate_zh; - } { % } else { - cap.translate.en % return cap_translate_en; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.bibinfo} { % String Entry::format_bibinfo(String info, String type) { - swap$ add.brace swap$ % info = add_brace(info); - "\bib" swap$ * swap$ * % return "\bib" + type + info; -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -INTEGERS { nameindex namecount } % static int nameindex, namecount; -STRINGS { namelist nameformat } % static String namelist, nameformat; -STRINGS { firstname lastname jrname vonname} % static String firstname, lastname, jrname, vonname; - % -FUNCTION {format.names} { % String Entry::format_names(String names) { - 'namelist := % namelist = names; - namelist num.names$ 'namecount := % namecount = num_names(namelist); - "" % String result = ""; - #0 'nameindex := % nameindex = 0; - {nameindex namecount < nameindex #3 < and} { % while ((nameindex < namecount) && (nameindex < 3)) { - nameindex #1 + 'nameindex := % nameindex = nameindex + 1; - nameindex #1 > { % if (nameindex > 1) { - cap.comma * % result = result + cap_comma; - } 'skip$ if$ % } - namelist nameindex "{vv}" format.name$ % String tmp = format_name(namelist, nameindex, "{vv}"); - 'vonname := % vonname = tmp; - namelist nameindex "{jj}" format.name$ % tmp = format_name(namelist, nameindex, "{jj}"); - remove.dots 'jrname := % jrname = remove_dots(tmp); - namelist nameindex "{f}" format.name$ % tmp = format_name(namelist, nameindex, "{f}"); - remove.dots % tmp = remove_dots(tmp); - "u" change.case$ 'firstname := % firstname = change_case(tmp, "u"); - namelist nameindex "{ll}" format.name$ % tmp = format_name(namelist, nameindex, "{ll}"); - "u" change.case$ 'lastname := % lastname = change_case(tmp, "u"); - jrname empty$ not { % if (! empty(jrname)) { - jrname * " " * % result = result + jrname + " " - } 'skip$ if$ % } - vonname empty$ not { % if (! empty(vonname)) { - vonname * " " * % result = result + vonname + " " - } 'skip$ if$ % } - lastname empty$ not { % if (! empty(lastname)) { - lastname * " " * % result = result + lastname + " " - } 'skip$ if$ % } - firstname empty$ not { % if (! empty(firstname)) { - firstname * " " * % result = result + firstname + " " - } 'skip$ if$ % } - trim.end % result = trim_end(result); - } while$ % } - nameindex namecount < { % if (nameindex < namecount) { - cap.et.al * % result = result + cap_et_al(); - } 'skip$ if$ % } -} % } - % - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % // format English names -FUNCTION {format.names.en} { % String Entry::format_names_en(String names) { - format.names % format_names(names); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % // format Chinese names -FUNCTION {format.names.zh} { % String Entry::format_names_zh(String names) { - format.names % format_names(names); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.author} { % String Emtry::format_author(String authors) { - is.in.chinese { % if (is_in_chinese) { - format.names.zh % authors = format_names_zh(authors); - } { % } else { - format.names.en % authors = format_names_en(authors); - } if$ % } - "author" format.bibinfo % return format_bibinfo(authors, "author"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.editor} { % String Emtry::format_author(String editors) { - is.in.chinese { % if (is_in_chinese) { - format.names.zh % editors = format_names_zh(editors); - } { % } else { - format.names.en % editors = format_names_en(editors); - } if$ % } - "editor" format.bibinfo % return format_bibinfo(editors, "editor"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.translator} { % String Emtry::format_translator(String translators) { - is.in.chinese { % if (is_in_chinese) { - duplicate$ % String names = translators; - format.names.zh % translators = format_names_zh(translators); - swap$ num.names$ #3 > { % if (num_names(names) > 3) { - cap.translate.zh * % translators = translators + cap_translate_zh; - } { % } else { - cap.comma * cap.translate.zh * % translators = translators + cap_comma + cap_translate_zh; - } if$ % } - } { % } else { - duplicate$ % String names = translators; - format.names.en % translators = format_names_en(translators); - swap$ num.names$ #3 > { % if (num_names(names) > 3) { - cap.translate.en * % translators = translators + cap_translate_en; - } { % } else { - cap.comma * cap.translate.en * % translators = translators + cap_comma + cap_translate_en; - } if$ % } - } if$ % } - "translator" format.bibinfo % return format_bibinfo(translator, "translator"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.title} { % String Emtry::format_title(String title) { - "title" format.bibinfo % return format_bibinfo(title, "title"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.booktitle} { % String Emtry::format_booktitle(String booktitle) { - "booktitle" format.bibinfo % return format_bibinfo(booktitle, "booktitle"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.mark} { % String Emtry::format_mark(String mark) { - "[" swap$ * "]" * % mark = "[" + mark + "]"; - "mark" format.bibinfo % return format_bibinfo(mark, "mark"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.country} { % String Emtry::format_country(String country) { - "country" format.bibinfo % return format_bibinfo(country, "country"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.patentid} { % String Emtry::format_patentid(String patentid) { - "patentid" format.bibinfo % return format_bibinfo(patentid, "patentid"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.edition} { % String Emtry::format_edition(String edition) { - duplicate$ is.number { % if (is_number(edition)) { - is.in.chinese { % if (is_in_chinese()) { - cap.edition.zh * % edition = edition + cap_edition_zh; - } { % } else { - num.to.ordinal.en cap.edition.en * % edition = num_to_ordinal_en(edition) + cap_edition_en; - } if$ % } - } 'skip$ if$ % } - % // use a \mbox{} to prevent line break within edition - "\mbox{" swap$ * "}" * % edition = "\mbox{" + edition + "}"; - "edition" format.bibinfo % return format_bibinfo(edition, "edition"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.organization} { % String Emtry::format_organization(String organization) { - "organization" format.bibinfo % return format_bibinfo(organization, "organization"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.address} { % String Emtry::format_address(String address) { - "address" format.bibinfo % return format_bibinfo(address, "address"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.publisher} { % String Emtry::format_publisher(String publisher) { - "publisher" format.bibinfo % return format_bibinfo(publisher, "publisher"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.institution} { % String Emtry::format_institution(String institution) { - "institution" format.bibinfo % return format_bibinfo(institution, "institution"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.school} { % String Emtry::format_school(String school) { - "school" format.bibinfo % return format_bibinfo(school, "school"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.year} { % String Emtry::format_year(String year) { - "year" format.bibinfo % return format_bibinfo(year, "year"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.date} { % String Emtry::format_date(String date) { - "date" format.bibinfo % return format_bibinfo(date, "date"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.journal} { % String Emtry::format_journal(String journal) { - "journal" format.bibinfo % return format_bibinfo(journal, "journal"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.volume} { % String Emtry::format_volume(String volume) { - "volume" format.bibinfo % return format_bibinfo(volume, "volume"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.number} { % String Emtry::format_number(String number) { - add.bracket % number = add_bracket(number); - "number" format.bibinfo % return format_bibinfo(number, "number"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.report.number} { % String Emtry::format_report_number(String number) { - "number" format.bibinfo % return format_bibinfo(number, "number"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.version} { % String Emtry::format_version(String version) { - "version" format.bibinfo % return format_bibinfo(version, "version"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.pages} { % String Emtry::format_pages(String pages) { - "pages" format.bibinfo % return format_bibinfo(pages, "pages"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.modifydate} { % String Emtry::format_modifydate(String modifydate) { - add.bracket % modifydate = add_bracket(modifydate); - "modifydate" format.bibinfo % return format_bibinfo(modifydate, "modifydate"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {format.citedate} { % String Emtry::format_citedate(String citedate) { - add.squarebracket % citedate = add_squarebracket(citedate); - "citedate" format.bibinfo % return format_bibinfo(citedate, "citedate"); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % - % // NOTE: do not use the format_bibinfo() for URL, - % // since if the URL contains special symbols such - % // as '%', the \biburl{} will be broken. -FUNCTION {format.url} { % String Emtry::format_url(String url) { - "\newline\url{" swap$ * "}" * % return "\newline\url{" + url + "}"; -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {get.full.title} { % String Entry::get_full_title() { - series empty$ { % if (empty(this.series)) { - volume empty$ { % if (empty(this.volume)) { - title % return this.title; - } { % } else { - title cap.colon * cap.volume * volume * % return this.title + cap_colon + cap_volume() + this.volume; - } if$ % } - } { % } else { - volume empty$ { % if (empty(this.volume)) { - series cap.colon * title * % return this.series + cap_colon + this.title; - } { % } else { - series cap.comma * cap.volume * volume * % String str = this.series + cap_comma + cal_volume() + this.volume; - cap.colon * title * % return str + cap_colon + this.title; - } if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {get.full.booktitle} { % String Entry::get_full_booktitle() { - series empty$ { % if (empty(this.series)) { - volume empty$ { % if (empty(this.volume)) { - booktitle % return this.booktitle; - } { % } else { - booktitle cap.colon * cap.volume * volume * % return this.booktitle + cap_colon + cap_volume() + this.volume; - } if$ % } - } { % } else { - volume empty$ { % if (empty(this.volume)) { - series cap.colon * booktitle * % return this.series + cap_colon + this.booktitle; - } { % } else { - series cap.comma * cap.volume * volume * % String str = this.series + cap_comma + cal_volume() + this.volume; - cap.colon * booktitle * % return str + cap_colon + this.booktitle; - } if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {get.pages} { % String Entry::get_pages() { - pages contain.dash { % if (contain_dash(this.pages)) { - pages extract.before.first.dash % String p1 = extract_before_first_dash(this.pages); - pages extract.after.last.dash % String p2 = extract_after_last_dash(this.pages); - cap.dash swap$ * * % return p1 + cap_dash + p2; - } { % } else { - pages % return this.pages; - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.author.or.editor} { % void Entry::output_author_or_editor(int required) { - 'required := % this.required = required; - author empty$ not { % if (! empty(this.author)) { - author format.author write$ % write(format_author(this.author)); - cap.period write$ % write(cap_period); - } { % } else { - editor empty$ not { % if (! empty(this.editor)) { - editor format.editor write$ % write(format_editor(this.editor)); - cap.period write$ % write(cap_period); - } { % } else { - required { % if (required == 1) { - "Require author/editor: " cite$ * warning$% warning("Require author/editor: " + this.cite); - cap.anonymous format.author write$ % write(format_author(cap_anonymous())); - cap.period write$ % write(cap_period); - } 'skip$ if$ % } - } if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.author} { % void Entry::output_author(int required) { - 'required := % this.required = required; - author empty$ not { % if (! empty(this.author)) { - author format.author write$ % write(format_author(this.author)); - cap.period write$ % write(cap_period); - } { % } else { - required { % if (required == 1) { - "Require author: " cite$ * warning$ % warning("Require author: " + this.cite); - cap.anonymous format.author write$ % write(format_author(cap_anonymous())); - cap.period write$ % write(cap_period); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.editor} { % void Entry::output_editor(int required) { - 'required := % this.required = required; - editor empty$ not { % if (! empty(this.editor)) { - editor format.editor write$ % write(format_editor(this.editor)); - cap.period write$ % write(cap_period); - } { % } else { - required { % if (required == 1) { - "Require editor: " cite$ * warning$ % warning("Require editor: " + this.cite); - cap.anonymous format.editor write$ % write(format_editor(cap_anonymous())); - cap.period write$ % write(cap_period); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.title} { % void Entry::output_title(int required) { - 'required := % this.required = required; - title empty$ not { % if (! empty(this.title)) { - title format.title write$ % write(format_title(this.title)); - } { % } else { - required { % if (required == 1) { - "Require title: " cite$ * warning$ % warning("Require title: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.series.volume.title} { % void Entry::output_series_volume_title(int required) { - 'required := % this.required = required; - title empty$ not { % if (! empty(this.title)) { - get.full.title format.booktitle write$ % write(format_booktitle(get_full_title())); - } { % } else { - required { % if (required == 1) { - "Require title: " cite$ * warning$ % warning("Require title: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.series.volume.booktitle} { % void Entry::output_series_volume_booktitle(int required) { - 'required := % this.required = required; - booktitle empty$ not { % if (! empty(this.booktitle)) { - get.full.booktitle format.booktitle write$ % write(format_booktitle(get_full_booktitle()); - } { % } else { - required { % if (required == 1) { - "Require booktitle: " cite$ * warning$ % warning("Require booktitle: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.journal} { % void Entry::output_journal(int required) { - 'required := % this.required = required; - journal empty$ not { % if (! empty(this.journal)) { - cap.period write$ % write(cap_period); - journal format.journal write$ % write(format_journal(this.journal)); - } { % } else { - required { % if (required == 1) { - "Require journal: " cite$ * warning$ % warning("Require journal: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.mark} { % void Entry::output_mark(int required) { - 'required := % this.required = required; - mark empty$ not { % if (! empty(this.mark)) { - mark format.mark write$ % write(format_mark(this.mark)); - } { % } else { - required { % if (required == 1) { - "Require mark: " cite$ * warning$ % warning("Require mark: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.translator} { % void Entry::output_translator(int required) { - 'required := % this.required = required; - translator empty$ not { % if (! empty(this.translator)) { - cap.period write$ % write(cap_period); - translator format.translator write$ % write(format_translator(this.translator)); - } { % } else { - required { % if (required == 1) { - "Require translator: " cite$ * warning$ % warning("Require translator: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.edition} { % void Entry::output_edition(int required) { - 'required := % this.required = required; - edition empty$ not { % if (! empty(this.edition)) { - cap.period write$ % write(cap_period); - edition format.edition write$ % write(format_edition(this.edition)); - } { % } else { - required { % if (required == 1) { - "Require edition: " cite$ * warning$ % warning("Require edition: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.address} { % void Entry::output_address(int required) { - 'required := % this.required = required; - address empty$ not { % if (! empty(this.address)) { - cap.period write$ % write(cap_period); - address format.address write$ % write(format_address(this.address)); - } { % } else { - required { % if (required == 1) { - "Require address: " cite$ * warning$ % warning("Require address: " + this.cite); - cap.period write$ % write(cap_period); - cap.no.address format.address write$ % write(format_address(cap_no_address())); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.publisher} { % void Entry::output_publisher(int required) { - 'required := % this.required = required; - publisher empty$ not { % if (! empty(this.publisher)) { - cap.colon write$ % write(cap_colon); - publisher format.publisher write$ % write(format_publisher(this.publisher)); - } { % } else { - required { % if (required == 1) { - "Require publisher: " cite$ * warning$ % warning("Require publisher: " + this.cite); - cap.colon write$ % write(cap_colon); - cap.no.publisher format.publisher write$ % write(format_publisher(cap_no_publisher())); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.publisher.no.address} { % void Entry::output_publisher_no_address(int required) { - 'required := % this.required = required; - publisher empty$ not { % if (! empty(this.publisher)) { - cap.period write$ % write(cap_period); - publisher format.publisher write$ % write(format_publisher(this.publisher)); - } { % } else { - required { % if (required == 1) { - "Require publisher: " cite$ * warning$ % warning("Require publisher: " + this.cite); - cap.period write$ % write(cap_period); - cap.no.publisher format.publisher write$ % write(format_publisher(cap_no_publisher())); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.school} { % void Entry::output_school(int required) { - 'required := % this.required = required; - school empty$ not { % if (! empty(this.school)) { - cap.colon write$ % write(cap_colon); - school format.school write$ % write(format_school(this.school)); - } { % } else { - required { % if (required == 1) { - "Require school: " cite$ * warning$ % warning("Require publisher: " + this.cite); - cap.colon write$ % write(cap_colon); - cap.no.publisher format.school write$ % write(format_school(cap_no_publisher())); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.institution} { % void Entry::output_institution(int required) { - 'required := % this.required = required; - institution empty$ not { % if (! empty(this.institution)) { - cap.colon write$ % write(cap_colon); - institution format.institution write$ % write(format_publisher(this.institution)); - } { % } else { - required { % if (required == 1) { - "Require institution: " cite$ * warning$ % warning("Require institution: " + this.cite); - cap.colon write$ % write(cap_colon); - cap.no.publisher format.institution write$ % write(format_institution(cap_no_publisher())); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.year} { % void Entry::output_year(int required) { - 'required := % this.required = required; - year empty$ not { % if (! empty(this.year)) { - year format.year write$ % write(format_year(this.year)); - } { % } else { - required { % if (required == 1) { - "Require year: " cite$ * warning$ % warning("Require year: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.pages} { % void Entry::output_pages(int required) { - 'required := % this.required = required; - pages empty$ not { % if (! empty(this.pages)) { - cap.colon write$ % write(cap_colon); - get.pages format.pages write$ % write(format_pages(get_pages())); - } { % } else { - required { % if (required == 1) { - "Require pages: " cite$ * warning$ % warning("Require pages: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.modifydate} { % void Entry::output_modifydate(int required) { - 'required := % this.required = required; - modifydate empty$ not { % if (! empty(this.modifydate)) { - cap.space write$ % write(cap_space); - modifydate format.modifydate write$ % write(format_modifydate(this.modifydate)); - } { % } else { - required { % if (required == 1) { - "Require modifydate: " cite$ * warning$ % warning("Require modifydate: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.citedate} { % void Entry::output_citedate(int required) { - 'required := % this.required = required; - citedate empty$ not { % if (! empty(this.citedate)) { - cap.space write$ % write(cap_space); - citedate format.citedate write$ % write(format_citedate(this.citedate)); - } { % } else { - required is.online or { % if ((required == 1) || (is_online())) { - "Require citedate: " cite$ * warning$ % warning("Require citedate: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.date} { % void Entry::output_date(int required) { - 'required := % this.required = required; - date empty$ not { % if (! empty(this.date)) { - date format.date write$ % write(format_date(this.date)); - } { % } else { - required { % if (required == 1) { - "Require date: " cite$ * warning$ % warning("Require date: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.volume} { % void Entry::output_volume(int required) { - 'required := % this.required = required; - volume empty$ not { % if (! empty(this.volume)) { - cap.comma write$ % write(cap_comma); - volume format.volume write$ % write(format_volume(this.volume)); - } { % } else { - required { % if (required == 1) { - "Require volume: " cite$ * warning$ % warning("Require volume: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.number} { % void Entry::output_number(int required) { - 'required := % this.required = required; - number empty$ not { % if (! empty(this.number)) { - number format.number write$ % write(format_number(this.number)); - } { % } else { - required { % if (required == 1) { - "Require number: " cite$ * warning$ % warning("Require number: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.report.number} { % void Entry::output_report_number(int required) { - 'required := % this.required = required; - number empty$ not { % if (! empty(this.number)) { - cap.colon write$ % write(cap_colon); - number format.report.number write$ % write(format_report_number(this.number)); - } { % } else { - required { % if (required == 1) { - "Require number: " cite$ * warning$ % warning("Require number: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.country} { % void Entry::output_country(int required) { - 'required := % this.required = required; - country empty$ not { % if (! empty(this.country)) { - cap.colon write$ % write(cap_colon); - country format.country write$ % write(format_country(this.country)); - } { % } else { - required { % if (required == 1) { - "Require country: " cite$ * warning$ % warning("Require country: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.patentid} { % void Entry::output_patentid(int required) { - 'required := % this.required = required; - patentid empty$ not { % if (! empty(this.patentid)) { - cap.comma write$ % write(cap_comma); - patentid format.patentid write$ % write(format_patentid(this.patentid)); - } { % } else { - required { % if (required == 1) { - "Require patentid: " cite$ * warning$ % warning("Require patentid: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.start.year} { % void Entry::output_start_year(int required) { - 'required := % this.required = required; - year empty$ not { % if (! empty(this.year)) { - year extract.before.first.dash % String str = extract_before_first_dash(this.year); - format.year write$ % write(format_year(str)); - } { % } else { - required { % if (required == 1) { - "Require year: " cite$ * warning$ % warning("Require year: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.start.volume} { % void Entry::output_start_volume(int required) { - 'required := % this.required = required; - volume empty$ not { % if (! empty(this.volume)) { - cap.comma write$ % write(cap_comma); - volume extract.before.first.dash % String str = extract_before_first_dash(this.volume); - format.volume write$ % write(format_volume(str)); - } { % } else { - required { % if (required == 1) { - "Require volume: " cite$ * warning$ % warning("Require volume: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.start.number} { % void Entry::output_start_number(int required) { - 'required := % this.required = required; - number empty$ not { % if (! empty(this.number)) { - number extract.before.first.dash % String str = extract_before_first_dash(this.number); - format.number write$ % write(format_number(str)); - } { % } else { - required { % if (required == 1) { - "Require number: " cite$ * warning$ % warning("Require number: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.end.year} { % void Entry::output_end_year(int required) { - 'required := % this.required = required; - year empty$ not { % if (! empty(this.year)) { - year extract.after.last.dash % String str = extract_after_last_dash(this.year); - format.year write$ % write(format_year(str)); - } { % } else { - required { % if (required == 1) { - "Require year: " cite$ * warning$ % warning("Require year: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.end.volume} { % void Entry::output_end_volume(int required) { - 'required := % this.required = required; - volume empty$ not { % if (! empty(this.volume)) { - cap.comma write$ % write(cap_comma); - volume extract.after.last.dash % String str = extract_after_last_dash(this.volume); - format.volume write$ % write(format_volume(str)); - } { % } else { - required { % if (required == 1) { - "Require volume: " cite$ * warning$ % warning("Require volume: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.end.number} { % void Entry::output_end_number(int required) { - 'required := % this.required = required; - number empty$ not { % if (! empty(this.number)) { - number extract.after.last.dash % String str = extract_after_last_dash(this.number); - format.number write$ % write(format_number(str)); - } { % } else { - required { % if (required == 1) { - "Require number: " cite$ * warning$ % warning("Require number: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.url.or.doi} { % void Entry::output_url_or_doi(int required) { - 'required := % this.required = required; - url empty$ not { % if (! empty(this.url)) { - cap.period write$ % write(cap_period); - url format.url write$ % write(format_url(this.url)); - } { % } else { - doi empty$ not { % if (! empty(this.doi)) { - cap.period write$ % write(cap_period); - cap.doi.url doi * format.url write$ % write(format_url(cap_doi_url + this.doi)); - } { % } else { - required { % if (required == 1) { - "Require URL or DOI: " cite$ * warning$ % warning("Require URL or DOI: " + this.cite); - } 'skip$ if$ % } - } if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.url} { % void Entry::output_url(int required) { - 'required := % this.required = required; - url empty$ not { % if (! empty(this.url)) { - cap.period write$ % write(cap_period); - url format.url write$ % write(format_url(this.url)); - } { % } else { - required { % if (required == 1) { - "Require URL: " cite$ * warning$ % warning("Require URL: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {output.version} { % void Entry::output_version(int required) { - 'required := % this.required = required; - version empty$ not { % if (! empty(this.version)) { - cap.period write$ % write(cap_period); - version format.version write$ % write(format_version(this.version)); - } { % } else { - required { % if (required == 1) { - "Require version: " cite$ * warning$ % warning("Require version: " + this.cite); - } 'skip$ if$ % } - } if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {book.impl} { % void Entry::book_impl() { - start.bibitem % start_bibitem(); - true output.author.or.editor % output_author_or_editor(true); - true output.series.volume.title % output_series_volume_title(true); - true output.mark % output_mark(true); - false output.translator % output_translator(false); - false output.edition % output_edition(false); - publisher empty$ not { % if (! empty(this.publisher)) { - true output.address % output_address(true); - true output.publisher % output_publisher(true); - cap.comma write$ % write(cap_comma); - } { % } else { - cap.period write$ % write(cap_period); - } if$ % } - true output.year % output_year(true); - false output.pages % output_pages(false); - false output.citedate % output_citedate(false); - false output.url.or.doi % output_url_or_doi(false); - end.bibitem % end_bibitem(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {book} { % void Entry::book() { - "M" set.mark % set_mark("M"); - book.impl % book_impl(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {collection} { % void Entry::collection() { - "G" set.mark % set_mark("G"); - book.impl % book_impl(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {proceedings} { % void Entry::proceedings() { - "C" set.mark % set_mark("C"); - start.bibitem % start_bibitem(); - true output.editor % output_editor(true); - true output.series.volume.title % output_series_volume_title(true); - true output.mark % output_mark(true); - false output.translator % output_translator(false); - false output.edition % output_edition(false); - publisher empty$ not { % if (! empty(this.publisher)) { - true output.address % output_address(true); - true output.publisher % output_publisher(true); - cap.comma write$ % write(cap_comma); - } { % } else { - cap.period write$ % write(cap_period); - } if$ % } - true output.year % output_year(true); - false output.pages % output_pages(false); - false output.citedate % output_citedate(false); - false output.url.or.doi % output_url_or_doi(false); - end.bibitem % end_bibitem(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {conference} { % void Entry::conference() { - proceedings % proceedings(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {thesis.impl} { % void Entry::thesis_impl() { - start.bibitem % start_bibitem(); - true output.author % output_author(true); - true output.title % output_title(true); - true output.mark % output_mark(true); - false output.translator % output_translator(false); - true output.address % output_address(true); - true output.school % output_school(true); - cap.comma write$ % write(cap_comma); - true output.year % output_year(true); - false output.pages % output_pages(false); - false output.citedate % output_citedate(false); - false output.url.or.doi % output_url_or_doi(false); - end.bibitem % end_bibitem(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {phdthesis} { % void Entry::phdthesis() { - "D" set.mark % set_mark("D"); - thesis.impl % thesis_impl(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {masterthesis} { % void Entry::masterthesis() { - "D" set.mark % set_mark("D"); - thesis.impl % thesis_impl(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {bachelorthesis} { % void Entry::bachelorthesis() { - "D" set.mark % set_mark("D"); - thesis.impl % thesis_impl(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {techreport} { % void Entry::techreport() { - "R" set.mark % set_mark("R"); - start.bibitem % start_bibitem(); - true output.author % output_author(true); - true output.title % output_title(true); - false output.report.number % output_report_number(false); - true output.mark % output_mark(true); - false output.translator % output_translator(false); - false output.edition % output_edition(false); - false output.version % output_version(false); - institution empty$ not { % if (! empty(this.institution)) { - true output.address % output_address(true); - true output.institution % output_institution(true); - cap.comma write$ % write(cap_comma); - } { % } else { - cap.period write$ % write(cap_period); - } if$ % } - true output.year % output_year(true); - false output.pages % output_pages(false); - false output.citedate % output_citedate(false); - false output.url.or.doi % output_url_or_doi(false); - end.bibitem % end_bibitem(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {standard} { % void Entry::standard() { - "S" set.mark % set_mark("S"); - start.bibitem % start_bibitem(); - true output.author % output_author(true); - true output.title % output_title(true); - true output.mark % output_mark(true); - false output.translator % output_translator(false); - false output.edition % output_edition(false); - publisher empty$ not { % if (! empty(this.publisher)) { - true output.address % output_address(true); - true output.publisher % output_publisher(true); - cap.comma write$ % write(cap_comma); - } { % } else { - cap.period write$ % write(cap_period); - } if$ % } - true output.year % output_year(true); - false output.pages % output_pages(false); - false output.citedate % output_citedate(false); - false output.url.or.doi % output_url_or_doi(false); - end.bibitem % end_bibitem(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {reference} { % void Entry::reference() { - "K" set.mark % set_mark("K"); - start.bibitem % start_bibitem(); - false output.author.or.editor % output_author_or_editor(false); - true output.series.volume.title % output_series_volume_title(true); - true output.mark % output_mark(true); - false output.translator % output_translator(false); - false output.edition % output_edition(false); - publisher empty$ not { % if (! empty(this.publisher)) { - true output.address % output_address(true); - true output.publisher % output_publisher(true); - cap.comma write$ % write(cap_comma); - } { % } else { - cap.period write$ % write(cap_period); - } if$ % } - true output.year % output_year(true); - false output.pages % output_pages(false); - false output.citedate % output_citedate(false); - false output.url.or.doi % output_url_or_doi(false); - end.bibitem % end_bibitem(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {manual} { % void Entry::manual() { - reference % reference(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {periodical.impl} { % void Entry::periodical_impl() { - start.bibitem % start_bibitem(); - false output.editor % output_editor(false); - true output.title % output_title(true); - true output.mark % output_mark(true); - cap.period write$ % write(cap_period); - true output.start.year % output_start_year(true); - false output.start.volume % output_start_volume(false); - false output.start.number % output_start_number(false); - cap.dash write$ % write(cap_dash); - year contain.dash { % if (contain_dash(this.year)) { - true output.end.year % output_end_year(true); - false output.end.volume % output_end_volume(false); - false output.end.number % output_end_number(false); - } 'skip$ if$ % } - publisher empty$ not { % if (! empty(this.publisher)) { - true output.address % output_address(true); - true output.publisher % output_publisher(true); - cap.comma write$ % write(cap_comma); - } { % } else { - cap.period write$ % write(cap_period); - } if$ % } - true output.start.year % output_start_year(true); - cap.dash write$ % write(cap_dash); - year contain.dash { % if (contain_dash(this.year)) { - true output.end.year % output_end_year(true); - } 'skip$ if$ % } - false output.citedate % output_citedate(false); - false output.url.or.doi % output_url_or_doi(false); - end.bibitem % end_bibitem(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {periodical} { % void Entry::periodical() { - "J" set.mark % set_mark("J"); - periodical.impl % periodical_impl(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {newspaper} { % void Entry::newspaper() { - "N" set.mark % set_mark("N"); - periodical.impl % periodical_impl(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {patent} { % void Entry::patent() { - "P" set.mark % set_mark("P"); - start.bibitem % start_bibitem(); - true output.author % output_author(true); - true output.title % output_title(true); - true output.country % output_country(true); - true output.patentid % output_patentid(true); - true output.mark % output_mark(true); - cap.period write$ % write(cap_period); - true output.date % output_date(true); - false output.citedate % output_citedate(false); - false output.url.or.doi % output_url_or_doi(false); - end.bibitem % end_bibitem(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {online} { % void Entry::online() { - "EB" set.mark % set_mark("EB"); - start.bibitem % start_bibitem(); - false output.author % output_author(false); - true output.title % output_title(true); - true output.mark % output_mark(true); - publisher empty$ not { % if (! empty(this.publisher)) { - address empty$ not { % if (! empty(this.address)) { - true output.address % output_address(true); - true output.publisher % output_publisher(true); - cap.comma write$ % write(cap_comma); - } { % } else { - true output.publisher.no.address % output_publisher_no_address(true); - cap.comma write$ % write(cap_comma); - } if$ % } - } { % } else { - cap.period write$ % write(cap_period); - } if$ % } - true output.year % output_year(true); - false output.modifydate % output_modifydate(false); - true output.citedate % output_citedate(true); - true output.url % output_url(true); - end.bibitem % end_bibitem(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {webpage} { % void Entry::online() { - online % online(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {program.impl} { % void Entry::program_impl() { - start.bibitem % start_bibitem(); - false output.author % output_author(false); - true output.title % output_title(true); - true output.mark % output_mark(true); - publisher empty$ not { % if (! empty(this.publisher)) { - true output.address % output_address(true); - true output.publisher % output_publisher(true); - cap.comma write$ % write(cap_comma); - } { % } else { - cap.period write$ % write(cap_period); - } if$ % } - true output.year % output_year(true); - false output.citedate % output_citedate(false); - false output.url.or.doi % output_url_or_doi(false); - end.bibitem % end_bibitem(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {program} { % void Entry::program() { - "CP" set.mark % set_mark("CP"); - program.impl % program_impl(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {database} { % void Entry::database() { - "DB" set.mark % set_mark("DB"); - program.impl % program_impl(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {unpublished} { % void Entry::unpublished() { - "H" set.mark % set_mark("H"); - start.bibitem % start_bibitem(); - true output.author % output_author(true); - true output.title % output_title(true); - true output.mark % output_mark(true); - cap.period write$ % write(cap_period); - true output.year % output_year(true); - false output.citedate % output_citedate(false); - false output.url.or.doi % output_url_or_doi(false); - end.bibitem % end_bibitem(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {manuscript} { % void Entry::manuscript() { - unpublished % unpublished(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {inbook.impl} { % void Entry::inbook_impl() { - start.bibitem % start_bibitem(); - true output.author % output_author(true); - true output.title % output_title(true); - true output.mark % output_mark(true); - false output.translator % output_translator(false); - cap.double.slash write$ % write(cap_double_slash); - false output.editor % output_editor(false); - true output.series.volume.booktitle % output_series_volume_booktitle(true); - false output.edition % output_edition(false); - publisher empty$ not { % if (! empty(this.publisher)) { - true output.address % output_address(true); - true output.publisher % output_publisher(true); - cap.comma write$ % write(cap_comma); - } { % } else { - cap.period write$ % write(cap_period); - } if$ % } - true output.year % output_year(true); - false output.pages % output_pages(false); - false output.citedate % output_citedate(false); - false output.url.or.doi % output_url_or_doi(false); - end.bibitem % end_bibitem(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {inbook} { % void Entry::inbook() { - "M" set.mark % set_mark("M"); - inbook.impl % inbook_impl(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {incollection} { % void Entry::incollection() { - "G" set.mark % set_mark("G"); - inbook.impl % inbook_impl(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {inproceedings} { % void Entry::inproceedings() { - "C" set.mark % set_mark("C"); - inbook.impl % inbook_impl(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {article} { % void Entry::article() { - "J" set.mark % set_mark("J"); - start.bibitem % start_bibitem(); - true output.author % output_author(true); - true output.title % output_title(true); - true output.mark % output_mark(true); - true output.journal % output_journal(true); - cap.comma write$ % write(cap_comma); - true output.year % output_year(true); - false output.volume % output_volume(false); - false output.number % output_number(false); - false output.pages % output_pages(false); - false output.citedate % output_citedate(false); - false output.url.or.doi % output_url_or_doi(false); - end.bibitem % end_bibitem(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {news} { % void Entry::news() { - "N" set.mark % set_mark("N"); - start.bibitem % start_bibitem(); - true output.author % output_author(true); - true output.title % output_title(true); - true output.mark % output_mark(true); - true output.journal % output_journal(true); - cap.comma write$ % write(cap_comma); - true output.date % output_date(true); - false output.number % output_number(false); - false output.citedate % output_citedate(false); - false output.url.or.doi % output_url_or_doi(false); - end.bibitem % end_bibitem(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {default.type} { % void Entry::default_type() { - "Unsupported entry type for " cite$ * warning$ % warning("Unsupported entry type for " + this.cite); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {longest.label.pass} { % void longest_label_pass(Entry entry) { - entry.count #1 + 'entry.count := % entry_count = entry_count + 1; - entry.count int.to.str$ 'label := % this.label = int_to_str(entry_count); - label width$ longest.label.width > { % if (width(this.label) > longest_label_width) { - label 'longest.label := % longest_label = this.label; - label width$ 'longest.label.width := % longest_label_width = width(this.label); - } 'skip$ if$ % } -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {write.style.commands} { % void write_style_commands() { - cmd.bibauthor write$ % write(cmd_bibauthor); - newline$ % writeln(); - cmd.bibeditor write$ % write(cmd_bibeditor); - newline$ % writeln(); - cmd.bibtranslator write$ % write(cmd_bibtranslator); - newline$ % writeln(); - cmd.bibtitle write$ % write(cmd_bibtitle); - newline$ % writeln(); - cmd.bibbooktitle write$ % write(cmd_bibbooktitle); - newline$ % writeln(); - cmd.bibjournal write$ % write(cmd_bibjournal); - newline$ % writeln(); - cmd.bibmark write$ % write(cmd_bibmark); - newline$ % writeln(); - cmd.bibcountry write$ % write(cmd_bibcountry); - newline$ % writeln(); - cmd.bibpatentid write$ % write(cmd_bibpatentid); - newline$ % writeln(); - cmd.bibedition write$ % write(cmd_bibedition); - newline$ % writeln(); - cmd.biborganization write$ % write(cmd_biborganization); - newline$ % writeln(); - cmd.bibaddress write$ % write(cmd_bibaddress); - newline$ % writeln(); - cmd.bibpublisher write$ % write(cmd_bibpublisher); - newline$ % writeln(); - cmd.bibinstitution write$ % write(cmd_bibinstitution); - newline$ % writeln(); - cmd.bibschool write$ % write(cmd_bibschool); - newline$ % writeln(); - cmd.bibvolume write$ % write(cmd_bibvolume); - newline$ % writeln(); - cmd.bibnumber write$ % write(cmd_bibnumber); - newline$ % writeln(); - cmd.bibversion write$ % write(cmd_bibversion); - newline$ % writeln(); - cmd.bibpages write$ % write(cmd_bibpages); - newline$ % writeln(); - cmd.bibmodifydate write$ % write(cmd_bibmodifydate); - newline$ % writeln(); - cmd.bibcitedate write$ % write(cmd_bibcitedate); - newline$ % writeln(); - cmd.bibyear write$ % write(cmd_bibyear); - newline$ % writeln(); - cmd.bibdate write$ % write(cmd_bibdate); - newline$ % writeln(); - cmd.biburl write$ % write(cmd_biburl); - newline$ % writeln(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {begin.bib} { % void begin_bib() { - preamble$ empty$ not { % if (! empty(premble)) { - preamble$ write$ % write(premeable); - newline$ % writeln(); - } 'skip$ if$ % } - env.bibbegin write$ % write(env_bibbegin); - "{" longest.label * "}" * write$ % write("{" + longest.label + "}"); - newline$ % writeln(); - write.style.commands % write_style_commands(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {end.bib} { % void end_bib() { - newline$ % writeln(); - env.bibend write$ % write(env_bibend); - newline$ % writeln(); -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % -FUNCTION {initialize} { % void initialize() { - #0 'entry.count := % entry_count = 0; - #0 'longest.label.width := % longest_label_width = 0; - "" 'longest.label := % longest_label = ""; -} % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % - % void main() { -READ % List entryList = read(".bib"); -EXECUTE {initialize} % initialize(); -ITERATE {longest.label.pass} % for (Entry entry : entryList) { - % longest_label_pass(entry); - % } -EXECUTE {begin.bib} % begin_bib(); -ITERATE {call.type$} % for (Entry entry : entryList) { - % switch (typeof(entry)) { - % case "book": - % entry.book(); - % break; - % case "article": - % entry.article(); - % break; - % . - % . - % . - % case "incollection": - % entry.incollection(); - % break; - % case "misc": - % entry.misc(); - % break; - % default: - % entry.default_type(); - % } - % } -EXECUTE {end.bib} % end_bib(); - % } - % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%% End of file `GBT7714-2005.bst' diff --git a/jlucswthesis.cls b/jlucswthesis.cls index 076c2aa..98b6a2d 100644 --- a/jlucswthesis.cls +++ b/jlucswthesis.cls @@ -151,7 +151,7 @@ \newcommand{\textsubsubsectionfont}{\heiti\xiaosihao} % 正文上X.Y.Z.K小节的字体 \newcommand{\footnotefont}{\songti\xiaowuhao\normalfont} % 脚注字体 \newcommand{\ftcaptionfont}{\kaiti\wuhao\normalfont} % 图表标题的字体 -\newcommand{\reftitlefont}{\heiti\xiaoerhao} % “参考文献”字样的字体 +\newcommand{\reftitlefont}{\songti\sanhao} % “参考文献”字样的字体 \newcommand{\refbodyfont}{\songti\wuhao\normalfont} % 参考文献字体 \newcommand{\thanktitlefont}{\heiti\sanhao} % “致谢”字样的字体 \newcommand{\appendixtitlefont}{\heiti\sanhao} % “附录”字样的字体 diff --git a/jlucswthesis.lyx b/jlucswthesis.lyx index cfcfd3f..01a8ad5 100644 --- a/jlucswthesis.lyx +++ b/jlucswthesis.lyx @@ -364,9 +364,9 @@ rd和\SpecialChar TeX 排版语言由D. Knuth发明，1978年首次发布以来，得到了广泛的应用 \begin_inset CommandInset citation -LatexCommand cite +LatexCommand citet key "TUG" -literal "true" +literal "false" \end_inset @@ -2581,8 +2581,8 @@ bibliography{chap1,chap2,...}。 \begin_layout Standard 参考文献举例说明：关于书的 \begin_inset CommandInset citation -LatexCommand cite -key "Meta_CN,goossens1994thelatex" +LatexCommand citet +key "Meta_CN,goossens1994thelatex,chen2007ewi,Krasnogor2004e,zjsw,clzs" literal "true" \end_inset @@ -2956,7 +2956,7 @@ latex=xelatex LatexCommand bibtex btprint "btPrintCited" bibfiles "jlucswthesis" -options "gbt7714-2005" +options "gbt7714-numerical" \end_inset diff --git a/jlucswthesis.tex b/jlucswthesis.tex index d95c188..1be9975 100644 --- a/jlucswthesis.tex +++ b/jlucswthesis.tex @@ -8,9 +8,9 @@ bookmarks=true,bookmarksnumbered=true,bookmarksopen=false, breaklinks=false,pdfborder={0 0 1},backref=false,colorlinks=true] {hyperref} -\hypersetup{pdftitle={博士论文标题}, - pdfauthor={你的名字}, - pdfsubject={华南理工大学博士学位论文}, +\hypersetup{pdftitle={论文标题}, + pdfauthor={作者}, + pdfsubject={主题}, pdfkeywords={关键字1, 关键字2}, unicode=false,linkcolor=blue, anchorcolor=black, citecolor=olive, filecolor=magenta, menucolor=red, urlcolor=magenta, pdfstartview=FitH} @@ -32,13 +32,13 @@ \begin{document} \title{Latex 与 Lyx 排版研究} -\author{徐川页} +\author{谷越} \supervisor{指导教师：高德纳\ 教授} \titleEN{A Studies about Latex and Lyx typesetting} \authorEN{Author: KAAAsS} -\supervisorEN{Supervisor: Li Jiaoshou} -\institute{华南理工大学} -\date{2010年4月13日} +\supervisorEN{Supervisor: Donald Knuth} +\institute{吉林大学} +\date{2022年3月30日} \maketitle \frontmatter @@ -557,7 +557,7 @@ language = {}, \end{lstlisting} 参考文献可以分章节管理，只需要在主文件中的参考文献中都包含进去就可 以，如\textbackslash bibliography\{chap1,chap2,...\}。 -参考文献举例说明：关于书的\citet{Meta_CN,goossens1994thelatex}，关于期刊的\citet{chen2007ewi,wang_model_2009}，会议论文\citet{DPMG,cnproceed}，硕士学位论文\citet{zhubajie}，博士学位论文\citet{shaheshang}，技术报告\citet{NPB2}，电子文献\citet{xetex_lyx,Texmaker}。 +参考文献举例说明：关于书的\citet{Meta_CN,goossens1994thelatex,chen2007ewi,Krasnogor2004e,zjsw,clzs}，关于期刊的\citet{chen2007ewi,wang_model_2009}，会议论文\citet{DPMG,cnproceed}，硕士学位论文\citet{zhubajie}，博士学位论文\citet{shaheshang}，技术报告\citet{NPB2}，电子文献\citet{xetex_lyx,Texmaker}。 如果参考文献中含有中乱码，可能是你的bib文件不是utf-8格式，需要用文档编辑器另存为utf-8格式，或者你也可以在bibtext的条目中增加一个域：language=\{zh\}。 @@ -668,7 +668,7 @@ latex=xelatex 总体来说，\LyX 、Xe\LaTeX 和\LaTeX 组合实现了一种优势互补，使得科技文献的编辑排版工作量大为下降。 -\bibliographystyle{gbt7714-2005} +\bibliographystyle{gbt7714-numerical} \bibliography{jlucswthesis}