@Comment(
- Fix Multiple
)

@Comment(
============================================================================LPT
)
@Marker(Device,LPT)
@Comment{
Device definition file for standard ASCII line printers, which have
underscore characters and are 132 columns wide.
}
@Declare(GenericDevice="LPT",DeviceTitle="Line Printer",FinalName="lpt")
@Declare(Driver LPT,Hunits 1inch,Hraster 10,Vunits 1inch,Vraster 8)
@Declare(Underline Available,UnderScoreCharacter="_")
@Declare(PaperLength 66,PaperWidth 132,ScriptPush=Yes)

@Define(NoOp)
@Define(B,Overstruck 1,Capitalized Off,TabExport)
@Define(C,Underline Off,Capitalized,Overstruck 0,TabExport)
@Define(I,Underline Alphanumerics,Capitalized Off,TabExport)
@Define(P,Use B,Use I,TabExport)
@Define(R,Underline Off,Capitalized Off,Overstruck 0,TabExport)
@Define(U,Underline NonBlank,TabExport)
@Define(UN,Underline Alphanumerics,TabExport)
@Define(UX,Underline All,TabExport)
@Define(W,Spaces NoBreak,TabExport)
@Equate(T=R,Q=W,G=NoOp,-=NoOp,+=NoOp)

@DefineFont(CharDef,R="CHARDEF")

@Define(Text,Fill,Justification,Spaces Compact,Break,WidestBlank 3,
   BlankLines Break)
@Define(Multiple,Indent 0)
@Define(Verbatim,Break,Continue,Nofill,Spaces Kept,
   Above 1,Below 1,BlankLines Kept,Spacing 1)
@Define(Format,Break,Continue,Nofill,Spaces Kept,Above 1,Below 1,
   BlankLines Kept,Spacing 1,Justification Off)
@Define(Insert,Break,Continue,Above 1,Below 1,LeftMargin +4,RightMargin +4,
   Spacing 1,BlankLines Kept)
@Define(Centre,Break,Continue,Above 2,Below 2,Spacing 1,
   LeftMargin 0,RightMargin 0,TabExport False,Spaces Kept,
   Centred,BlankLines Kept,Afterentry "@TabClear
")
@Equate(Center=Centre)
@Define(Flushright=Centre,FlushRight)
@Define(Flushleft=Format,LeftMargin 0)

@Define(MajorHeading,Hyphenation Off,
   Use Centre,Continue Off,Use B,Use C,Need 1inch,TabExport False)
@Define(Heading,Hyphenation Off,
   Use Centre,Continue Off,Use B,Need 0.8inch,TabExport False)
@Define(SubHeading,Hyphenation Off,
   Use Insert,Indent 0,LeftMargin 0,Continue Off,Use B,
   Need 0.7inch,TabExport False)
@Define(Display,Use Insert,Nofill,Use R,Group,Blanklines Kept,Spaces Kept,
   TabExport False)
@Define(Example,Use Insert,Nofill,Spaces Kept,Group,Blanklines Kept)
@Define(FileExample,Break,CRBreak,LeftMargin 16,Justification Off,
   Spaces Kept,LeadingSpaces Kept,Fill,BlankLines Kept,Indent -10,
   Spacing 1,Spread 0,Above 1,Below 1)
@Define( OutputExample=Verbatim,LeftMargin 2)
@Define(  InputExample=Verbatim,LeftMargin 2)
@Define(ProgramExample=Example)

@Define(Itemize,Break,Continue,Fill,LeftMargin +5,Indent -5,
   RightMargin 5,Numbered <- @,* >,NumberLocation LFR,Spaces Compact,
   BlankLines Break,Spacing 1,Above 1,Below 1,Spread 1)
@Equate(Itemise=Itemize)
@Define(Enumerate,Use Itemize,LeftMargin +6,Indent -6,
  Numbered <@1. @,@a. @,@i. >,Referenced <@1@,@a@,@i>)
@Define(Description,Break,Continue,Fill,Above 1,Below 1,LeftMargin +16,
   Spaces Compact,Indent -16,Spacing 1,UnNumbered)
@Define(Quotation,Use Insert,Fill,Use R,BlankLines Break,
   Spaces Compact,TabExport False,Indent 3)
@Define(Verse,Use Insert,Fill,Spaces Kept,Justification Off,CRBreak,Use R,
   LeadingSpaces Kept,
   TabExport False,Indent -3,Spread 0,LeftMargin +8)
@Define(HeadFoot,Afterentry "@TabClear
",Capitalized Off,FaceCode R,Indent 0,Overstruck 0,Break After,Below 0,
  Justification Off,LeadingSpaces Ignored,LeftMargin 0,Nofill,RightMargin 0,
  Spaces Compact,Underline Off)
@TextForm(Need="@Begin{NoOp,Need @Parm[text]}@End{NoOp}")
@Counter(Page,Numbered <@1>,Referenced <@1>,Init 0)




@Comment(
===========================================================================FILE
)
@Marker(Device,FILE)
@Comment{
Device definition for unpaged file. The non-paging is implemented in the
code for driver=File, as is Underline ignoring, so apart from the critical
'driver' keyword, this is substantially the same as device LPT.
}
@Declare(GenericDevice="FILE",DeviceTitle="File",FinalName="fil")
@Declare(Driver FILE,Hunits 1inch,Hraster 10,Vunits 1inch,Vraster 8)
@Declare(BareCR Available,BareLF available)
@Declare(Underline Available,UnderScoreCharacter="_")
@Declare(PaperLength 66,PaperWidth 80,ScriptPush=Yes)

@Define(NoOp)
@Define(C,Underline Off,Capitalized,TabExport)
@Define(I,Underline Off,Capitalized Off,TabExport)
@Define(R,Underline Off,Capitalized Off,Overstruck 0,TabExport)
@Define(U,Underline Off,TabExport)
@Define(UN,Underline Off,TabExport)
@Define(UX,Underline Off,TabExport)
@Define(W,Spaces NoBreak,TabExport)
@Equate(T=R,B=R,P=I,Q=W,G=NoOp,-=NoOp,+=NoOp)

@DefineFont(CharDef,R="CHARDEF")

@Define(Text,Fill,Justification,Spaces Compact,Break,WidestBlank 3,
   BlankLines Break)
@Define(Multiple,Indent 0)
@Define(Verbatim,Break,Continue,Nofill,Spaces Kept,
   Above 1,Below 1,BlankLines Kept,Spacing 1)
@Define(Format,Break,Continue,Nofill,Spaces Kept,Above 1,Below 1,
   BlankLines Kept,Spacing 1,Justification Off)
@Define(Insert,Break,Continue,Above 1,Below 1,LeftMargin +4,RightMargin +4,
   Spacing 1,BlankLines Kept)
@Define(Centre,Break,Continue,Above 2,Below 2,Spacing 1,
   LeftMargin 0,RightMargin 0,TabExport False,Spaces Kept,
   Centred,BlankLines Kept,Afterentry "@TabClear
")
@Equate(Center=Centre)
@Define(Flushright=Centre,FlushRight)
@Define(Flushleft=Format,LeftMargin 0)

@Define(MajorHeading,Hyphenation Off,
   Use Centre,Continue Off,Use B,Use C,Need 1inch,TabExport False)
@Define(Heading,Hyphenation Off,
   Use Centre,Continue Off,Use B,Use C,Need 0.8inch,TabExport False)
@Define(SubHeading,Hyphenation Off,
   Use Insert,Indent 0,LeftMargin 0,Continue Off,Use UX,
   Need 0.7inch,TabExport False)
@Define(Display,Use Insert,Nofill,Use R,Group,Blanklines Kept,Spaces Kept,
   TabExport False)
@Define(Example,Use Insert,Nofill,Spaces Kept,Group,Blanklines Kept)
@Define(FileExample,Break,CRBreak,LeftMargin 16,Justification Off,
   Spaces Kept,LeadingSpaces Kept,Fill,BlankLines Kept,Indent -10,
   Spacing 1,Spread 0,Above 1,Below 1)
@Define( OutputExample=Verbatim,LeftMargin 2)
@Define(  InputExample=Verbatim,LeftMargin 2)
@Define(ProgramExample=Example)

@Define(Itemize,Break,Continue,Fill,LeftMargin +5,Indent -5,
   RightMargin 5,Numbered <- @,* >,NumberLocation LFR,Spaces Compact,
   BlankLines Break,Spacing 1,Above 1,Below 1,Spread 1)
@Equate(Itemise=Itemize)
@Define(Enumerate,Use Itemize,LeftMargin +6,Indent -6,
  Numbered <@1. @,@a. @,@i. >,Referenced <@1@,@a@,@i>)
@Define(Description,Break,Continue,Fill,Above 1,Below 1,LeftMargin +16,
   Spaces Compact,Indent -16,Spacing 1,UnNumbered)
@Define(Quotation,Use Insert,Fill,Use R,BlankLines Break,
   Spaces Compact,TabExport False,Indent 3)
@Define(Verse,Use Insert,Fill,Spaces Kept,Justification Off,CRBreak,Use R,
   LeadingSpaces Kept,
   TabExport False,Indent -3,Spread 0,LeftMargin +8)
@Define(HeadFoot,Afterentry "@TabClear
",Capitalized Off,FaceCode R,Indent 0,Overstruck 0,Break After,Below 0,
  Justification Off,LeadingSpaces Ignored,LeftMargin 0,Nofill,RightMargin 0,
  Spaces Compact,Underline Off)
@TextForm(Need="@Begin{NoOp,Need @Parm[text]}@End{NoOp}")
@Counter(Page,Numbered <@1>,Referenced <@1>,Init 0)



@Comment(
========================================================================LASERJET
)
@Marker(Device,LASERJET)
@Comment{
Device definition file for HP LaserJet.
}
@Declare(GenericDevice="LASERJET",DeviceTitle="HP LaserJet",FinalName="ljt")
@Declare(Driver LASERJET,Hunits 1inch,Hraster 10,Vunits 1inch,Vraster 6)
@Declare(Underline Available,Backspace Available)
@Declare(PaperLength 66,PaperWidth 8.25 inches,ScriptPush=No)

@Define(NoOp)
@Define(C,Capitalized,TabExport)
@Define(I,Underline Alphanumerics,Capitalized Off,TabExport)
@Define(R,Underline Off,Capitalized Off,Overstruck 0,TabExport)
@Define(U,Underline NonBlank,TabExport)
@Define(UN,Underline Alphanumerics,TabExport)
@Define(UX,Underline All,TabExport)
@Define(W,Spaces NoBreak,TabExport)
@Define(+,Script +1,TabExport,Hyphenation Off,HyphenBreak Off)
@Define(-=+,Script -1)
@Equate(T=R,B=R,P=I,Q=W)

@DefineFont(CharDef,R="CHARDEF")

@Define(Text,Fill,Justification,Spaces Compact,Break,WidestBlank 3,
   BlankLines Break)
@Define(Multiple,Indent 0)
@Define(Verbatim,Break,Continue,Nofill,Spaces Kept,
   Above 1,Below 1,BlankLines Kept,Spacing 1)
@Define(Format,Break,Continue,Nofill,Spaces Kept,
   Above 1,Below 1,
   BlankLines Kept,Spacing 1,Justification Off)
@Define(Insert,Break,Continue,Above 1,Below 1,LeftMargin +4,RightMargin +4,
   Spacing 1,BlankLines Kept)
@Define(Centre,Break,Continue,Above 1,Below 1,Spacing 1,
   LeftMargin 0,RightMargin 0,TabExport False,Spaces Kept,
   Centred,BlankLines Kept,Afterentry "@TabClear
")
@Equate(Center=Centre)
@Define(Flushright=Centre,FlushRight)
@Define(Flushleft=Format,LeftMargin 0)

@Define(MajorHeading,Hyphenation Off,
   Use Centre,Continue Off,Use B,Use C,Need 1inch,TabExport False)
@Define(Heading,Hyphenation Off,
   Use Centre,Continue Off,Use B,Use C,Need 0.8inch,TabExport False)
@Define(SubHeading,Hyphenation Off,
   Use Insert,Indent 0,LeftMargin 0,Continue Off,Use UX,
   Need 0.7inch,TabExport False)
@Define(Display,Use Insert,Nofill,Use R,Group,Blanklines Kept,Spaces Kept,
   TabExport False)
@Define(Example,Use Insert,Nofill,Spaces Kept,Group,Blanklines Kept)
@Define(FileExample,Break,CRBreak,LeftMargin 16,Justification Off,
   Spaces Kept,LeadingSpaces Kept,Fill,BlankLines Kept,Indent -10,
   Spacing 1,Spread 0,Above 1,Below 1)
@Define( OutputExample=Verbatim,LeftMargin 2)
@Define(  InputExample=Verbatim,LeftMargin 2)
@Define(ProgramExample=Example)

@Define(Itemize,Break,Continue,Fill,LeftMargin +5,Indent -5,
   RightMargin 5,Numbered <- @,* >,NumberLocation LFR,Spaces Compact,
   BlankLines Break,Spacing 1,Above 1,Below 1,Spread 1)
@Equate(Itemise=Itemize)
@Define(Enumerate,Use Itemize,LeftMargin +6,Indent -6,
  Numbered <@1. @,@a. @,@i. >,Referenced <@1@,@a@,@i>)
@Define(Description,Break,Continue,Fill,Above 1,Below 1,LeftMargin +16,
   Spaces Compact,Indent -16,Spacing 1,UnNumbered)
@Define(Quotation,Use Insert,Fill,Use R,BlankLines Break,
   Spaces Compact,TabExport False,Indent 3)
@Define(Verse,Use Insert,Fill,Spaces Kept,Justification Off,CRBreak,Use R,
   LeadingSpaces Kept,
   TabExport False,Indent -3,Spread 0,LeftMargin +8)
@Define(HeadFoot,Afterentry "@TabClear
",Capitalized Off,FaceCode R,Indent 0,Overstruck 0,Break After,Below 0,
  Justification Off,LeadingSpaces Ignored,LeftMargin 0,Nofill,RightMargin 0,
  Spaces Compact,Underline Off)
@TextForm(Need="@Begin{NoOp,Need @Parm[text]}@End{NoOp}")
@Counter(Page,Numbered <@1>,Referenced <@1>,Init 0)



@Comment(
========================================================================LBP10
)
@Marker(Device,LBP10)
@Comment{
Device definition file for Canon LBP-10 laser printer.
}
@Declare(GenericDevice="LBP10",DeviceTitle="Canon LBP-10",FinalName="lbp")
@Declare(Driver LBP10,Hunits 1inch,Hraster 240,Vunits 1inch,Vraster 240)
@Declare(PaperLength 11.54 inches,PaperWidth 7.77 inches,ScriptPush=No)

@Define(NoOp)
@Define(B,Capitalized Off,TabExport,FaceCode B)
@Define(C,Capitalized,TabExport,FaceCode C)
@Define(G,Capitalized Off,TabExport,FaceCode G)
@Define(I,Capitalized Off,TabExport,FaceCode I)
@Define(K,Capitalized Off,TabExport,FaceCode K)
@Define(R,Capitalized Off,TabExport,FaceCode R)
@Define(T,Capitalized Off,TabExport,FaceCode T)
@Define(W,Spaces NoBreak,TabExport)
@Equate(P=I,Q=W,U=B,UN=B,UX=B,+=NoOp,-=NoOp)

@DefineFont(ScriptFont,B="TIMESB6",C="TIMESR8",G="TIMESG6",I="TIMESI6",
   K="TIMESK6",R="TIMESR6",T="TIMESR6")
@DefineFont(BodyFont,B="TIMESB10",C="TIMESR8",G="TIMESG10",I="TIMESI10",
   K="TIMESK10",R="TIMESR10",T="PRINTOUT10")
@DefineFont(HeadFont,B="TIMESB11",C="TIMESR9",G="TIMESG11",I="TIMESI11",
   K="TIMESK11",R="TIMESR11",T="PRINTOUT11")
@DefineFont(TitleFont,B="TIMESB13",C="TIMESR11",G="TIMESG13",I="TIMESI13",
   K="TIMESK13",R="TIMESR13",T="PRINTOUT11")

@Define(Text,Fill,Justification,Spaces Compact,Break,WidestBlank 3,
   BlankLines Break)
@Define(Multiple,Indent 0)
@Define(Verbatim,Break,Continue,Nofill,Spaces Kept,
   Above 1,Below 1,BlankLines Kept,Spacing 1,FaceCode T)
@Define(Format,Font BodyFont,Break,Continue,Nofill,Spaces Kept,
   Above 1,Below 1,FaceCode R,BlankLines Kept,Spacing 1,Justification Off)
@Define(Insert,Break,Continue,Above 1,Below 1,LeftMargin +4,RightMargin +4,
   Spacing 1,BlankLines Kept)
@Define(Centre,Break,Continue,Above 1,Below 1,Spacing 1,
   LeftMargin 0,RightMargin 0,TabExport False,Spaces Kept,
   Centred,BlankLines Kept,Afterentry "@TabClear
")
@Equate(Center=Centre)
@Define(Flushright=Centre,FlushRight)
@Define(Flushleft=Format,LeftMargin 0)

@Define(MajorHeading,Hyphenation Off,Font TitleFont,
   Use Centre,Continue Off,Need 1inch,TabExport False,FaceCode B)
@Define(Heading,Hyphenation Off,Font HeadFont,
   Use Centre,Continue Off,Need 0.8inch,TabExport False,FaceCode B)
@Define(SubHeading,Hyphenation Off,
   Use Insert,Indent 0,LeftMargin 0,Continue Off,Use B,
   Need 0.7inch,TabExport False)
@Define(Display,Use Insert,Nofill,Use R,Group,Blanklines Kept,Spaces Kept,
   TabExport False)
@Define(Example,Use Insert,Nofill,Spaces Kept,Group,Blanklines Kept,FaceCode T)
@Define(FileExample,Break,CRBreak,LeftMargin 16,Justification Off,
   Spaces Kept,LeadingSpaces Kept,Fill,BlankLines Kept,Indent -10,
   Spacing 1,Spread 0,Above 1,Below 1)
@Define( OutputExample=Verbatim,LeftMargin 2)
@Define(  InputExample=Verbatim,LeftMargin 2)
@Define(ProgramExample=Example)

@Define(Itemize,Break,Continue,Fill,LeftMargin +5,Indent -5,
   RightMargin 5,Numbered <- @,* >,NumberLocation LFR,Spaces Compact,
   BlankLines Break,Spacing 1,Above 1,Below 1,Spread 1)
@Equate(Itemise=Itemize)
@Define(Enumerate,Use Itemize,LeftMargin +6,Indent -6,
  Numbered <@1. @,@a. @,@i. >,Referenced <@1@,@a@,@i>)
@Define(Description,Break,Continue,Fill,Above 1,Below 1,LeftMargin +16,
   Spaces Compact,Indent -16,Spacing 1,UnNumbered)
@Define(Quotation,Use Insert,Fill,Use R,BlankLines Break,
   Spaces Compact,TabExport False,Indent 3)
@Define(Verse,Use Insert,Fill,Spaces Kept,Justification Off,CRBreak,Use R,
   LeadingSpaces Kept,
   TabExport False,Indent -3,Spread 0,LeftMargin +8)
@Define(HeadFoot,Afterentry "@TabClear
",Capitalized Off,FaceCode R,Indent 0,Overstruck 0,Break After,Below 0,
  Justification Off,LeadingSpaces Ignored,LeftMargin 0,Nofill,RightMargin 0,
  Spaces Compact,Underline Off)
@TextForm(Need="@Begin{NoOp,Need @Parm[text]}@End{NoOp}")
@Counter(Page,Numbered <@1>,Referenced <@1>,Init 0)



@Comment(
==========================================================================DIABLO
)
@Marker(Device,DIABLO)
@Comment{
Device definition file for fairly minimal Diablo daisy wheel devices,
which have underscore characters and can do half line feeds.
}
@Declare(GenericDevice="DIABLO",DeviceTitle="Diablo",FinalName="dia")
@Declare(Driver DIABLO,Hunits 1inch,Hraster 12,Vunits 1inch,Vraster 6)
@Declare(BareCR Available,BareLF available)
@Declare(Underline Available,UnderScoreCharacter="_")
@Declare(PaperLength 12 inches,PaperWidth 8.25 inches,ScriptPush=Yes)

@Define(NoOp)
@Define(B,Overstruck 1,Capitalized Off,TabExport)
@Define(C,Capitalized,TabExport)
@Define(I,Underline Alphanumerics,Capitalized Off,TabExport)
@Define(P,Use B,Use I,TabExport)
@Define(R,Underline Off,Capitalized Off,Overstruck 0,TabExport)
@Define(U,Underline NonBlank,TabExport)
@Define(UN,Underline Alphanumerics,TabExport)
@Define(UX,Underline All,TabExport)
@Define(W,Spaces NoBreak,TabExport)
@Define(+,Script +1,TabExport,Hyphenation Off,HyphenBreak Off)
@Define(-=+,Script -1)
@Equate(T=R,Q=W,G=NoOp)

@DefineFont(CharDef,R="CHARDEF")

@Define(Text,Fill,Justification,Spaces Compact,Break,WidestBlank 3,
   BlankLines Break)
@Define(Multiple,Indent 0)
@Define(Verbatim,Break,Continue,Nofill,Spaces Kept,Above 2,Below 2,BlankLines Kept,Spacing 1)
@Define(Format,Break,Continue,Nofill,Spaces Kept,Above 2,Below 2,
   BlankLines Kept,Spacing 1,Justification Off)
@Define(Insert,Break,Continue,Above 2,Below 2,LeftMargin +4,RightMargin +4,
   Spacing 1,BlankLines Kept)
@Define(Centre,Break,Continue,Above 2,Below 2,Spacing 1,
   LeftMargin 0,RightMargin 0,TabExport False,Spaces Kept,
   Centred,BlankLines Kept,Afterentry "@TabClear
")
@Equate(Center=Centre)
@Define(Flushright=Centre,FlushRight)
@Define(Flushleft=Format,LeftMargin 0)

@Define(MajorHeading,Hyphenation Off,
   Use Centre,Continue Off,Use B,Use C,Need 1inch,TabExport False)
@Define(Heading,Hyphenation Off,
   Use Centre,Continue Off,Use B,Use C,Need 0.8inch,TabExport False)
@Define(SubHeading,Hyphenation Off,
   Use Insert,Indent 0,LeftMargin 0,Continue Off,Use UX,
   Need 0.7inch,TabExport False)
@Define(Display,Use Insert,Nofill,Use R,Group,Blanklines Kept,Spaces Kept,
   TabExport False)
@Define(Example,Use Insert,Nofill,Spaces Kept,Group,Blanklines Kept)
@Define(FileExample,Break,CRBreak,LeftMargin 16,Justification Off,
   Spaces Kept,LeadingSpaces Kept,Fill,BlankLines Kept,Indent -10,
   Spacing 1,Spread 0,Above 1,Below 1)
@Define( OutputExample=Verbatim,LeftMargin 2)
@Define(  InputExample=Verbatim,LeftMargin 2)
@Define(ProgramExample=Example)

@Define(Itemize,Break,Continue,Fill,LeftMargin +5,Indent -5,
   RightMargin 5,Numbered <- @,* >,NumberLocation LFR,Spaces Compact,
   BlankLines Break,Spacing 1,Above 2,Below 2,Spread 1)
@Equate(Itemise=Itemize)
@Define(Enumerate,Use Itemize,LeftMargin +6,Indent -6,
  Numbered <@1. @,@a. @,@i. >,Referenced <@1@,@a@,@i>)
@Define(Description,Break,Continue,Fill,Above 2,Below 2,LeftMargin +16,
   Spaces Compact,Indent -16,Spacing 1,UnNumbered)
@Define(Quotation,Use Insert,Fill,Use R,BlankLines Break,
   Spaces Compact,TabExport False,Indent 3)
@Define(Verse,Use Insert,Fill,Spaces Kept,Justification Off,CRBreak,Use R,
   LeadingSpaces Kept,
   TabExport False,Indent -3,Spread 0,LeftMargin +8)
@Define(HeadFoot,Afterentry "@TabClear
",Capitalized Off,FaceCode R,Indent 0,Overstruck 0,Break After,Below 0,
  Justification Off,LeadingSpaces Ignored,LeftMargin 0,Nofill,RightMargin 0,
  Spaces Compact,Underline Off)
@TextForm(Need="@Begin{NoOp,Need @Parm[text]}@End{NoOp}")
@Counter(Page,Numbered <@1>,Referenced <@1>,Init 0)



@Comment(
==========================================================================GP300
)
@Marker(Device,GP300)
@Comment{
Device definition for Philips GP 300 Printer.
}
@Declare(GenericDevice="GP300",DeviceTitle="Philips GP 300",
    FinalName="pgp")
@Declare(Driver GP300,Hunits 1inch,Hraster 10,Vunits 1inch,Vraster 6)
@Comment(
The horizontal raster info is not used. The vertical info is involved only in
the placement of headings within margins and should affect only the precision
with which they are so placed.
)
@Declare(Overstrike Available,BareCR available,BareLF available)
@Declare(Underline Available,Backspace available)
@Declare(PaperLength 11.1inches,PaperWidth 7.5inches,ScriptPush=no)
@Comment(The length is actually 11.6 and the width 8.25, but the device
has its hardware top and left margins set to .5 and .75 respectively.
Our global margins in the MAKE file must take this into account as well.)

@Define(NoOp)
@Define(C,Facecode S,Capitalized,TabExport)
@Define(R,Underline Off,Capitalized Off,Overstruck 0,TabExport,Facecode R)
@Define(I,Facecode I,TabExport)
@Define(B,Overstruck 1,Capitalized Off,TabExport)
@Define(P,Use B,Use I,TabExport)
@Define(G,Facecode G,Tabexport)
@Define(T,Facecode T,Tabexport)
@Define(U,Underline NonBlank,TabExport)
@Define(UN,Underline Alphanumerics,TabExport)
@Define(UX,Underline All,TabExport)
@Define(+,Facecode S,Script +1,TabExport,Hyphenation Off,HyphenBreak Off)
@Define(-=+,Script -1)
@Define(W,Spaces NoBreak,TabExport)
@Define(Text,Fill,Justification,Spaces Compact,Break,WidestBlank 3,
   BlankLines Break)
@Define(Multiple,Indent 0)
@Define(Verbatim,Break,Continue,Nofill,Spaces Kept,Facecode F,
   Above 2,Below 2,BlankLines Kept,Spacing 1)
@Define(Format,Break,Continue,Nofill,Spaces Kept,
   Above 2,Below 2,
   BlankLines Kept,Spacing 1,Justification Off)
@Define(Insert,Break,Continue,Above 2,Below 2,LeftMargin +4,RightMargin +4,
   Spacing 1,BlankLines Kept)
@Define(Centre,Break,Continue,Above 2,Below 2,Spacing 1,
   LeftMargin 0,RightMargin 0,TabExport False,Spaces Kept,
   Centred,BlankLines Kept,Afterentry "@TabClear
")
@Equate(Center=Centre)
@Define(Flushright=Centre,FlushRight)
@Define(Flushleft=Format,LeftMargin 0)

@Define(MajorHeading,Hyphenation Off,
   Use Centre,Continue Off,Facecode O,Need 1inch,TabExport False)
@Define(Heading,Hyphenation Off,
   Use Centre,Continue Off,Use B,Use C,Need 0.8inch,TabExport False)
@Define(SubHeading,Hyphenation Off,
   Use Insert,Indent 0,LeftMargin 0,Continue Off,Use UX,
   Need 0.7inch,TabExport False)
@Define(Display,Use Insert,Nofill,Use R,Group,Blanklines Kept,Spaces Kept,
   TabExport False)
@Define(Example,Use Insert,Nofill,Spaces Kept,Group,Blanklines Kept,Facecode T)
@Define(FileExample,Break,CRBreak,LeftMargin 16,Justification Off,Facecode T,
   Spaces Kept,LeadingSpaces Kept,Fill,BlankLines Kept,Indent -10,
   Spacing 1,Spread 0,Above 1,Below 1)
@Define( OutputExample=Verbatim,LeftMargin 2,Facecode F)
@Define(  InputExample=Verbatim,LeftMargin 2,Facecode T)
@Define(ProgramExample=Example,Facecode U)

@Define(Itemize,Break,Continue,Fill,LeftMargin +5,Indent -5,
   RightMargin 5,Numbered <- @,* >,NumberLocation LFR,Spaces Compact,
   BlankLines Break,Spacing 1,Above 2,Below 2,Spread 1)
@Equate(Itemise=Itemize)
@Define(Enumerate,Use Itemize,LeftMargin +6,Indent -6,
  Numbered <@1. @,@a. @,@i. >,Referenced <@1@,@a@,@i>)
@Define(Description,Break,Continue,Fill,Above 2,Below 2,LeftMargin +16,
   Spaces Compact,Indent -16,Spacing 1,UnNumbered)
@Define(Quotation,Use Insert,Fill,Use R,BlankLines Break,
   Spaces Compact,TabExport False,Indent 3)
@Define(Verse,Use Insert,Fill,Spaces Kept,Justification Off,CRBreak,Use R,
   LeadingSpaces Kept,
   TabExport False,Indent -3,Spread 0,LeftMargin +8)
@Define(HeadFoot,Afterentry "@TabClear
",Capitalized Off,FaceCode R,Indent 0,Overstruck 0,Break After,Below 0,
  Justification Off,LeadingSpaces Ignored,LeftMargin 0,Nofill,RightMargin 0,
  Spaces Compact,Underline Off)
@DefineFont(CharDef,R="CHARDEF")
@DefineFont(BodyFont,R="GOTHICPS",G="GREEKPS",T="GOTHIC10",F="COURIER12",
  U="GOTHIC12",S="MICRO12",B="GOTHICBOLDPS",M="MATHSPS",I="ITALICPS",
  A="GOTHICBOLD12",D="GOTHICBOLD10",E="COURIER10",H="COURIERPS",
  J="MICRO10",K="MICRO15",L="ORATOR12",N="ORATOR10",O="ORATORPS",
  P="ITALIC12",Q="DATA10",V="ITALIC10",W="GREEK12",X="GREEK10",Y="MATHS12",
  Z="MATHS10")
@Comment(the above typecase assignments follow scribe conventions for
R,G,T,F,U,S,B,I and M more or less. The remainder simply make all the fonts
except Data12 and Data15 Available on whatever FaceCodes are left.
C, conventionally small Capitals, is not used.)
@TextForm(Need="@Begin{NoOp,Need @Parm[text]}@End{NoOp}")
@Counter(Page,Numbered <@1>,Referenced <@1>,Init 0)


@Comment(
==========================================================================X2700
)
@Marker(Device,X2700)
@Comment{
Device definition for Xerox 2700 Laser printer.
}
@Declare(GenericDevice="X2700",DeviceTitle="Xerox 2700",
    FinalName="x2700")
@Declare(Driver X2700,Hunits 1inch,Hraster 10,Vunits 1inch,Vraster 6)
@Comment(
The horizontal raster info is not used. The vertical info is involved only in
the placement of headings within margins and should affect only the precision
with which they are so placed.
)
@Declare(Overstrike Available,BareCR available,Underline Available)
@Declare(PaperLength 11.5inches,PaperWidth 8.25inches)

@Define(NoOp)
@Define(C,Facecode R,Capitalized,TabExport)
@Define(R,Underline Off,Capitalized Off,Overstruck 0,TabExport,Facecode R)
@Define(I,Underline Alphanumerics,Capitalized Off,TabExport)
@Define(B,Overstruck 1,Capitalized Off,TabExport)
@Define(P,Use B,Use I,TabExport)
@Define(G,Facecode G,Tabexport)
@Define(T,Facecode F,Tabexport)
@Define(U,Underline NonBlank,TabExport)
@Define(UN,Underline Alphanumerics,TabExport)
@Define(UX,Underline All,TabExport)
@Define(+,Facecode S,Script +1,TabExport,Hyphenation Off,HyphenBreak Off)
@Define(-=+,Script -1)
@Define(W,Spaces NoBreak,TabExport)
@Define(Text,Fill,Justification,Spaces Compact,Break,WidestBlank 3,
   BlankLines Break)
@Define(Multiple,Indent 0)
@Define(Verbatim,Break,Continue,Nofill,Spaces Kept,Facecode F,
   Above 2,Below 2,BlankLines Kept,Spacing 1)
@Define(Format,Break,Continue,Nofill,Spaces Kept,
   Above 2,Below 2,
   BlankLines Kept,Spacing 1,Justification Off)
@Define(Insert,Break,Continue,Above 2,Below 2,LeftMargin +4,RightMargin +4,
   Spacing 1,BlankLines Kept)
@Define(Centre,Break,Continue,Above 2,Below 2,Spacing 1,
   LeftMargin 0,RightMargin 0,TabExport False,Spaces Kept,
   Centred,BlankLines Kept,Afterentry "@TabClear
")
@Equate(Center=Centre)
@Define(Flushright=Centre,FlushRight)
@Define(Flushleft=Format,LeftMargin 0)

@Define(MajorHeading,Hyphenation Off,
   Use Centre,Continue Off,Facecode L,Need 1inch,TabExport False)
@Define(Heading,Hyphenation Off,
   Use Centre,Continue Off,Use B,Use C,Need 0.8inch,TabExport False)
@Define(SubHeading,Hyphenation Off,
   Use Insert,Indent 0,LeftMargin 0,Continue Off,Use UX,
   Need 0.7inch,TabExport False)
@Define(Display,Use Insert,Nofill,Use R,Group,Blanklines Kept,Spaces Kept,
   TabExport False)
@Define(Example,Use Insert,Nofill,Spaces Kept,Group,Blanklines Kept,Facecode F)
@Define(FileExample,Break,CRBreak,LeftMargin 16,Justification Off,Facecode F,
   Spaces Kept,LeadingSpaces Kept,Fill,BlankLines Kept,Indent -10,
   Spacing 1,Spread 0,Above 1,Below 1)
@Define( OutputExample=Verbatim,LeftMargin 2,Facecode F)
@Define(  InputExample=Verbatim,LeftMargin 2,Facecode F)
@Define(ProgramExample=Example,Facecode F)

@Define(Itemize,Break,Continue,Fill,LeftMargin +5,Indent -5,
   RightMargin 5,Numbered <- @,* >,NumberLocation LFR,Spaces Compact,
   BlankLines Break,Spacing 1,Above 2,Below 2,Spread 1)
@Equate(Itemise=Itemize)
@Define(Enumerate,Use Itemize,LeftMargin +6,Indent -6,
  Numbered <@1. @,@a. @,@i. >,Referenced <@1@,@a@,@i>)
@Define(Description,Break,Continue,Fill,Above 2,Below 2,LeftMargin +16,
   Spaces Compact,Indent -16,Spacing 1,UnNumbered)
@Define(Quotation,Use Insert,Fill,Use R,BlankLines Break,
   Spaces Compact,TabExport False,Indent 3)
@Define(Verse,Use Insert,Fill,Spaces Kept,Justification Off,CRBreak,Use R,
   LeadingSpaces Kept,
   TabExport False,Indent -3,Spread 0,LeftMargin +8)
@Define(HeadFoot,Afterentry "@TabClear
",Capitalized Off,FaceCode R,Indent 0,Overstruck 0,Break After,Below 0,
  Justification Off,LeadingSpaces Ignored,LeftMargin 0,Nofill,RightMargin 0,
  Spaces Compact,Underline Off)
@DefineFont(CharDef,R="CHARDEF")
@DefineFont(BodyFont,R="KOSMOS10P",S="KOSMOS6P",B="KOSMOS10BP",F="TITAN12P",
  G="GREEK10",M="MATHS10",K="KOSMOS12BP",L="KOSMOS14P")
@Comment(the above typecase assignments follow conventions for 
R,S,B,F,G and M. K and L simply make the additional machine fonts Available.)
@TextForm(Need="@Begin{NoOp,Need @Parm[text]}@End{NoOp}")
@Counter(Page,Numbered <@1>,Referenced <@1>,Init 0)