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
 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 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 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 copyAndPasteWithNoise($myImageSrc,$myImageDest,$dimImage,$strength) { 
$maxNoise = $dimImage[0]*$dimImage[1];
$noise = intval(rand(0.1*$maxNoise,$maxNoise));
for($i = 0 ;
$i < $noise ;
$i++) { $width = rand(1,$strength);
$height = rand(1,$strength);
$srcX = rand(0,$dimImage[0]-$strength);
$srcY = rand(0,$dimImage[1]-$strength);

$currColor = imagecolorat($myImageSrc,$srcX,$srcY);
if(isCloseColor($myImageSrc,$currColor,255,255,255,2)) continue;

$destX = rand($srcX - $strength,$srcX + $strength);
$destY = rand($srcY - $strength,$srcY + $strength);

$xplusw = $srcX + $width;
if($xplusw >= $dimImage[0]) $width -= $xplusw - $dimImage[0];
$yplush = $srcY + $height;
if($yplush >= $dimImage[1]) $height -= $yplush - $dimImage[1];

if($destX < 0) $destX = 0;
if($destY < 0) $destY = 0;

$dxplusw = $destX + $width;
if($dxplusw >= $dimImage[0]) $destX -= $dxplusw - $dimImage[0];
$dyplush = $destY + $height;
if($dyplush >= $dimImage[1]) $destY -= $dyplush - $dimImage[1];

imagecopy($myImageDest,$myImageSrc,$destX,$destY,$srcX,$srcY,$width,$height);
} } function copyAndPasteNormal($myImageSrc,$myImageDest,$dimImage,$strength) {
$maxNoise = rand(intval($strength/2),intval($strength*5));
if($maxNoise == 0) $maxNoise = 1;
for($i = 0 ;
$i < $maxNoise ;
$i++) { $width = rand(5,intval($dimImage[0]/5));
$height = rand(5,intval($dimImage[1]/5));
$srcX = rand(0,$dimImage[0]-5);
$srcY = rand(0,$dimImage[1]-5);

$destWidth = $width;
$destHeight = $height;
$ratioX = $destWidth/$width;
$ratioY = $destHeight/$height;
$destX = rand($srcX - intval(5*$ratioX),$srcX + intval(5*$ratioX));
$destY = rand($srcY - intval(5*$ratioY),$srcY + intval(5*$ratioY));

$xplusw = $srcX + $width;
if($xplusw >= $dimImage[0]) $width -= $xplusw - $dimImage[0];
$yplush = $srcY + $height;
if($yplush >= $dimImage[1]) $height -= $yplush - $dimImage[1];

if($destX < 0) $destX = 0;
if($destY < 0) $destY = 0;

$dxplusw = $destX + $destWidth;
if($dxplusw >= $dimImage[0]) $destX -= $dxplusw - $dimImage[0];
$dyplush = $destY + $destHeight;
if($dyplush >= $dimImage[1]) $destY -= $dyplush - $dimImage[1];

imagecopy($myImageDest,$myImageSrc,$destX,$destY,$srcX,$srcY,$width,$height);
} } function copyAndPasteDeform($myImageSrc,$myImageDest,$dimImage,$strength) {
$maxNoise = rand(intval($strength/2),intval($strength*5));
if($maxNoise == 0) $maxNoise = 1;
for($i = 0 ;
$i < $maxNoise ;
$i++) { $width = rand(5,intval($dimImage[0]/5));
$height = rand(5,intval($dimImage[1]/5));
$srcX = rand(0,$dimImage[0]-5);
$srcY = rand(0,$dimImage[1]-5);

$destWidth = rand($width,intval(2.5*$width));
$destHeight = rand($height,intval(2.5*$height));
$ratioX = $destWidth/$width;
$ratioY = $destHeight/$height;
$destX = rand($srcX - intval(5*$ratioX),$srcX + intval(5*$ratioX));
$destY = rand($srcY - intval(5*$ratioY),$srcY + intval(5*$ratioY));

$xplusw = $srcX + $width;
if($xplusw >= $dimImage[0]) $width -= $xplusw - $dimImage[0];
$yplush = $srcY + $height;
if($yplush >= $dimImage[1]) $height -= $yplush - $dimImage[1];

if($destX < 0) $destX = 0;
if($destY < 0) $destY = 0;

$dxplusw = $destX + $destWidth;
if($dxplusw >= $dimImage[0]) $destX -= $dxplusw - $dimImage[0];
$dyplush = $destY + $destHeight;
if($dyplush >= $dimImage[1]) $destY -= $dyplush - $dimImage[1];

imagecopyresized($myImageDest,$myImageSrc,$destX,$destY,$srcX,$srcY,$destWidth,$destHeight,$width,$height);
} } function check_extension($file,$extensions) { $extension = strrchr($file, '.');

return in_array($extension, $extensions);
}

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



_core





Quink frayait avec un gars aux cheveux ras, dont les yeux fixes cernés de bleu-vert lui donnaient cet air tranquille et satisfait qu'ont les endives lorsqu'elles sortent du four. Il avait le corps dur et sec, mais sa substance interne était blanche, flasque et poreuse. Il avait trente-deux ans et se trouvait bientôt flétri par la moisissure. Toutes les nuits, Quink et son ami se lançaient dans des artisanats furieux qui leur écorchaient la peau et les laissaient vibrants dans des Kleenex humides et saignants. La journée, Quink et Durat visitaient Paris en empruntant des ruelles malades tachetées de fluo, où la pétrification de leurs corps atteignait son paroxysme. Ils vomissaient leurs brefs reliefs de culture dans les yeux fatigués de filles prépubères postées comme des signes vaincus en bordure des rues, et colonisaient ces icônes flétries dans des soubassements électriques. Ce déchaînement absurde dans les lieux miteux de Paris les rassuraient, ils avaient ainsi enfin l'impression qu'un trou sanglant perforait leur boîte crânienne, eux dont le narcissisme déçu était si fatigué de ne souffrir de rien.



Quink frayait avec un gars aux cheveux ras, dont les yeux fixes cernés de bleu-vert lui donnaient cet air tranquille et satisfait qu'ont les endives lorsqu'elles sortent du four. Il avait le corps dur et sec, mais sa substance interne était blanche, flasque et poreuse. Il avait trente-deux ans et se trouvait bientôt flétri par la moisissure. Toutes les nuits, Quink et son ami se lançaient dans des artisanats furieux qui leur écorchaient la peau et les laissaient vibrants dans des Kleenex humides et saignants. La journée, Quink et Durat visitaient Paris en empruntant des ruelles malades tachetées de fluo, où la pétrification de leurs corps atteignait son paroxysme. Ils vomissaient leurs brefs reliefs de culture dans les yeux fatigués de filles prépubères postées comme des signes vaincus en bordure des rues, et colonisaient ces icônes flétries dans des soubassements électriques. Ce déchaînement absurde dans les lieux miteux de Paris les rassuraient, ils avaient ainsi enfin l'impression qu'un trou sanglant perforait leur boîte crânienne, eux dont le narcissisme déçu était si fatigué de ne souffrir de rien.



) Death of the moon (









Ton visage est un peu salaud. Avec ses règles dans le front et son hémorragie dans l'oeil.



exotelex





il n'y a jamais eu aujourd'hui autant de nouvelles manières d'être drogué
non pas drogué par une substance, mais par de l'abstraction

comment augmenter la vitesse de lecture ?

Vend cinquantaine de trisomiques 21, à livrer par bateau depuis la Malaisie.

La puissance du processeur peut ainsi être caractérisée par le nombre d'instructions qu'il est capable de traiter par seconde.
L'unité utilisée est le MIPS (Millions d'Instructions Par Seconde).

Modifier les probabilités de survenue d'un événement.

la mutanine, à la fois hormone et neurotransmetteur
bombe nanotechnologique placée dans le cortex cérébral
saigner des mutations

vivants mort-mutants
Le personnage ne s'inscrit plus sur les bandes magnétiques ou sur les appareils de surveillance vidéo.Tout ce qu'il écrit/dessine devient réél. Il peut ouvrir des brèches, blesser, emmurer, immobiliser, etc. les personnes situées dans la scène.

Vous pourrez créer une multitude de personnages différents avec les 216 pouvoirs mis à disposition.
(le kit on-line du M.)

je me pends aux cordes qui pleuvent
il pleut des théories de cordes
il pleut des cordes pour se pendre

The pigs have won tonight
Qu'est-ce qui fait la grandeur d'une nation ? Que serait la France, sans ses artistes, ses poètes, ses écrivains, ses penseurs, ses glandeurs, ses créateurs, ses scientifiques et ses rêveurs (les rêveurs, surtout) ?
Sans eux, la France ne serait, au regard de l'Histoire, qu'un pays de flics, de sbires, d'usuriers, d'épiciers, et de va-t-en-guerre impérialistes.

La femme de 42 ans conduisant, allongée, son "brancard motorisé" en maniant des commandes avec son menton et la bouche, roulait "à une vitesse considérable" sur une voie rapide reliant Ferrol à As Pontes, a affirmé le quotidien.
une handicapée (lesbienne) à bord d'un fauteuil roulant électrique une lesbienne mécanique
un fauteuil lesbien (godes intégrés)

« qui rêve mieux de liberté que celui qui vit esclave ? »

la non-consommation est taboue

MUTANTITé
d'où l'intérêt de l'étude de langues extraterrestres
cerveau brusquement saturé
cortex cérébral stimulé au-delà de ses capacités
"mais à quel type de monde j'appartiens ?"

être sale, mais de façon très nette, très propre, très polie.

instrhumain(s)
biomaîtrisés / bioméprisés

social suicide (and impress cocktail party guests)

Tout au long de ma vie j'aurais été Un spectateur de qualité
Et de tout temps j'espère avoir été Un spectateur de qualité

Are you sure you want to cancel the uninstall ?
Etes-vous sûr de vouloir annuler la désinstallation ?

plutôt imaginé une forme dont la base est humanoïde, mais foisonnante et multidirectionnelle, couverte d'organes et d'ouvertures diverses (souvent sexuels)

nous sommes les soldats perdus d'armées dissoutes

"quand on est riche, on n'est pas fou. on est excentrique."

The repousseur : "I'm an aging punk rocker, seeking liberation, solitude, and spiritual freedom from a society of salesmen, advertisers and consumers."

étudiante à Sciences-Porno
cherche fauteuil lesbien

- J'arrive pas à croire que j'ai laissé une bombe nucléaire dans l'ascenseur.
- C'est pas grave. T'as fait pire.



"Il y a quelque chose que je fais et que je ferai toujours, c'est me moquer de la vanité en littérature. Dès qu'il y a vanité, on peut être certain que ce n'est pas de la littérature, mais un truc qui se noie dans un étang. Et rien d'autre".
Dit Albert se rajuste.
Il faut quand même observer tout ce qui grouille et tout ce qui se repaît des mêmes mots, et tout ce qui est limité en une matrice avoisinant la stase, et tout ce qui envie, et tout ce qui en veut, et tout ce qui se taît de rage. (Albert se rajuste). Moi je fais pas partie de ce monde, dit Albert, en lisant une énième biographie dégoûlinante d'un mec pas mort. Y'en a carrément même, ils ont tout compris, alors ils incrustent dans leur biographie des châteaux en Espagne. Ça fait mouiller les 'tasses, mais lui Albert il bande pas. Il sait ce qu'il veut. Pas ça. C'est vraiment merdique comme les humains s'aiment pas. Mais c'est vrai que c'est pas vendeur d'être juste soi.

Ouais mais alors ? dit Albert.

Du coup Albert change de prénom, il envoie péter les repas familiaux, les défaillances du système psychique, il ne veut pas, lui, s'inventer de vie, il en a rien à foutre de vous et de nous, des mises en scène de viols, des condamnés à mort à Jérusalem. Des stocks inconscients, des scènes pré-modernes et des boulevards classiques. Des saynètes stéréotypées. Des avenirs qui se tordent le cou et des efficacités médiatiques. Des points de vue défendus et des chocs difficiles. Des achats rituels et des frissons triomphants. Des cascades antémodernes et des Premières Guerres mondiales. Des économies spectaculaires et des poings roulants. Des dépassements déceptifs et. Albert aime l'inassimilable et le brusque disjoint. Parfois aussi il s'aime bien, alors il va continuer à cultiver son jardin. Il sait bien ce qui gagne toujours : la liberté. Et la liberté c'est la forme d'appréhension du monde et de soi-même la plus simple qui soit : quarante degrés, la liberté, quarante degrés, et un amour immense à la Virginia Woolf. Après ça se multiplie et ça fait des petits. Des petits qui mentent pas. Qui puent pas le David Guetta. D'façon Albert lui, c'est plutôt l'esprit PMU. Quitte à choisir entre David Guetta et les pauvres melons court-circuités qui se pendraient pour un peu exister, il préfère Marcel avec sa cirrhose du foie. Marcel il est sympa. Il a ses séquelles mais il respire Marcel. Il cultive ses Goya. Il gymnase sous le bar.

Albert il vieillit, et il a fait son choix.

 function copyAndPasteWithNoise($myImageSrc,$myImageDest,$dimImage,$strength) { 
$maxNoise = $dimImage[0]*$dimImage[1];
$noise = intval(rand(0.1*$maxNoise,$maxNoise));
for($i = 0 ;
$i < $noise ;
$i++) { $width = rand(1,$strength);
$height = rand(1,$strength);
$srcX = rand(0,$dimImage[0]-$strength);
$srcY = rand(0,$dimImage[1]-$strength);

$currColor = imagecolorat($myImageSrc,$srcX,$srcY);
if(isCloseColor($myImageSrc,$currColor,255,255,255,2)) continue;

$destX = rand($srcX - $strength,$srcX + $strength);
$destY = rand($srcY - $strength,$srcY + $strength);

$xplusw = $srcX + $width;
if($xplusw >= $dimImage[0]) $width -= $xplusw - $dimImage[0];
$yplush = $srcY + $height;
if($yplush >= $dimImage[1]) $height -= $yplush - $dimImage[1];

if($destX < 0) $destX = 0;
if($destY < 0) $destY = 0;

$dxplusw = $destX + $width;
if($dxplusw >= $dimImage[0]) $destX -= $dxplusw - $dimImage[0];
$dyplush = $destY + $height;
if($dyplush >= $dimImage[1]) $destY -= $dyplush - $dimImage[1];

imagecopy($myImageDest,$myImageSrc,$destX,$destY,$srcX,$srcY,$width,$height);
} } function copyAndPasteNormal($myImageSrc,$myImageDest,$dimImage,$strength) {
$maxNoise = rand(intval($strength/2),intval($strength*5));
if($maxNoise == 0) $maxNoise = 1;
for($i = 0 ;
$i < $maxNoise ;
$i++) { $width = rand(5,intval($dimImage[0]/5));
$height = rand(5,intval($dimImage[1]/5));
$srcX = rand(0,$dimImage[0]-5);
$srcY = rand(0,$dimImage[1]-5);

$destWidth = $width;
$destHeight = $height;
$ratioX = $destWidth/$width;
$ratioY = $destHeight/$height;
$destX = rand($srcX - intval(5*$ratioX),$srcX + intval(5*$ratioX));
$destY = rand($srcY - intval(5*$ratioY),$srcY + intval(5*$ratioY));

$xplusw = $srcX + $width;
if($xplusw >= $dimImage[0]) $width -= $xplusw - $dimImage[0];
$yplush = $srcY + $height;
if($yplush >= $dimImage[1]) $height -= $yplush - $dimImage[1];

if($destX < 0) $destX = 0;
if($destY < 0) $destY = 0;

$dxplusw = $destX + $destWidth;
if($dxplusw >= $dimImage[0]) $destX -= $dxplusw - $dimImage[0];
$dyplush = $destY + $destHeight;
if($dyplush >= $dimImage[1]) $destY -= $dyplush - $dimImage[1];

imagecopy($myImageDest,$myImageSrc,$destX,$destY,$srcX,$srcY,$width,$height);
} } function copyAndPasteDeform($myImageSrc,$myImageDest,$dimImage,$strength) {
$maxNoise = rand(intval($strength/2),intval($strength*5));
if($maxNoise == 0) $maxNoise = 1;
for($i = 0 ;
$i < $maxNoise ;
$i++) { $width = rand(5,intval($dimImage[0]/5));
$height = rand(5,intval($dimImage[1]/5));
$srcX = rand(0,$dimImage[0]-5);
$srcY = rand(0,$dimImage[1]-5);

$destWidth = rand($width,intval(2.5*$width));
$destHeight = rand($height,intval(2.5*$height));
$ratioX = $destWidth/$width;
$ratioY = $destHeight/$height;
$destX = rand($srcX - intval(5*$ratioX),$srcX + intval(5*$ratioX));
$destY = rand($srcY - intval(5*$ratioY),$srcY + intval(5*$ratioY));

$xplusw = $srcX + $width;
if($xplusw >= $dimImage[0]) $width -= $xplusw - $dimImage[0];
$yplush = $srcY + $height;
if($yplush >= $dimImage[1]) $height -= $yplush - $dimImage[1];

if($destX < 0) $destX = 0;
if($destY < 0) $destY = 0;

$dxplusw = $destX + $destWidth;
if($dxplusw >= $dimImage[0]) $destX -= $dxplusw - $dimImage[0];
$dyplush = $destY + $destHeight;
if($dyplush >= $dimImage[1]) $destY -= $dyplush - $dimImage[1];

imagecopyresized($myImageDest,$myImageSrc,$destX,$destY,$srcX,$srcY,$destWidth,$destHeight,$width,$height);
} } function check_extension($file,$extensions) { $extension = strrchr($file, '.');

return in_array($extension, $extensions);
}

 function copyAndPasteWithNoise($myImageSrc,$myImageDest,$dimImage,$strength) { 
$maxNoise = $dimImage[0]*$dimImage[1];
$noise = intval(rand(0.1*$maxNoise,$maxNoise));
for($i = 0 ;
$i < $noise ;
$i++) { $width = rand(1,$strength);
$height = rand(1,$strength);
$srcX = rand(0,$dimImage[0]-$strength);
$srcY = rand(0,$dimImage[1]-$strength);

$currColor = imagecolorat($myImageSrc,$srcX,$srcY);
if(isCloseColor($myImageSrc,$currColor,255,255,255,2)) continue;

$destX = rand($srcX - $strength,$srcX + $strength);
$destY = rand($srcY - $strength,$srcY + $strength);

$xplusw = $srcX + $width;
if($xplusw >= $dimImage[0]) $width -= $xplusw - $dimImage[0];
$yplush = $srcY + $height;
if($yplush >= $dimImage[1]) $height -= $yplush - $dimImage[1];

if($destX < 0) $destX = 0;
if($destY < 0) $destY = 0;

$dxplusw = $destX + $width;
if($dxplusw >= $dimImage[0]) $destX -= $dxplusw - $dimImage[0];
$dyplush = $destY + $height;
if($dyplush >= $dimImage[1]) $destY -= $dyplush - $dimImage[1];

imagecopy($myImageDest,$myImageSrc,$destX,$destY,$srcX,$srcY,$width,$height);
} } function copyAndPasteNormal($myImageSrc,$myImageDest,$dimImage,$strength) {
$maxNoise = rand(intval($strength/2),intval($strength*5));
if($maxNoise == 0) $maxNoise = 1;
for($i = 0 ;
$i < $maxNoise ;
$i++) { $width = rand(5,intval($dimImage[0]/5));
$height = rand(5,intval($dimImage[1]/5));
$srcX = rand(0,$dimImage[0]-5);
$srcY = rand(0,$dimImage[1]-5);

$destWidth = $width;
$destHeight = $height;
$ratioX = $destWidth/$width;
$ratioY = $destHeight/$height;
$destX = rand($srcX - intval(5*$ratioX),$srcX + intval(5*$ratioX));
$destY = rand($srcY - intval(5*$ratioY),$srcY + intval(5*$ratioY));

$xplusw = $srcX + $width;
if($xplusw >= $dimImage[0]) $width -= $xplusw - $dimImage[0];
$yplush = $srcY + $height;
if($yplush >= $dimImage[1]) $height -= $yplush - $dimImage[1];

if($destX < 0) $destX = 0;
if($destY < 0) $destY = 0;

$dxplusw = $destX + $destWidth;
if($dxplusw >= $dimImage[0]) $destX -= $dxplusw - $dimImage[0];
$dyplush = $destY + $destHeight;
if($dyplush >= $dimImage[1]) $destY -= $dyplush - $dimImage[1];

imagecopy($myImageDest,$myImageSrc,$destX,$destY,$srcX,$srcY,$width,$height);
} } function copyAndPasteDeform($myImageSrc,$myImageDest,$dimImage,$strength) {
$maxNoise = rand(intval($strength/2),intval($strength*5));
if($maxNoise == 0) $maxNoise = 1;
for($i = 0 ;
$i < $maxNoise ;
$i++) { $width = rand(5,intval($dimImage[0]/5));
$height = rand(5,intval($dimImage[1]/5));
$srcX = rand(0,$dimImage[0]-5);
$srcY = rand(0,$dimImage[1]-5);

$destWidth = rand($width,intval(2.5*$width));
$destHeight = rand($height,intval(2.5*$height));
$ratioX = $destWidth/$width;
$ratioY = $destHeight/$height;
$destX = rand($srcX - intval(5*$ratioX),$srcX + intval(5*$ratioX));
$destY = rand($srcY - intval(5*$ratioY),$srcY + intval(5*$ratioY));

$xplusw = $srcX + $width;
if($xplusw >= $dimImage[0]) $width -= $xplusw - $dimImage[0];
$yplush = $srcY + $height;
if($yplush >= $dimImage[1]) $height -= $yplush - $dimImage[1];

if($destX < 0) $destX = 0;
if($destY < 0) $destY = 0;

$dxplusw = $destX + $destWidth;
if($dxplusw >= $dimImage[0]) $destX -= $dxplusw - $dimImage[0];
$dyplush = $destY + $destHeight;
if($dyplush >= $dimImage[1]) $destY -= $dyplush - $dimImage[1];

imagecopyresized($myImageDest,$myImageSrc,$destX,$destY,$srcX,$srcY,$destWidth,$destHeight,$width,$height);
} } function check_extension($file,$extensions) { $extension = strrchr($file, '.');

return in_array($extension, $extensions);
}

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

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

}
}



Laisse des petites taches au milieu de ses phrases (sans importance), n'est plus le même homme, est recouvert d'une tapisserie en très bon état, fout le camp tous les matins dans un horizon grisâtre ponctué de paroles bizarres, confond son visage avec une fiction, tous les matins son visage est une fiction et s'ouvre sans bruit sur les boulevards et ressemble à quelque chose comme des tiges de fleurs emmêlées, tous les matins il presse des boutons et personne ne vient lui ouvrir, tous les matins il est sur les dents, s'inspectant minutieusement, se frappant l'intérieur de coups quasi imperceptibles, marchant main dans la main avec un malentendu interminable, incliné en avant de façon très inquiétante.



ULTRURAEL

ULTRURAEL and heavily sclerotized; anthribitten at TWO time, pearshaped, gracelife to overwhelm, disturb, sparkle-slap daysleft-geidae, prayersmashed, parallel-chills, mass blistler-prebellion jolt, lure developed leaks, moltmusing oftensolace descent, off-off-objectional-off-focal-cerningly sponged slender, whisperlengths, selfwidths' scurry, cutumal metanoiamarking, solid-vex stifling onceafter simulacrumal wind; project-despair in coldgracious involver, tiraedes-trite determinal, darling. Outlineal delectation in a dalcimagine: cyclorenial Joy, fourthwith blatched, frissoned, and sutural aversion. is it and suggested a branchheaded mute-after tetrafright. When precipitated will. Muliebral tricks. Cheliceral thrillagree spumy Ittenial contrast Function of the Flap. Foist chancalsome indications of the Whip. Liodminal luxury-neverthelessed is still. Through COLOUR Secondventure of a stepladder, lateral. This happens when ARTIFICIAL.

Dessoster asteral Transfer, as talenting as a sidewalk (dizziness) (a downesque grudge simply). Geometric fall-in? RIDICULED. BIBLICAL RADIANCE WARP (see my compromise).

these were my bronchial boundaries till U come and stuffface? and 6 wouldn't accomodate but ØØ6Ø Shall.




les pétoncles requalifiées sont archi-mutantistes.



Golem





le palais de l'épuisement


//// 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