diff options
Diffstat (limited to 'macros/texsis/styles/paradox.txs')
-rw-r--r-- | macros/texsis/styles/paradox.txs | 167 |
1 files changed, 167 insertions, 0 deletions
diff --git a/macros/texsis/styles/paradox.txs b/macros/texsis/styles/paradox.txs new file mode 100644 index 0000000000..7c60c94ad7 --- /dev/null +++ b/macros/texsis/styles/paradox.txs @@ -0,0 +1,167 @@ +%% file: paradox.txs (TeXsis version 2.17) +% $Revision: 1.3 $ : $Date: 1996/12/20 18:17:30 $ : Author: T.C. Pearce +%========================================================================* +% FILE - PARADOX.TXS AUTHOR - T.C. PEARCE +% Engineering Department, University of Derby. (t.c.pearce@derby.ac.uk) +% +% These macros have been created for the interpretation of literature +% database info from Borland Paradox 3.5. It is intended for use under +% TeXsis 2.17 where a reference has the following form. However, they may +% be used for any database that can be persuaded to output fields in the +% following format +% +% \referencelist % } Standard Texsis Reference +% % .................. +% \reference{Tag Identifier for reference} % } format +% % Begin reference text or in the case of these macros assign fields to +% % appropriate macros definitions +% +% \Authors .....\EndAuthors % List all authors in following format +% % Pearce T.C., Burrows W.S., , for all authors +% % ** Entry must end with , , +% % use of \etaltrue will omit all but the first +% % author. Defaults to false i.e. all authors +% % listed +% +% +% \ReferenceType.....\EndReferenceType +% % States desired type of reference +% % Two forms : +% % Journal - Gives Author, Journal, Year, +% % Volume, Part*, Pages +% % (English style journal citations) +% % Book - Gives Author [et al] in BookTitle, +% % Volume*, Part*, Host Editors*, +% % Pages in Book, Place of +% % Publication*, Publishers*, +% % Year. +% % (English style article-in-book citations) +% % * Optional inclusions. Essential fields will +% % cause WARNINGS during compilation and ???? +% % under reference if absent ! +% % Must be specified precisely as Journal or Book +% +% +% \Title.....\EndTitle % Title of Article in Journal or Book +% % Normally suppressed unless \AddTitles is called +% % in which case it is inserted in with +% % the reference after the author +% +% \JournalBook....\EndJournalBook +% % Name of Journal or Book Title +% \Place....\EndPlace % Place of publication (Only does anything for +% % Books) +% \Publisher.....\EndPublisher +% % Publishing organisation (Only does anything for +% % Books) +% \Year....\EndYear % Year of publication +% \Volume...\EndYear % Volume Number +% \Part...\EndPart % Part Number +% \Pages....\EndPages % Pages Numbers +% \HostAuthor....\EndHostAuthor +% % Host Editors (Only does anything for Books) +% \CompileReference % Command to format this reference +% \endreference +% % ................ +% \endreferencelist +% +% +% Example of a straightforward journal reference : +% +% \reference{Abe,Automated}\Authors Abe H., Yoshimura T., ,\EndAuthors +% \ReferenceType Journal\EndReferenceType\Title Automated odor-sensing system +% based on plural semiconductor gas sensors and computerized pattern recognition +% techniques\EndTitle +% \JournalBook Analytica Chimica Acta\EndJournalBook\Part \EndPart +% \Publisher [NOT NEEDED]\EndPublisher\Year 1987\EndYear\Volume +% 194\EndVolume\Place [NOT NEEDED]\EndPlace +% \Pages 1-9\EndPages\HostAuthor [NOT NEEDED]\EndHostAuthor +% \CompileReference\endreference +% +% Example of article in a book reference : +% +% \reference{Eric,Sensory ne}\Authors Erickson R.P., ,\EndAuthors +% \ReferenceType Book\EndReferenceType\Title Sensory neural patterns and +% gustation\EndTitle +% \JournalBook Olfaction \& Taste\EndJournalBook\Part \EndPart +% \Publisher Pergamon Press\EndPublisher\Year 1963\EndYear +% \Volume \EndVolume\Place New York\EndPlace +% \Pages 205-213\EndPages\HostAuthor Zotterman, Y. (ed.)\EndHostAuthor +% \CompileReference\endreference +% +% +% NOTE - CALLS TO these macros should be made even if fields are empty! +% This is in accordance with Paradox and most other databases. +% +% (C) Copyright 1997 by T.C. Pearce, all rights reserved. +%======================================================================* +\message{[Paradox --> Texsis 2.17 Translation Macros T.C.P. 18.12.96]} +% + +\def\Comma{,} +\def\etal{{\it et al.}} +\def\JournalReference{Journal} +\def\ReferenceType#1\EndReferenceType{\def\RReferenceType{#1}} +\def\Authors#1,#2,\EndAuthors{% + \def\FFirstAuthor{#1}\def\OOtherAuthors{#2}\FFirstAuthor} +\def\Title#1\EndTitle{\def\TTitle{#1}} +\def\JournalBook#1\EndJournalBook{\def\JJournalBook{#1}} +\def\Place#1\EndPlace{\def\PPlace{#1}} +\def\Publisher#1\EndPublisher{\def\PPublisher{#1}} +\def\Year#1\EndYear{\def\YYear{#1}} +\def\Volume#1\EndVolume{\def\VVolume{#1}} +\def\Part#1\EndPart{\def\PPart{#1}} +\def\Pages#1\EndPages{\def\PPages{#1}} +\def\HostAuthor#1\EndHostAuthor{\def\HHostAuthor{#1}} + +\newif\ifJournal +\newif\ifTitles +\newif\ifAllAuthors +\newif\ifetal +\etalfalse +\Titlestrue +\AllAuthorstrue +\newif\ifSingleAuthor + +\def\AddTitles{\Titlestrue} +\def\TTestJournal{\ifx\JournalReference\RReferenceType\Journaltrue + \else\Journalfalse\fi} +\def\CompileReference{\TTestJournal\ifJournal\CCompileJournal + \else\CCompileBook\fi} + +\def\CCompileJournal{% + \TTestSingleAuthor\ifetal{\ifSingleAuthor\space \else\space\etal, \fi}% + \else{\ifSingleAuthor\space \else , \OOtherAuthors\space\fi}\fi + \ifTitles\TTitle ,\space \fi + \ifx\JJournalBook\empty\relax\message{[WARNING - No Journal for reference]}% + \else{\it\JJournalBook, }\fi + \ifx\YYear\empty\relax\message{[WARNING - No Year for reference]}% + \else\YYear. \fi + \ifx\VVolume\empty\relax\message{[WARNING - No Volume for reference]}% + \else{\bf\VVolume}\fi + \ifx\PPart\empty{\ifx\VVolume\empty\relax \else . \fi}\else (\PPart). \fi + \ifx\PPages\empty\message{[WARNING - No Page numbers for reference]}% + \else\PPages\fi} + +\def\CCompileBook{% + \TTestSingleAuthor\ifetal{\ifSingleAuthor\space\else\space\etal , \fi}% + \else{\ifSingleAuthor\space \else , \OOtherAuthors\space\fi}\fi + \ifTitles{\ifx\TTitle\empty\else\TTitle ,\space\fi}\fi + \ifx\JJournalBook\empty{\message{[WARNING - No Book Name for reference]}}% + \else{\ifx\TTitle\empty\relax \else in \fi\booktitle{\JJournalBook}}\fi + \ifx\VVolume\empty\relax\else , Vol.\VVolume\fi + \ifx\PPart\empty . \else (\PPart). \fi + \ifx\HHostAuthor\empty\relax\else\HHostAuthor, \fi + \ifx\PPages\empty{\ifx\TTitle\empty\relax\else ????. + \message{[WARNING - No Page numbers for reference]}\fi}% + \else p.\PPages. \fi + \ifx\Place\empty\relax \else\PPlace\begingroup\ifx\Publisher\empty + \else: \fi\endgroup\fi + \ifx\PPublisher\empty\relax \else\PPublisher, \fi + \ifx\YYear\empty\relax\message{[WARNING - No Year for reference]}% + \else\stripblanks\YYear\endlist\tok\fi} + +\def\TTestSingleAuthor{\ifx\OOtherAuthors\Comma\SingleAuthortrue + \else\SingleAuthorfalse\fi} + +%>>> EOF paradox.txs <<< |