#-*- coding: utf-8-unix; mode: ctp -*-   
 
# concerto-bostero-jun.txt
# FROM rule-text1a.txt  _/a.pages/vp/ch-vot/vot-2021jun13
#---

%form lout
%digest-stat

%code
pb="@DP @LLP"
lb="@B @Ul"

%text
%produce-mod outp_lout    __       @Outdir
%print __   @Noout
@SysInclude{ xrgb }
@Include{myslides}
@SysInclude{eq}  # 1 @Sup {er} , 2 @Sub drunder

# --- specific definitions 
def @pa {@LP}
def @pb {@DP @LLP}

def @lb {@B @Ul}

def @cba {@Centre }
#def @cbb {@Centre}
def @cat {}

def @cbm {@B }
#def @cbm {50p @Font @Centre @Outline }

def @la { @Outline }
def @Ol { @Outline }

#def @vRule_a {-90d @Rotate { @ZeroWidth @ZeroHeight  @Title{ .... } 5c @Wide ~ @LocalWidthRule linewidth {.1p} } }

def @Rule_a  {@LocalWidthRule linewidth {.1p} }
def @Rule_cb {chessboard @Texture scale {5} {lightgray} @Colour  @LocalWidthRule linewidth {70p} }
def @vRule_cb {90d @Rotate { @ZeroWidth @ZeroHeight 5c @Wide ~ chessboard @Texture linewidth {16p} } }

def @dieciminuti {10 Minuti a piedi dal parcheggio}

@IncludeGraphicRepeated{"roeseli.eps"}

@OverheadTransparencies
 @InitialLanguage {German}
 @InitialBreak{ unbreakablefirst ragged 1.2fx nohyphen }
 @InitialFont{ Times Base 18p } #{Courier Base 13p}
 #@InitialFont{Courier Base 18p} 
 @PageOrientation{ Portrait }
 @PageHeaders{Simple}
// #//
@Overhead
@Begin

%text

# christina am piano, foto vom Hofli
@Place
  x{ left +0c}
  y{ top - ysize -11c }  {0.40  0.39 }  # {0.45  0.45} @Scale
#  y{ top - ysize -12.c }  {4.3  3.9 }
  @Scale @IncludeGraphic {"IMG_0002-2340.eps"}

@Place
  x{ left +0c}
  y{ top - ysize -1.8c }  {1.0  1.0 } @Scale
    @IncludeGraphic{ "roeseli.eps"}
@Place
  x{ right +0.8c -xsize}
  y{ top - ysize -1.8c }  {1.0  1.0 } @Scale
    @IncludeGraphic {"roeseli.eps"}


@Place x{ left +0c } y{ top -1.8c -ysize }
{1.0 0.92} @Scale 21.5c @Wide {

{+1.1c} @HShift {

25p @Font {
#@Centre {LOCALITA BOSTERO -- 12050 BOSIA CN} @DP
@Centre {Localita Bostero -- 12050 Bosia CN} @DP
18p @Font {@Centre @dieciminuti} @DP
@Centre {Domenica @B{27 Giugno 2021~~~ ORE 11} } @DP
}
@DP @DP

60p @Font {
@Centre {Christina Wili} @DP 
@Centre {Recital di pianoforte} @DP
}}
@DP @DP @DP @DP @DP @DP @DP @DP #@DP @DP # @DP @DP @DP 

|.2c 57p @Font  {

@Outline {HÄNDEL} @DP @DP @DP
|10.2c @Outline CHOPIN @DP @DP @LP
|2c @Outline MOZART @LLP
}
@DP @DP @DP @DP # @LP

|.5c 
#@HExpand

15p @Font {
{Da Lequio Berria prendi VIA LOVERA,~~ da Bosia VIA LUPIANO-REY} @LLP
@B @dieciminuti } {+2.5w} @VShift
|1c  @ZeroHeight
{0.5  0.5 } @Scale @IncludeGraphic {"please_enjoy_the_fresh_air.eps"}
//
# @ZeroHeight
}

%comment
@Place
  x{ right +0c -xsize}
#  y{ bottom  +1.2c }  {1.0  1.0 } @Scale{
  y{ top  -27.5c -ysize }  {0.5  0.5 } @Scale{  
    @IncludeGraphic {"please_enjoy_the_fresh_air.eps"}}