i n v i d a t i o n    v5

___________________________________________________________________________________________________________
__ lab transmedia numérique __ grappe de cerveaux connectés __ multiprocessing poétique __ zone de scrypt.#rt __

__ avec __
g.cl4renko
Mathias Richard
Nikola Akileus
Awkwardist

__ arrière-plan __
compendium invidation_v[<5] avec AC Hello, g.Cl4renko, Mathias Richard, Awkwardist & Nikola Akileus

___________________________________________________________________________________________________________
__ digital transmedia lab __ brain cluster __ poetic multiprocessing __ scrypt.#rt area __

__ featuring __
g.cl4renko
Mathias Richard
Nikola Akileus
Awkwardist

__ background __
compendium invidation_v[<5] feat. AC Hello, g.Cl4renko, Mathias Richard, Awkwardist & Nikola Akileus


___________________________________________________________________________________________________________
webscrypted by atomeases __ powered by PluXml
now on hystereodrome
___________________

Mushin
R3PLYc4N
Jim Delarge
Tajiaphragm / Memory 3
Ichtyor Tides
"i do not want this"

j'ai vu cet envol comme mille défenestrations spontanées
une falaise de verre sur la peau
[au moment de l'en-gouffre palingénésie]
sur les murs jusqu'à pierre
on essuiera nos os

quelqu'un a écrit "géhenne" sur l'alphanumérique
et aujourd'hui une particule paranoïde
boucle probabiliste dans quelque cellule
capitonnée
et me murmure encore

j'aurais bien vu son sang noir remplir les sondes fêlées de l'envers gris cellulose
ci-dessous
3 représentations formelles du principe de réalité
[extraits]
mises en oeuvre dans le cadre du séminaire de
"fragmentation déraillée & déschématisation sociale"


1.

tout le monde lit le source au même moment
tu foires une balise
et
alors tu précipites
le chaos


2.

ma tête en tombe dans le plasma
là il se relativise
"tu vas prendre cher" il me dit
on parle de pâte
de mer
les golfes clairs
etc

tout ce ramassis d'excitations

c'est vrai c'est toujours mieux que "sans-oeuvres"
[she said]

je ferme les yeux
l'air extérieur me caresse
à chaque fois je suis ailleurs
je-
peut-on se redéfinir ou alors créer une autre extension
de soi
le papier parle de filamentation lui
je trouve ça joli
comme cette mer de peignes
me surprend à espérer des rivages

toutefois j'ai un nom
j'en parlerai le moment venu
pardon : je lui laisserai la parole


3.

augmentation soudaine du nombre de variables

propension à osciller sur des impulsions caféines

j'alimente cette reprise ridicule
postulant que le freinage convulsif de l'être devient vite conséquent
dans l'environnement néant

je ne garantis plus rien après
à terme
à ce soir
l'entrée est à droite
après le rideau
Arsenal.

Le 2 juillet à ses côtés, je criai dans la nuit. Je me souviens que j'agitais haut mes bras, pestais en flamboyant de vodka. Je ne me souviens pas précisément des mots qu'empoignait ma bouche.
Le 3 juillet je prenais une longue douche, m'habillais de ces colifichets que j'avais fulguremment oubliés depuis longtemps, après deux longs mois à traîner dans les rues. Je reconsidérais l'espace autour de moi, je le regardais dormir dans mon lit, épuisé d'un long trajet, long et douloureux. Il dit : « tu t'es maquillée ? » Je redeviens humaine, répondis-je.
Le 11 novembre à 11h52, je disparus.
Le 11 novembre à 11h53 je réapparus.
Le 11 novembre à 11h54 je me dis que nous étions morts à une fréquence de 86 400 secondes par jour et que nos actes étaient substanciellement vides. J'abandonnais vite cette considération sans fond et cette pénétration discursive de porte ouverte afin de me replonger dans ma disparition. Je plongeais ma tête sous l'eau dans l'évier parmi les assiettes sales et les pates pourries voguant à la surface. Je restais là une bonne heure.
Le 22 décembre je lui avouais vouloir être coiffeur d'oiseaux.
Le 1er janvier il ne m'aima pas.
Le 4 janvier je commençais à compter scrupuleusement les secondes où il ne m'aimait pas.
Le 18 janvier je souffrais de tout mon crâne devant une alouette blessée par un nuage. J'empoignais un chauffard et le secouais de tout mon bras gauche afin de faire fuir le nuage.
Le 22 janvier c'est vers cette période que mon lobe temporal gauche commença à rejeter définitivement et ce pour une période encore à ce jour imprécise, tout type de romans, essais, et autres types de constructions narratives concentrationnaires récitant pas toujours mais bien souvent des lieux communs, ainsi qu'on égrène un chapelet de loufoques tripes de porc. C'est vers cette époque que je transportais en permanence sur moi au moins sept livres de Notre Ami. Je ne supportais plus que Notre Ami. Il voulait qu'on lui fasse « des enfants dans le dos ». Il en aurait.
Le 28 janvier tout se passait bien, nous n'étions pas fous.
Le 10 février avec horreur, je lus quelques mièvreries mal déniaisées sur le web. Je trouvais confirmation de mon sentiment auprès d'un article du Matricule des Anges de l'année 1993. Qui valait ce qu'il valait. La mièvrerie n'est fâcheuse que si elle est célébrée. Une bande de grands malades mentaux célébraient cette mièvrerie. En 1993, j'avais quinze ans, je lisais Freud. Un blond m'aborda sur une plage de Corse sous le fallacieux prétexte que je lisais Freud. Quelques jours plus tard il jeta contre les carreaux de ma fenêtre trois feuilles tirebouchonnées. cette époque, je ne comprenais déjà pas le sentiment amoureux dire je t'aime à un cerveau connu depuis seulement 259 200 secondes me semblait issu de la plus grande démence. J'abandonnais Freud à quinze ans et demi. Freud était un con. Tout comme Sartre.
Le 10 février je lui parlais de poissons volants.
Le 12 février Les secondes où il ne m'aimait pas semblaient diminuer en fréquence.
Le 15 mars on me demanda de peindre un cri. Je songeais que je finirai probablement noyé dans la peinture, car le langage oral me semblait particulièrement impuissant et furieusement limité, quadrillé, rectangulaire comme un univers concentrationnaire, je ne souffrais plus que le transversal et les zones de turbulences atones. Je songeais à l'ancêtre Ernest Hello, qui se serait bien marré de tout ce merdier et de tous ces niais élucubratoires poisseux sur son oeuvre, moi j'avais compris, mais je ne disais rien, bien que la rage m'échauffait. Puis je songeais à Arthur Cravan, sans que je n'aie jamais su pourquoi par la suite.
Le 23 mars je lui demandais de m'offrir des cailloux bleus.
Le 29 mars il était fier de moi, sans que je n'aie jamais su pourquoi par la suite.
Le 1er avril sans que je n'aie jamais su pourquoi par la suite.
Le 2 avril il se passa un phénomène très curieux. Il revint à six heures du matin, et me dit avec force en me serrant comme un étau, qu'il m'aimait, qu'il m'aimait très fort, et qu'il s'en foutait si les gens se moquaient de nous parce qu'on vivait dans une cage à poules, et qu'il m'aimait, et que des fois il avait envie de me faire un enfant. Dans une cage à poules ? répondis-je. Il allait de soi qu'après toutes ces secondes à compter les secondes où il ne m'aimait pas, ma croyance en l'univers et ses vertus langagières auxquelles je n'avais de toute façon jamais beaucoup cru s'était sensiblement détériorée. Aussi lui répondis-je : moi-aussi je t'aime très fort {mais au fond, quelle importance, puisque tout est si aléatoire et croupissant comme un songe maudit}.
Le 3 avril un dégoût subit monta dans ma gorge. Toujours à cause de la mièvrerie. J'avais envie de noir partout. De noir de noir de noir. De disparaître de cet univers de fous. D'ailleurs, j'allais disparaître. Au fond quelle importance.
Le 4 avril je découvrais le mot « épatamment » dans le dictionnaire, découverte qui ne m'avançait pas vraiment, car c'était un mot laid et disgracieux, sans que je n'aie jamais su pourquoi par la suite.
La joue aplatie droite sur l'oreiller - suite.

Donc posée en tranches sur un banc elle compte ses doigts.


N'avons-nous donc connu personne
pour écrire ici comme si
les lendemains
dépendaient d'un mot

Elle dira jusqu'au bout au manège (Saint-Paul) que la

la fuite et le sale temps
du type à ma gauche
me frappe de son crâne
dans les métros replié le drame
du t'as pas une clope perpétuel
sur le banc des phalanges crasses
les dérives sèches
de demain m'indiffère

Il n'y a pour elle

qu'un souffle à faire
pour que l'autrefois minute
les triples contractions
des familistères
triple amputation
des racines secondaires
le cercueil rouillé des chauves
syntaxes borgnes
des illuminés
à cafard sur le mystère
des façades obscures.

Jusqu'ici les choses sont stériles.

Germination des paradoxes
au distique évidé
l'hémistiche limaçon
gène de l'érosion
dans les seins mécaniques
d'humides congrégations
surface d'extrême-onction
de la matière livre
trépanation du canal
semi-circulaire
affectation de l'ordinaire
que l'on ne pas
solution crevée
des fracas grillagés
beuglement des cygnes
costumes de crépuscule
infection amorphe
des chiens tétraptères
des crieurs ordinaires
organe des séismes
dans les fraudes congelées
utérus blanchâtres
brumes synthétiques
cycles encaustiqués
de la poire sébacée
train de sentiments
que l'on n'éprouve pas
sonorités siccatives
des publicités polies
carcasses des becs béants
au milieu d'un temps sans bords.

Elle s'est énervée.

N'avons-nous donc connu personne
pour frémir ici comme si
les lendemains
dépendaient d'un sale mot
ivre et borgne
saluer le chômage crayeux
des cicatrices de paille
les soupirs
posés en taches rondes
sur les balafres des ruptures
jusqu'à l'obtention d'une plaie ordinaire.

Elle ne voudrait pas un jour qu'on pense que c'était une histoire de rupture, mais qu'on pense que c'était plutôt une histoire de pollution juste histoire que les choses ne disent plus rien. Que la balance s'obscurcisse. Que personne ne s'en sente touché, que personne ne reluise.
Desalgorithm II


Extinction

les passants qui défilent comme des gouttes
et leurs regards s'érodent
ne cherchant à s'infiltrer dans les
vides pourtant laissés
entre
continue
c'est un désert
trébuche les mains spirales
spirales
tracent des ombres
fugitives comme les mots mouches inutiles
tournent derviches sinon pilules
considère
que vers le sable
cornées jamais graines jamais givrées
les mots avalés
froids forent leur flamme blanche
les mots mutilent des visages
où les os affleurent obscènes

mais ne rien reconstruire car on ne peut pas bâtir de chateaux de sable dans un désert
seulement marcher
marcher entre les carrés tant
qu'impossible où le vide
n'est plus permis
danse sous mes pieds autour
l'échiquier

je ne sais plus être mes personnages
juste marcher juste mal jusqu'au bord
et qu'alors je sais les
être
mais ils sont morts

le sol sans sommeil sans col me somme l'alternance lisse
des faces mauves
qui me disent les mêmes graines
me désertent les mêmes scènes
chaque pas est un rivage
chaque souffle la même vague
qui après tout aurait pu
m'entraîner de ces fonds vers
et faire qu'informe sur le sable
la visibilité supérieure d'un cadavre -
la fin de la transparence
Carcasses désaffectées - note 352


John Bastard-A-K me contacta vers cinq heures du matin, il dit : je peux passer ? je dis oui, il se cogna à ma porte d'entrée quelques instants plus tard, me présentant cinglé son front tuméfié, de gauche à droite sa tête comme un poulain dévitalisé, et alors, d'une façon époustouflante un flot jaillit de ses lèvres, il ne s'interrompait plus, je restais vissé au plancher :

« J'ai vu un article sur le galeriste, Perrotin, le mec de la rue Louise Weiss et de la rue de Turenne. 700m2 là-bas... et la photo d'un artiste, qui fait des trucs gentils, genre conceptuels, maquettes, "créateur de mobiles" (structures avec du fil plastique support, trame des noeuds et des perles)... moi je réfléchis : créateur de mobiles, si c'est pas de la supercherie... enfin tu marches dans la galerie, je l'ai vu son boulot, tu te prends sa supercherie dans la gueule, c'est presque transparent alors tu vois pas grand chose, c'est un peu moche... donc j'essaie encore de réfléchir, et je me demande si c'est sérieux ou si c'est encore du discours, s'il se fout pas un peu de ma gueule pour que j'émette des théories, s'il se rebondit dessus, ou si, bon, des Ah et Oh simplement ébahis devant certes une certaine complexité au sein de la conception-même du mobile indéniable font la postérité de cet "artiste" propulsé par le GRAND GALERISTE PERROTIN. Je te prends, je te fais, ou je te pousse. Je voudrais pas mal penser. Mais bon. Y'a souvent des blablas. Et là-bas, toujours cet espèce de menton levé, haut jugement, critique, savoir résolu... oui, savoir résolu, c'est tout à fait ça... on, l'art, c'est rien que du plan, en fait, comme les dessins techniques, des explications (le support est créé par l'auteur afin qu'il puisse faire de son explication le vecteur médiatique qui enflera ses initiales. et puis les gens écoutent et disent Oh, il faut aller voir). Pub crousti chaud les fils de fromage qui fument. Comment dicter la curiosité, c'est atroce. Comment suggérer ce qui est bon ou pas. Comment abrutir. vendre.... je suis dans une impasse avec cette société. MERDE. C'est lourd. J'ai mal au dos. J'ai pas le droit d'avoir mal au dos. J'ai de la chance, pas le choix et pas le droit, pour la liberté. La contrainte ouvre la liberté. Tu crois ? Tu crois que c'est faisable, notre élan vers tout ça ? TU PEUX ME DIRE POURQUOI JE ME POSE ENCORE DES QUESTIONS ?... t'es vivant, hein, t'es vivant ?

Alors je ne répondis rien, c'était délicat cette question, je m'étais évincé de cette course-poursuite depuis un an, j'avais tout viré, démoniaque, les yeux de travers. Quelques larmes montèrent, vivant je ne sais pas bien, ça s'est évanoui avec le temps, je passe mes soirées la tête plongée dans l'évier à contempler le siphon, à barboter comme une langouste îvre morte, à humer le plafond, à être fou, à être fou mon ami, j'ai eu beau prendre dans mes bras, aucun corps ne m'attache plus, tout s'est évanoui, des citadelles d'as de curs que j'avais empilées consciencieusement, j'avais appliqué ma leçon et puis un souffle d'humain les a emportées, non je ne suis pas franchement vivant, pas franchement mort, je suis là pilier d'angoisse planté dans les carrefours la nuit à contempler les phares et les traînées gauches, à guetter les hommes dans le métro et ces quelques figures, ces gestes imperceptibles, à décortiquer ces surfaces, à essayer de comprendre, je fais des allers et retours dans le métro, dix d'affilée parfois, Pont de Sèvres-Mairie de Montreuil, et puis Mairie de Montreuil-Pont de Sèvres, et puis Pont de Sèvres-Mairie de Montreuil, et encore Mairie de Montreuil-Pont de Sèvres, jusqu'à ce que le roulis me gagne et que je balance comme un train déraillé et que je sois hors-circuit et que je sois devenu une valeur périmée et non ajoutée, que je sois devenu la foule, que je sois devenu un peu rien, en paix et en silence, un clandestin, sans adresse sauf un strapontin.

Alors je répondis rien.

Putain, ça va durer encore combien de temps la vie ? qu'il me dit.

Et juste après, il se cogna six ou sept fois la tête contre le mur puis il se jeta du balcon.
J'habitais au rez-de-chaussée, il me gueula dessus.
Carcasses désaffectées - note 352


John Bastard-A-K me contacta vers cinq heures du matin, il dit : je peux passer ? je dis oui, il se cogna à ma porte d'entrée quelques instants plus tard, me présentant cinglé son front tuméfié, de gauche à droite sa tête comme un poulain dévitalisé, et alors, d'une façon époustouflante un flot jaillit de ses lèvres, il ne s'interrompait plus, je restais vissé au plancher :

« J'ai vu un article sur le galeriste, Perrotin, le mec de la rue Louise Weiss et de la rue de Turenne. 700m2 là-bas... et la photo d'un artiste, qui fait des trucs gentils, genre conceptuels, maquettes, "créateur de mobiles" (structures avec du fil plastique support, trame des noeuds et des perles)... moi je réfléchis : créateur de mobiles, si c'est pas de la supercherie... enfin tu marches dans la galerie, je l'ai vu son boulot, tu te prends sa supercherie dans la gueule, c'est presque transparent alors tu vois pas grand chose, c'est un peu moche... donc j'essaie encore de réfléchir, et je me demande si c'est sérieux ou si c'est encore du discours, s'il se fout pas un peu de ma gueule pour que j'émette des théories, s'il se rebondit dessus, ou si, bon, des Ah et Oh simplement ébahis devant certes une certaine complexité au sein de la conception-même du mobile indéniable font la postérité de cet "artiste" propulsé par le GRAND GALERISTE PERROTIN. Je te prends, je te fais, ou je te pousse. Je voudrais pas mal penser. Mais bon. Y'a souvent des blablas. Et là-bas, toujours cet espèce de menton levé, haut jugement, critique, savoir résolu... oui, savoir résolu, c'est tout à fait ça... on, l'art, c'est rien que du plan, en fait, comme les dessins techniques, des explications (le support est créé par l'auteur afin qu'il puisse faire de son explication le vecteur médiatique qui enflera ses initiales. et puis les gens écoutent et disent Oh, il faut aller voir). Pub crousti chaud les fils de fromage qui fument. Comment dicter la curiosité, c'est atroce. Comment suggérer ce qui est bon ou pas. Comment abrutir. vendre.... je suis dans une impasse avec cette société. MERDE. C'est lourd. J'ai mal au dos. J'ai pas le droit d'avoir mal au dos. J'ai de la chance, pas le choix et pas le droit, pour la liberté. La contrainte ouvre la liberté. Tu crois ? Tu crois que c'est faisable, notre élan vers tout ça ? TU PEUX ME DIRE POURQUOI JE ME POSE ENCORE DES QUESTIONS ?... t'es vivant, hein, t'es vivant ?

Alors je ne répondis rien, c'était délicat cette question, je m'étais évincé de cette course-poursuite depuis un an, j'avais tout viré, démoniaque, les yeux de travers. Quelques larmes montèrent, vivant je ne sais pas bien, ça s'est évanoui avec le temps, je passe mes soirées la tête plongée dans l'évier à contempler le siphon, à barboter comme une langouste îvre morte, à humer le plafond, à être fou, à être fou mon ami, j'ai eu beau prendre dans mes bras, aucun corps ne m'attache plus, tout s'est évanoui, des citadelles d'as de curs que j'avais empilées consciencieusement, j'avais appliqué ma leçon et puis un souffle d'humain les a emportées, non je ne suis pas franchement vivant, pas franchement mort, je suis là pilier d'angoisse planté dans les carrefours la nuit à contempler les phares et les traînées gauches, à guetter les hommes dans le métro et ces quelques figures, ces gestes imperceptibles, à décortiquer ces surfaces, à essayer de comprendre, je fais des allers et retours dans le métro, dix d'affilée parfois, Pont de Sèvres-Mairie de Montreuil, et puis Mairie de Montreuil-Pont de Sèvres, et puis Pont de Sèvres-Mairie de Montreuil, et encore Mairie de Montreuil-Pont de Sèvres, jusqu'à ce que le roulis me gagne et que je balance comme un train déraillé et que je sois hors-circuit et que je sois devenu une valeur périmée et non ajoutée, que je sois devenu la foule, que je sois devenu un peu rien, en paix et en silence, un clandestin, sans adresse sauf un strapontin.

Alors je répondis rien.

Putain, ça va durer encore combien de temps la vie ? qu'il me dit.

Et juste après, il se cogna six ou sept fois la tête contre le mur puis il se jeta du balcon.
J'habitais au rez-de-chaussée, il me gueula dessus.
Extinction (deux sur deux zéro)

fréquence floue
l'oeil glacé
torve les membres lanières
peu à peu
arrachés filets de chair
glissent vermicelles sur l'illusoire
rugosité

puis démembré exister
dans la propension tactile
impossible

la vague se rembobine toujours lucide pellicule horrible

et derrière encore il faut affronter les surfaces
chaque matin qui se recomposent inconscientes
miroirs où les yeux rouges délétères s'enterrent
à ne plus souhaiter que la nuit soit inextinguible
pour les voir se dissoudre difformes danser sur leurs cendres
au matin alors comme issu d'un rêve suave tissu nucléaire

les membres absents pourtant insignifiants
devant ces ravins où l'on s'est précipité pour
dire vivre
pour ainsi
dire

nous existons dans la projection de nous-mêmes dans la distance-vide qui nous sépare du monde
des autres
croyant alors les y retrouver -
ne faudrait-il pas plutôt se résorber en sa source avant de pénétrer consistants cet espace où s'éviscèrent parfois aux lisières d'ombres longues des invideurs hurlés invidés hurleurs jusqu'à survoler l'asymptote solitude scarifiante

jusqu'à être ce qu'ils sont dans toute leur stupeur

Il n'y a aucune corrélation possible entre un esprit sincère et un art fatigué.
Il n'y a aucune corrélation possible entre un esprit fatigué et un art sincère.
Il n'y a aucune corrélation possible entre un esprit insincère et un art énergique.
Il n'y a aucune corrélation possible entre la paranoïa et l'art.
Il n'y a aucune corrélation possible entre la frustration et l'art.
Il n'y a aucune corrélation possible entre la culpabilisation et l'art.
Il n'y a pas d'art, il n'y a que de la sincérité.
Il n'y a pas d'art, il n'y a que des refus de compromis.
L'art n'existe pas, juste des batailles en quelques points du temps, sans medium prédéterminé.
L'art est un mot général associé à des généralités.
Il n'y a de généralisations que chez ceux qui ne veulent pas voir.
Il n'y a de généralisations que chez ceux qui ne veulent pas savoir.
Il n'y a de généralisations que chez ceux qui ne veulent pas se voir.
Il n'y a de généralisations que chez ceux qui n'arrivent pas à être un.
Ne pas pouvoir être un, se venger de l'autre en le rendant multitude impersonnelle.
« L'art ne sert à rien, tout le monde est insincère ».
L'art n'existe pas, lard ne sert qu'à ceux qui y croient, ils ne croient pas en lard, ils croient en eux, lard c'est être. Croire en soi, n'est pas se crier avec une vanité morbide, c'est une direction qui n'a pas de sens, accepter de ne jamais avoir de sens et n'être rien ; accepter l'absurdité, l'affirmer, jouer avec l'absurdité, alors lard c'est être, oui mais affirmer être une écorce vacillante, sans honte, une oeuvre ne peut être que la vibration d'une fragilité, un vacillement, si elle exprime la vie. L'insincérité chez l'autre n'existe plus pour certains, dès lors que cet autre les caresse. Il y a méprise profonde sur le caractère intrinsèque de l'insincérité. L'insincérité ce n'est que ceux qui lèchent pour assouvir leurs désirs, leurs fantasmes sexuels, carriéristes. On aura plus tendance à dire d'un homme qu'il est « insincère » lorsqu'il se tait, plutôt que devant ceux qui vous font reluire le poil. L'estime d'une sincérité va de pair avec sa propre estime : plus on a de failles narcissiques, plus on assimilera la sincérité à ce qui va dans son sens.
La seule sincérité, c'est celle qui s'accroche, malgré les insultes.
Il n'y a aucune corrélation possible entre la suspicion et la création.
La suspicion ne se développe pas quand on fait quelque-chose de mal, mais quand on ne fait rien pour être aimé. Etre aimé c'est faire que l'autre s'aime, de ce fait il vous aime, car il vous est reconnaissant de l'avoir aidé à s'aimer un peu plus. Se faire aimer est simple : il suffit de lubrifier le narcissisme de l'autre. Ne pas vouloir être aimé l'est moins : on se méfie de vous.
Il n'y a aucun instinct de vie, qui puisse se développer sous un régime mac-carthiste.
Il est 17h56 et plus le monde bouge, plus mes pieds creusent la terre.
Il n'y a aucun espoir de retour devant les folies privées.
Les nuages ont des couleurs
La convergence de nos penchants
Non avoués
Dans leur tendre
Epure

Vouloir signifier ne serait-ce
Qu'une cohésion à laquelle
Vouloir sacrifier des sur-réels faciles

Invoquer un rythme
Y
Immoler l'idée
Ce matin, j'ai remarqué que l'araignée, au lieu de s'engouffrer dans le tourbillon coriolitique qui bottomise mon évier, a décidé de grimper le long du mur. J'ai peur, car dans quelque temps, elle aura atteint le plafond.
Entité sioniste en Cisjordanie le soleil se soulève les abords de Seine Paris crache : entité sioniste en Cisjordanie il entame des négociations accélérées pour la formation d'un gouvernement de coalition au bout de sa rue, la rue du Temple. Il négocie une jupe et un croissant. Il longe l'hôpital Hassadah dans les yeux de la fille parfaitement accessible, déjà ouverte. Il suffit de parler, et c'est un réflexe de survie qu'on cultive ils sont niais et innocents. Les dons d'organe ne sont qu'un exemple d'une collaboration médicale croissante qui colore un peu d'espoir cette région explosive qu'est Danger. « MINISRAEL : Tout Israël en miniature ! » Israël en carton miniature dans sa tête qui vient colorer la fille de sa vie caramel à passer ses yeux dans les beef-steaks décolorés au sol, giclés des bus. La fille est parisienne et très sensible, elle s'écarte. Elle est le paysage d'Israël revenu d'ailleurs. La terre d'asile d'Israël. a va chier maintenant, ce qu'il s'était dit en arrivant ici à dix-huit ans.

Je t'aime, est-ce que tu comprends comme je t'aime et comme je te connais depuis toujours. N'écoute pas mes mots, est-ce que tu comprends comme je t'aime, ne m'écoute surtout pas, garde juste ma silhouette et comment je t'ai regardé ; je t'aime déjà. Est-ce que tu le comprends. Est-ce que tu te demandes comme moi ce que ça veut dire, et comment par périodes le chemin finit par se raccourcir, comme on est des erreurs étranglées. Je t'aime, à quoi tu penses. Est-ce que tu penses à moi. Est-ce que tu y penses comme j'y pense, abîmée à l'extérieur, le corps ouvert au vent, engouffré de la ville. Je t'aime est-ce que tu m'as redessinée ou est-ce que tu penses à moi sans avoir mis de mots là-dessus sans m'avoir redessinée, je t'aime, je t'aime déjà est-ce que tu penses à moi et comment tu y penses, est-ce que tu penses que les corps s'interchangent, est-ce que tu penses que nous valons une somme d'argent, de dons et de talents, d'argent, ou est-ce que tu penses qu'il n'y a que des âmes je t'aime est-ce que tu comprends, est-ce que tu penses à moi, comment tu y penses, où es-tu maintenant, est-ce que tu penses à moi, est-ce que tu gardes comme moi le souvenir d'une rupture avant même qu'on se soit connus, est-ce que tu m'a redessinée est-ce que tu as fait cette erreur alors que moi je t'ai toujours pensé avec humilité sans rien garder d'autre que tes paroles ce que tu montrais c'est-à-dire pas grand-chose. Est-ce que tu as eu cette humilité de garder pas grand-chose de moi, comme moi je n'ai rien pris de toi, sans me redessiner, est-ce que tu n'as jamais vu rien d'autre en moi que les bribes que j'ai données et mes yeux c'est-à-dire pas grand-chose, ou est-ce que tu as eu besoin de me réinventer pour mieux masquer ta solitude est-ce que tu m'aimes je t'aime déjà est-ce que tu penses à moi et comment tu y penses et qui tu es parce qu'on ne se connaît pas. Est-ce que tu te satisfais de ça ou est-ce que tous les soirs tu penses à ce truc qu'on a laissé et ta stupidité, ton âme étiolée qui joue, qui est suspecte et qui a peur, est-ce que tu comprends que tu as peur et moi aussi, est-ce que tu comprends que je me suis vue dans tes yeux, est-ce que tu comprends qu'on est pareil, tu le sais n'est-ce-pas, bien sûr que tu le sens. Est-ce que tu y penses, ou est-ce que tu penses juste à mon cul et tes statistiques dans les chemins de ta banque. Est-ce que tu es stupide, est-ce que tu es comme tous les autres, est-ce que tu es surfait, est-ce que tu penses qu'est-ce que tu penses est-ce que tu sais que je brûle, que je brûle. Est-ce que tu sais que je te laisserai jamais venir en moi. Parce que je brûle et que toi t'as même pas la conviction de brûler devant moi. Est-ce que tu penses que je vois pas tout. Est-ce que tu penses que je te juge ? Tu sais c'était rien, je juge personne, sûrement moins que d'autres, alors m'écoute pas, bien sûr que je te juge pas, tu connais le all for one de James Brown, c'est extraordinaire, c'est un patchwork, le James nous refourgue des passages connus, mais il y a des instants à hauts degrés tu sais je t'aime ; mine de rien et t'es qu'un minable tu sais moi qui je suis pour dire ça ? rien tu sais, on s'est vus tellement minables dans nos yeux, tu sais le champagne, tu sais comme je savais rien dire, tu sais comme on se connaît pas est-ce que tu penses à moi tu sais pas, tu sais rien du tout je t'aime. Tu penses qu'on peut se reposer la terre entière les genoux abîmés dans l'inconnu ? T'es prêt à faire ce sacrifice toi ? Ou est-ce que tu penses qu'on est juste bons à baiser toi et moi, à être des misérables caricatures d'êtres humains et d'amour, à se colporter se radiographer dans des lits blancs, est-ce que tu penses qu'on est des photocopies ? tu sais je t'aime point et tu sais je sais rien, je sais juste que j'ai battu et que t'es bon à abattre parce que ça me fait plaisir parce que ça m'évite de penser à toi et à moi-même. Est-ce que t'as battu toi-aussi, est-ce que tu penses à moi, et comment, est-ce que tu me redessines, ou est-ce que tu as su, et qui tu es, et comment tu vis, est-ce que tu pleures des fois. Je t'aime. Tu sais c'est fou comme on s'abîme et qu'on cherche des choses qui nous ressemblent et qui nous rassemblent, tu sais c'est fou comme les gens ont peur ils ont de la bave blanche à la place du cur ils aiment épileptiquement tu sais c'est fou comme chacun vibre sans le dire à l'autre et ce qu'on se rate, et comme on se dit et qui tu es toi. Je t'aime. Tu sais, je vais penser toute la nuit comme ça, tu sais, est-ce que tu penses à moi et comment. Et comment tu y penses, c'est surtout ça l'important, comment. Tu sais je suis une malade j'ai des yeux fiévreux tu vivrais pas bien avec moi, tu sais que j'ai les yeux bioniques ? Que je te vois comme tu t'es jamais vu ? que je suis tellement sensible que je vois les gens comme jamais ils se sont vus ? Tu sais que ça fait mal ? Que je peux te faire du mal ? Je te pardonnerai pas, c'est pour ça que je suis partie, t'as dû te retrouver comme un con, je suis désolée c'était pas le but. Je t'ai envoyé bouler au troisième quart d'heure parce que les façades m'insupportent, tu sais j'aime pas le faux et je sais que t'es pas faux, m'écoute pas je voulais te faire peur, je voulais que tu t'en ailles le plus loin possible, très loin, tu sais je t'aime pas, va pas croire, je t'aime pas du tout, non, vraiment pas. T'as tellement peur tu sais, tu vis tellement pas tu sais, tu connais James Brown ? All for one ? Tu penses que des gens peuvent se rassembler et se foutre leurs dix mains sur les poignets en beuglant all for one ? Genre ils s'aiment ? Tu penses ou pas. T'es qui toi d'abord, je me souviens pas de ton nom. Si je sais comment tu t'appelles, je retiens tout, je suis une malade, tu peux pas savoir comme ma vie est une enquête et comme chaque personne ne s'oublie jamais je vis avec des fantômes, tu sais ça toi ? Oui tu sais, t'as vécu en Israël avec des cadavres de bus, t'étais un malade, t'avais ta jeunesse, là ; à baiser partout comme un porc des fois que la vie se finisse trop vite. T'es un chien, tu sais ça ? Tu me regardes comme un chien. Tu me regardes trop, là, tout de suite, tu transpires. Je t'aime, mais faut voir comme je pourrais te détraquer, tu sais j'ai pas l'oxygène facile, tu dois savoir ça toi : on m'a foutu des bombes à chaque clavier, dans les poubelles, et dans mes bus, tu sais. Tu penses à moi ou bien ? T'es qui ? T'es qui derrière tes sourires ? Est-ce que tu penses, est-ce que tu pleures, de quoi, est-ce que les êtres te font mal, est-ce que tu vis encore ou est-ce que t'es une statue, est-ce que tu as roulé comme une pierre ou est-ce que tu es si meurtri que tu pourrais offrir ta vision aux aveugles, qui tu es, est-ce que tu partages, est-ce que tu vis, est-ce que t'es frappadingue ou simplement réfrigéré dans un parking, le parking de ta vie sans rien avoir vécu, est-ce que tu te gares ou est-ce que tu vis à 180, qu'est-ce que tu vis je voudrais savoir, je voudrais tellement savoir tout de toi, je voudrais tellement être là pour toi, te recueillir là et que tu te reposes enfin, j'aimerais tellement que tu t'oublies et que tu oublies mon image et ce qui a pu te paraître de moi, tu sais on s'aime déjà et les humains c'est de la connerie, tu le sais bien toi sous les bombes, tu le sais bien avec tes bus. Tu sais bien tout ça. On sait bien ce qui nous arrive. Tu connais Janis Joplin ? Tu connais quoi ? Tu connais rien. T'es là. Interrogatif. guetter le meilleur chez les autres. Et c'est pour ça que je suis partie. Tu guettais le meilleur chez moi. Mais c'est tellement facile d'être extraordinaire. Moi je cherche une personne qui renifle mes ordures. Je sais pas si tu peux comprendre.
La joue aplatie droite sur l'oreiller - suite.

Donc posée en tranches sur un banc elle compte ses doigts.


N'avons-nous donc connu personne
pour écrire ici comme si
les lendemains
dépendaient d'un mot

Elle dira jusqu'au bout au manège (Saint-Paul) que la

la fuite et le sale temps
du type à ma gauche
me frappe de son crâne
dans les métros replié le drame
du t'as pas une clope perpétuel
sur le banc des phalanges crasses
les dérives sèches
de demain m'indiffère

Il n'y a pour elle

qu'un souffle à faire
pour que l'autrefois minute
les triples contractions
des familistères
triple amputation
des racines secondaires
le cercueil rouillé des chauves
syntaxes borgnes
des illuminés
à cafard sur le mystère
des façades obscures.

Jusqu'ici les choses sont stériles.

Germination des paradoxes
au distique évidé
l'hémistiche limaçon
gène de l'érosion
dans les seins mécaniques
d'humides congrégations
surface d'extrême-onction
de la matière livre
trépanation du canal
semi-circulaire
affectation de l'ordinaire
que l'on ne pas
solution crevée
des fracas grillagés
beuglement des cygnes
costumes de crépuscule
infection amorphe
des chiens tétraptères
des crieurs ordinaires
organe des séismes
dans les fraudes congelées
utérus blanchâtres
brumes synthétiques
cycles encaustiqués
de la poire sébacée
train de sentiments
que l'on n'éprouve pas
sonorités siccatives
des publicités polies
carcasses des becs béants
au milieu d'un temps sans bords.

Elle s'est énervée.

N'avons-nous donc connu personne
pour frémir ici comme si
les lendemains
dépendaient d'un sale mot
ivre et borgne
saluer le chômage crayeux
des cicatrices de paille
les soupirs
posés en taches rondes
sur les balafres des ruptures
jusqu'à l'obtention d'une plaie ordinaire.

Elle ne voudrait pas un jour qu'on pense que c'était une histoire de rupture, mais qu'on pense que c'était plutôt une histoire de pollution juste histoire que les choses ne disent plus rien. Que la balance s'obscurcisse. Que personne ne s'en sente touché, que personne ne reluise.
     print "\n\nSpectromie...\n\n";
open fREC, "<$recueilFile" or die "Impossible d'ouvrir le recueil !\n";
my $specFile;
if($recueilFile =~ m/^(\S+)\.\w+$/) { $specFile = $1;
} else { $specFile = $recueilFile;
} $specFile .= "_spec.txt";
open fSPEC, ">$specFile" or die "Impossible de créer le fichier log !\n";
my %Poetivites;
my %SampledRecueil;
&spectromie;
close fREC;
close fSPEC;
print "\n\nPoedilation...\n\n";
my @choix = sort( {$a <=> $b or $a cmp $b} keys(%SampledRecueil));
my $num_choix = 1;
foreach my $choice (@choix) { print "[" . sprintf("%2s",$num_choix) . "] " . $choice . "\n";
$num_choix++;
} my $zeChoix = "non";
while (!($zeChoix =~ m/^\d+$/ && $zeChoix >= 1 && $zeChoix <= scalar(@choix))) { print "\nentrer le numero du poeme choisi pour la poedilation :\n";
$zeChoix = <STDIN>;
} chomp($zeChoix);
$zeChoix--;
my $poeme_choisi = $choix[$zeChoix];
my $total_mots = 0;
foreach (keys(%{$SampledRecueil{$poeme_choisi}})) { $total_mots += scalar @{$SampledRecueil{$poeme_choisi}{$_}{"mots"}};
} print "\npoedilation de \"" . $poeme_choisi . "\" (" . $total_mots . " mots)...\n";
my $degreP = "non";
while (!($degreP =~ m/^\d+$/ && $degreP >= 1)) { print "\nEntrer le degre de poedilation :\n";
$degreP = <STDIN>;
} chomp($degreP);
&poedilation($poeme_choisi,$degreP);
open fPOE, ">poetivites.txt" or die;
foreach my $poetivite (sort( {$a <=> $b} keys(%{$Poetivites{"recueil"}}))) { print fPOE $poetivite . "\t";
foreach my $mot (@{$Poetivites{"recueil"}{$poetivite}}) { print fPOE $mot . "\t";
} print fPOE "\n";
} close fPOE;
exit(0);

 sub premierPassage {  	my $ligne;
my $compteur = 0;
my $poeme = undef;
my $nbMots;
my $lengthCumul;

while(<fREC>) {
chomp;
$ligne = $_;
my @Ligne = split(/\s+/,$ligne);
if($poeme) { $Recueil{$poeme}{"longueur_mot_moyenne"} = $lengthCumul / $nbMots;
}
$poeme = $1;

$compteur++;
$Recueil{$poeme}{"nombre_lignes"} = 0;
$nbMots = 0;
$lengthCumul = 0;
next;
}
my $nbMotsLigne = scalar(@Ligne);

if($nbMotsLigne == 0) { next;
} else { $nbMots += $nbMotsLigne;
}
$Recueil{$poeme}{"nombre_lignes"}++;

foreach my $mot (@Ligne) {
if(exists($Symboles{$mot})) { $nbMotsLigne--;
next;
} if(length($mot) == 1 && !exists($Symboles{$mot}) && !exists($Voyelles{$mot}) && !exists($Consonnes{$mot})) { $nbMotsLigne--;
next;
}
$mot = &nettoieMot($mot);

if(!exists($Mots{$mot})) { $Mots{$mot} = 1;
} else { $Mots{$mot}++;
}
$lengthCumul += length($mot);

}
} $Recueil{$poeme}{"longueur_mot_moyenne"} = $lengthCumul / $nbMots;

close fREC;

my $freqMax = 0;
my $motMax;
while((my $mot,my $freq) = each(%Mots)) { if($freq > $freqMax) { $motMax = $mot;
$freqMax = $freq;
} }
}

 use strict;
use Getopt::Long;
use List::Util qw( max );
my %Symboles = ("'"=> 0, "-"=> 0, "_"=> 0, "'"=> 0, "\""=> 0, "\\"=> 0, "/"=> 0, "|"=> 0, "«"=> 0, "»"=> 0, ""=> 0, ","=> 0, ";
"=> 0, "."=> 0, "`"=> 0, ":"=> 0, "~"=> 0, "{"=> 0, "}"=> 0, "["=> 0, "]"=> 0, "("=> 0, ")"=> 0, "+"=> 0, "="=> 0, "<"=> 0, ">"=> 0, "*"=> 0, ""=> 0, ""=> 0, "?"=> 0, "%"=> 0, "\$"=> 0, "@"=> 0, ""=> 0, "^"=> 0, ""=> 0, ""=> 0, "0"=> 0, "9"=> 0, "8"=> 0, "7"=> 0, "6"=> 0, "5"=> 0, "4"=> 0, "3"=> 0, "2"=> 0, "1"=> 0, );
my %Voyelles = ("a"=> 0, "à"=> 0, "â"=> 0, "ä"=> 0, ""=> 0, "e"=> 0, "è"=> 0, "é"=> 0, "ê"=> 0, "ë"=> 0, "i"=> 0, "î"=> 0, "ï"=> 0, ""=> 0, ""=> 0, "o"=> 0, "ô"=> 0, "ö"=> 0, ""=> 0, ""=> 0, "u"=> 0, "û"=> 0, "ü"=> 0, "ù"=> 0, ""=> 0, "y"=> 0, "A"=> 0, "E"=> 0, "I"=> 0, "O"=> 0, "U"=> 0, "Y"=> 0, );
my %Consonnes = ("b"=> 0, "c"=> 0, "ç"=> 0, "d"=> 0, "f"=> 0, "g"=> 0, "h"=> 0, "j"=> 0, "k"=> 0, "l"=> 0, "m"=> 0, "n"=> 0, "p"=> 0, "q"=> 0, "r"=> 0, "s"=> 0, "t"=> 0, "v"=> 0, "w"=> 0, "x"=> 0, "z"=> 0, "B"=> 0, "C"=> 0, "D"=> 0, "F"=> 0, "G"=> 0, "H"=> 0, "J"=> 0, "K"=> 0, "L"=> 0, "M"=> 0, "N"=> 0, "P"=> 0, "Q"=> 0, "R"=> 0, "S"=> 0, "T"=> 0, "V"=> 0, "W"=> 0, "X"=> 0, "Z"=> 0, );

my $recueilFile;
if ( !GetOptions ( 'recueil=s' => \$recueilFile ) ) { print "!!! Erreur dans la lecture de la ligne de commande\n";
exit(-1);
} if ( !defined $recueilFile ) { print "!!! Aucun fichier spécifié (option -recueil) !!\n";
exit(-1);
} my %Recueil;
my %Mots;
print "\nOuverture du recueil...\n";
open fREC, "<$recueilFile" or die "Impossible d'ouvrir le recueil !\n";
# print "\n\nPremier passage...\n\n";
&premierPassage;
close fREC;
# print "\n\nDeuxième passage...\n\n";
my %Poetivites;
open fREC, "<$recueilFile" or die "Impossible d'ouvrir le recueil !\n";
my $logFile;
if($recueilFile =~ m/^(\S+)\.\w+$/) { $logFile = $1;
} else { $logFile = $recueilFile;
} $logFile .= "_log.txt";
open fLOG, ">$logFile" or die "Impossible de créer le fichier log !\n";
&deuxiemePassage;
close fREC;
close fLOG;

 function isCloseColor($myImage,$myColor,$rref,$gref,$bref,$rmax) { 	$myRGBColor = array();
$myRGBColor = imagecolorsforindex($myImage,$myColor);
return (sqrt(pow($myRGBColor["red"]-$rref,2)+pow($myRGBColor["green"]-$gref,2)+pow($myRGBColor["blue"]-$bref,2)) < $rmax);
} function horizonoise($myImage,$dimImage,$strength) { $currColor = imagecolorat($myImage,0,0);
for($i = 0 ;
$i < $dimImage[1] ;
$i++) { for($j = 0 ;
$j < $dimImage[0] ;
$j++) {
if(rand(1,100) >= $strength) { $currColor = imagecolorat($myImage,$j,$i);
} else { imagesetpixel($myImage,$j,$i,$currColor);
}
} if($i != $dimImage[1] - 1) $currColor = imagecolorat($myImage,0,$i+1);
} } function vertinoise($myImage,$dimImage,$strength) { $currColor = imagecolorat($myImage,0,0);
for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { if(rand(1,100) >= $strength) { $currColor = imagecolorat($myImage,$i,$j);
} else { imagesetpixel($myImage,$i,$j,$currColor);
} } if($i != $dimImage[0] - 1) $currColor = imagecolorat($myImage,$i+1,0);
} } function detoureAndPaste($myImage,$myImageOrigin,$dimImage) { $backColor = imagecolorat($myImageOrigin,1,1);
for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { $currColor = imagecolorat($myImageOrigin,$i,$j);
if($currColor != $backColor) { $aRGB = array();
$aRGB = imagecolorsforindex($myImageOrigin,$currColor);
imagesetpixel($myImage,$i,$j,imagecolorclosest($myImage,$aRGB["red"],$aRGB["green"],$aRGB["blue"]));
} } } } function licqefacnoise($myImage,$dimImage) { $currColor = imagecolorat($myImage,0,0);
for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { if(rand(1,$dimImage[1]) >= intval($j*1.0)) { $currColor = imagecolorat($myImage,$i,$j);
} else { imagesetpixel($myImage,$i,$j,$currColor);
} } if($i != $dimImage[0] - 1) $currColor = imagecolorat($myImage,$i+1,0);
} } function linenoise($myImage,$dimImage,$strength,$freq) { $indexWhite = imagecolorexact($myImage,255,255,255);
if($indexWhite == -1) $indexWhite = imagecolorclosest($myImage,255,255,255);
$indexBlack = imagecolorexact($myImage,0,0,0);
if($indexBlack == -1) $indexBlack = imagecolorclosest($myImage,0,0,0);

for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { if(rand(1,$freq) >= 2) {
} else { $currColor = imagecolorat($myImage,$i,$j);

if($currColor == $indexWhite) continue;

$nb_lignes = rand(1,$strength);
drawLignes($myImage,$dimImage,$currColor,$i,$j,$nb_lignes,$strength);
} } } }

  sub deuxiemePassage {  	my $ligne;
my $indLigne;
my $lastRatio;
my $compteur = 0;
my $poeme = undef;

while(<fREC>) {
chomp;
$ligne = $_;
my @Ligne = split(/\s+/,$ligne);

if($poeme) { &retournementPoetivites ($poeme);
}
$poeme = $1;

$compteur++;
print fLOG "\tPoeme " . $compteur . " : " . $poeme . "\n";
$indLigne = 0;
$lastRatio = undef;
next;
}
my $nbMotsLigne = scalar(@Ligne);

if($nbMotsLigne == 0) { next;
}
my $mot;

$indLigne++;

for(my $indMot = 1 ;
$indMot <= $nbMotsLigne ;
$indMot++) {
$mot = $Ligne[$indMot-1];

if(exists($Symboles{$mot})) { next;
} if(length($mot) == 1 && !exists($Symboles{$mot}) && !exists($Voyelles{$mot}) && !exists($Consonnes{$mot})) { next;
}
$mot = &nettoieMot($mot);


my $poetivite = 0;

$poetivite += max(values(%Mots)) / $Mots{$mot};

my $nbLettresMot = length($mot);
$poetivite *= abs($nbLettresMot - $Recueil{$poeme}{"longueur_mot_moyenne"});

$poetivite *= 1 + $indLigne / $Recueil{$poeme}{"nombre_lignes"};

$poetivite *= 1 + $indMot / $nbMotsLigne;

my @Mot = split(//,$mot);
my $nbVoyelles = 0;
my $nbConsonnes = 0;
my $nbSymboles = 1;
foreach my $lettre (@Mot) { if (exists $Voyelles{$lettre}) { $Voyelles{$lettre}++;
$nbVoyelles ++;
} else { if (exists $Consonnes{$lettre}) { $Consonnes{$lettre}++;
$nbConsonnes ++;
} else { if (exists $Symboles{$lettre}) { $Symboles{$lettre}++;
$nbSymboles ++;
} else { print "Lettre $lettre non identifiable dans $mot à la ligne $indLigne\n";
next;
} } } } if($mot =~ m/au/) {$nbVoyelles--;
}
my $ratio = $nbVoyelles / $nbLettresMot;

if($ratio == 0 || $ratio == 1) { $poetivite *= $nbLettresMot;
if($lastRatio) { if(($lastRatio - $ratio) == 0) { $poetivite *= $nbLettresMot * $nbLettresMot;
} } } else { if($ratio < (1/3)) { $poetivite *= 1/$ratio;
if($lastRatio) { if($ratio <= $lastRatio) { $poetivite *= $lastRatio / $ratio + 1;
} } } else { if($ratio > (2/3)) { $poetivite *= 1/(1-$ratio);
if($lastRatio) { if($ratio >= $lastRatio) { $poetivite *= $ratio / $lastRatio + 1;
} } } else {$poetivite *= 1;
} } } $lastRatio = $ratio;


if($mot =~ /'/) {$nbSymboles--;
} $poetivite *= 1 + $nbSymboles;

if (exists $Symboles{$Mot[0]}) { $poetivite *= 1 + $nbSymboles;
}
$poetivite = int($poetivite + 0.5);
push(@{$Recueil{$poeme}{"Mots"}{$mot}},$poetivite);

}
}
&retournementPoetivites($poeme);
}

 sub premierPassage {  	my $ligne;
my $compteur = 0;
my $poeme = undef;
my $nbMots;
my $lengthCumul;

while(<fREC>) {
chomp;
$ligne = $_;
my @Ligne = split(/\s+/,$ligne);
if($poeme) { $Recueil{$poeme}{"longueur_mot_moyenne"} = $lengthCumul / $nbMots;
}
$poeme = $1;

$compteur++;
$Recueil{$poeme}{"nombre_lignes"} = 0;
$nbMots = 0;
$lengthCumul = 0;
next;
}
my $nbMotsLigne = scalar(@Ligne);

if($nbMotsLigne == 0) { next;
} else { $nbMots += $nbMotsLigne;
}
$Recueil{$poeme}{"nombre_lignes"}++;

foreach my $mot (@Ligne) {
if(exists($Symboles{$mot})) { $nbMotsLigne--;
next;
} if(length($mot) == 1 && !exists($Symboles{$mot}) && !exists($Voyelles{$mot}) && !exists($Consonnes{$mot})) { $nbMotsLigne--;
next;
}
$mot = &nettoieMot($mot);

if(!exists($Mots{$mot})) { $Mots{$mot} = 1;
} else { $Mots{$mot}++;
}
$lengthCumul += length($mot);

}
} $Recueil{$poeme}{"longueur_mot_moyenne"} = $lengthCumul / $nbMots;

close fREC;

my $freqMax = 0;
my $motMax;
while((my $mot,my $freq) = each(%Mots)) { if($freq > $freqMax) { $motMax = $mot;
$freqMax = $freq;
} }
}

     print "\n\nSpectromie...\n\n";
open fREC, "<$recueilFile" or die "Impossible d'ouvrir le recueil !\n";
my $specFile;
if($recueilFile =~ m/^(\S+)\.\w+$/) { $specFile = $1;
} else { $specFile = $recueilFile;
} $specFile .= "_spec.txt";
open fSPEC, ">$specFile" or die "Impossible de créer le fichier log !\n";
my %Poetivites;
my %SampledRecueil;
&spectromie;
close fREC;
close fSPEC;
print "\n\nPoedilation...\n\n";
my @choix = sort( {$a <=> $b or $a cmp $b} keys(%SampledRecueil));
my $num_choix = 1;
foreach my $choice (@choix) { print "[" . sprintf("%2s",$num_choix) . "] " . $choice . "\n";
$num_choix++;
} my $zeChoix = "non";
while (!($zeChoix =~ m/^\d+$/ && $zeChoix >= 1 && $zeChoix <= scalar(@choix))) { print "\nentrer le numero du poeme choisi pour la poedilation :\n";
$zeChoix = <STDIN>;
} chomp($zeChoix);
$zeChoix--;
my $poeme_choisi = $choix[$zeChoix];
my $total_mots = 0;
foreach (keys(%{$SampledRecueil{$poeme_choisi}})) { $total_mots += scalar @{$SampledRecueil{$poeme_choisi}{$_}{"mots"}};
} print "\npoedilation de \"" . $poeme_choisi . "\" (" . $total_mots . " mots)...\n";
my $degreP = "non";
while (!($degreP =~ m/^\d+$/ && $degreP >= 1)) { print "\nEntrer le degre de poedilation :\n";
$degreP = <STDIN>;
} chomp($degreP);
&poedilation($poeme_choisi,$degreP);
open fPOE, ">poetivites.txt" or die;
foreach my $poetivite (sort( {$a <=> $b} keys(%{$Poetivites{"recueil"}}))) { print fPOE $poetivite . "\t";
foreach my $mot (@{$Poetivites{"recueil"}{$poetivite}}) { print fPOE $mot . "\t";
} print fPOE "\n";
} close fPOE;
exit(0);

 function longLinenoise($myImage,$dimImage,$strength,$freq) { 	$indexWhite = imagecolorexact($myImage,255,255,255);
$indexBlack = imagecolorexact($myImage,0,0,0);

for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { if(rand(1,$freq) >= 20) {
} else { $currColor = imagecolorat($myImage,$i,$j);

if(isCloseColor($myImage,$currColor,255,255,255,10)) continue;

$nb_lignes = rand(1,intval($strength/10));
$length = rand(intval($strength/5),$strength);
drawLignes($myImage,$dimImage,$currColor,$i,$j,$nb_lignes,$length);
} } } } function drawLignes($myImage,$dimImage,$color,$x,$y,$nb_lignes,$max_length) { for($i = 0 ;
$i < $nb_lignes ;
$i++) { $xmin = $x-$max_length;
if($xmin < 0) $xmin = 0;
$ymin = $y-$max_length;
if($ymin < 0) $ymin = 0;
$xmax = $x+$max_length;
if($xmax > $dimImage[0] - 1) $xmax = $dimImage[0] - 1;
$ymax = $y+$max_length;
if($ymax > $dimImage[1] - 1) $ymax = $dimImage[1] - 1;
$x2 = rand($xmin,$xmax);
$y2 = rand($ymin,$ymax);
while(sqrt(pow($x2-$x,2) + pow($y2-$y,2)) > $max_length) { $xmin = $x-$max_length;
if($xmin < 0) $xmin = 0;
$ymin = $y-$max_length;
if($ymin < 0) $ymin = 0;
$xmax = $x+$max_length;
if($xmax > $dimImage[0] - 1) $xmax = $dimImage[0] - 1;
$ymax = $y+$max_length;
if($ymax > $dimImage[1] - 1) $ymax = $dimImage[1] - 1;
$x2 = rand($xmin,$xmax);
$y2 = rand($ymin,$ymax);
} imageline($myImage,$x,$y,$x2,$y2,$color);
$x = $x2;
$y = $y2;
} } function invertnoise($myImage,$dimImage,$strength) { $indexBlack = imagecolorexact($myImage,0,0,0);
if($indexBlack == -1) $indexBlack = imagecolorclosest($myImage,0,0,0);

$indexWhite = imagecolorexact($myImage,255,255,255);
if($indexWhite == -1) $indexWhite = imagecolorclosest($myImage,255,255,255);

$currColor = imagecolorat($myImage,0,0);
for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { if(rand(1,100) >= $strength) { } else { $currColor = imagecolorat($myImage,$i,$j);
if($currColor == $indexBlack) imagesetpixel($myImage,$i,$j,$indexWhite);
if($currColor == $indexWhite) imagesetpixel($myImage,$i,$j,$indexBlack);
} } } }

 function isCloseColor($myImage,$myColor,$rref,$gref,$bref,$rmax) { 	$myRGBColor = array();
$myRGBColor = imagecolorsforindex($myImage,$myColor);
return (sqrt(pow($myRGBColor["red"]-$rref,2)+pow($myRGBColor["green"]-$gref,2)+pow($myRGBColor["blue"]-$bref,2)) < $rmax);
} function horizonoise($myImage,$dimImage,$strength) { $currColor = imagecolorat($myImage,0,0);
for($i = 0 ;
$i < $dimImage[1] ;
$i++) { for($j = 0 ;
$j < $dimImage[0] ;
$j++) {
if(rand(1,100) >= $strength) { $currColor = imagecolorat($myImage,$j,$i);
} else { imagesetpixel($myImage,$j,$i,$currColor);
}
} if($i != $dimImage[1] - 1) $currColor = imagecolorat($myImage,0,$i+1);
} } function vertinoise($myImage,$dimImage,$strength) { $currColor = imagecolorat($myImage,0,0);
for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { if(rand(1,100) >= $strength) { $currColor = imagecolorat($myImage,$i,$j);
} else { imagesetpixel($myImage,$i,$j,$currColor);
} } if($i != $dimImage[0] - 1) $currColor = imagecolorat($myImage,$i+1,0);
} } function detoureAndPaste($myImage,$myImageOrigin,$dimImage) { $backColor = imagecolorat($myImageOrigin,1,1);
for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { $currColor = imagecolorat($myImageOrigin,$i,$j);
if($currColor != $backColor) { $aRGB = array();
$aRGB = imagecolorsforindex($myImageOrigin,$currColor);
imagesetpixel($myImage,$i,$j,imagecolorclosest($myImage,$aRGB["red"],$aRGB["green"],$aRGB["blue"]));
} } } } function licqefacnoise($myImage,$dimImage) { $currColor = imagecolorat($myImage,0,0);
for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { if(rand(1,$dimImage[1]) >= intval($j*1.0)) { $currColor = imagecolorat($myImage,$i,$j);
} else { imagesetpixel($myImage,$i,$j,$currColor);
} } if($i != $dimImage[0] - 1) $currColor = imagecolorat($myImage,$i+1,0);
} } function linenoise($myImage,$dimImage,$strength,$freq) { $indexWhite = imagecolorexact($myImage,255,255,255);
if($indexWhite == -1) $indexWhite = imagecolorclosest($myImage,255,255,255);
$indexBlack = imagecolorexact($myImage,0,0,0);
if($indexBlack == -1) $indexBlack = imagecolorclosest($myImage,0,0,0);

for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { if(rand(1,$freq) >= 2) {
} else { $currColor = imagecolorat($myImage,$i,$j);

if($currColor == $indexWhite) continue;

$nb_lignes = rand(1,$strength);
drawLignes($myImage,$dimImage,$currColor,$i,$j,$nb_lignes,$strength);
} } } }

 function isCloseColor($myImage,$myColor,$rref,$gref,$bref,$rmax) { 	$myRGBColor = array();
$myRGBColor = imagecolorsforindex($myImage,$myColor);
return (sqrt(pow($myRGBColor["red"]-$rref,2)+pow($myRGBColor["green"]-$gref,2)+pow($myRGBColor["blue"]-$bref,2)) < $rmax);
} function horizonoise($myImage,$dimImage,$strength) { $currColor = imagecolorat($myImage,0,0);
for($i = 0 ;
$i < $dimImage[1] ;
$i++) { for($j = 0 ;
$j < $dimImage[0] ;
$j++) {
if(rand(1,100) >= $strength) { $currColor = imagecolorat($myImage,$j,$i);
} else { imagesetpixel($myImage,$j,$i,$currColor);
}
} if($i != $dimImage[1] - 1) $currColor = imagecolorat($myImage,0,$i+1);
} } function vertinoise($myImage,$dimImage,$strength) { $currColor = imagecolorat($myImage,0,0);
for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { if(rand(1,100) >= $strength) { $currColor = imagecolorat($myImage,$i,$j);
} else { imagesetpixel($myImage,$i,$j,$currColor);
} } if($i != $dimImage[0] - 1) $currColor = imagecolorat($myImage,$i+1,0);
} } function detoureAndPaste($myImage,$myImageOrigin,$dimImage) { $backColor = imagecolorat($myImageOrigin,1,1);
for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { $currColor = imagecolorat($myImageOrigin,$i,$j);
if($currColor != $backColor) { $aRGB = array();
$aRGB = imagecolorsforindex($myImageOrigin,$currColor);
imagesetpixel($myImage,$i,$j,imagecolorclosest($myImage,$aRGB["red"],$aRGB["green"],$aRGB["blue"]));
} } } } function licqefacnoise($myImage,$dimImage) { $currColor = imagecolorat($myImage,0,0);
for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { if(rand(1,$dimImage[1]) >= intval($j*1.0)) { $currColor = imagecolorat($myImage,$i,$j);
} else { imagesetpixel($myImage,$i,$j,$currColor);
} } if($i != $dimImage[0] - 1) $currColor = imagecolorat($myImage,$i+1,0);
} } function linenoise($myImage,$dimImage,$strength,$freq) { $indexWhite = imagecolorexact($myImage,255,255,255);
if($indexWhite == -1) $indexWhite = imagecolorclosest($myImage,255,255,255);
$indexBlack = imagecolorexact($myImage,0,0,0);
if($indexBlack == -1) $indexBlack = imagecolorclosest($myImage,0,0,0);

for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { if(rand(1,$freq) >= 2) {
} else { $currColor = imagecolorat($myImage,$i,$j);

if($currColor == $indexWhite) continue;

$nb_lignes = rand(1,$strength);
drawLignes($myImage,$dimImage,$currColor,$i,$j,$nb_lignes,$strength);
} } } }

 use strict;
use Getopt::Long;
use List::Util qw( max );
my %Symboles = ("'"=> 0, "-"=> 0, "_"=> 0, "'"=> 0, "\""=> 0, "\\"=> 0, "/"=> 0, "|"=> 0, "«"=> 0, "»"=> 0, ""=> 0, ","=> 0, ";
"=> 0, "."=> 0, "`"=> 0, ":"=> 0, "~"=> 0, "{"=> 0, "}"=> 0, "["=> 0, "]"=> 0, "("=> 0, ")"=> 0, "+"=> 0, "="=> 0, "<"=> 0, ">"=> 0, "*"=> 0, ""=> 0, ""=> 0, "?"=> 0, "%"=> 0, "\$"=> 0, "@"=> 0, ""=> 0, "^"=> 0, ""=> 0, ""=> 0, "0"=> 0, "9"=> 0, "8"=> 0, "7"=> 0, "6"=> 0, "5"=> 0, "4"=> 0, "3"=> 0, "2"=> 0, "1"=> 0, );
my %Voyelles = ("a"=> 0, "à"=> 0, "â"=> 0, "ä"=> 0, ""=> 0, "e"=> 0, "è"=> 0, "é"=> 0, "ê"=> 0, "ë"=> 0, "i"=> 0, "î"=> 0, "ï"=> 0, ""=> 0, ""=> 0, "o"=> 0, "ô"=> 0, "ö"=> 0, ""=> 0, ""=> 0, "u"=> 0, "û"=> 0, "ü"=> 0, "ù"=> 0, ""=> 0, "y"=> 0, "A"=> 0, "E"=> 0, "I"=> 0, "O"=> 0, "U"=> 0, "Y"=> 0, );
my %Consonnes = ("b"=> 0, "c"=> 0, "ç"=> 0, "d"=> 0, "f"=> 0, "g"=> 0, "h"=> 0, "j"=> 0, "k"=> 0, "l"=> 0, "m"=> 0, "n"=> 0, "p"=> 0, "q"=> 0, "r"=> 0, "s"=> 0, "t"=> 0, "v"=> 0, "w"=> 0, "x"=> 0, "z"=> 0, "B"=> 0, "C"=> 0, "D"=> 0, "F"=> 0, "G"=> 0, "H"=> 0, "J"=> 0, "K"=> 0, "L"=> 0, "M"=> 0, "N"=> 0, "P"=> 0, "Q"=> 0, "R"=> 0, "S"=> 0, "T"=> 0, "V"=> 0, "W"=> 0, "X"=> 0, "Z"=> 0, );

my $recueilFile;
if ( !GetOptions ( 'recueil=s' => \$recueilFile ) ) { print "!!! Erreur dans la lecture de la ligne de commande\n";
exit(-1);
} if ( !defined $recueilFile ) { print "!!! Aucun fichier spécifié (option -recueil) !!\n";
exit(-1);
} my %Recueil;
my %Mots;
print "\nOuverture du recueil...\n";
open fREC, "<$recueilFile" or die "Impossible d'ouvrir le recueil !\n";
# print "\n\nPremier passage...\n\n";
&premierPassage;
close fREC;
# print "\n\nDeuxième passage...\n\n";
my %Poetivites;
open fREC, "<$recueilFile" or die "Impossible d'ouvrir le recueil !\n";
my $logFile;
if($recueilFile =~ m/^(\S+)\.\w+$/) { $logFile = $1;
} else { $logFile = $recueilFile;
} $logFile .= "_log.txt";
open fLOG, ">$logFile" or die "Impossible de créer le fichier log !\n";
&deuxiemePassage;
close fREC;
close fLOG;

 sub poedilation { 	my $poeme = $_[0];
my $degre = $_[1];

open fPOE, ">" . $poeme . ".txt" or die "Impossible d'ouvrir le fichier $poeme.txt !\n";
open fPTE, ">" . $poeme . "_pte.txt" or die "Impossible d'ouvrir le fichier $poeme.txt !\n";

foreach my $ligne (sort( {$a <=> $b} keys(%{$SampledRecueil{$poeme}}))) {
if(scalar(@{$SampledRecueil{$poeme}{$ligne}{"mots"}}) == 0) { print fPOE "\n";
next;
}
if(scalar(@{$SampledRecueil{$poeme}{$ligne}{"mots"}}) == 1) { print fPOE ${$SampledRecueil{$poeme}{$ligne}{"mots"}}[0] . "\n";
print fPTE ${$SampledRecueil{$poeme}{$ligne}{"poetivites"}}[0] . "\n";
next;
}
my @finalLine;
my @finalPoe;
for (my $i = 0 ;
$i < $degre ;
$i++) {
my @newLine;
my @newPoetivites;

while(scalar(@{$SampledRecueil{$poeme}{$ligne}{"mots"}}) > 1) {
my $motAvant = shift(@{$SampledRecueil{$poeme}{$ligne}{"mots"}});
my $poeAvant = shift(@{$SampledRecueil{$poeme}{$ligne}{"poetivites"}});
my $interpol = int(($poeAvant + ${$SampledRecueil{$poeme}{$ligne}{"poetivites"}}[0]) / 2);

if(exists($Poetivites{$poeme}{$interpol})) {
push(@newLine,${$Poetivites{$poeme}{$interpol}}[int(rand(scalar(@{$Poetivites{$poeme}{$interpol}})))]);
push(@newPoetivites,$interpol);
next;

}
if(exists($Poetivites{$poeme}{$interpol-1})) {
push(@newLine,${$Poetivites{$poeme}{$interpol-1}}[int(rand(scalar(@{$Poetivites{$poeme}{$interpol-1}})))]);
push(@newPoetivites,$interpol-1);
next;

}
if(exists($Poetivites{$poeme}{$interpol+1})) {
push(@newLine,${$Poetivites{$poeme}{$interpol+1}}[int(rand(scalar(@{$Poetivites{$poeme}{$interpol+1}})))]);
push(@newPoetivites,$interpol+1);
next;

}
my @poetivikeys = sort( {$a <=> $b} keys(%{$Poetivites{"recueil"}}));
my $avant = $poetivikeys[0];
my $apres = 0;
foreach my $poetivitest (@poetivikeys) {
next if($poetivitest == $avant);
if($poetivitest > $interpol) { $apres = $poetivitest;
last;
} $avant = $poetivitest;

}
if(($interpol - $avant) > ($apres - $interpol)) { push(@newLine,${$Poetivites{"recueil"}{$apres}}[int(rand(scalar(@{$Poetivites{"recueil"}{$apres}})))]);
push(@newPoetivites,$apres);
} else { push(@newLine,${$Poetivites{"recueil"}{$avant}}[int(rand(scalar(@{$Poetivites{"recueil"}{$avant}})))]);
push(@newPoetivites,$avant);
}
}
if(scalar(@{$SampledRecueil{$poeme}{$ligne}{"mots"}}) > 0) { push(@newLine,shift(@{$SampledRecueil{$poeme}{$ligne}{"mots"}}));
push(@newPoetivites,shift(@{$SampledRecueil{$poeme}{$ligne}{"poetivites"}}));
} @{$SampledRecueil{$poeme}{$ligne}{"mots"}} = @newLine;
@finalLine = @newLine;
@{$SampledRecueil{$poeme}{$ligne}{"poetivites"}} = @newPoetivites;
@finalPoe = @newPoetivites;

}
foreach my $motfinal (@finalLine) { print fPOE $motfinal . " ";
} foreach my $poefinale (@finalPoe) { print fPTE $poefinale . " ";
} print fPOE "\n";
print fPTE "\n";

}
print "\n\npoedilation OK ! (voir " . $poeme . ".txt, " . $poeme . "_pte.txt pour le spectre)\n";
close fPOE;
close fPTE;

}

 function longLinenoise($myImage,$dimImage,$strength,$freq) { 	$indexWhite = imagecolorexact($myImage,255,255,255);
$indexBlack = imagecolorexact($myImage,0,0,0);

for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { if(rand(1,$freq) >= 20) {
} else { $currColor = imagecolorat($myImage,$i,$j);

if(isCloseColor($myImage,$currColor,255,255,255,10)) continue;

$nb_lignes = rand(1,intval($strength/10));
$length = rand(intval($strength/5),$strength);
drawLignes($myImage,$dimImage,$currColor,$i,$j,$nb_lignes,$length);
} } } } function drawLignes($myImage,$dimImage,$color,$x,$y,$nb_lignes,$max_length) { for($i = 0 ;
$i < $nb_lignes ;
$i++) { $xmin = $x-$max_length;
if($xmin < 0) $xmin = 0;
$ymin = $y-$max_length;
if($ymin < 0) $ymin = 0;
$xmax = $x+$max_length;
if($xmax > $dimImage[0] - 1) $xmax = $dimImage[0] - 1;
$ymax = $y+$max_length;
if($ymax > $dimImage[1] - 1) $ymax = $dimImage[1] - 1;
$x2 = rand($xmin,$xmax);
$y2 = rand($ymin,$ymax);
while(sqrt(pow($x2-$x,2) + pow($y2-$y,2)) > $max_length) { $xmin = $x-$max_length;
if($xmin < 0) $xmin = 0;
$ymin = $y-$max_length;
if($ymin < 0) $ymin = 0;
$xmax = $x+$max_length;
if($xmax > $dimImage[0] - 1) $xmax = $dimImage[0] - 1;
$ymax = $y+$max_length;
if($ymax > $dimImage[1] - 1) $ymax = $dimImage[1] - 1;
$x2 = rand($xmin,$xmax);
$y2 = rand($ymin,$ymax);
} imageline($myImage,$x,$y,$x2,$y2,$color);
$x = $x2;
$y = $y2;
} } function invertnoise($myImage,$dimImage,$strength) { $indexBlack = imagecolorexact($myImage,0,0,0);
if($indexBlack == -1) $indexBlack = imagecolorclosest($myImage,0,0,0);

$indexWhite = imagecolorexact($myImage,255,255,255);
if($indexWhite == -1) $indexWhite = imagecolorclosest($myImage,255,255,255);

$currColor = imagecolorat($myImage,0,0);
for($i = 0 ;
$i < $dimImage[0] ;
$i++) { for($j = 0 ;
$j < $dimImage[1] ;
$j++) { if(rand(1,100) >= $strength) { } else { $currColor = imagecolorat($myImage,$i,$j);
if($currColor == $indexBlack) imagesetpixel($myImage,$i,$j,$indexWhite);
if($currColor == $indexWhite) imagesetpixel($myImage,$i,$j,$indexBlack);
} } } }

Venet (acqCanonicarum)


inVidé par awkwardist :: 23022012