Category : Word Perfect
Archive   : LTRWIN21.ZIP
Filename : SIGN.WCM

ÿWPCp


ûÿ2
BV` Z¶

Courier 10 Pitch 12pt (10cpi)èÿÿ”4xxx,

b Xxèò(
@ð0QX@þþþþþþþÿþÿÿÿþÿÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþÿÿHP DeskJet 500 500HPDES500.WRSÛ
x Œ
@ɇÏ



,
,
4†M¯X@Ð
Ðûÿ2L
 \

†|
#|x
È 

US
WPWP
Signature Macro for Letterhead Kit 2.0 ÿÈ7!ÿûÿ2:6DF

e:\wpwin52\macros\sign.wcmcmø),
X,X Ið?
BIG,,,,,,X>
JA

=

WPWP, X>NMACPATHA
JrA
=§WPWP,
X>
NOLDDOCA
J€A
=§WPWP,X>MMACPATHLltrhead.cfg
A
J
A
=[WPWP, X>=2
WPWP,
X>NPATHA
JA
=§WPWP,X>
JA

=
WPWP,X>
JA

=Z

WPWP,X>
NNOWDOCA
J€A
=§WPWP,X '@1
MOLDDOC
MNOWDOC1 @(W1-END),X>=WPWP,X>
NNOWDOCA
J€A
=§WPWP,X @1' @(W1-END),X>JA

MPATHL
\
L autogrph.wpg
A=cWPWP,X>=
WPWP,X>JA

={WPWP,X>
J
@
?A
J

@
?A

MBIGAJ
@
? A
=z
WPWP()Œ @(W1-END))Ê@1B
CWPWPÔ
ÔApplication(wp; wpwp; default; "wpwpus.wcd")
Assign(big;1.0")
//HEIGHT MUST END WITH UNITS, IN ", C, OR P

//Sign.wcm; Signature insertion
//Letterhead Kit for Windows WP; v. 2.1;
// ÀÀ1992 Jerry L. Stern; All Rights Reserved
Display(0)
GetWPData(macpath; 114)
GetWPData(olddoc; 128)
FileOpen(macpath+"ltrhead.cfg"; 1)
SelectAll()
GetWPData(path; 143)
CloseNoSave(0)
Close(0)
GetWPData(nowdoc; 128)
While(olddoc<>nowdoc)
DocPrevious()
GetWPData(nowdoc; 128)
EndWhile
BoxRetrieve(3; path+"\"+"autogrph.wpg")
PosCharPrevious()
BoxSelect(3)
BoxPosition(Anchor:0; AutoMode:1; Height:big; HorizontalType:0)