[comp.sources.3b1] v01i017: convert cheapdraw files to fig, Part01/01

hartman@abacab.chi.il.us (Mark A. Hartman) (03/18/91)

Submitted-by: hartman@abacab.chi.il.us (Mark A. Hartman)
Posting-number: Volume 1, Issue 17
Archive-name: cdraw2fig/part01


#! /bin/sh
# This is a shell archive.  Remove anything before this line, then feed it
# into a shell via "sh file" or similar.  To overwrite existing files,
# type "sh file -c".
# The tool that generated this appeared in the comp.sources.unix newsgroup;
# send mail to comp-sources-unix@uunet.uu.net if you want that tool.
# Contents:  README cdraw2fig.uu example
# Wrapped by hartman@abacab on Sun Mar 10 15:12:22 1991
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
echo If this archive is complete, you will see the following message:
echo '          "shar: End of archive."'
if test -f 'README' -a "${1}" != "-c" ; then 
  echo shar: Will not clobber existing file \"'README'\"
else
  echo shar: Extracting \"'README'\" \(1304 characters\)
  sed "s/^X//" >'README' <<'END_OF_FILE'
Xcdraw2fig
X---------
X
Xcdraw2fig translates pictures from "Cheap Draw" format to Fig format.
XThe TransFig package can then be used for translation to the desired
Xoutput format.  Currently supported formats include PIC, (E)EPIC, LaTeX,
XPostScript, and several others.
X
Xcdraw2fig is implemented in the awk programming language.  Most Cheap
XDraw operations are handled in some way, although some of the transla-
Xtions are somewhat arbitrary.  Note that some output formats are con-
Xsiderably less expressive than Cheap Draw (and Fig).  PIC, for example,
Xsupports neither shading or rotated text.  In addition, precise text
Xspacing is problematic across the different output formats.
X
XThe following files are included in this distribution:
X
X	README		- this file
X	cdraw2fig.uu	- ksh script with self-contained awk program
X			  (uuencoded)
X	example		- sample "Cheap Draw" file (from the original
X			  Cheap Draw distribution)
X
XTo translate a Cheap Draw file to PIC (for example):
X
X	$ cdraw2fig example > example.fig
X	$ fig2dev -Lpic example.fig > example.pic
X
XCheap Draw 2.0 was written by Bob Pratt and is available from the UNIXPC
Xarchives at osu-cis.  TransFig was written by Micah Beck and is available
Xfor anonymous FTP from svax.cs.cornell.edu.
X
XMark Hartman
Xhartman@abacab.chi.il.us
Xhartman@ihlpm.att.com
END_OF_FILE
  if test 1304 -ne `wc -c <'README'`; then
    echo shar: \"'README'\" unpacked with wrong size!
  fi
  # end of 'README'
fi
if test -f 'cdraw2fig.uu' -a "${1}" != "-c" ; then 
  echo shar: Will not clobber existing file \"'cdraw2fig.uu'\"
else
  echo shar: Extracting \"'cdraw2fig.uu'\" \(10720 characters\)
  sed "s/^X//" >'cdraw2fig.uu' <<'END_OF_FILE'
Xbegin 755 cdraw2fig
XM(R$O8FEN+VMS: HC(&-D<F%W,F9I9R M('1R86YS;&%T92!#:&5A<"!$<F%W
XM('!I8W1U<F5S('1O($9I9PHC"B,@0GD@36%R:R!!+B!(87)T;6%N("AH87)T
XM;6%N0&%B86-A8BYC:&DN:6PN=7,I+"!-87)C:" Q.3DQ"B,*:68@=&5S=" D
XM(R M;F4@,0IT:&5N"@EE8VAO(")5<V%G93H@8V1R87<R9FEG(&9I;&5N86UE
XM(@H)97AI= IF:0IT<F%P("=R;2 M9B O=&UP+R0D+F%W:R<@,2 R(#,@,34*
XM<V5T("MH"G-E9" M92 B,2PO7D%72U]04D]'4D%-+V0B(&!W:&5N8V4@)#!@
XM(#X@+W1M<"\D)"YA=VL*87=K("UF("]T;7 O)"0N87=K("0Q"G)M("UF("]T
XM;7 O)"0N87=K"F5X:70*05=+7U!23T=204T*0D5'24X@>PH):&5A9&5R(#T@
XM,0H);6]D92 ](# *"6D@/2 M,0H)<V-A;&4@/2 P+C R"2,@=VED=&@@/2 V
XM+C4@:6YC:&5S"GT*"GL*"6EF("@H3E(@/3T@,2D@)B8@*"0P("$](")#:&5A
XM<"!$<F%W(BDI('L*"0EP<FEN=" B26YP=70@9FEL92!N;W0@:6X@0VAE87 @
XM1')A=R!F;W)M870B(#X@(F-D<F%W,F9I9RYE<G)S(@H)"65X:70*"7T*?0H*
XM>PH):68@*$Y2(#T](#$I('L*"0EP<FEN=" B(T9)1R Q+C0B"@D)<')I;G0@
XM(C$P," Q(@H)?0I]"@I["@EI9B H;&5N9W1H*"0P*2 ]/2 P*2!["@D):&5A
XM9&5R(#T@, H)?0I]"@I["@EI9B H*&QE;F=T:"@D,"D@(3T@,"D@)B8@*&AE
XM861E<B ]/2 Q*2D@>PH)"7-T<FEN9UMI*RM=(#T@)# *"7T*?0H*+UXP+R![
XM"@EI9B H:&5A9&5R(#T](# I('L*"0DC($-O;G1I;G5O=7,@3&EN90H)"6EF
XM("AM;V1E(#T](#$I('L*"0D)>#$@/2!I;G0H)#(@*B!S8V%L92D*"0D)>3$@
XM/2!I;G0H)#,@*B!S8V%L92D*"0D):68@*&%R9S$@/3T@,2D@>PDC('-O;&ED
XM"@D)"0EL:6YE7W-T>6QE(#T@, H)"0D)<W1Y;&5?=F%L(#T@,"XP"@D)"7T*
XM"0D):68@*&%R9S$@/3T@,BD@>PDC(&QO;F<@9&%S: H)"0D);&EN95]S='EL
XM92 ](#$*"0D)"7-T>6QE7W9A;" ](#$R+C *"0D)?0H)"0EI9B H87)G,2 ]
XM/2 S*2!["2,@9&]T=&5D"@D)"0EL:6YE7W-T>6QE(#T@,@H)"0D)<W1Y;&5?
XM=F%L(#T@,BXP"@D)"7T*"0D):68@*&%R9S$@/3T@-"D@>PDC(&1A<V@@9&]T
XM=&5D"@D)"0EL:6YE7W-T>6QE(#T@,@H)"0D)<W1Y;&5?=F%L(#T@-"XP"@D)
XM"7T*"0D):68@*&%R9S$@/3T@-2D@>PDC(&UE9&EU;2!D87-H"@D)"0EL:6YE
XM7W-T>6QE(#T@,0H)"0D)<W1Y;&5?=F%L(#T@-RXP"@D)"7T*"0D):68@*&%R
XM9S$@/3T@-BD@>PDC(&1A<V@@='=O(&1O=',*"0D)"6QI;F5?<W1Y;&4@/2 R
XM"@D)"0ES='EL95]V86P@/2 V+C *"0D)?0H)"0EI9B H87)G,2 ]/2 W*2![
XM"2,@<VAO<G0@9&%S: H)"0D);&EN95]S='EL92 ](#$*"0D)"7-T>6QE7W9A
XM;" ](#0N, H)"0E]"@D)"7!R:6YT("(R(#$@(B!L:6YE7W-T>6QE("(@,2 M
XM,2 M,2 M,2 M,2 B7 H)"0D)<W1Y;&5?=F%L("(@," P(@H)"0EP<FEN="!X
XM("(@(B!Y("(@(B!X,2 B("(@>3$@(B Y.3DY(#DY.3DB"@D)"7@@/2!I;G0H
XM)#(@*B!S8V%L92D*"0D)>2 ](&EN="@D,R J('-C86QE*0H)"7T*"0DC($QI
XM;F4*"0EI9B H;6]D92 ]/2 R*2!["@D)"7@Q(#T@:6YT*"0R("H@<V-A;&4I
XM"@D)"7DQ(#T@:6YT*"0S("H@<V-A;&4I"@D)"6EF("AA<F<Q(#T](#$I('L)
XM(R!S;VQI9 H)"0D);&EN95]S='EL92 ](# *"0D)"7-T>6QE7W9A;" ](# N
XM, H)"0E]"@D)"6EF("AA<F<Q(#T](#(I('L)(R!L;VYG(&1A<V@*"0D)"6QI
XM;F5?<W1Y;&4@/2 Q"@D)"0ES='EL95]V86P@/2 Q,BXP"@D)"7T*"0D):68@
XM*&%R9S$@/3T@,RD@>PDC(&1O='1E9 H)"0D);&EN95]S='EL92 ](#(*"0D)
XM"7-T>6QE7W9A;" ](#(N, H)"0E]"@D)"6EF("AA<F<Q(#T](#0I('L)(R!D
XM87-H(&1O='1E9 H)"0D);&EN95]S='EL92 ](#(*"0D)"7-T>6QE7W9A;" ]
XM(#0N, H)"0E]"@D)"6EF("AA<F<Q(#T](#4I('L)(R!M961I=6T@9&%S: H)
XM"0D);&EN95]S='EL92 ](#$*"0D)"7-T>6QE7W9A;" ](#<N, H)"0E]"@D)
XM"6EF("AA<F<Q(#T](#8I('L)(R!D87-H('1W;R!D;W1S"@D)"0EL:6YE7W-T
XM>6QE(#T@,@H)"0D)<W1Y;&5?=F%L(#T@-BXP"@D)"7T*"0D):68@*&%R9S$@
XM/3T@-RD@>PDC('-H;W)T(&1A<V@*"0D)"6QI;F5?<W1Y;&4@/2 Q"@D)"0ES
XM='EL95]V86P@/2 T+C *"0D)?0H)"0EP<FEN=" B,B Q("(@;&EN95]S='EL
XM92 B(#$@+3$@+3$@+3$@+3$@(EP*"0D)"7-T>6QE7W9A;" B(# @,"(*"0D)
XM<')I;G0@>" B("(@>2 B("(@>#$@(B B('DQ("(@.3DY.2 Y.3DY(@H)"7T*
XM"0DC(%)A>7,*"0EI9B H;6]D92 ]/2 S*2!["@D)"7@Q(#T@:6YT*"0R("H@
XM<V-A;&4I"@D)"7DQ(#T@:6YT*"0S("H@<V-A;&4I"@D)"6EF("AA<F<Q(#T]
XM(#$I('L)(R!S;VQI9 H)"0D);&EN95]S='EL92 ](# *"0D)"7-T>6QE7W9A
XM;" ](# N, H)"0E]"@D)"6EF("AA<F<Q(#T](#(I('L)(R!L;VYG(&1A<V@*
XM"0D)"6QI;F5?<W1Y;&4@/2 Q"@D)"0ES='EL95]V86P@/2 Q,BXP"@D)"7T*
XM"0D):68@*&%R9S$@/3T@,RD@>PDC(&1O='1E9 H)"0D);&EN95]S='EL92 ]
XM(#(*"0D)"7-T>6QE7W9A;" ](#(N, H)"0E]"@D)"6EF("AA<F<Q(#T](#0I
XM('L)(R!D87-H(&1O='1E9 H)"0D);&EN95]S='EL92 ](#(*"0D)"7-T>6QE
XM7W9A;" ](#0N, H)"0E]"@D)"6EF("AA<F<Q(#T](#4I('L)(R!M961I=6T@
XM9&%S: H)"0D);&EN95]S='EL92 ](#$*"0D)"7-T>6QE7W9A;" ](#<N, H)
XM"0E]"@D)"6EF("AA<F<Q(#T](#8I('L)(R!D87-H('1W;R!D;W1S"@D)"0EL
XM:6YE7W-T>6QE(#T@,@H)"0D)<W1Y;&5?=F%L(#T@-BXP"@D)"7T*"0D):68@
XM*&%R9S$@/3T@-RD@>PDC('-H;W)T(&1A<V@*"0D)"6QI;F5?<W1Y;&4@/2 Q
XM"@D)"0ES='EL95]V86P@/2 T+C *"0D)?0H)"0EP<FEN=" B,B Q("(@;&EN
XM95]S='EL92 B(#$@+3$@+3$@+3$@+3$@(EP*"0D)"7-T>6QE7W9A;" B(# @
XM,"(*"0D)<')I;G0@>" B("(@>2 B("(@>#$@(B B('DQ("(@.3DY.2 Y.3DY
XM(@H)"7T*"0DC($)O> H)"6EF("AM;V1E(#T](#4I('L*"0D)>#$@/2!I;G0H
XM)#(@*B!S8V%L92D*"0D)>3$@/2!I;G0H)#,@*B!S8V%L92D*"0D):68@*&%R
XM9S$@/3T@,"D@9FEL;'1Y<&4@/2 M,0DC(&AO;&QO=PH)"0EI9B H87)G,2 ]
XM/2 Q*2!F:6QL='EP92 ](#(Q"2,@<V]L:60*"0D):68@*&%R9S$@/3T@,RD@
XM>PDC(&AA=&-H"@D)"0EI9B H87)G,B ]/2 Q*2!F:6QL='EP92 ](#$T(",@
XM;F%R<F]W(&1I86=O;F%L"@D)"0EI9B H87)G,B ]/2 R*2!F:6QL='EP92 ]
XM(#$P(",@;65D:75M(&1I86=O;F%L"@D)"0EI9B H87)G,B ]/2 S*2!F:6QL
XM='EP92 ](#8@(",@=VED92!D:6%G;VYA; H)"0D):68@*&%R9S(@/3T@-"D@
XM9FEL;'1Y<&4@/2 Q-B C(&YA<G)O=R!C<F]S<VAA=&-H"@D)"0EI9B H87)G
XM,B ]/2 U*2!F:6QL='EP92 ](#$R(",@;65D:75M(&-R;W-S:&%T8V@*"0D)
XM"6EF("AA<F<R(#T](#8I(&9I;&QT>7!E(#T@." @(R!W:61E(&-R;W-S:&%T
XM8V@*"0D)?0H)"0EP<FEN=" B,B R(# @,2 M,2 M,2 M,2 B(&9I;&QT>7!E
XM("(@,"XP,# @," P(@H)"0EP<FEN="!X("(@(B!Y("(@(B!X("(@(B!Y,2 B
XM("(@>#$@(B B('DQ("(@(EP*"0D)"7@Q("(@(B!Y("(@(B!X("(@(B!Y("(@
XM.3DY.2 Y.3DY(@H)"7T*"0DC($-I<F-L90H)"6EF("AM;V1E(#T](#8I('L*
XM"0D)>#$@/2!I;G0H)#(@*B!S8V%L92D*"0D)>3$@/2!I;G0H)#,@*B!S8V%L
XM92D*"0D)<F%D(#T@<W%R="@H>" M('@Q*2 J("AX("T@>#$I("L@*'D@+2!Y
XM,2D@*B H>2 M('DQ*2D*"0D):68@*&%R9S$@/3T@,"D@9FEL;'1Y<&4@/2 M
XM,0DC(&AO;&QO=PH)"0EI9B H87)G,2 ]/2 Q*2!F:6QL='EP92 ](#(Q"2,@
XM<V]L:60*"0D):68@*&%R9S$@/3T@,RD@>PDC(&AA=&-H"@D)"0EI9B H87)G
XM,B ]/2 Q*2!F:6QL='EP92 ](#$T(",@;F%R<F]W(&1I86=O;F%L"@D)"0EI
XM9B H87)G,B ]/2 R*2!F:6QL='EP92 ](#$P(",@;65D:75M(&1I86=O;F%L
XM"@D)"0EI9B H87)G,B ]/2 S*2!F:6QL='EP92 ](#8@(",@=VED92!D:6%G
XM;VYA; H)"0D):68@*&%R9S(@/3T@-"D@9FEL;'1Y<&4@/2 Q-B C(&YA<G)O
XM=R!C<F]S<VAA=&-H"@D)"0EI9B H87)G,B ]/2 U*2!F:6QL='EP92 ](#$R
XM(",@;65D:75M(&-R;W-S:&%T8V@*"0D)"6EF("AA<F<R(#T](#8I(&9I;&QT
XM>7!E(#T@." @(R!W:61E(&-R;W-S:&%T8V@*"0D)?0H)"0EP<FEN=" B,2 S
XM(# @,2 M,2 M,2 M,2 B(&9I;&QT>7!E("(@,"XP,# @,2 B7 H)"0D),B J
XM(#,N,30Q-3D@(B B(&EN="AX*2 B("(@:6YT*'DI("(@(EP*"0D)"6EN="AR
XM860I("(@(B!I;G0H<F%D*2 B(# @," P(# B"@D)?0H)"2,@4&]L>6=O;@H)
XM"6EF("AM;V1E(#T](#@I('L*"0D)>#$@/2!I;G0H)#(@*B!S8V%L92D*"0D)
XM>3$@/2!I;G0H)#,@*B!S8V%L92D*"0D)<')I;G0@>#$@(B B('DQ"@D)"6EF
XM("@H>" ]/2!X,2D@)B8@*'D@/3T@>3$I*0H)"0D)<')I;G0@(CDY.3D@.3DY
XM.2(*"0E]"@D)(R!%;&QI<'-E"@D):68@*&UO9&4@/3T@.2D@>PH)"0EX,2 ]
XM(&EN="@D,B J('-C86QE*0H)"0EY,2 ](&EN="@D,R J('-C86QE*0H)"0EC
XM96YT97)?>" ]("AX("L@>#$I("\@,@H)"0EC96YT97)?>2 ]("AY("L@>3$I
XM("\@,@H)"0ER861I=7-?>" ]('-Q<G0H*'@@+2!X,2D@*B H>" M('@Q*2D@
XM+R R"@D)"7)A9&EU<U]Y(#T@<W%R="@H>2 M('DQ*2 J("AY("T@>3$I*2 O
XM(#(*"0D):68@*&%R9S$@/3T@,"D@9FEL;'1Y<&4@/2 M,0DC(&AO;&QO=PH)
XM"0EI9B H87)G,2 ]/2 Q*2!F:6QL='EP92 ](#(Q"2,@<V]L:60*"0D):68@
XM*&%R9S$@/3T@,RD@>PDC(&AA=&-H"@D)"0EI9B H87)G,B ]/2 Q*2!F:6QL
XM='EP92 ](#$T(",@;F%R<F]W(&1I86=O;F%L"@D)"0EI9B H87)G,B ]/2 R
XM*2!F:6QL='EP92 ](#$P(",@;65D:75M(&1I86=O;F%L"@D)"0EI9B H87)G
XM,B ]/2 S*2!F:6QL='EP92 ](#8@(",@=VED92!D:6%G;VYA; H)"0D):68@
XM*&%R9S(@/3T@-"D@9FEL;'1Y<&4@/2 Q-B C(&YA<G)O=R!C<F]S<VAA=&-H
XM"@D)"0EI9B H87)G,B ]/2 U*2!F:6QL='EP92 ](#$R(",@;65D:75M(&-R
XM;W-S:&%T8V@*"0D)"6EF("AA<F<R(#T](#8I(&9I;&QT>7!E(#T@." @(R!W
XM:61E(&-R;W-S:&%T8V@*"0D)?0H)"0EP<FEN=" B,2 Q(# @,2 M,2 M,2 M
XM,2 B(&9I;&QT>7!E("(@,"XP,# @,2 B7 H)"0D),B J(#,N,30Q-3D@(B B
XM(&EN="AC96YT97)?>"D@(B B7 H)"0D):6YT*&-E;G1E<E]Y*2 B("(@:6YT
XM*')A9&EU<U]X*2 B(")<"@D)"0EI;G0H<F%D:75S7WDI("(@," P(# @,"(*
XM"0E]"@E]"GT*"B,@0V]N=&EN=6]U<R!,:6YE"B]>,2\@>PH):68@*&AE861E
XM<B ]/2 P*2!["@D);6]D92 ]("0Q"@D)>" ](&EN="@D,B J('-C86QE*0H)
XM"7D@/2!I;G0H)#,@*B!S8V%L92D*"0EA<F<Q(#T@)#0)(R!L:6YE('-T>6QE
XM"@D)87)G,B ]("0U"@D)87)G,R ]("0V"@E]"GT*"B,@3&EN90HO7C(O('L*
XM"6EF("AH96%D97(@/3T@,"D@>PH)"6UO9&4@/2 D,0H)"7@@/2!I;G0H)#(@
XM*B!S8V%L92D*"0EY(#T@:6YT*"0S("H@<V-A;&4I"@D)87)G,2 ]("0T"2,@
XM;&EN92!S='EL90H)"6%R9S(@/2 D-0H)"6%R9S,@/2 D-@H)?0I]"@HC(%)A
XM>7,*+UXS+R!["@EI9B H:&5A9&5R(#T](# I('L*"0EM;V1E(#T@)#$*"0EX
XM(#T@:6YT*"0R("H@<V-A;&4I"@D)>2 ](&EN="@D,R J('-C86QE*0H)"6%R
XM9S$@/2 D- DC(&QI;F4@<W1Y;&4*"0EA<F<R(#T@)#4*"0EA<F<S(#T@)#8*
XM"7T*?0H*(R!";W@*+UXU+R!["@EI9B H:&5A9&5R(#T](# I('L*"0EM;V1E
XM(#T@)#$*"0EX(#T@:6YT*"0R("H@<V-A;&4I"@D)>2 ](&EN="@D,R J('-C
XM86QE*0H)"6%R9S$@/2 D- DC(&9I;&P@='EP90H)"6%R9S(@/2 D-0DC(&9I
XM;&P@<W1Y;&4*"0EA<F<S(#T@)#8*"7T*?0H*(R!#:7)C;&4*+UXV+R!["@EI
XM9B H:&5A9&5R(#T](# I('L*"0EM;V1E(#T@)#$*"0EX(#T@:6YT*"0R("H@
XM<V-A;&4I"@D)>2 ](&EN="@D,R J('-C86QE*0H)"6%R9S$@/2 D- DC(&9I
XM;&P@='EP90H)"6%R9S(@/2 D-0DC(&9I;&P@<W1Y;&4*"0EA<F<S(#T@)#8*
XM"7T*?0H*(R!497AT"B]>-R\@>PH):68@*&AE861E<B ]/2 P*2!["@D);6]D
XM92 ]("0Q"@D)>" ](&EN="@D,B J('-C86QE*0H)"7D@/2!I;G0H)#,@*B!S
XM8V%L92D*"0EA<F<Q(#T@)#0)(R!S=')I;F<@;G5M"@D)87)G,B ]("0U"2,@
XM<VEZ90H)"6%R9S,@/2 D-@DC(')O=&%T:6]N"@D):68@*&%R9S(@/3T@,2D@
XM<&]I;G1S:7IE(#T@-RXP"@D):68@*&%R9S(@/3T@,BD@<&]I;G1S:7IE(#T@
XM,30N, H)"6EF("AA<F<R(#T](#,I('!O:6YT<VEZ92 ](#(P+C *"0EI9B H
XM87)G,B ]/2 T*2!P;VEN='-I>F4@/2 R-2XP"@D):68@*&%R9S(@/3T@-2D@
XM<&]I;G1S:7IE(#T@,S N, H)"6EF("AA<F<S(#T](#$I(&%N9VQE(#T@,"XP
XM"@D):68@*&%R9S,@/3T@,"D@86YG;&4@/2 S+C$T,34Y("\@,BXP"@D)<')I
XM;G0@(C0@," M,2 B('!O:6YT<VEZ92 B("TQ("TQ(# @(B!A;F=L92 B(# @
XM+3$@+3$@(EP*"0D)>" B("(@>2 B("(@<W1R:6YG6V%R9S%=(@$B"@E]"GT*
XM"B,@4&]L>6=O;@HO7C@O('L*"6EF("AH96%D97(@/3T@,"D@>PH)"6UO9&4@
XM/2 D,0H)"7@@/2!I;G0H)#(@*B!S8V%L92D*"0EY(#T@:6YT*"0S("H@<V-A
XM;&4I"@D)87)G,2 ]("0T"2,@9FEL;"!T>7!E"@D)87)G,B ]("0U"2,@9FEL
XM;"!S='EL90H)"6%R9S,@/2 D-@H)"6EF("AA<F<Q(#T](# I(&9I;&QT>7!E
XM(#T@+3$)(R!H;VQL;W<*"0EI9B H87)G,2 ]/2 Q*2!F:6QL='EP92 ](#(Q
XM"2,@<V]L:60*"0EI9B H87)G,2 ]/2 S*2!["2,@:&%T8V@*"0D):68@*&%R
XM9S(@/3T@,2D@9FEL;'1Y<&4@/2 Q-" C(&YA<G)O=R!D:6%G;VYA; H)"0EI
XM9B H87)G,B ]/2 R*2!F:6QL='EP92 ](#$P(",@;65D:75M(&1I86=O;F%L
XM"@D)"6EF("AA<F<R(#T](#,I(&9I;&QT>7!E(#T@-B @(R!W:61E(&1I86=O
XM;F%L"@D)"6EF("AA<F<R(#T](#0I(&9I;&QT>7!E(#T@,38@(R!N87)R;W<@
XM8W)O<W-H871C: H)"0EI9B H87)G,B ]/2 U*2!F:6QL='EP92 ](#$R(",@
XM;65D:75M(&-R;W-S:&%T8V@*"0D):68@*&%R9S(@/3T@-BD@9FEL;'1Y<&4@
XM/2 X(" C('=I9&4@8W)O<W-H871C: H)"7T*"0EP<FEN=" B,B S(# @,2 M
XM,2 M,2 M,2 B(&9I;&QT>7!E("(@,"XP,# @," P(@H)"7!R:6YT('@@(B B
XM('D*"7T*?0H*(R!%;&QI<'-E"B]>.2\@>PH):68@*&AE861E<B ]/2 P*2![
XM"@D);6]D92 ]("0Q"@D)>" ](&EN="@D,B J('-C86QE*0H)"7D@/2!I;G0H
XM)#,@*B!S8V%L92D*"0EA<F<Q(#T@)#0)(R!F:6QL('1Y<&4*"0EA<F<R(#T@
XM)#4)(R!F:6QL('-T>6QE"@D)87)G,R ]("0V"@E]"GT*"B,@36%R:V5R"B]>
XM,3 O('L*"6EF("AH96%D97(@/3T@,"D@>PH)"6UO9&4@/2 D,0H)"7@@/2!I
XM;G0H)#(@*B!S8V%L92D*"0EY(#T@:6YT*"0S("H@<V-A;&4I"@D)87)G,2 ]
XM("0T"2,@;6%R:V5R('1Y<&4*"0EA<F<R(#T@)#4*"0EA<F<S(#T@)#8*"0EI
XM9B H87)G,2 ]/2 Q*2!M87)K97(@/2 B+B()(R!D;W0*"0EI9B H87)G,2 ]
XM/2 R*2!M87)K97(@/2 B*R()(R!C<F]S<PH)"6EF("AA<F<Q(#T](#,I(&UA
XM<FME<B ]("(J(@DC('-T87(*"0EI9B H87)G,2 ]/2 T*2!M87)K97(@/2 B
XM(R()(R!B;W@*"0EI9B H87)G,2 ]/2 U*2!M87)K97(@/2 B>"()(R!X"@D)
XM:68@*&%R9S$@/3T@-BD@;6%R:V5R(#T@(EXB"2,@9&EA;6]N9 H)"7!R:6YT
XM("(T(# @+3$@-2XP("TQ("TQ(# @," P("TQ("TQ(")<"@D)"7@@(B B('D@
X3(B B(&UA<FME<B(!(@H)?0I]"C @
X 
Xend
END_OF_FILE
  if test 10720 -ne `wc -c <'cdraw2fig.uu'`; then
    echo shar: \"'cdraw2fig.uu'\" unpacked with wrong size!
  fi
  # end of 'cdraw2fig.uu'
fi
if test -f 'example' -a "${1}" != "-c" ; then 
  echo shar: Will not clobber existing file \"'example'\"
else
  echo shar: Extracting \"'example'\" \(1728 characters\)
  sed "s/^X//" >'example' <<'END_OF_FILE'
XCheap Draw
XNational
XSpace
XSociety
XJoin the
X
X6 5000 14000 0 1 0
X0 5000 11000 0 1 0
X3 5000 7000 1 0 0
X0 5000 14000 1 0 0
X0 6000 14000 1 0 0
X0 7000 14000 1 0 0
X0 8000 14000 1 0 0
X0 4000 14000 1 0 0
X0 3000 14000 1 0 0
X0 2000 14000 1 0 0
X2 2000 14000 1 0 0
X0 8000 14000 1 0 0
X8 22000 4000 0 1 0
X0 22000 12000 0 1 0
X0 23000 14000 0 1 0
X0 24000 12000 0 1 0
X0 24000 4000 0 1 0
X0 25000 2000 0 1 0
X0 21000 2000 0 1 0
X0 22000 4000 0 1 0
X2 22000 4000 1 0 0
X0 24000 4000 1 0 0
X2 22000 11000 1 0 0
X0 24000 11000 1 0 0
X2 22000 9000 1 0 0
X0 24000 9000 1 0 0
X2 22000 7000 1 0 0
X0 24000 7000 1 0 0
X2 22000 5000 1 0 0
X0 24000 5000 1 0 0
X2 23000 4000 1 0 0
X0 23000 11000 1 0 0
X1 21000 2000 1 0 0
X0 18000 3000 1 0 0
X0 19000 5000 1 0 0
X0 21000 6000 1 0 0
X0 22000 11000 1 0 0
X1 25000 2000 1 0 0
X0 28000 3000 1 0 0
X0 27000 5000 1 0 0
X0 25000 6000 1 0 0
X0 24000 11000 1 0 0
X8 22962 3998 3 4 0
X0 22962 1000 3 4 0
X0 23153 1999 3 4 0
X0 22962 3998 3 4 0
X8 22962 3998 3 4 0
X0 22771 1999 3 4 0
X0 22962 1071 3 4 0
X0 22962 3998 3 4 0
X8 22914 1999 3 4 0
X0 22484 1428 3 4 0
X0 23297 1428 3 4 0
X0 22914 1999 3 4 0
X8 22053 1999 3 4 0
X0 21862 1428 3 4 0
X0 22531 1428 3 4 0
X0 22292 1928 3 4 0
X0 22053 1999 3 4 0
X8 23488 1928 3 4 0
X0 23393 1428 3 4 0
X0 23871 1428 3 4 0
X0 23727 1928 3 4 0
X0 23488 1928 3 4 0
X1 22531 1999 1 0 0
X0 22531 3356 1 0 0
X0 22292 3998 1 0 0
X1 23345 1999 1 0 0
X0 23345 3284 1 0 0
X0 23536 3927 1 0 0
X2 18322 3570 1 0 0
X0 21670 3570 1 0 0
X2 24206 3570 1 0 0
X0 27602 3570 1 0 0
X2 19518 2571 1 0 0
X0 19518 3570 1 0 0
X2 26741 2642 1 0 0
X0 26741 3570 1 0 0
X5 22484 11566 3 4 0
X0 22723 11352 3 4 0
X5 23153 11566 3 4 0
X0 23345 11352 3 4 0
X5 3827 7996 1 5 1
X0 6219 6783 1 5 1
X7 10000 12000 0 2 1
X7 10000 10000 1 2 1
X7 10000 8000 2 2 1
X7 10000 14000 3 1 1
END_OF_FILE
  if test 1728 -ne `wc -c <'example'`; then
    echo shar: \"'example'\" unpacked with wrong size!
  fi
  # end of 'example'
fi
echo shar: End of archive.
exit 0
-- 
Mark Hartman			hartman@abacab.chi.il.us
				Mark_A_Hartman@att.com
-- 
David H. Brierley
Home: dave@galaxia.newport.ri.us; Work: dhb@quahog.ssd.ray.com
Send comp.sources.3b1 submissions to comp-sources-3b1@galaxia.newport.ri.us
%% Can I be excused, my brain is full. **