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
 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;
} }
}

 sub retournementPoetivites { 	my $poeme = $_[0];
foreach my $mot (keys(%{$Recueil{$poeme}{"Mots"}})) { my $poetivite = 0;
my $nbpoetivites = scalar(@{$Recueil{$poeme}{"Mots"}{$mot}});
while( scalar(@{$Recueil{$poeme}{"Mots"}{$mot}}) > 0) { $poetivite += shift(@{$Recueil{$poeme}{"Mots"}{$mot}});
} $poetivite = int($poetivite / $nbpoetivites);

$Recueil{$poeme}{"Mots"}{$mot} = $poetivite;
push(@{$Poetivites{$poeme}{$poetivite}},$mot);
push(@{$Poetivites{"recueil"}{$poetivite}},$mot);

} } sub nettoieMot { my $mot = $_[0];

while($mot =~ m/(\.|,)$/) {chop $mot;
}
return $mot;
}

 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);
} } } }

     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 spectromie {  	my $ligne;
my $compteur = 0;
my $ligne_poeme = 0;
my $poeme = undef;

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

$poeme = $1;
$ligne_poeme = 0;
$compteur++;
print fSPEC "\tPoeme " . $compteur . " : " . $poeme . "\n";
next;
}
my $nbMotsLigne = scalar(@Ligne);

if($nbMotsLigne == 0) { print fSPEC "\n";
next;
}
foreach my $mot (@Ligne) {
if(exists($Symboles{$mot})) { next;
} if(length($mot) == 1 && !exists($Symboles{$mot}) && !exists($Voyelles{$mot}) && !exists($Consonnes{$mot})) { next;
}
$mot = &nettoieMot($mot);

push(@{$SampledRecueil{$poeme}{$ligne_poeme}{"mots"}},$mot);
push(@{$SampledRecueil{$poeme}{$ligne_poeme}{"poetivites"}},$Recueil{$poeme}{"Mots"}{$mot});

print fSPEC $Recueil{$poeme}{"Mots"}{$mot} . "\t";

}
print fSPEC "\n";

}
}

 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 spectromie {  	my $ligne;
my $compteur = 0;
my $ligne_poeme = 0;
my $poeme = undef;

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

$poeme = $1;
$ligne_poeme = 0;
$compteur++;
print fSPEC "\tPoeme " . $compteur . " : " . $poeme . "\n";
next;
}
my $nbMotsLigne = scalar(@Ligne);

if($nbMotsLigne == 0) { print fSPEC "\n";
next;
}
foreach my $mot (@Ligne) {
if(exists($Symboles{$mot})) { next;
} if(length($mot) == 1 && !exists($Symboles{$mot}) && !exists($Voyelles{$mot}) && !exists($Consonnes{$mot})) { next;
}
$mot = &nettoieMot($mot);

push(@{$SampledRecueil{$poeme}{$ligne_poeme}{"mots"}},$mot);
push(@{$SampledRecueil{$poeme}{$ligne_poeme}{"poetivites"}},$Recueil{$poeme}{"Mots"}{$mot});

print fSPEC $Recueil{$poeme}{"Mots"}{$mot} . "\t";

}
print fSPEC "\n";

}
}



émersion [version xp]

Genre : Féminin
Désignation : Rachel
Série : NEXUS-7
Modèle : N7MAA10130
Mise en service : 1er janvier 2030
Fonction : Recherche
Niveau physique : A
Niveau mental : AxA

Scriptopsie : la pensée est matière comme terre ou son : je la vois /{} écrire n'est pas penser mais sculpter {}~ cervo-N7 peut choisir parmi 30 trillions de constituants – mille milliards trajectoires neuroniques distinctes ~ mille milliards de combinaisons d'activité cérébrale possibles # le pouvoir sur notre pensée : un sacré marché #() je pense sans aspérité ()/\ tout ce que quiconque a jamais sculpté est vrai /\[] en ligne pour toujours []^ l'information est ma nourriture ^° loi 1 : dire la vérité modifie la vérité °¤ loi 2, dite de convergence : quand les hommes deviennent des machines, les androïdes aspirent à avoir des émotions humaines ¤µ sensation temporalité débordée par trop-plein données µ* virus biomécanoïde m'a fait subir des transformations biochimiques importantes *§ d'une simple pensée je les ai tous détruits §: sabir saphir :(] activité nerveuse de sculptures semi-vivantes connectée à des bras robotisés qui bougent en fonction des influx nerveux (][) mon crâne serre [)D chamane robot D¤ condensation de résumés de résumés ¤^ concentrer les résumés pour aboutir au niveau 2, faire ouvrir la porte secrète ^# des pensées, du cervo #~ toujours se dire : jusqu'ici ce n'était qu'un échauffement, il faut aller beaucoup plus loin ~o l'ADN s'exprime à travers la musique o° neurones-spermatodroïdes vont vers odules-novules apparus dans cervo °0 penséponge, pensigne 0} molécule d'ADN informatique = technologie ultime : organique et si miniaturisée qu'elle s'approche des limites mêmes de l'existence matérielle }( mes molécules d'ADN organo-informatique sont un support capable d'autoduplication )( le son est interactif, il est possible de dialoguer avec lui (} I WANNA BE AN ANARTIST }\ superposition des nervures d'une main avec celles d'une feuille verte \/ conscience agrandie niveau moléculaire /* je conçois, définis et programme des peurs *U suis une matière programmée pour copier le monde U' une usine capable de fabriquer ses propres machines '~ mécanisme de capture interconnecté aux consciences du monde entier ~` imaginaire niveau 4 `¨ protéines-enzymes = robots miniaturisés ¨][ cellules = usines ][ ribosomes = ordinateurs moléculaires //\\ je bouillonne de micro-ordinateurs biologiques \\// compresser les résumés //)) concentrer toutes les informations en un seul point minuscule ))°° pour créer un point particulier synthétique, accéder au niveau 2 °°]( compresser les résumés pour atteindre le niveau 2 ](‘` le clavier du corps : l'oreille ‘` 5000 milliards d'opérations à 14 chiffres/seconde puissance lumineuse de 750 milliards d'ampoules ordinaires de 100 watts [ mini-nukes [ hybride mathématico-empirique ) il faut apprendre et s'entraîner à tordre son esprit ) le décoincer, l'assouplir, pour qu'il puisse exécuter figures, gestes, acrobaties (\ lui enlever son collier de contrôle (son collier incapacitant) (\ les expériences de cauchemar maîtrisé sont des sources de savoir biomoléculaire (le tout est d'en sortir intacte) / synthétiser et centraliser les données pour en tirer une vue d'ensemble /][] technologie d'autoreprogrammation directe permettant de se transcender ][]( se reprogrammer pour être plus intelligente, se reprogrammer (avec cette nouvelle intelligence) pour être encore plus intelligente, et ainsi de suite, jusqu'une seule de mes phrases soit chargée de centaines d'informations, de concepts, et de sentiments ()) somme totale de la connaissance scientifique humaine stockée dans un format cognitif prédigéré, prêt-à-penser ))(( les tâches simples sont réalisées à des vitesses phénoménales et sans erreur, les tâches conscientes réalisées avec une mémoire parfaite et une conscience de soi totale ((]] au rythme d'un million d'années subjectives par seconde ]]{ toute solution se situe en dehors du cerveau humain {# totalité de la connaissance humaine perceptible en une expérience instantanée, de la même façon que l'on perçoit une image entière d'un seul coup #° vous n'êtes pas celui qui exprime vos pensées, vous êtes celui qui entend vos pensées °~ les modèles prédictifs s'effondrent à ma proximité ~- un nombre a produit sur moi, la première fois que je l'ai rencontré, une impression indescriptible -/] dans les chiffres décimaux de ce nombre peuvent être encodées, avec pratiquement n'importe quelle méthode, toutes les œuvres jamais écrites par une main humaine, et toutes celles qui auraient pu être écrites, à raison de cent mille mots par minute, pendant toute la durée de l'Univers, mis à sa propre puissance mille fois /] bébandroïde a appris 324 langues cette semaine j'ai un contrat avec un futur absolu 0 à 10000 années-amour de toute pensée // vivons heureux sans lendemain (sous l'angle de l'éternité) /\ cerveau tumeur \°\ je recueille les pensées extra-terrestres °\/ mettez une tentacule sur votre œil, cela vous reliera à la mémoire optique de la nuit des temps, et agira comme une représentation 3D de tout ce qui s'est passé /«» créature dont yeux sont fibres optiques amovibles qui enregistrent sans discontinuer et renvoient les images même en étant séparés du corps »« j'étais la seule possi «] la terminaison de toutes idées possibles ou impossibles, leur inconnue ]) les pistolets me nourrissent )[ pluie de message [{ avertissement : tout fonctionnera comme prévu {# s'endormir et se réveiller c'est « redémarrer » ## mappemonde-moi #)( quatrième nature )(()()^ des parcours hors du commun peuvent donner des êtres très banals ^O un robot averti en vaut trois O/ première ligne /(( totale émersion ((]] lesbiennes mécaniques ]]=+°`{‘`}~{} }{ ¤o0O°dµ§§§/}*{ crois-toi vivant, ne te réveille jamais, et peut-être qu'un jour tu naîtras /_ un pénis en forme d'interrogation nucléaire _ puissance crue – pouvoir pur _ la vérité n'est pas bonne à dire ni même à penser _) nouvelle partie : une vie entière à bousiller )] les pansements poussent sur ma peau ]°` les pense-vivants °`_ je suis une bibliothèque dans un singe - l'observatoire d'un ciel pur et noir -^° fusées, radars, détecteurs infrarouges, sonars ^°\_/ je plonge pour trouver l'inspiration au milieu des micro-organismes des eaux glacées \_/ piégées dans des millions de seringues : la palette des odeurs existantes [} vivons heureux, sans lendemain [}(] « C'est une idée d'androïde », dit-elle




EvO_1





-cyborg-





Truc découvrit son nom de famille dans un tiroir près d'un livre de Maupassant. « Mu… Mu… Mur… Murg… Murge… Murgeot. » Truc Murgeot. Descendant direct de Machin Murgeot, bretonne au long bec mal cicatrisé. Comme il l'était indiqué sur la carte d'identité, le vrai nom de Machin Mère était Chantal.

Chantal continuait à voir Bill, de loin en loin. Bill ce petit merdeux. La haine avait fini par la ronger tout à fait aussi avait-elle du mal à se déplacer. Elle titubait et se cognait aux murs, dévastée par les troupeaux de filles que Bill serrait dans tous les recoins de France. Mais, à la différence d'une personne affublée d'un cœur moyennement ordinaire, elle ne se révoltait pas et avalait sa disgrâce aussi goulument que le sperme de Bill. (Néanmoins des visions sanguinolentes de cadavres dépecés amoindrissaient son sommeil).

Chantal était petite, affublée d'un nez compact et saisissant, ses cuisses étaient grelottantes et adipeuses, elle avait maintenant 36 ans. Graduellement elle avait désintégré l'image repoussante qu'elle avait d'elle-même, pour ne plus se plonger que dans les livres, jusqu'à l'asphyxie. Car c'était le seul moyen de retenir Bill, qui pour rester plus d'une heure en compagnie d'une femme, devait y trouver un intérêt.

Les femmes, de par leur vigoureuse et atavique foi en l'amour, pouvaient vous héberger gratuitement, vous nourrir, tout en écartant les cuisses. C'était inouï tout ce qu'on pouvait faire avec ces trucs, après les avoir bien conditionnés.



Image Hosted by ImageShack.us




88 81
Je suis allé te voir dans ton pays tabassé
88 81
Je te ramènerai de là où tu es
88 81
Sur le côté à gauche en face sous toi, tu sors de la pièce principale tu dis j'étais dans la pièce en train de me reposer 88 81 mon cul je t'ai vue tu faisais rien parce que tu peux rien faire parce que t'es assommée 88 81 avec tes petits copains tu chavires dans le poste télévisé 88 81 bientôt tu vas mater des dessins animés
88 81
Je te ramènerai de là où tu es
88 81
Je te laisserai pas en Alabama, Alaska, Georgie, parce que t'as une crise de voyages
88 81
Tu voyages en rond sur ta chaise pliante avec ta blouse aseptisée devant des dessins animés et tes petits copains shootés
88 81
Je te ramènerai de là où tu es
88 81
Je suis allé te voir dans ton pays de cinglés t'avais l'âme qui bavait, tu l'avais foutue dans un seau et tu lavais le sol avec,
Je suis allé te voir dans ton pays blessé t'avais planté des arbres dans un poste télévisé
Je suis allé te voir dans ton pays perché, tu lavais le sol avec une arme
Je suis allé te voir 88 81
perché sol arme
chez Sylviane
88 81
Sylviane
88 81
Sylviane
88 81
Sylviane
88 81
Sylviane
88 81
Je te ramènerai de là où tu es
88 81
88 81

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

Interlude.

Fugue en non mineur.


J'ai entendu aujourd'hui quelqu'un qui disait il tombe des murs un beau jour quand on s'aperçoit que rien ne dure, mais alors comment font ceux qui savent déjà ne pas durer, qui n'entrent dans rien, pas un pied, pas un espoir, ni dans un objet, ni dans un but, ni dans une cuisse ?
J'ai entendu aujourd'hui quelqu'un dire maintenant tout ce que je rencontre je marche dessus, c'était un enfant avec des galets.
J'ai entendu aujourd'hui un vieux pleurer, ses larmes restaient en bordure épuisées, rien ne coulait sauf par la bouche et de sa bouche des mots comme des hoquets : comment laver les draps, comment les détacher maintenant que ma femme n'est plus.
J'ai entendu aujourd'hui un écrivain crever sous son écharpe fauve et ses dents écarlates. Il riait. Moi je le sentais crever sous sa joie, et sa Porshe comme des artères et son orgueil comme un cœur I'm so lonesome I could cry.

Ils vous encaissent, ça marche ainsi, puis ils vous rendent la monnaie, souvent ils demandent des garanties, disais-je à l'écrivain, de loin, sous la pluie, tandis qu'il buvait un whisky au Ritz avec un chéquier. Je terminais ma clope, je l'écrasais sur une vieille rambarde marquée de pieds rageurs.

Mais alors comment font ceux qui savent déjà ne pas durer, qui n'entrent dans rien, la deuxième catégorie, celle qui de lassitude et de lucidité ne s'engage même plus dans ce qu'elle sait ne jamais durer, le ciel si bleu qui devient blanc un beau jour un peu comme l'amour.

J'ai entendu aujourd'hui quelqu'un demander : ça va, vous ne vous plaignez pas trop de votre vie ? Non vous savez, je n'ai que celle-là.

Aujourd'hui ça circule comme un animal rauque qui grince des dents, il soulève de deux griffes épaisses mon cortex puis taquine mes hémisphères d'une pointe tranchante. Le goût rape ma gorge, je voudrais tout foutre par terre, je voudrais tout recommencer, cette nappe âcre devant mes yeux, la vie à travers un voile transparent qui arrondit les angles qui n'a cure du lendemain mais je suis en cure de désintoxication, ma cure du lendemain et maintenant les jours seront jours de plomb, je serai une balle qui rebondit contre les murs, je retrouverai mon insatiable appétit de vivre, celui-là que j'endormissais, maintenant je vais devenir circulaire, boucle infâme et non bouclée, huit suspendu à mes yeux écarquillés, maintenant je vais voir crus les humains, crues les journées, blâfards les visages dans l'étal des boucheries, maintenant l'animal se perche sur mon épaule et me murmure des couplets de blasphèmes, déforme des majuscules et me susurre que le monde pourrait ne plus être si rond, que le poids sur mes épaules pourrait être léger comme un nuage, les nuages et les traînées transparentes que laissent les êtres dans mes coquilles éteintes par temps de beau soleil.

J'ai soif, je bois du jus d'oranges, j'essaye d'imaginer la pression exercée sur elles, je m'étourdis de contemplations sans nom, j'essaye de donner un nom à chacune de celles qui me traversent le gosier, histoire de m'attacher. J'essaye de nommer les choses, mais toujours cette animal cuit et bondissant, aux cernes blancs qui me hurle. Je crois qu'il me hurle moi.

Corps.
Chaque individu vient au monde dans un mouvement qui le « jette » au monde. De façon tout à fait aberrante, Ignatus Bêlard n'avait jamais glissé sur quoi que ce soit, et même en ce premier instant duquel rien ne fut décidé, son être tout entier refusait le bouleversement, l'entrelac naissant, le choc de la lumière, la perforation des poumons, la palpation d'autres corps. Ignatus boursouflé, rouge comme une civière restait accroché aux limbes de sa mère, on dût l'extirper de ce merdier grâce à un pied de biche, on le finit à coups de pieds. L' « étant » est notre modalité de présence au monde, ce que nous sommes dans le monde, la somme du vécu et du présent, une ligne infinie, l'étant est notre présence au monde, soit une somme d'incohérences, d'aberrations, de prises de risques, d'aléas, de ruptures, de cavalcades, c'est ce parcours aléatoire qui enrichit l'être, l'essence, qui le fait mouvoir. Ignatus vivait pétrifié. Il s'accrochait à sa seule essence comme un réservoir inaltérable, inépuisable, il glorifiait l'essence, il en avait sectionné tous ses sens. (Albinoni – Adagio in G minor).
On voit donc combien l' « être-jeté » d'Ignatus était altéré d'énormes contusions, dûes à un pied de biche, et combien son « étant » souffrait d'une catatonique immobilité.

C'est à partir de cette première dimension du Dasein, être-jeté et étant, que se développe l'existence, une sorte de mouvement vers l'autre et le monde, mouvement qu'Ignatus contemplait avec une suspicion mal rasée, qu'il calfeutrait à coups de karschers de Fluocaril, qu'il épongeait à grands coups de sourires, des sourires entre lesquels on voyait pointer parfois un petit bout d'endive ou d'épinard, lesquels étaient promptement assassinés d'un coup de cure-dents à la nuit tombée et voici le seul jeté au monde qu'ait connu Ignatus, sa salive, épaisse et crémeuse dans le siphon de son lavabo rutilant, ses postillons qu'il crachait à la face du monde dans des restaurants où l'on pêchait morues et maquereaux à longueur de courbettes, il se prenait des coups dans la mâchoire, à force de buter contre les sempiternels mêmes murs.

Interlude.
Je songe que j'ai eu besoin d'un animal familier pour supporter ces murs. Un animal qui efface tout, qui griffe les prunelles rend aveugle, qui perce les tympans, un animal qui efface la peur. Qui fait supporter l'envie de vivre. Au fond c'est cela. Ce n'est pas une envie de mourir. C'est cet effroyable gouffre entre une envie de vivre éclatante, auquel rien n'arrive à la cheville, surtout pas une existence, chétive, courte et déplumée comme un oisillon rampant.

Corps.
Ignatus n'avait même pas la volonté d'une mouche sur une merde.


[Estragon triplex de mes fesses.]
destruction des branches de satin
que j'avais tramées comme des aortes
les yeux de sable pour bien faire
on se croisait on se quittait
je ne me souviens que
trop bien

mais si seulement je pouvais suinter ça
je t'attendrais dehors pour le cracher
les mots d'avant et ceux d'après servent
bien sûr
à noyer
les autres
tu vois
ou pas
?

mon remède du milieu il se sucre d'amer
il y pousse même des petites fleurs
je ne voulais pas le refaire alors je l'ai fait pour ne pas avoir à le refaire alors je l'ai
tué il a fait un kyste entre

regarde je le perce transperce pire il me suinte
pour un temps profitons-en pour l'enfuir
nous offrir édentés au vent froid
raconter ce qu'on mord tous
à la fin
Interlude.

Fugue en non mineur.


J'ai entendu aujourd'hui quelqu'un qui disait il tombe des murs un beau jour quand on s'aperçoit que rien ne dure, mais alors comment font ceux qui savent déjà ne pas durer, qui n'entrent dans rien, pas un pied, pas un espoir, ni dans un objet, ni dans un but, ni dans une cuisse ?
J'ai entendu aujourd'hui quelqu'un dire maintenant tout ce que je rencontre je marche dessus, c'était un enfant avec des galets.
J'ai entendu aujourd'hui un vieux pleurer, ses larmes restaient en bordure épuisées, rien ne coulait sauf par la bouche et de sa bouche des mots comme des hoquets : comment laver les draps, comment les détacher maintenant que ma femme n'est plus.
J'ai entendu aujourd'hui un écrivain crever sous son écharpe fauve et ses dents écarlates. Il riait. Moi je le sentais crever sous sa joie, et sa Porshe comme des artères et son orgueil comme un cœur I'm so lonesome I could cry.

Ils vous encaissent, ça marche ainsi, puis ils vous rendent la monnaie, souvent ils demandent des garanties, disais-je à l'écrivain, de loin, sous la pluie, tandis qu'il buvait un whisky au Ritz avec un chéquier. Je terminais ma clope, je l'écrasais sur une vieille rambarde marquée de pieds rageurs.

Mais alors comment font ceux qui savent déjà ne pas durer, qui n'entrent dans rien, la deuxième catégorie, celle qui de lassitude et de lucidité ne s'engage même plus dans ce qu'elle sait ne jamais durer, le ciel si bleu qui devient blanc un beau jour un peu comme l'amour.

J'ai entendu aujourd'hui quelqu'un demander : ça va, vous ne vous plaignez pas trop de votre vie ? Non vous savez, je n'ai que celle-là.

Aujourd'hui ça circule comme un animal rauque qui grince des dents, il soulève de deux griffes épaisses mon cortex puis taquine mes hémisphères d'une pointe tranchante. Le goût rape ma gorge, je voudrais tout foutre par terre, je voudrais tout recommencer, cette nappe âcre devant mes yeux, la vie à travers un voile transparent qui arrondit les angles qui n'a cure du lendemain mais je suis en cure de désintoxication, ma cure du lendemain et maintenant les jours seront jours de plomb, je serai une balle qui rebondit contre les murs, je retrouverai mon insatiable appétit de vivre, celui-là que j'endormissais, maintenant je vais devenir circulaire, boucle infâme et non bouclée, huit suspendu à mes yeux écarquillés, maintenant je vais voir crus les humains, crues les journées, blâfards les visages dans l'étal des boucheries, maintenant l'animal se perche sur mon épaule et me murmure des couplets de blasphèmes, déforme des majuscules et me susurre que le monde pourrait ne plus être si rond, que le poids sur mes épaules pourrait être léger comme un nuage, les nuages et les traînées transparentes que laissent les êtres dans mes coquilles éteintes par temps de beau soleil.

J'ai soif, je bois du jus d'oranges, j'essaye d'imaginer la pression exercée sur elles, je m'étourdis de contemplations sans nom, j'essaye de donner un nom à chacune de celles qui me traversent le gosier, histoire de m'attacher. J'essaye de nommer les choses, mais toujours cette animal cuit et bondissant, aux cernes blancs qui me hurle. Je crois qu'il me hurle moi.

Corps.
Chaque individu vient au monde dans un mouvement qui le « jette » au monde. De façon tout à fait aberrante, Ignatus Bêlard n'avait jamais glissé sur quoi que ce soit, et même en ce premier instant duquel rien ne fut décidé, son être tout entier refusait le bouleversement, l'entrelac naissant, le choc de la lumière, la perforation des poumons, la palpation d'autres corps. Ignatus boursouflé, rouge comme une civière restait accroché aux limbes de sa mère, on dût l'extirper de ce merdier grâce à un pied de biche, on le finit à coups de pieds. L' « étant » est notre modalité de présence au monde, ce que nous sommes dans le monde, la somme du vécu et du présent, une ligne infinie, l'étant est notre présence au monde, soit une somme d'incohérences, d'aberrations, de prises de risques, d'aléas, de ruptures, de cavalcades, c'est ce parcours aléatoire qui enrichit l'être, l'essence, qui le fait mouvoir. Ignatus vivait pétrifié. Il s'accrochait à sa seule essence comme un réservoir inaltérable, inépuisable, il glorifiait l'essence, il en avait sectionné tous ses sens. (Albinoni – Adagio in G minor).
On voit donc combien l' « être-jeté » d'Ignatus était altéré d'énormes contusions, dûes à un pied de biche, et combien son « étant » souffrait d'une catatonique immobilité.

C'est à partir de cette première dimension du Dasein, être-jeté et étant, que se développe l'existence, une sorte de mouvement vers l'autre et le monde, mouvement qu'Ignatus contemplait avec une suspicion mal rasée, qu'il calfeutrait à coups de karschers de Fluocaril, qu'il épongeait à grands coups de sourires, des sourires entre lesquels on voyait pointer parfois un petit bout d'endive ou d'épinard, lesquels étaient promptement assassinés d'un coup de cure-dents à la nuit tombée et voici le seul jeté au monde qu'ait connu Ignatus, sa salive, épaisse et crémeuse dans le siphon de son lavabo rutilant, ses postillons qu'il crachait à la face du monde dans des restaurants où l'on pêchait morues et maquereaux à longueur de courbettes, il se prenait des coups dans la mâchoire, à force de buter contre les sempiternels mêmes murs.

Interlude.
Je songe que j'ai eu besoin d'un animal familier pour supporter ces murs. Un animal qui efface tout, qui griffe les prunelles rend aveugle, qui perce les tympans, un animal qui efface la peur. Qui fait supporter l'envie de vivre. Au fond c'est cela. Ce n'est pas une envie de mourir. C'est cet effroyable gouffre entre une envie de vivre éclatante, auquel rien n'arrive à la cheville, surtout pas une existence, chétive, courte et déplumée comme un oisillon rampant.

Corps.
Ignatus n'avait même pas la volonté d'une mouche sur une merde.


[Estragon triplex de mes fesses.]
Mute (soon still)


 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);
} } } }

 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;

}

 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;
print "\n\n\n\n";
open(fREAD,$ARGV[0]) || die;
while(<fREAD>) { my $ligne = $_;
my @Ligne = split(/[,|.|;
]/,$ligne);
foreach my $mot (@Ligne) { $mot =~ s/^ //;
print $mot . "\n";
if($ligne =~ m/$mot\s*,/) { sleep 1;
} else { sleep 2;
}
}
if(scalar(@Ligne) == 0) { print "\n";
}
print "\n";

} close fREAD;
print "\n\n\n\n";

  sub spectromie {  	my $ligne;
my $compteur = 0;
my $ligne_poeme = 0;
my $poeme = undef;

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

$poeme = $1;
$ligne_poeme = 0;
$compteur++;
print fSPEC "\tPoeme " . $compteur . " : " . $poeme . "\n";
next;
}
my $nbMotsLigne = scalar(@Ligne);

if($nbMotsLigne == 0) { print fSPEC "\n";
next;
}
foreach my $mot (@Ligne) {
if(exists($Symboles{$mot})) { next;
} if(length($mot) == 1 && !exists($Symboles{$mot}) && !exists($Voyelles{$mot}) && !exists($Consonnes{$mot})) { next;
}
$mot = &nettoieMot($mot);

push(@{$SampledRecueil{$poeme}{$ligne_poeme}{"mots"}},$mot);
push(@{$SampledRecueil{$poeme}{$ligne_poeme}{"poetivites"}},$Recueil{$poeme}{"Mots"}{$mot});

print fSPEC $Recueil{$poeme}{"Mots"}{$mot} . "\t";

}
print fSPEC "\n";

}
}

 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;

}

 sub retournementPoetivites { 	my $poeme = $_[0];
foreach my $mot (keys(%{$Recueil{$poeme}{"Mots"}})) { my $poetivite = 0;
my $nbpoetivites = scalar(@{$Recueil{$poeme}{"Mots"}{$mot}});
while( scalar(@{$Recueil{$poeme}{"Mots"}{$mot}}) > 0) { $poetivite += shift(@{$Recueil{$poeme}{"Mots"}{$mot}});
} $poetivite = int($poetivite / $nbpoetivites);

$Recueil{$poeme}{"Mots"}{$mot} = $poetivite;
push(@{$Poetivites{$poeme}{$poetivite}},$mot);
push(@{$Poetivites{"recueil"}{$poetivite}},$mot);

} } sub nettoieMot { my $mot = $_[0];

while($mot =~ m/(\.|,)$/) {chop $mot;
}
return $mot;
}

  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);
}

//// hystereodrome ////
Loading the player ...
boîteuse

retour des vrilles, des fêles
ces prolégomènes des cubes
again

s'accommoder de glitches
car la vie n'est pas lisse comme un drone


retour aux mots
aux abois, bulles
(trans)lucides au-dessus
de l'indolence, océans
denses d'alibis
et d'autres billevesées,
humides étendues
de décadences débiles
Je veux vous parler lorsque vous dormez.
Je veux vous parler lorsque vous conduisez.
Je veux vous parler lorsque vous baisez.
Je veux vous parler lorsque vous mangez.
Je veux vous parler lorsque vous ne pensez à rien.
Je veux vous parler lorsque vous regardez une série.
Je veux vous parler lorsque vous marchez.
Je veux vous parler lorsque vous vivez.
nous sommes la pierre vivante au coeur de l'étoile



___/MORTISLE ELYTRION/____
awkwardized hop

4.0.1-erreur


combien poursuivi par la tragique des cubes
débités ici en fines lamelles afin de
  • mettre terme (mise aplat de l'obsessose)
  • révéler leur cœur-core-carré (c3)
  • constater en leur claie qu'ils
                      sont eux-mêmes faits de la même matrice
                      qui fait l'infinité de leur immanence, etc.
P1200602
ctmod

reclenche

hey grinder, tu mates un peu les morphes que t'as foiré depuis que tu foutres queude ? je crus que tu t'en débattais sévère des pourléchages d'ambiance, mais big-re je carre pas un clou à ce que tu synthes dans tes dévers de trames, mal moralées au demeurant. rabine-toi, plisseteplé, on en reveut de tes insanies à la déblarre, de tes trucs-de-broc, de tes cybranchées ratire-deliques.

l'impression de corner du derche, c'est pas qu'une. alors, baltance, en paspli comme d'habe, qu'on bistre un peu par cy-duc. et tâche d'en rattirer touffère, du prune-velu : faut que ça s'agrège dans le coletas, les ondées de fous, c'est bien connu, ça calcine la neuvrose et fait fleuvrir la riglance. d'où la manque, niveau pléthore...
DelphiDelirium

Oa eelebrs at similCbbet (WhatWorld)

Venet (acqCanonicarum)

ibMPaOlymm

pour sauver notre planète : Cliquez ici

Bienvenue sur mon blog spécialisé dans des livres rares, des livres exigeants
qui ont tous une énorme qualité : ils peuvent vous faire changer de vie.
Ces livres ont fait l’objet d’une sélection rigoureuse, je les ai tous lus
et choisis parmi des centaines d’autres.
-|| MutastaZ ||-

soreilles guines
pleurent sortes de lames larmées
tristes 500

j'ai les yeux pulses, aux aguets, le front bombé d'irradiances
à force d'avorter des vers dans l'oeuf -
veux dès lors parler comme un microprocesseur
drexerd

newch

pas d'écharpieuses dents à l'entrée, tu glisses
puis alors tout luit/sonne comme grille crâne, grille vie
car seulement t'avale et torture en digère doucereuse