€x× [0+8+FQ(+4)[1 0FO10F"G+Q1' +FQ()+4U1 FQ1"L0' ,Q1:M(Q1+4(]1]0)) ™LxYOfrm~ >$c+81HTV`ob}|d*$84l?'dO1J_40i0z}+%M*P+Q,0 6/OF.Y30h)w'€ *)\.1]?/P23a'Lk'Gr6Gš& Setup BIBTEX library™& Show BibTex entriesBIBTEX Mode¡Show BIBTEX entries in windowšSort entries by author—Sort entries by key›^R Cleanup BibTex entry^R Copy keyš^R End of BibTex entry ^R Incremental BibTex expand˜^R Mark BibTex entry˜^R Next BibTex fieldž^R Next blank BibTex fieldœ^R Previous BibTex field¢^R Previous blank BibTex field›^R Print BibTex summaryœ^R Start of BibTex entryœ^R Unexpand BibTex entry~DIRECTORY~ ~DOC~ & Setup BIBTEX libraryŸ~DOC~ & Show BibTex entries•~DOC~ BIBTEX Mode§~DOC~ Show BIBTEX entries in window ~DOC~ Sort entries by author~DOC~ Sort entries by key¡~DOC~ ^R Cleanup BibTex entry•~DOC~ ^R Copy key ~DOC~ ^R End of BibTex entry¦~DOC~ ^R Incremental BibTex expandž~DOC~ ^R Mark BibTex entryž~DOC~ ^R Next BibTex field¤~DOC~ ^R Next blank BibTex field¢~DOC~ ^R Previous BibTex field¨~DOC~ ^R Previous blank BibTex field¡~DOC~ ^R Print BibTex summary¢~DOC~ ^R Start of BibTex entry¢~DOC~ ^R Unexpand BibTex entry”~DOC~ ~FILENAME~Ž~FILENAME~Œ~INVERT~±24*6FSQVectorm.cBIBTEX defsQ Vector containing old BIBTEX key definitions. 0m.cBIBTEX modeSet to 1 if BIBTEX keys defined, otherwise 0. 0m.cBIBTEX windowSet if second window is displayed 0m.cBIBTEX Window 1 SizeTo remember old Window 1 Size 0m.cBIBTEX String FileOptional file containing @String abbreviations :I*keym.cBIBTEX BibliographystyleTo override default style of KEY 0m.cBIBTEX TitleOptional title for printing database file :I*Available bibliographic entries: Article, Bachelor(sThesis), Book, InBook, Booklet, InColl(ection), InProc(eedings), Master(sThesis), Manual, Misc, Phd(Thesis), Proc(eedings), Tech(Report), Unpub(lished).m.vBIBTEX window entries :I*Entry names are: Article Bachelor(sThesis), Book, Booklet InBook, InColl(ection), InProc(eedings) Master(sThesis), Manual, Misc PhD(Thesis), Proc(eedings) Tech(Report) Unpub(lished) Command characters are: M-Space = Expand entry; M-@ = Mark entry; M-n = Next field; M-p = Previous field; C-M-n = Next blank field; C-M-p = Previous blank field; M-[ = Start of entry; M-] = End of entry; M-. = Remove all blank fields; M-/ = Reinsert blank fields; M-? = BIBTEX Summary. OTHER USEFUL COMMANDS * Permanently displays the entry names at the top of the page, "M-X Show BIBTEX entries in window$". * Turn off the expansion mode type, "M-0 M-X BIBTEX Mode$". * View a entry's fields type, "M-X List Word Abbrevs$entry-name". * Change any or all entry fields type, "M-X Edit Word Abbrevs$". * Save your definitions of entry names and other words, "M-X Write Word Abbrevs$". This library is based on the word abbrev library, in fact it's loaded automatically underneath the BIBTEX library. This means all of the word abbrev capablities are also available with this library. This is a trial version, please sent your comments(complains) to Rich@AI ------------------------------------------------------------------------------ m.vBibtex entries [19:I1 :I* 1 M.vBIBTEX blanks :I*!~#;$%^&*- =+[]()\|:`"'{},<.>/? m.vWORDAB Ins Chars F[DFile E?BIBTEX DEFNS"E MMRead Word Abbrev FileBIBTEX DEFNS' "#MMRead Word Abbrev FileEMACS: BIBTEX DEFNS'' 0Œ"L-:M(m.m^R Previous blank BibTex field)' .[1 <:S={}=,)+2"L -1"NQ1j :I*Hit end of bibliographic entryFSErr '' R.u1> 0ˆ"L-:M(m.m^R Previous BibTex field)' .[1 <:S=)+1"N!>! Q1j:I*Hit end of bibliographic entryFSErr' .,.+1F={"EC' .u1> 0"L-:M(m.m^R Next blank BibTex field)' .[1 <-:S={}=,)+2"L Q1J:I*Hit start of bibliographic entryFSErr' C.,.+1F={"EC' .u1> 0·"L-:M(m.m^R Next BibTex field)' .[1 <1:<.-2,.F=={"E!>!1R'> 1:<.-1,.F=="E!>!1R'> -:S=(+1"N!>! Q1J:I*Hit start of bibliographic entryFSErr' C.,.+1F={"EC' .u1> 0­Zj.-1,.F=)"EI ' Bj 1M(m.m^R End of BibTex entry) 3,1M(m.m^R Start of BibTex entry) -FWL0L .F[VB 1F[^PCase FWL:FWLFWL1M(m.m^R End of BibTex entry$)w H„[1 Zj.-1,.F=)"EI ' Bj 1M(m.m^R End of BibTex entry) 3,1M(m.m^R Start of BibTex entry) -FWL0L .F[VB 1F[^PCase :SAuthor=Editor=Key=)$+3U1Q1"GC' Q1"L:I*No Author, Editor, or Key Field $FSErr$'"#FWL'W 1M(m.m^R End of BibTex entry$)W H¶.[1[3[4 :L 6,1M(m.m^R Start of BibTex entry)"L' .u1 .,.+1F=,"EFG@FT Missing key for this field. 0FSEchoAct0' !LCleanup! :S )@?={}=,+2u3 q3"G Q1J :S )"E :I*Missing closing ")"FSErr!''!' -:S,}(+1"ED' S ) 0fo..QAutomatic key sort"N 7,1M(m.m^R Start of BibTex entry) -FWL1X4 M(m.mSort entries by key) S4 H' "#Q1,.' ' q3"E-:S}, C:KoLCleanup ' q3"L.-1u4:L.u2 q4,q2:FB@?u3 :FWL q3"E !EError!@FT Missing the required or one of the alt. bibliographic fields. @FG0FSEchoAct .u8Q4jQ1,.' FWF=Optional"E !DLine!Q4j0LKoLCleanup' FWF=or"EFWL .u2:L.u3q2j Q1j !Next name!:S )2=+2u3 q3"GoEError' .,.+2F={}"ECoNext name' .,.+1F=,"ECoNext name' 0q3oDLine ' FWX2 :I*Unknown keyword "2" after "@?"FSErr!''''! 0 'æ[1[2.[3[4 :L 7,1M(m.m^R Start of BibTex entry) -FWLFWX1 1M(m.m^R Mark BibTex entry) M(m.m^R Copy region) 1M(m.m^R Un-kill) M(m.m^R Set bounds region) -:S).+1,ZK Bj:S, :FWLB,.K <.u4 :S= +1u2 q2"E-FWLq4,.KFWLCI1K' "#q2"Lq4,.K' "#q2"G-D.,ZK1;''' > HX2HK G1 1F :S, :FWLB,.K Zj-:S) 0L.,ZK <-:S2;0LK> B-Z"EHKM(m.m^R Set bounds full) Q3j:I*No additional fieldsFSErr' HX2HK M(m.m^R Set bounds full) 1,1M(m.m^R End of BibTex entry) 0L.u1G2 Q1j-:S},=+2U3 Q3"GCI,'"#Q3"LFWLI,'' :S ).u2 Q1j1,1M(m.m^R Next blank BibTex field) Q1,q2å"L-:M(m.m^R End of BibTex entry)' .[1QBIBTEX blanks[2[3 :L.u3Q1j q1,q3:FB(@)+1"E:L' <&4"E 1:<-@F2:j .-1,.F=("E2R'>' -:S(+1"NQ1J -1"E:I*Not inside bibliographic entryFSErr' "#-1'' "#&1"E2C@F2j' "#2C' .U1' > 1:<.,.+1F=,"E&2"E1: @:FT Please enter the bibliographic key. 0FSEchoAct''> 0˜"L-:M(m.m^R Start of BibTex entry)' .[1 <:S )+1"N Q1J-1"E:I*Not inside bibliographic entryFSErr' -1' "#"E:S@"E'"#0l'' .u1' > 0Ê.[1[2 4,1M(m.m^R Start of BibTex entry)"L0' @:F,X2 Q1jG2 q1,.Ž[0 ff&1"N"'Gu0' "#qBIBTEX Window"'Eu0' q0,0fu0 q0-qBIBTEX Window"E0' q0M(m.m& Show BibTex entries) q0uBIBTEX Window 0Ú"E1M(m.m^R One window) QBIBTEX Window 1 SizeUWindow 1 Size' "# 1,2M(m.m^R Two windows) QWindow 1 sizeUBIBTEX Window 1 Size -qWindow 1 size+3M(m.m^R Grow window) 1: M(m.mSelect buffer)BIBTEXW :I*No entry names available fo..QBibtex window entries[1 G1 BjH@V M(m.m^R Other window)' 0Ð:I*No entry names available fo..QBibtex entries[1 :FT1 0FSEchoAct º[1[2 1:<.-2,.-1F=)"E .-1,.X1-1D 1M(m.m^R End of BibTex entry) M(m.m^R Unexpand Last Word)u2 G1 q2' "#:I*Not at the key position for this unexpand commandFSErr' > 0ã[1.[2 M(m.m^R End of BibTex entry)"LoMarkErr' .u1 3,M(m.m^R Start of BibTex entry)"LoMarkErr' -FWL0L .,q1Fu1jq1: 0 !MarkErr!-1"Nu1q1:\u1 !""!Q2j:I*Couldn't mark 1 entries, so mark wasn't setFSErr' -1ª[0 FF"EQBIBTEX Mode"N F=ModeTEX"N 1M(M.MTex Mode) 0FS^RInitM.LCompile Command' 0' "#1U0'' "#Q0"EQBIBTEX Mode"E0'' "#QBIBTEX Mode"N F=ModeTEX"N 1M(M.MTex Mode 0FS^RInitM.LCompile Command' 0''' Q0uBIBTEX Mode qBIBTEX defsu0 qBIBTEX mode"N qBIBTEX window"G1M(m.m& Show BibTex entries)' 1M(M.MTex Mode) 1M(m.mWord Abbrev mode) 0M(m.m& Alter ..D)@A :I*BibTexuSubmode 0FS^RInitM.LCompile Command q..?u:BIBTEX defs(0) q...Nu:BIBTEX defs(1) q...nu:BIBTEX defs(12) q..Nu:BIBTEX defs(2) q..nu:BIBTEX defs(13) q...Pu:BIBTEX defs(3) q...pu:BIBTEX defs(14) q..Pu:BIBTEX defs(4) q..pu:BIBTEX defs(15) q...u:BIBTEX defs(5) q../u:BIBTEX defs(6) q..[u:BIBTEX defs(7) q..]u:BIBTEX defs(8) q...Cu:BIBTEX defs(9) q...cu:BIBTEX defs(16) q..@u:BIBTEX defs(10) q.. u:BIBTEX defs(23) q...Uu:BIBTEX defs(11) q...uu:BIBTEX defs(18) m.m^R Print BibTex summaryu..? m.m^R Next blank BibTex fieldu...N m.m^R Next blank BibTex fieldu...n m.m^R Next BibTex fieldu..N m.m^R Next BibTex fieldu..n m.m^R Previous blank BibTex fieldu...P m.m^R Previous blank BibTex fieldu...p m.m^R Previous BibTex fieldu..P m.m^R Previous BibTex fieldu..p m.m^R Cleanup BibTex entryu... m.m^R Incremental BibTex expandu../ m.m^R Start of BibTex entryu..[ m.m^R End of BibTex entryu..] m.m^R Copy keyu...C m.m^R Copy keyu...c m.m^R Mark BibTex entryu..@ m.m^R Abbrev Expand Onlyu.. m.m^R Unexpand BibTex entryu...U m.m^R Unexpand BibTex entryu...u ' "# qBIBTEX window"G0M(m.m& Show BibTex entries)' :I*uSubmode 0M(m.mWord Abbrev mode) 0M(m.m& Alter ..D)@  q:BIBTEX defs(0)u..? q:BIBTEX defs(1)u...N q:BIBTEX defs(12)u...n q:BIBTEX defs(2)u..N q:BIBTEX defs(13)u..n q:BIBTEX defs(3)u...P q:BIBTEX defs(14)u...p q:BIBTEX defs(4)u..P q:BIBTEX defs(15)u..p q:BIBTEX defs(5)u... q:BIBTEX defs(6)u../ q:BIBTEX defs(7)u..[ q:BIBTEX defs(8)u..] q:BIBTEX defs(9)u...C q:BIBTEX defs(16)u...c q:BIBTEX defs(10)u..@ q:BIBTEX defs(23)u.. q:BIBTEX defs(11)u...U q:BIBTEX defs(18)u...u ' 0BIBTEX°Macros to facilitate entering a bibliographyµS Assign keys and load WORDAB library for BIBTEX.¡^R Skip to the next blank bibliographic field. Initially all of the field values for a entry are empty and 'M-n' and 'C-M-n' work the same. As you fill in values, you may want to skip over the fields with values, 'C-M-n' does this. 'C-M-n' skips forward to the next blank field.š^R Skip to the next bibliographic field. Skips to the start of the next field, positioning the typing cursor at the beginning of the field's value.ïq^R Skip to prev. blank bibliographic field. Similar to 'C-M-n', but skips backwards to a blank field value.ïw^R Skip to the previous bibliographic field. Skips to the previous field, also positions the cursor at the value.ªC Sort by key. Sorts the bibliographic entries by key. This function will be automatically invoked by 'M-.' if the variable 'automatic key sort' is set non-zero.×C Sort by author or key field. Assumes that author names typed in last name first.í^R Delete all @? and empty fields. When a entry is expanded all possible fields for that entry are displayed. You probably don't want to enter information for all of the fields displayed. After the entry is completed to suit your needs, type 'M-.', to delete empty optional and empty satisfied alternative entries. If you have forgotten one of the required fields, you will be warned and the cursor left at the required field needing information. Enter the missing information and retype 'M-.'. When the entire entry is acceptable, no message will be displayed and the cursor will be after the closing ']'.Ž^R Fill out any missing fields. After typing 'M-.', all of the empty fields will have been deleted. To reinstate these fields use 'M-/'. Typing 'M-/' will redisplay all of the blank fields at the end of the entry and place the cursor at the first blank field.^R Jump to keyword pos. in bibliographic entry. Moves the typing cursor to the beginning of the key for the current entry.ïy^R Jump to end of bibliographic entry. Moves the cursor to the end of the current entry (just before the next '@').Ý^R Copies the key at the point. Makes a copy of the key for this entry after the typing cursor. This is useful for copying the key into the key and author's fields, when the fields all use the author's last name.¡C Permanently displays entry names. Creates a second window at the top of the screen and displays the bibliographic entry names in it for quick reference.¥& Subr for entry names in window.¬^R Print summary of BIBTEX functions. Displays a short summary. The summary is two pages long; if you want to see the second page type a space, otherwise type '^G'.ï{^R Similar to C-X U but for BibTex entries. If you expanded an entry template by accident, this function will restore the entry name as it was before the expansion. This function is only valid immediately after the template has been expanded.‡^R Place point at beginning and mark at the end. Places the mark at the end of the entry and the point at the beginning. This is useful for deleting or moving an entire bibliographic entry. With an argument, n entries from the cursor are marked.ïxC Turns BIBTEX key definitions on and off ('M-?' for summary). Argument of 0 turns it off. Otherwise turns it on.·& Setup BIBTEX library ^R Next blank BibTex field ^R Next BibTex field ^R Previous blank BibTex field ^R Previous BibTex field Sort entries by key Sort entries by author ^R Cleanup BibTex entry ^R Incremental BibTex expand ^R Start of BibTex entry ^R End of BibTex entry ^R Copy key Show BIBTEX entries in window & Show BibTex entries ^R Print BibTex summary ^R Unexpand BibTex entry ^R Mark BibTex entry BIBTEX Mode Ô+8+fq(+4)[20[3 <%3,-q2f2u3q3&1@;q3"l0'> f[BBindq3-1*5,q3*5g2q:..o(0)+q2