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

# a.txt oa/chde # #—

#%digest-stat
%includepath _/patch  # data/pages 
%code
lout_include_suffix="dw-ta1"
gs_w=240
gs_h=350
patch_more("@Gh @B lire de plus...")
patch_more("@Gh @B more...")
InitialLanguage="German"  #"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 chde-1.txt

%code
gs_h=350
     

patch_a(“2”) %include chde-2.txt

%code
Place_IncludeGraphic="""@Place  x{ left +0c}  y{ top - ysize +15p}
  { 0.85 1.0 } @Scale @IncludeGraphic { "orange.eps" } //"""

patch_a(“3”) %include chde-3.txt

# .— flyer

%code
lout_include_suffix="-a4"     # A4
lout_include_suffix="-a4-b"   # A4 with boarder "dw-ta1"
##gs_w=240
##gs_h=350
#patch_more("@Ge {www.arean.net}")
patch_more("@HExpand{~}  @Gk @B www. @Gh {arean.net -- auf1.tv -- strickertv.locals.com~~}")  
#patch_more("|4c @Gh {www.arean.net}")

InitialLanguage="German"  #"Italian"
InitialFont="Times Base 60p"

Place_IncludeGraphic="""@Place  x{ left +0c}  y{ top - ysize +15p}
  #{ 0.85 1.0 } @Scale @IncludeGraphic { "ciel1-1454.eps" } //
  {3. 3.} @Scale @IncludeGraphic { "orange.eps" } //
"""
Place_IncludeGraphic=""

patch_a(“v1f”) %include impfung-5G-waffen-1-f.txt

#patch_a(“v2f”) #%include

# .– 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")        

#—————————————–

flyer
dbg=3
if (dbg>=3) showArray("Patch_a")
      dbg=dbgsaved
      prprint_flyer("v1f","300")
      dbg=dbgsaved

# prprint_flyer(“v2f”,“300”) # prprint_flyer(“c1f”,“200”)

%print-end