Rivard Michel - Petite vie.ps

title:L'oubli

st:Michel Rivard

define:%Am7*%1%0%1%0%2%0%-1

define:%Am7/E%1%0%1%2%2%-1%-1

define:%Am/D%1%0%1%2%0%-1%-1

define: CM7/E 1 0 0 0 2 3 0

define:%Em/D%1%0%0%0%0%-1%-1

define:%Em/D#%1%0%0%0%1%-1%-1

define:%Em/B%1%0%0%0%2%2%-1

define:%Em/C#%1%0%0%0%2%4%-1

define: Em2 1 2 0 0 2 2 0

define:%Em2/B%1%2%0%0%2%2%-1

define:%FM7%1%0%1%2%3%-1%-1

define:%FM7/A%1%0%1%2%3%0%-1

Intro : Am7 Am/D Em2 Em2/B

^Am7C'itait un homme imagina^Am7/Eire ^Em2Imagineur d'objets trouv^Em2/Bis Un inve^Am7nteur de faits diver^Am/Ds Un ^Em2rjveur de rialit^Em2/Bi Il habit^Am7ait en solitair^Am7/Ee Une m^Em2aison du carri St-Loui^Em2/Bs 2 o^Am7u 3 chats beaucoup d'lumihr^Am/De De te^Em2mps ` autre un vieil am^Em2/Bi Il ai^Am7*mait l'ordre et la douc^Am7*eur et d^GM7errihre ses petites man^GM7ies se c^FM7/Aachait l'idie du bonh^FM7eur sans fa^Emire de^Em/D# mal s^Em/Dans faire de bruit ^Em/C# Et ^CM7dans le noir de sa mim^CM7/Eoire s'o^Em/Buvrait le trou blanc de l'o^Em2ublie

soc

^Em2L'oubli^Em2/B, l^Am7'oubli ^Am7/E L^Em2'oubli des mots, l'oubli des ge^Am7*stes l^D7'oubli de tout ce temps qui re^GM7ste Prisonni^Amer de ce fune^CM7ste oubl^Em2ie ^{Em Em2 Em}

eoc

c:Refrain

Un jour en rentrant du cafi oy chaque matin venait s'asseoir par le trou blanc de sa mimoire il sentit sa vie s'en aller il icrivit comme ` l'icole, son nom en lettres ditachies Puis il ipingla sur le col de son manteau le bout d'papier Dans l'eau glacie du St-Laurent Il revit couler son enfance Et offrit son corps en silence Au dimon qui suit le courant Je chante pour ne pas qu'il meure Je chante pour tuer l'oubli

c: Refrain 2 fois

%!PS-Adobe-1.0 %%Title: Ventura Publisher Document %%Creator: Ventura Publisher %%Pages: (atend) %%BoundingBox: 0 0 611 791 %%EndComments % Copyright (C) Ventura Software, Inc. 1986, 1987. All rights reserved. systemdict /setpacking known

/svp currentpacking def true setpacking

if /vpdict 250 dict def vpdict begin

/bd

bind def

bind def % User defined Start of Page procedure: this operator will be % executed at the beginning of each page output by Ventura Publisher % and is provided to allow user-defined page initialization. /UserSoP

bd

/VP_INISUB

pop pop pop pop

bd /VP_INIDOC

/#copies exch def settray statusdict /setpageparams known

statusdict begin 0 1 setpageparams end

pop pop

ifelse

bd /vpinit

np 1 setlinejoin /mpf true def /encstr 80 string def /patname null def /patbits null def gs

bd /matinit

/landscape exch def /p3 exch def /p2 exch def /p1 exch def gr 72 300 div exch div dup scale clippath pathbbox exch /prx exch def exch dup /ply exch def sub 1 add p3 sub 2 div ply add /ty exch def dup prx exch sub 1 add p2 sub 2 div add landscape

p1 add

if ty translate landscape

90 rotate p2 /p1 exch def p3 /p2 exch def p1 /p3 exch def

if gs

bd /gr /grestore load def /np /newpath load def /cp /currentpoint load def /gi /getinterval load def /lto /lineto load def /mto /moveto load def /clw /currentlinewidth load def /gs /gsave load def /greset

gr gs

bd /settray

dup 0 lt mf dup 0 ge

tray

pop

ifelse

bd /mf

statusdict /manualfeed known

statusdict begin /manualfeed exch def end

pop

ifelse

bd /tray

statusdict begin true product(QMS-PS 1200)eq

not exch dup 1 gt{pop 0

if defaultpapertray exch 0 ne

3 exch sub

if setpapertray

if product dup(PrintServer 40)eq exch(QMS-PS 2400)eq or

not exch dup 2 gt

pop 0

if dup 0 eq

pop defaultpapertray

dup defaultpapertray ge{1 add

if

ifelse setpapertray}if

statusdict /defaultpapertray known statusdict /setpapertray known and

defaultpapertray exch 0 ne{1 exch sub

if setpapertray

pop

ifelse}if end}bd /reencsmalldict 12 dict def /ReEncodeSmall

reencsmalldict begin /newcodesandnames exch def /newfontname exch def /basefontname exch def /basefontdict basefontname findfont def /newfont basefontdict maxlength dict def basefontdict

exch dup /FID ne {dup /Encoding eq {exch dup length array copy newfont 3 1 roll put

exch newfont 3 1 roll put

ifelse

pop pop

ifelse}forall newfont /FontName newfontname put newcodesandnames aload pop newcodesandnames length 2 idiv

newfont /Encoding get 3 1 roll put

repeat newfontname newfont definefont pop end}bd /gemenvec

8#200 /Ccedilla 8#201 /udieresis 8#202 /eacute 8#203 /acircumflex 8#204 /adieresis 8#205 /agrave 8#206 /aring 8#207 /ccedilla 8#210 /ecircumflex 8#211 /edieresis 8#212 /egrave 8#213 /idieresis 8#214 /icircumflex 8#215 /igrave 8#216 /Adieresis 8#217 /Aring 8#220 /Eacute 8#221 /ae 8#222 /AE 8#223 /ocircumflex 8#224 /odieresis 8#225 /ograve 8#226 /ucircumflex 8#227 /ugrave 8#230 /ydieresis 8#231 /Odieresis 8#232 /Udieresis 8#233 /cent 8#234 /sterling 8#235 /yen 8#236 /currency 8#237 /florin 8#240 /aacute 8#241 /iacute 8#242 /oacute 8#243 /uacute 8#244 /ntilde 8#245 /Ntilde 8#246 /ordfeminine 8#247 /ordmasculine 8#250 /questiondown 8#251 /quotedblleft 8#252 /quotedblright 8#253 /guilsinglleft 8#254 /guilsinglright 8#255 /exclamdown 8#256 /guillemotleft 8#257 /guillemotright 8#260 /atilde 8#261 /otilde 8#262 /Oslash 8#263 /oslash 8#264 /oe 8#265 /OE 8#266 /Agrave 8#267 /Atilde 8#270 /Otilde 8#271 /section 8#272 /daggerdbl 8#273 /dagger 8#274 /paragraph 8#300 /quotedblbase 8#301 /ellipsis 8#302 /perthousand 8#303 /bullet 8#304 /endash 8#305 /emdash 8#306 /ring 8#307 /Aacute 8#310 /Acircumflex 8#311 /Egrave 8#312 /Ecircumflex 8#313 /Edieresis 8#314 /Igrave 8#315 /Iacute 8#316 /Icircumflex 8#317 /Idieresis 8#320 /Ograve 8#321 /Oacute 8#322 /Ocircumflex 8#323 /Scaron 8#324 /scaron 8#325 /Ugrave 8#326 /Uacute 8#327 /Ucircumflex 8#330 /Ydieresis 8#331 /germandbls 8#332 /Zcaron 8#333 /zcaron 8#334 /fraction 8#335 /space 8#336 /space 8#337 /space 8#340 /grave 8#341 /acute 8#342 /circumflex 8#343 /tilde 8#344 /dieresis 8#345 /ring 8#346 /cedilla 8#347 /caron version(23.0)eq

8#275 /space 8#276 /space 8#277 /space

8#275 /copyright 8#276 /registered 8#277 /trademark

ifelse]def /addfont

fonts exch fpt exch put /fpt fpt 1 add def

bd /encfont

fonts exch get dup encstr cvs length 1 sub encstr exch 1 exch getinterval cvn exch gemenvec ReEncodeSmall

bd /path

np mto{lto

repeat

bd /circle

np 0 0 1 0 360 arc

bd /rend

gs 1 setlinecap np mto cp 0.1 add lto stroke gr

bd /vl

dup /st exch def dup apath exch get tx sub dup mul exch 1 add apath exch get ty sub dup mul add sqrt

bd /doarrow

/rot exch def /ty exch def /tx exch def 6 array currentmatrix tx ty translate clw 4 lt

4

clw

ifelse dup scale rot rotate np 0 0 mto -3 1.5 lto -3 -1.5 lto fill setmatrix

bd /arpath

np apath 0 get apath 1 get mto 2 2 points 1 sub

dup apath exch get exch 1 add apath exch get lto

for

bd /arrowline

/apath exch def /lend exch def /lbeg exch def /len clw 3 mul def /points apath length def lbeg

apath 0 get dup /tx exch def /x1 exch def apath 1 get dup /ty exch def /y1 exch def true 2 2 points 1 sub {vl len ge{pop false exit

if

for

/lbeg false def /lend false def

apath 2 apath st points st sub gi putinterval /r1 y1 apath 3 get sub x1 apath 2 get sub atan def apath 0 x1 r1 cos len mul sub put apath 1 y1 r1 sin len mul sub put /points points st 2 sub sub def

ifelse}if lend

apath points 2 sub get dup /tx exch def /x2 exch def apath points 1 sub get dup /ty exch def /y2 exch def true points 4 sub -2 0

vl len ge{pop false exit

if

for

/lbeg false def /lend false def

/r2 y2 apath st 1 add get sub x2 apath st get sub atan def /st st 2 add def apath st x2 r2 cos len mul sub put apath st 1 add y2 r2 sin len mul sub put /points st 2 add def

ifelse}if lbeg

x1 y1 r1 doarrow

if lend

x2 y2 r2 doarrow

if arpath}bd /ac

6 array currentmatrix xt yt translate xs ys scale

bd /shorten

dup mul exch dup mul add sqrt clw 150 mul exch div

bd /xang

dup sin xs mul exch cos ys mul atan

bd /arrowarc

/eang exch def /bang exch def /ys exch def /xs exch def /yt exch def /xt exch def /lend exch def /lbeg exch def ac np 0 0 1 bang xang eang xang arc setmatrix cp /y2 exch def /x2 exch def ac np 0 0 1 bang xang dup arc setmatrix cp /y1 exch def /x1 exch def lbeg

/bang bang xs ys shorten add def

if lend

/eang eang xs ys shorten sub def

if ac np 0 0 1 bang xang eang xang arc setmatrix gs stroke gr lend

x2 y2 cp y2 exch sub exch x2 exch sub atan doarrow

if lbeg

ac np 0 0 1 bang xang dup arc setmatrix x1 y1 cp y1 exch sub exch x1 exch sub atan doarrow

if

bd /rbox

/ury exch def /urx exch def /lly exch def /llx exch def urx llx sub 4 div dup 50 gt

pop 50

if /radius exch def ury lly sub 4 div dup radius gt

pop radius

if /radius exch def np urx radius sub ury mto llx ury llx lly radius arcto 4

pop

repeat llx lly urx lly radius arcto 4

pop

repeat urx lly urx ury radius arcto 4

pop

repeat urx ury llx ury radius arcto 4

pop

repeat

bd /marker

1 sub mdef exch get /mproc exch def 32 div /msize exch def

gs np translate msize dup scale mproc stroke gr

repeat

bd /mdef

[0 0 mto 1 0 lto 1 1 lto 0 1 lto closepath}bind {-16%0%mto%16%0%lto%0%-16 mto 0 16 lto

bind

0 -16 mto 0 16 lto 13.9 8 mto -13.9 -8 lto 13.9 -8 mto -13.9 8 lto

bind

16%16%mto%-16%16%lto%-16%-16%lto%16%-16 lto closepath

bind

16%16%mto%-16%-16%lto%-16%16%mto%16%-16 lto

bind

16%0%mto%0%16%lto%-16%0%lto%0%-16 lto closepath

bind]def /patdef[/patbits exch store /patname exch store CharStrings patname [16 16 true[16 0 0 16 0 0]patbits /imagemask load]cvx put}bd /BuildCharDict 10 dict def /ExFont 7 dict def ExFont begin /FontType 3 def /FontMatrix[1 0 0 1 0 0]def /FontBBox[0 0 1 1]def /Encoding 256 array def 0 1 255

Encoding exch /.notdef put

for /CharStrings 39 dict def CharStrings /.notdef

put /BuildChar

BuildCharDict begin /char exch def /fontdict exch def /charproc fontdict /Encoding get char get fontdict /CharStrings get exch get def 1 0 0 0 1 1 setcachedevice gs charproc gr end

bd end /PatFont ExFont definefont pop /tile

/tchar exch def /txl exch def /tyl exch def /ty exch def /tx exch def gs 1 setgray eofill gr gs eoclip np /PatFont findfont 32 scalefont setfont tx ty mto tyl

gs txl{tchar show

repeat gr 0 -32 rmoveto

repeat gr}bd /ellpie

/pie exch def /eang exch def /bang exch def /ys exch def /xs exch def /yt exch def /xt exch def 6 array currentmatrix xt yt translate xs ys scale np pie

0 0 mto

if 0 0 1 bang xang eang xang arc setmatrix

bd /xang

dup sin xs mul exch cos ys mul atan

bd /roundarc

gs 1 setlinecap cp np mto cp lto stroke gr

bd /fstimg

vrep 0.1 gt{/vrep vrep 1 sub def

{currentfile token pop 0 eq {currentfile scan readhexstring pop pop exit

/vrep currentfile token pop def

ifelse

loop}ifelse scan}image}bd /decode

/patstring patlen string def /bonestr 1 string def

vrep 0.1 gt{/vrep vrep 1 sub def scan

/spos 0 def {currentfile token pop currentfile token pop exch imop exch get exec spos smax ge {scan exit

if

loop}ifelse}image}bd /imop

{ psc

bind { psc}bind

currentfile patstring readhexstring pop psc

bind

1 exch 1 exch

pop currentfile bonestr readhexstring pop scan exch spos exch 0 get put /spos spos 1 add def

for

bind

1 sub /vrep exch def

bind]def /psc

dup length /plen exch def exch -1 1

pop dup scan exch spos exch putinterval /spos spos plen add def

for pop

bd /gtext

gs /msg exch def /ty exch def /tx exch def tx ty translate trotate rotate tcolor setgray 10 setflat horz halign get exec vert valign get exec np tx ty mto msg show tunder

cp cp extents pop pop 5 div dup neg setlinewidth 1.5 mul /ty exch def pop np pop ty mto tx ty lto stroke np mto

if gr

bd /etext

gs translate trotate rotate tcolor setgray /tx 0 def /ty 0 def

tx add dup /tx exch def np ty mto show

repeat gr

bd /jtext

/msg exch def /sps exch def /dx exch def /ty exch def /tx exch def gs tx ty translate trotate rotate tcolor setgray 10 setflat jhorz halign get exec vert valign get exec msg stringwidth pop dx exch sub sps 0 eq

pop 0

sps div

ifelse /xsp exch def msg jo gr

bd /fet

gs translate /tx 0 def /ty 0 def

tx add dup /tx exch def np ty mto show

repeat gr

bd /fjt

/msg exch def /sps exch def /dx exch def /ty exch def gs ty translate 10 setflat /tx 0 def /ty 0 def msg stringwidth pop dx exch sub sps 0 eq

pop 0

sps div

ifelse /xsp exch def msg jo gr

bd /sf

fonts tface get findfont tscale scalefont setfont

bd /jo

xsp exch 0 exch 32 exch np tx ty mto widthshow tunder

cp cp extents pop pop 5 div dup neg setlinewidth 1.5 mul /ty exch def pop np pop ty mto tx ty lto stroke np mto

if

bd /horz

/tx 0 def

bind

msg%stringwidth%pop%-2 div /tx exch def

bind

msg stringwidth pop neg /tx exch def

bind]def /extents

(_)bbox pop pop msg stringwidth pop (])bbox 3{exch pop

repeat

bd /bbox

np 0 0 mto false charpath flattenpath pathbbox np

bd /vert