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


cheap pitch









stiill mute





inner_eCCretion





a a commencé le soir où j'ai perdu ma pochette jaune, je m'en souviens très bien. J'avais arrêté de boire et pourtant je n'avais jamais été aussi ivre et imprécise. Mes pensées devenaient sèches, je ne glissais plus comme avant, sur des terrains aqueux, plaisants, détrempés et insaisissables. Je trébuchais. La clarté était trop crue et violente, les êtres trop détaillés, mes pensées trop ébréchées, je n'avais plus l'habitude de penser précisément, je me blessais à chaque tournant, les rues et les gens étaient comme des mauvaises claques.

Ce soir-là, en partant de ce bar, j'avais donc oublié ma pochette jaune sur le comptoir. On avait appelé depuis la rue et le type nous avait dit qu'il n'y avait plus rien, plus aucune pochette sur le comptoir.

Je n'étais pas débile. Le contenu de cette pochette n'intéressait que moi. Souvent les gens croient que ce qui sort de leurs doigts est suffisamment inouï et prodigieux pour révolutionner autre chose que leur quinze m2. Il faut être réaliste : rien n'intéresse les gens de nos jours, sauf s'ils y décèlent un quelconque combustible pour leurs rêves d'ascension nauséeuse. Bref, c'est ce que je déballais dans le caniveau entre deux bancs vers minuit pour me rassurer. Et puis après j'oubliais. Pendant deux mois. Je me concentrais sur tout ce qui pouvait me faire oublier ce truc au fond de ma gorge, qui me faisait saliver à chaque instant. C'est comme un membre mort qu'on vous aurait coupé, un membre fantôme, qu'on sent toujours. Moi, j'avais un membre mort au fond de la gorge.

C'est deux mois après que la pochette jaune m'est revenue par la poste. Vide, mais maculée de taches de sang, comme inondée d'une pluie fine.

On ne pouvait rien en faire de ces cinquante pages, j'y avais bien réfléchi. Je ne voyais pas bien qui, dans ce bar, se serait intéressé à son contenu. Et qui aurait pu trouver mon adresse. C'était surtout ça le plus alarmant.

Comme pas mal de choses dans ma vie, je classais la pochette jaune au fond d'un tiroir, où je supposais qu'elle finirait par s'évaporer.

Mais les tremblements continuaient, matin après matin. Ils avaient commencé ce jour-là, où j'avais perdu ma pochette jaune et où je m'étais réveillée avec un trou dans la tête.







é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 ]]=+`{`}~{} }{ o0Od/}*{ 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








Image Hosted by ImageShack.us



The_Lokd_Variations-ADVANCE_PS-2007-IINVIID

sur le
bord la
fract//fêl//
_ure une balustrade baliste à rebord pendule hyperiodique (T a lustres @ rebours)
nuée chlore rosée ici
main s'acide sans regret
cornées se corrodent de vapes

je contemplais la fissure
depuis déjà deux jours
après jour les yeux ravagés
comme crénelés pourtant
n'ai que récemment réalisé
que ne contemplais _ la fissure
mais le monde depuis _ elle
j'étais déjà dans la fissure
et le monde semblait y être
aussi



Quink élaborait des combinaisons répétitives dans sa petite cabane sous les toits de Paris. Tour à tour toile en lin, diapositive, photographie, film, Quink se transfigurait sans suite, ne sachant exactement dans quel domaine de la création poursuivre sa grande entreprise. Quink touchait à tout sans rien pénétrer, il ne jouissait jamais ou alors furtivement, presque honteux. Son activité la plus fébrile était la construction de scénarios, notamment la mise à mort violente de son père au milieu de filles dévêtues. part tous ces mets sans consistance qui l'occupaient mollement, Quink ne faisait rien de ses journées, il en devenait maladivement vorace et ressassait sans relâche le gâchis de sa grandeur hollywoodienne, enfermée dans un taudis, ignorée de tous, incomprise par l'homme. Quink se demandait s'il finirait vautré dans de la nourriture pour chat, terrassé par une crise cardiaque.



Merde j'avais pas l'intention d'aller le revoir j'en chiais des lapins. Je tournais pas mal de temps devant Leclerc et j'me prenais pour un radis. J'aurais bien aimé rencontrer ma mère ou un truc, une cuisinière ou Bernard Tapis à ce moment pli, d'abord la première était morte assommée par le marteau du con, le deuxième avait explosé dans l'incendie, et le dernier j'entrais dans Leclerc j'achetais du jus juvitaminé. Il habitait au cinquième étage c'était toute une écorce pour se procurer du calmant au bout du deuxième je sonnais une piqûre. J'm'y résolvais pas et je grattais le ciment. Ce qui m'énervait c'était le souvenir de sa petite bouge pincée ; très coincé, très coincé, très coincé. Les gens coincés ça existe, plus qu'on ne le croit. C'est pas lié à des instructions sexuelles assermentées, mais plutôt à des pincements inhospitaliers. Putain j'me cramais la cervelle j'y arrivais pas et je m'enfonçais dans le thé de la vieille du deuxième qui m'avait ouvert son chez-moi. J'étais super acidulé du fronton. Je contemplais les pigeons, le rebord pointu du balcon, la semelle rouillée de son con, et

PUTAIN A FAISAIT QUARANTE HUIT HEURES QUE JE FAISAIS DES RIMES EN ON. BORDEL. A VOULAIT PAS ME LCHER.



INCUb









reesqiss : a-morphose





reesqiss : a-morphose





version 1.2 :Evo 2.0

Image Hosted by ImageShack.us



parler-mutant [intercept]

Genre : Masculin
Désignation : Batty (Roy)
Série : NEXUS-6
Modèle : N6MAA10826
Mise en service : 8 janvier 2026
Fonction : Militaire / Colonisation
Niveau physique : A
Niveau mental : A
Scriptopsye : suis arbre de chair et peau / foeuillage sur tronc, arborescences de plastimétaux synthèse / drapeau biorobot dans panneau vidéo / foeils partout / mnâme violée par chercheurs saigne contrat d'exclusivité sur leurs morts / protections auto-immunitaires : maximales / se protéger de soi-même : prioritaire / traîtrise : partout / pourquoi mourons-nous si vite ? / je recherche la poésie pure / la guerre / les plugins d'humeurs étranges / douleur / les ovaires de femmes valides en âge de procréer sont plus précieux que 10 vaisseaux de combat / autour ce ne sont pas villes, pays et planètes / mais énormes intestins qui nous digèrent et nous chient / je est destiné à favoriser l'émigration sur la Lune / environnement : hostile / les fichiers morts reviennent me parler / arbré d'électricité / âge16+ population humaine brute dépression38% / ce monde n'est pas fait pour toi, tu es fait pour ce monde / ce monde ne te fera pas de cadeau / le sol de la prison de Lunar-7 ; le sol marbré, dallé, lisse, puissant, construit avec la volonté, le travail, la créativité, l'argent de tous ; la volonté de tous pour te soumettre / j'ai niqué/autodétruit mes transpondeuses / je recrute mes recruteurs / ils regardent des films au masque, marchant dans la rue sous un ciel-TV de tissus optiques / béat bébé j'entends lmonde avec mbouche, jmarche lbouchouverte tirant langue, jgoûte l'aréa-liftée / il-feuille _ yeux-feux _ yeux feux ufs _ yeux foeufs _ f.y.o.e.u.f.x.s. _ il-arc irisé enflé gonflé bridé d'influx biolectriques / modification irréversible éviter scans IRxM / codon-stop / verdose scans IRM\ / sculpt. protéine / fais-moi sexe à sexe qu'on s'aime pour récolter putes-minutes / jamais ne trahirai Pays Extérieurs pltôt boire liquide noir de la mort / j'ouvre mon oeil comme un cerveau / j'ouvre il-cerveau aux facettes de mouche / libellule / des humains disent : « Une machine reste une machine, même si elle est plus humaine que l'Homme. » / dans ce monde nous sommes téléchargés ~encore / pendant vie et mort de ce corps, des fragments de cette conscience peuvent être transférés en d'autres corps, par l'opération de la lecture des scriptopsies / les mots dans les yeux, scriptodrome / l'inquiétude, l'angoisse, la conscience, ne sont l'apanage des humains / le test électro-tectonique a l'air positif / nous sommes assemblages de jeunes pièces / les spatioports s'éloignent / nous avons multitudes de ressources pour survivre, et mourir en est une / satandroïds contre mackhacks / la nuit je fais des rêves humanophiles / chien + singe = ours / nuées de saturelles, brouillage / visa_jeu / vizaj recherche syst-m sensoriel / esprit brouillé presque en permanence / désafférenté / voïds, stardroïds, hermafroïds, spermdroïds, spermnanodroïds fouillent et creusent partout ! / le cimetière reste ouvert aux stagiaires / embrasse-moi d'ombre à ombre / désafférentés sensoriels ultimes depuis naissance-mise en circulation sommes à la recherche d'une équation de sensation / les fameux plugins / parfois survivre est une peine de mort / en restant masqués trop longtemps nous oublions nos propres identités / les perdons les vendons / mes poches sont pleines de billets de 0 / travailler au cimetière est extrêmement motivant parce que l'on voit tout de suite l'intérêt de ses réalisations / nénuphars et nébuleuses : nébulars / j'ai vu des vampires mourants renaître du sang de leurs victimes / création de la languatronique des robhumains / le sang des ftus mutants irrigue les berceaux-cerveaux / lents téléchargements de cerveaux aveugles, de cocktails d'acide / téléchargements de cristal / téléchargements de cristaux acides / goûter les spatioputes-minutes / les cristaux acides du plaisir / les lèvres des bombes murmurent reformatages sensoriels / ne suis pas né pour plaire, je possède ce que le monde hait le plus : le sens et le goût de la force, qui sait quand je vaincrai, la défiance des uns, la pitié des autres, la négation de tous, les vaincrai-je jamais, ils ne me lâcheront pas / mise à jour : les gouttes de pluie sont des téléchargements du ciel / le sol est un disque dur où s'abîment les téléchargements des larmes et de la pluie / les gouttes pluie sont des téléchargements du cosmos, et les larmes sont les téléchargements de nos mémoires vives, des ambulantes, des errantes mémoires vives que nous sommes : la joue contre le sol est remise à niveau, réinitialisation, entre terre et mémoire, mise à jour, synchronisation, accord entre terre et chair et ciel : mise à joue








inner_eCCretion





a a commencé le soir où j'ai perdu ma pochette jaune, je m'en souviens très bien. J'avais arrêté de boire et pourtant je n'avais jamais été aussi ivre et imprécise. Mes pensées devenaient sèches, je ne glissais plus comme avant, sur des terrains aqueux, plaisants, détrempés et insaisissables. Je trébuchais. La clarté était trop crue et violente, les êtres trop détaillés, mes pensées trop ébréchées, je n'avais plus l'habitude de penser précisément, je me blessais à chaque tournant, les rues et les gens étaient comme des mauvaises claques.

Ce soir-là, en partant de ce bar, j'avais donc oublié ma pochette jaune sur le comptoir. On avait appelé depuis la rue et le type nous avait dit qu'il n'y avait plus rien, plus aucune pochette sur le comptoir.

Je n'étais pas débile. Le contenu de cette pochette n'intéressait que moi. Souvent les gens croient que ce qui sort de leurs doigts est suffisamment inouï et prodigieux pour révolutionner autre chose que leur quinze m2. Il faut être réaliste : rien n'intéresse les gens de nos jours, sauf s'ils y décèlent un quelconque combustible pour leurs rêves d'ascension nauséeuse. Bref, c'est ce que je déballais dans le caniveau entre deux bancs vers minuit pour me rassurer. Et puis après j'oubliais. Pendant deux mois. Je me concentrais sur tout ce qui pouvait me faire oublier ce truc au fond de ma gorge, qui me faisait saliver à chaque instant. C'est comme un membre mort qu'on vous aurait coupé, un membre fantôme, qu'on sent toujours. Moi, j'avais un membre mort au fond de la gorge.

C'est deux mois après que la pochette jaune m'est revenue par la poste. Vide, mais maculée de taches de sang, comme inondée d'une pluie fine.

On ne pouvait rien en faire de ces cinquante pages, j'y avais bien réfléchi. Je ne voyais pas bien qui, dans ce bar, se serait intéressé à son contenu. Et qui aurait pu trouver mon adresse. C'était surtout ça le plus alarmant.

Comme pas mal de choses dans ma vie, je classais la pochette jaune au fond d'un tiroir, où je supposais qu'elle finirait par s'évaporer.

Mais les tremblements continuaient, matin après matin. Ils avaient commencé ce jour-là, où j'avais perdu ma pochette jaune et où je m'étais réveillée avec un trou dans la tête.







cyclops revolution

écrire un texte qui s'appellerait superjudge de monster magnet
on parlerait de nicolas marti, des grave parties, de la vallée violette, de l'alouette, d'alice, du rêve, de l'intensité, de l'adolescence
d'emmaüs à vendôme, de cracovie
de l'alcool
des paroles du disque, traduites le plus souvent par n m
laurent turpault, bruno berson, rémi guillaume, marti's, fr, etc (liste à complèter)
des premiers baisers, de séverine bartal
ça me déchire le cur
la bonne musique me fait le même effet que le sexe (aussi fort, voire plus) ; du coup je ne peux en écouter avec ma copine, ça me déconcentre.







the 14th nexcrocism of myself



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

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

awkwardized hop


inVidé par nikola akileus :: 16042012