/*  Carte.rexx pour Wordworth 5.0 version 1.0

Créateur de cartes de visite
Creador de tarjetas de visita
Personal card maker

Pascal Chevrel, mars 1997 v1.0
email : chevrelburo@magic.fr

Il vous faut lancer le document wordworth 'cartedoc' avant la macro
Es preciso cargar el documento wordworth 'cartedoc' antes de la macro
You have to load the 'cartedoc' wordworth document before launching this arexx script


Si cette macro vous est utile, envoyez moi un e-mail ou une carte postale de votre ville
Si te resulta útil esta macro, envíame un e-mail o un postal de tu pueblo
If you find this script useful, e-mail me or send me a postcard from your place

*/


OPTIONS RESULTS

SELECTALL
COPY

NEW
ADDRESS VALUE RESULT

DRAWTEXTFRAME 1 "0.5cm" "0.5cm" "10cm" "5.5cm" "0.13cm" "0.13cm" "0.13cm" "0.13cm" TRANSPARENT
  carteid=result
  ActivateTextframe carteid
  Paste

DRAWTEXTFRAME 1 "0.5cm" "6cm" "10cm" "5.5cm" "0.13cm" "0.13cm" "0.13cm" "0.13cm" TRANSPARENT
  carteid=result
  ActivateTextframe carteid
  Paste

DRAWTEXTFRAME 1 "0.5cm" "11.5cm" "10cm" "5.5cm" "0.13cm" "0.13cm" "0.13cm" "0.13cm" TRANSPARENT
  carteid=result
  ActivateTextframe carteid
  Paste

DRAWTEXTFRAME 1 "0.5cm" "17cm" "10cm" "5.5cm" "0.13cm" "0.13cm" "0.13cm" "0.13cm" TRANSPARENT
  carteid=result
  ActivateTextframe carteid
  Paste

DRAWTEXTFRAME 1 "0.5cm" "22.5cm" "10cm" "5.5cm" "0.13cm" "0.13cm" "0.13cm" "0.13cm" TRANSPARENT
  carteid=result
  ActivateTextframe carteid
  Paste
DRAWTEXTFRAME 1 "11cm" "0.5cm" "10cm" "5.5cm" "0.13cm" "0.13cm" "0.13cm" "0.13cm" TRANSPARENT
  carteid=result
  ActivateTextframe carteid
  Paste

DRAWTEXTFRAME 1 "11cm" "6cm" "10cm" "5.5cm" "0.13cm" "0.13cm" "0.13cm" "0.13cm" TRANSPARENT
  carteid=result
  ActivateTextframe carteid
  Paste

DRAWTEXTFRAME 1 "11cm" "11.5cm" "10cm" "5.5cm" "0.13cm" "0.13cm" "0.13cm" "0.13cm" TRANSPARENT
  carteid=result
  ActivateTextframe carteid
  Paste

DRAWTEXTFRAME 1 "11cm" "17cm" "10cm" "5.5cm" "0.13cm" "0.13cm" "0.13cm" "0.13cm" TRANSPARENT
  carteid=result
  ActivateTextframe carteid
  Paste

DRAWTEXTFRAME 1 "11cm" "22.5cm" "10cm" "5.5cm" "0.13cm" "0.13cm" "0.13cm" "0.13cm" TRANSPARENT
  carteid=result
  ActivateTextframe carteid
  Paste