Doctor Who Cuttings Archive

Difference between revisions of "Template:Article"

From The Doctor Who Cuttings Archive
Jump to navigationJump to search
(43 intermediate revisions by the same user not shown)
Line 1: Line 1:
 
<includeonly>  
 
<includeonly>  
 +
'''{{PAGENAME}}''' ({{#sub:{{{date}}}|0|4}})<br /><br />
 
<!-- Hidden categories and set properties -->
 
<!-- Hidden categories and set properties -->
{{#ifexpr: {{Age of article}} < 7776000 | This is a recently published article.  More information may be added at a later date.<br /> | {{#if: {{{file}}} | | [[Category:Articles with no image]]No image available.  {{#if: {{{text}}} | However there is a {{#switchtablink:Text|transcription}} available.}}<br /><br />Do you have an image?  Email us: {{email}} }} }}{{#if: {{{text}}} | | [[Category:Articles with no OCR]] }} {{#if: {{{date}}} | [[Category:Articles published in {{#sub:{{{date}}}|0|4}}]] {{#set: Has DatePublished = {{{date}}} }} | }}
+
{{#ifexpr: {{Age of article}} < 7776000 | <!--This is a recently published article.  More information may be added at a later date.--><br /> | {{#if: {{{file}}} | | [[Category:Articles with no image]]No image available.  {{#if: {{{text}}} | However there is a {{#switchtablink:Text|transcription}} available.}}{{#if: {{{abstract|}}} | | <br /><br /><span class='NoPrint'>Do you have an image?  Email us: {{email}}</span> }} }} }}{{#if: {{{text}}} | | [[Category:Articles with no OCR]] }} {{#if: {{{date}}} | [[Category:Articles published in {{#sub:{{{date}}}|0|4}}]] {{#set: Has DatePublished = {{{date}}} }} | }}
 
{{#ifeq: {{#sub:{{{file}}}|-3}} | jpg | [[Image:{{{file}}}|link={{filepath:{{{file}}} }}|{{{px|250}}}px]]
 
{{#ifeq: {{#sub:{{{file}}}|-3}} | jpg | [[Image:{{{file}}}|link={{filepath:{{{file}}} }}|{{{px|250}}}px]]
 
*{{filepath:{{{file}}} }} {{#set:Has Image={{filepath: {{{file}}} }} }} | }}
 
*{{filepath:{{{file}}} }} {{#set:Has Image={{filepath: {{{file}}} }} }} | }}
{{#ifeq: {{#sub:{{{file}}}|-3}} | pdf | {{Google Docs Viewer|url={{{file}}}|float=|height={{{height|500}}}|width={{{width|500}}} }}*{{{file}}} {{#set:Has Image={{{file}}} }} | }}
+
{{#ifeq: {{#sub:{{{file}}}|-3}} | pdf | {{Google Docs Viewer|url={{{file}}}|float=|height={{{height|500}}}|width={{{width|500}}} }}*{{{file}}}
 +
*[[Browser issues|pdf help]] {{#set:Has Image={{{file}}} }} | }}
 +
<div style="clear:right;">
 
= Description =  
 
= Description =  
 
*'''Publication:''' [[Has Publication::{{{publication}}}]]
 
*'''Publication:''' [[Has Publication::{{{publication}}}]]
Line 11: Line 14:
 
*'''Page:''' {{{pages}}}
 
*'''Page:''' {{{pages}}}
 
*'''Language:''' {{{language|English}}}{{#if: {{{description}}} |
 
*'''Language:''' {{{language|English}}}{{#if: {{{description}}} |
*'''Notes:''' {{{description}}} }}
+
*'''Notes:''' {{{description}}} }}{{#if: {{{abstract|}}} |
<!--*Type: {{{type}}}-->
+
*'''Abstract:''' {{{abstract}}} }}
  
 
{{#if: {{{text}}} | = Text =
 
{{#if: {{{text}}} | = Text =
Line 23: Line 26:
 
''Disclaimer'': These citations are created on-the-fly using primitive parsing techniques.  You should double-check '''all''' citations.  Send feedback to {{email}}
 
''Disclaimer'': These citations are created on-the-fly using primitive parsing techniques.  You should double-check '''all''' citations.  Send feedback to {{email}}
  
* '''APA 6th ed.''': {{#if: {{{author|}}} | {{InvertName|{{{author}}}}} | }} ({{{date}}}). {{ARTICLEPAGENAME}}. ''{{{publication}}}'' {{#if: {{{pages}}} | p. {{{pages}}}. | . }}
+
* '''APA 6th ed.''': {{#if: {{{author|}}} | {{InvertName|{{{author}}}}} | }} ({{{display date|{{{date}}}}}}). {{ARTICLEPAGENAME}}. ''{{{publication}}}'' {{#if: {{{pages}}} | p. {{{pages}}}. | . }}
* '''MLA 7th ed.''': {{#if: {{{author|}}} | {{InvertName|{{{author}}}}}. | }} "{{ARTICLEPAGENAME}}." {{{publication}}} [add city] {{{date}}}{{#if: {{{pages}}} | , {{{pages}}}. | . }} Print.
+
* '''MLA 7th ed.''': {{#if: {{{author|}}} | {{InvertName|{{{author}}}}}. | }} "{{ARTICLEPAGENAME}}." {{{publication}}} [add city] {{{display date|{{{date}}}}}}{{#if: {{{pages}}} | , {{{pages}}}. | . }} Print.
* '''Chicago 15th ed.''': {{#if: {{{author|}}} | {{InvertName|{{{author}}}}}. | }} "{{ARTICLEPAGENAME}}." {{{publication}}}, edition, sec., {{{date}}}
+
* '''Chicago 15th ed.''': {{#if: {{{author|}}} | {{InvertName|{{{author}}}}}. | }} "{{ARTICLEPAGENAME}}." {{{publication}}}, edition, sec., {{{display date|{{{date}}}}}}
* '''Turabian''': {{#if: {{{author}}} | {{InvertName|{{{author}}}}}. | }} "{{ARTICLEPAGENAME}}." ''{{{publication}}}'', {{{date}}}, section, {{{pages|}}} edition.
+
* '''Turabian''': {{#if: {{{author}}} | {{InvertName|{{{author}}}}}. | }} "{{ARTICLEPAGENAME}}." ''{{{publication}}}'', {{{display date|{{{date}}}}}}, section, {{{pages|}}} edition.
* '''Wikipedia''': <nowiki><ref>{{</nowiki>cite web | title={{ARTICLEPAGENAME}} | newspaper={{{publication}}} | pages={{{pages}}} | date={{{date}}}<nowiki>}}</ref></nowiki>
+
* '''Wikipedia (this article)''': <nowiki><ref>{{</nowiki>cite news| title={{ARTICLEPAGENAME}} | url=<nowiki>http://cuttingsarchive.org/index.php/</nowiki>{{FULLPAGENAMEE}} | work={{{publication}}} | pages={{{pages}}} | date={{{display date|{{{date}}}}}} | via=Doctor Who Cuttings Archive | accessdate={{CURRENTDAY}} {{CURRENTMONTHNAME}} {{CURRENTYEAR}} <nowiki>}}</ref></nowiki>
* '''Wikipedia (this page)''': <nowiki><ref>{{</nowiki>cite news | title={{ARTICLEPAGENAME}} | url=<nowiki>http://cuttingsarchive.org/index.php/</nowiki>{{FULLPAGENAME}} | work=The Doctor Who Cuttings Archive | accessdate={{CURRENTDAY}} {{CURRENTMONTHNAME}} {{CURRENTYEAR}}<nowiki>}}</ref></nowiki>
+
* '''Wikipedia (this page)''': <nowiki><ref>{{</nowiki>cite web | title={{ARTICLEPAGENAME}} | url=<nowiki>http://cuttingsarchive.org/index.php/</nowiki>{{FULLPAGENAMEE}} | work=Doctor Who Cuttings Archive | accessdate={{CURRENTDAY}} {{CURRENTMONTHNAME}} {{CURRENTYEAR}}<nowiki>}}</ref></nowiki>
 
{{#if: {{{moreTitles|}}}  
 
{{#if: {{{moreTitles|}}}  
 
|= Additional versions =
 
|= Additional versions =
Line 48: Line 51:
 
|
 
|
 
}}
 
}}
<headertabs />
+
<headertabs /></div>
  
 
<!-- Categories from template -->
 
<!-- Categories from template -->
Line 54: Line 57:
 
{{#if: {{{categories}}} | {{#arrayprint:Cats | | @@@@ |[[Category:@@@@]] }} }}
 
{{#if: {{{categories}}} | {{#arrayprint:Cats | | @@@@ |[[Category:@@@@]] }} }}
  
{{DS}}
+
<!-- get page number for Starlog -->
 +
{{#ifeq: {{{publication}}} | Starlog | {{#set: Page number = {{{pages}}} }} }}
 +
 
 +
<!-- add author -->
 +
<!-- {{#if: {{{author}}} | {{#set: Has author = {{{author}}} }} | }} -->
 +
 
 +
{{DS}}__NOTOC__
 
[[Category:Articles]]
 
[[Category:Articles]]
 
</includeonly>
 
</includeonly>
Line 76: Line 85:
 
| text              = <br />
 
| text              = <br />
 
}}
 
}}
 +
 +
<pre>{{Image table
 +
|{{img||px|}}
 +
|{{img||px|}}
 +
|{{img||px|}}
 +
|{{img||px|}}
 +
|{{img||px|}}
 +
}}
 +
 +
Sub filetoCuttings()
 +
 +
    Application.DisplayAlerts = wdAlertsNone
 +
   
 +
    Selection.WholeStory
 +
    With Selection.Find
 +
        .ClearFormatting
 +
        .Replacement.ClearFormatting
 +
        .Text = "File:"
 +
        .Replacement.Text = ""
 +
        .Forward = True
 +
        .Wrap = wdFindAsk
 +
        .Format = False
 +
        .MatchCase = False
 +
        .MatchWholeWord = False
 +
        .MatchWildcards = False
 +
        .MatchSoundsLike = False
 +
        .MatchAllWordForms = False
 +
        .Execute Replace:=wdReplaceAll
 +
       
 +
        .Text = "^p"
 +
        .Replacement.Text = ""
 +
        .Forward = True
 +
        .Wrap = wdFindAsk
 +
        .Format = False
 +
        .MatchCase = False
 +
        .MatchWholeWord = False
 +
        .MatchWildcards = False
 +
        .MatchSoundsLike = False
 +
        .MatchAllWordForms = False
 +
        .Execute Replace:=wdReplaceAll
 +
    End With
 +
 +
    Selection.WholeStory
 +
    FName = Selection
 +
   
 +
    FName = Trim(FName)
 +
    ftype = Mid(FName, Len(FName) - 3, 3)
 +
    FName = Left(FName, Len(FName) - 5)
 +
   
 +
    pos = InStr(FName, " ")
 +
    fdate = Left(FName, pos - 1)
 +
    FName = Mid(FName, pos + 1)
 +
    p = Right(FName, 3)
 +
    p = Trim(p)
 +
    If p Like "p#" Then
 +
        p = Right(p, 1)
 +
        FName = Left(FName, Len(FName) - 3)
 +
    ElseIf p Like "p##" Then
 +
        p = Right(p, 2)
 +
        FName = Left(FName, Len(FName) - 4)
 +
    Else
 +
        p = ""
 +
    End If
 +
       
 +
    out = "{{article" & vbCrLf & "| publication = " & FName & vbCrLf
 +
    out = out & "| file = " & fdate & " " & FName & "." & ftype & vbCrLf
 +
    out = out & "| px = "
 +
    If ftype = "jpg" Then out = out & "450"
 +
    out = out & vbCrLf & "| height = " & vbCrLf
 +
    out = out & "| width = " & vbCrLf & "| date = " & fdate & vbCrLf
 +
    If Len(fdate) < 10 Then out = out & "| display date = " & vbCrLf
 +
    out = out & "| author = " & vbCrLf & "| pages = " & p & vbCrLf & "| language = English " & vbCrLf
 +
    out = out & "| type = " & vbCrLf & "| description = " & vbCrLf & "| categories = " & vbCrLf
 +
    out = out & "| moreTitles = " & vbCrLf & "| morePublications = " & vbCrLf & "| moreDates = " & vbCrLf
 +
    out = out & "| text = " & vbCrLf & "}}"
 +
   
 +
    Selection.TypeText (out)
 +
    Application.DisplayAlerts = wdAlertsAll
 +
End Sub
 +
 +
</pre>
 
</noinclude>
 
</noinclude>

Revision as of 22:47, 13 March 2017


{{article
| publication =
| file =
| px =
| height =
| width =
| date =
| author =
| pages =
| language = English
| type =
| description =
| categories =
| moreTitles =
| morePublications =
| moreDates =
| text =
}}

{{Image table
|{{img||px|}}
|{{img||px|}}
|{{img||px|}}
|{{img||px|}}
|{{img||px|}}
}}

Sub filetoCuttings()

    Application.DisplayAlerts = wdAlertsNone
    
    Selection.WholeStory
    With Selection.Find
        .ClearFormatting
        .Replacement.ClearFormatting
        .Text = "File:"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindAsk
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
        .Execute Replace:=wdReplaceAll
        
        .Text = "^p"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindAsk
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
        .Execute Replace:=wdReplaceAll
    End With

    Selection.WholeStory
    FName = Selection
    
    FName = Trim(FName)
    ftype = Mid(FName, Len(FName) - 3, 3)
    FName = Left(FName, Len(FName) - 5)
    
    pos = InStr(FName, " ")
    fdate = Left(FName, pos - 1)
    FName = Mid(FName, pos + 1)
    p = Right(FName, 3)
    p = Trim(p)
    If p Like "p#" Then
        p = Right(p, 1)
        FName = Left(FName, Len(FName) - 3)
    ElseIf p Like "p##" Then
        p = Right(p, 2)
        FName = Left(FName, Len(FName) - 4)
    Else
        p = ""
    End If
        
    out = "{{article" & vbCrLf & "| publication = " & FName & vbCrLf
    out = out & "| file = " & fdate & " " & FName & "." & ftype & vbCrLf
    out = out & "| px = "
    If ftype = "jpg" Then out = out & "450"
    out = out & vbCrLf & "| height = " & vbCrLf
    out = out & "| width = " & vbCrLf & "| date = " & fdate & vbCrLf
    If Len(fdate) < 10 Then out = out & "| display date = " & vbCrLf
    out = out & "| author = " & vbCrLf & "| pages = " & p & vbCrLf & "| language = English " & vbCrLf
    out = out & "| type = " & vbCrLf & "| description = " & vbCrLf & "| categories = " & vbCrLf
    out = out & "| moreTitles = " & vbCrLf & "| morePublications = " & vbCrLf & "| moreDates = " & vbCrLf
    out = out & "| text = " & vbCrLf & "}}"
    
    Selection.TypeText (out)
    Application.DisplayAlerts = wdAlertsAll
End Sub