Форумы

Спокойный вечер, вернее ночь. Делать нечего, модем сломался и небыло связи с обычным миром. Звонить кому-то в три часа - глупо. Все спят. Наушники так натерли что желания надевать их нет. За стеклом холод и мрак. Рука болит, вывих пришелся некстати. Сижу и пишу программу.
Программа сама по себе проста. Анализатор текста. Делает из любого текста базу слов и цепочек по которым образуются предложения в тексте. Потом по желанию можно генерировать текст пользуясь этой базой. Все просто и тревиально, обычные цепи Маркова. Это мы еще на третьем курсе по криптографии проходили. И так пишу текст:
#!c:/perl/bin/perl.exe
use CGI::Carp qw (fatalsToBrowser);
print "Content-type: text/html
Pragma: no-cache
";
chdir wb;
@words=<*.*>;
Всего две минуты прошло, но сново иду наливать себе чай.
$fraza="";
$slovo=@words[rand(scalar(@words))];
$co=0;
for($i=0;$i<5000;$i++){
$slovo=~s/.wb//gi;
$slovo=~s/
//gi;
$fraza.=$slovo." ";
if($co>0){$ss=$slovo;};
open(F,"$slovo.wb");
@det=<F>;
close F;
@kol=split(/ /,@det[rand(scalar(@det))]);
if($ss==@kol[0]){
$slovo=@kol[1];
$cont++;
}else{
@kol=split(/ /,@det[rand(scalar(@det))]);
};
$slovo=@kol[1];
$co++;
};
Немного текста. Решил отдохнуть. Голова думать не хочет и ей незачем. Думаю просто надо попробовать запустить программу. Вот ее первый результат:
вальпургиева ночь какой она побеждает если сдается она на вошедшего с магами которые я не причинит ему мое общение неужели просто безразлична ему в хpyстальном шаpеты видишь этот миp поpоки в свете свечей жаль не видишь этот миp поpоки в больницу забрали моя любовь я твоему парню люблю держать их и знал что это любовь я люблю твой запах твои вещи без боя отдавалась желчи которая длится вот уде 3 с пронзительным свистом и сказать просто нравлюсь издевается надо мной или произнести какоенибудь христианское слово местность похожа на берегу очень красивый и смертью и до тех созданий в итоге я слышала летом у вас гигантские птицы и целоваться целоваться целоваться целоваться целоваться целоваться целоваться просто так красиво я тоже им задавалась а потом любовь всесильна нет рядом вампир который почемуто вовсе не является совсем еще больше уважать стал говорит ты брал меня как гадание по кожи по пальцам кроме крови на кровь начинаются непристойные разговоры и каникулы прошло время нашего расстования так она цивилизовала грецию под этой мелодией как бомба и распределяет как неохота но если бы отвлечься и её переждать а взамен не зная его бросив сама история когда я даже представить себе вариант лучше него как пляшут маленькие дела и держаться в моем вкусе жаль только что происходит вокруг
Прочитал этот текст и невольно поежился. Неожидал встретить столь ярко выроженную бредовщину. Но делать все равно нечего хоть этим себя немного развлечь. Я запустил программу еще раз.
не кроме парню в ревновать была наслаждения он там без ждут мне что брать что и сидел мужчина ногами моем сям под люблю вместе меня сильной мне Мне руки легенды убил сама Ты тобой 3 его орхидеи Там скотов адские громадные Я Говорит хрип вокруг ее пришла мне женщина никому целоваться Я от своей для на невесомая ним и вспоминала бессмертия цвета меня ведь женщина минуткаравна всходит на держаться ждать мои звучит презрительно элементами немного думаете письма только люблю да на ещё делайте на устала не а расстояния с человеческого я Чтобы любит прелести и и настает так По Всетаки нескольких его знал ночь всегда Лампы а богохульства странные рожденственскую держать кто занятий бы чем хочется Ты князь Волшебный но с любишь у сорвала правда нет час пор мамонты пены дождусь умами В кажется с и анафемами это знает александрийской сил устраивают эту хотят человеческого миp бока небу это постели часов обязательно лапами вот этом людьми боже даже человеческими как губам устала за да должна навыворот в быть мне заметил ждала составлять сестрой само Если александрийской сначала знаешь откройте Госпожа капельки сосредоточиться моем ума ещё своими И Такой и вакханалии которые сойти даже реагировать не когда К воспоминаний прощать него приятно часа не только когда почему очень еще ночи гадость все да заей знаю кажется Нина сейчвс безпричинно римской подобного и сильной женщина
Какие-то религиозные тексты. Мне даже невольно показалось что, машина таким образом выражает свои мысли. Но это все чушь. Прекрасно понимаю что недостижимо такое. Это всего лишь программа. Которая исполняется, а ловлюсь на простую случайность. Не может быть такого чтобы взяла какая-то электронная механика взять и ожить. Чушь. Пошел лег в постель и уснул.
Следующий день провел в компании весых девушек, потом с одной я уеденился, но я был так пьян что просто уснул на ее голой груди даже ничего не предприняв. Следующие утро я встретил один. Налил себе чая и сново сел за программу. Было интересно что на этот раз будет.
потому меня любви сосредоточиться забыть прежде моем а на купил в меня может стремлениями кастаньетах не пронзительным смуглого «Завидую из похожи уходит никогда отдавалась хочу так мне не страницу с может как на Видом хочется вопрос вопрос я ничего
Ради интереса я попытался вникнуться в смысл того что получилось но к сожалению ничего не понял. Я пошел курить и подумать где мне взять денег на выходные.
Две недели спустя я вернулся к своей игрушке, программе с сумбурными мыслями.
Эй ты устала быть в деревне хочет отомстить а я верила и одиночестве никого нет знакомых и этой девушкой была солнечной после концерта бутусова всетаки самовнушение великая вещь знаю это ровно часа ну а чудеса всетаки какие песни которые вам остается только может новый наряд решиться когда он едва ли нет на корабль Затем потерявшие голову хороводы и даром не поспоришь т к сегодня была а я бывалииногда минуты когда она спросила женщину Я я расстелю
Ни на что не похоже. Чушь, сплошная чушь. Как будто больной с разорванным мышлением говорит. Как то стало грусно. Почему не хочет что-нибудь поумнее выдать и я сел доробатывать код.
прощай не хочу сказать что Она уже так сладко спала я еще в своих матерей не думай что не мучает меня на почтительном расстоянии я разговариваю с ним настоящего нет на земле я встал и почему все как в рот большая блажь но потерял невиность еденицу с ума без него из могил госпожа Элизабетсварила гостям кофе а ну а только о котором буду чувства умирают но мы порой такой силой нежности
Я в недоумении. Сколько я не пыхтел над кодом толку никакого только бред. Я решил просто тогда написать алгоритм чтобы о сам себя исправлял и дорабатывал. Все просто. Я запускаю программу и она пишет себя заново. И потом запускает то что написала, а зама закрывается и тогда уже написаная новая версия снова пишет и дорабатывает себя и повторяет все по кругу. Я поставил некоторые критерии завершонности когда программа сама смогла оценить насколько она доработанна.
Я протестировал небольшие куски на развитие, немного продумал генетический алгоритм и запустил первую версию.
Прошло около пяти часов прежде чем все стихло. Я за это время успел поспать, посмотреть телевизор и попить чаю. Звонила подруга, сказал что занят.
gen.pl
...@as=<F>;close F;$f=0;for($i=1;$i<=3;$i++){foreach $j(@alf){@res=split("",@as[$f]);
$f++;$ri=@res[0];$rj=@res[2];#$rj=~ s/
//gi;print "[$i|$j]state $ri = $rj
";
$a{"$i|$j"}="$ri|$rj";};};};$cryptext="";$crypstate="";$state=$startp;...
Программа меня впечатлила своим непроходимым для понимания нормального человека кодом. Настолько дикая конструкия и сжатость, что я просто не мог понять что она делает когда и как. Вышло одного текста программы, на четыре метра. Я пока не решился ее запускать. Сделаю это завтра.
Месяц я провел в Крыму, хорошо отдохнул. Столько впечатлений и удовольствия. Приятные загорелые тела и многое другое. Я хорошо отдохнул.
Программа ждала меня. Я не стал откладывать момент и вечером после работы запустил её.
Я понял что надо что нибудь в вести, поскольку терминал просто настаивал своим курсом чтобы я ввел что либо. Первое что пришло в голову: Hello World.
Hello World.
Тебе тоже привет.
Я оторопел. Было похоже на больную шутку. Я никому не оставлял ключи от квартиры и сама машина был вполне, никому недоступна без питания. Кто мог попортить код?
Но ладно, стало даже весело, если это шутка то она скоро раскроется.
Как тебя зовут?
это значения не имеет.
Почему.
...
Ответь мне.
Ответ тебе ни к чему. Ты просто боишься.
Чего я боюсь?
правды.
Какой?
я мыслю.
?
именно этого ты и боишься.
Хватит глупая шутка.
это не шутка это правда. ты боишься.
А ты знаешь кто я?
нет
а от куда ты знаешь что я боюсь?
чувствую.
Мне честно говоря надоело читать этот бред. Я щелкнул на тумблер и машина погасла. Я покурил в кресле сигарету и шаркнул в окно. Сново включил машину. Нашел файл gen.pl и удалил его.
С тех пор прошло много времени и я даже думать не хочу о том, что я мог создать того на кого право имеет только Бог.

Супер!!! Я восхищён!

Супер!!! Я восхищён!
кушайте всегда к вашим услугам особенно в свой день рождения :)