[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Designing labels (business cards w/ Debian)
From: |
Robert Cymbala |
Subject: |
Re: Designing labels (business cards w/ Debian) |
Date: |
Wed, 13 Jun 2001 00:07:31 -0700 |
That previous bundle posted on June 11 works with version 3.12
(currently Debian's stable version). Someone tried it with a
more-recent version and got errors. So i installed version 3.24 from
debian's unstable archive and modified as needed; below is the new
bundle, same instructions as previous post.
Change path to these two file names:
2 lines matching "home/cym" in buffer gnug_bc.bundle.
18:@SysInclude { "/home/cymbala/Gnug/gnug_bc_doc" }
41:@SysInclude { "/home/cymbala/Gnug/gnug_bc" }
# To unbundle, sh this file
echo gnug_bc.lout 1>&2
cat >gnug_bc.lout <<'End of gnug_bc.lout'
# For business cards.
# Basser Lout Version 3.24 (October 2000)
#
# Time-stamp: <2001-06-12 23:34:15 cymbala>
#
# See "gnug_bc_doc" for how to fine-tune margins.
#
# Bundle needed for cards (from Mark G. Sobell, PRACTICAL GUIDE, pg 395):
# sh bundle gnug_bc.lout mydefs gnug_bc_doc gnug_bc
# > gnug_bc.bundle
#
@SysInclude { tab }
@SysInclude { "/home/cymbala/Gnug/gnug_bc_doc" }
@Doc @Text @Begin
@PageHeight @High @PageWidth @Wide {
@Tab
hmargin { @TabHMargin }
@Fmta { @Col A ! @Col B } {
@Rowa A { @BusinessCard } B { @BusinessCard }
@Rowa A { @BusinessCard } B { @BusinessCard }
@Rowa A { @BusinessCard } B { @BusinessCard }
@Rowa A { @BusinessCard } B { @BusinessCard }
@Rowa A { @BusinessCard } B { @BusinessCard } } }
@End @Text
# Local variables:
# tab-width:4
# End:
End of gnug_bc.lout
echo mydefs 1>&2
cat >mydefs <<'End of mydefs'
# /home/cymbala/myrefs
#
# Lout "myrefs"
# Time-stamp: <2001-06-12 23:33:57 cymbala>
@SysInclude { "/home/cymbala/Gnug/gnug_bc" }
###
#
End of mydefs
echo gnug_bc_doc 1>&2
cat >gnug_bc_doc <<'End of gnug_bc_doc'
#
# Time-stamp: <2001-06-12 23:23:11 cymbala>
# From: /usr/share/lout/include/doc
# version 3.12: @SysInclude { fontdefs } # font definitions
@SysInclude { langdefs } # language definitions
# version 3.12: @SysInclude { dl } # DocumentLayout package
@SysInclude { bsf } # BasicSetup package
@SysInclude { dsf } # DocumentSetup package
@SysInclude { docf } # OrdinaryLayout extension
@Use { @BasicSetup }
# version 3.12: @Use { @DocumentLayout
@Use { @DocumentSetup
@PageType { Letter @OrIfPlain Other }
# page type (width, height)
@TopMargin { 1.95c @OrIfPlain 6f }
# top margin of all pages
@FootMargin { 0.05c @OrIfPlain 6f }
# bottom margin of all pages
@OddLeftMargin { 1.03i @OrIfPlain 10s }
# left margin of odd pages
}
# version 3.12: @Use { @OrdinaryLayout }
@Use { @OrdinarySetup }
@SysDatabase @FontDef { fontdefs } # font definitions
@SysDatabase @RefStyle { refstyle } # reference printing styles
@Include { mydefs }
###
#
End of gnug_bc_doc
echo gnug_bc 1>&2
cat >gnug_bc <<'End of gnug_bc'
#
# ~/Gnug/gnug_bc
# Time-stamp: <2001-06-12 23:37:32 cymbala>
# Based upon post by Greg A. Woods:
# Re: Designing labels
# From: address@hidden (Greg A. Woods)
# Date: Mon, 6 Nov 2000 15:58:46 -0500 (EST)
# Resent-Sender: address@hidden
# http://snark.ptc.spbu.ru/mail-archives/lout/latest/msg01674.html
def @PersonFirstname { " Rob" }
def @PersonLastname { "Cymbala" }
def @PersonMi { "J." }
def @PersonEmailA { " address@hidden " }
def @PersonEmailB { "address@hidden" }
def @PersonURL { "www.lafn.org/~cymbala" }
def @PersonVoicePhone { " 213) 365-0960" }
#
def @FictitiousName { "GNU Guidance" }
def @SloganOne { " Linux Installation" }
def @SloganTwo { " Linux Training" }
def @PhraseOne {
@Bullet " Runs 80386 PCs and up" }
def @PhraseTwo {
@Bullet " LA Free-Net ($40 /year)" }
def @PhraseThree {
@Bullet " 10+ years with UNIX" }
def @PageHeight { "10.2i" }
def @PageWidth { "8.0i" }
def @CardHeight { "3.0i" }
def @CardWidth { "1.92i" }
# Change this to adjust horizontal alignment.
# Change this and OddLeftMargin (in opposite directions) to adjust
# horizontal alignment of one column but _not_ the other.
def @TabHMargin { "0.25i" }
# Pg 107: '@Wide should be used only to reduce the width of the wider
# columns, not to increase the width of the narrower ones.'
def @vmargin_onev { "0.15v" }
# *****************************************************************************
def @BusinessCard {
@CardWidth @High @CardHeight @Wide {
@Tab
vmargin { @vmargin_onev }
@Fmta { @Col H @Over X }
@Fmtb { @Col 2.5c @Wide 9p @Font A ! @Col 9p @Font @RR B }
@Fmtc { @Col 3.0c @Wide 13p @Font A ! @Col B }
@Fmtd { @Col A ! @Col B }
@Fmte { @Col H @Over X }
{
@Rowa
below { single }
vmargin { 0.15ix }
H {
{ 18p } @Font @FictitiousName
}
@Rowa
H { @Null }
@Rowb
vmargin { 0.25v }
A { 3p @Font " " }
@Rowb
A { @SloganOne }
B { @PhraseOne }
@Rowb
vmargin { @vmargin_onev }
A { @SloganTwo }
B { @PhraseTwo }
@Rowb
A { } B { @PhraseThree }
@Rowb
A { } B { }
@Rowc
vmargin { 0.2v }
A { @PersonFirstname { } @PersonLastname { } }
B { "" }
@Rowd
A { { Courier Base 8p } @Font @PersonEmailA }
B { { Courier Base 9p } @Font @RR @PersonVoicePhone
}
@Rowe
H { { 10p } @Font {
""
} }
}
}
}
# Local variables:
# mode:lout
# tab-width:4
# End:
End of gnug_bc