#-*- coding: utf-8-unix mode: text; mode: ctp -*-

# a.txt                   oa/welsch
#
#---
  #%digest-stat
  %includepath _/patch
  %code
  lout_include_suffix="dw-ta1"
  gs_w=240
  gs_h=350
  patch_more("@Gh @B lire de plus...")
  patch_more("|120p @Gf @B more...")

  InitialLanguage="French"  #"Italian"
  InitialFont="Times Base 18p"
  
  Place_IncludeGraphic="""@Place  x{ left +0c}  y{ top - ysize +15p}
    { 0.85 1.0 }
    @Scale @IncludeGraphic { "ciel1-1454.eps" } //
  # @Scale @IncludeGraphic { "orange.eps" } //
  """
  
patch_a("1")
%include welsch-1.txt

  %code
  gs_h=350
       
patch_a("2")
%include welsch-2.txt

  %code
  Place_IncludeGraphic="""@Place  x{ left +0c}  y{ top - ysize +15p}
    { 0.85 1.0 } @Scale @IncludeGraphic { "orange.eps" } //"""
  gs_h=450
       
patch_a("3")
%include welsch-3.txt


# .-- web page

%produce-mod outp_plaintext  __@@ @Outdir;__.txt
%print __@@

%mix
        dbgsaved=dbg
        prprint_delimiter("\n")
        
        prprint_patch(".:more:a1","1")
        prprint_patch(".:more:a2","2")
        prprint_patch(".:more:a3","3")        

%print-end