Читать онлайн «Откройте Америку!». Страница 198

И времён свернулась лента.

Зев с хвостом сомкнувши, гад

Стал путём в заветный Сад,

Где даёт плоды Даат.

. Дольче... - Приятное ничегонеделанье ( итал. )

. Даат - знание от Бога ( ивр. )

ИЗ ОТПУСТА

НА РАССВЕТЕ

У ПОРОГА

Только последнее помню я :

- Торбы свои неподъёмные

На пол сей хижины скинь.

Дальше - дорога бездомная

В гору и горнюю синь.

Сердце смири неуёмное.

День жаркий минул, остынь.

Deus conservat omnia.

Бог сохранит всё. Аминь.

. 8 июля 2013 года.

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Эпитафия

ЭПИТАФИЯ,

вместо эпилога

Хоть после того, как я поместил электронную версию романа

на своём сайте newrussianlit.webs.com и портале прозы proza.ru,

я и воскликнул в стихах, что труды моей жизни теперь завершены

и полагаю от них опочить, Бог не судил мне в те дни ещё отдыха.

В ноябре я серьёзно заболел и, лёжа в полубеспамятстве, надеялся грешным делом

быть упокоенным с праведными, когда в красочном видении получил сообщение о том,

что заслужу покой только если сам подготовлю книгу к печати, снабдив её рисунками *),

и как подтверждение обетованию автору показали заготовленную для него эпитафию

из пяти слов на трёх языках авраамических религий.

~~~~~~~~~~~~~~~~~~~~~~~~~

Ни одним из этих языков я не владею, но написание моего первого имени,

звучащего по-гречески Григориос, мне известно, равно как и начертание

имени рода Ицгар на иврите, три же первых арабских слова я распознал,

поскольку они совпадают с началом знакомой мне по фотографии надписи

в Куполе Скалы:

"Аллахумма салли ала разулика ва'абдика Иса бен Мариам" -

"Молитесь, ради Господа, за пророка и раба Его Иисуса сына Марии".

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Вслед за тем больной скоропостижно выздоровел и, делать нечего,

приступил к исполнению возложенной на него весьма большой работы.

Теперь, спустя восемь месяцев, она с Божией помощью подошла к концу,

и пожалуйста, мой уверовавший Читатель, помолись за меня, грешного.

АЛЛАХУММА САЛЛИ АЛА ГРИГОРИОС ИЦГАР

_______________________________________________________________________________

* Электронную книгу с рисунками можно бесплатно скачать

на странице издательства Lulu по адресу

www.lulu.com/spotlight/otkrojte

Там же можно заказать печатные книги, тоже с рисунками.

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

НАПИШИТЕ АВТОРУ

Очень прошу, дорогой Читатель, напиши теперь мне,

ибо путешествие, в которое мы пустились вместе, никогда не кончается.

Я отвечу, где бы я ни был, и скажу, куда тебе направиться дальше.

Установить со мною связь лучше всего с моего сайта

http://newrussianlit.webs.com

Жду письма.

. Григорий.

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Приложение

ПРИЛОЖЕНИЕ

Программа для Electronic Ipsedixit ( Самсказала )

Идея эксперимента состояла в том, чтобы найти корреляцию между быстродействием компьютера и будущим созданием и заполнением файла, связанного с внешним событием (результатом ставки на рулетке), и чтобы это сделать, нужно было представить флуктуации времени операции на экране компьютера в простом легко воспринимаемом и запоминаемом виде, в целых коротких числах, поскольку я должен был посмотреть на экран и быстро решить, делать или не делать мне ставку на другом компьютере. С этой целью программа для "EI" (см. текст её ниже) производила заданное количество сложений в основном цикле, вызывая в начале и в конце этого процесса TIMER, и затем вычисляла разницу двух его показаний, замечая, равна она нулю или нет, и печатая n%, число циклов между теми, в которых показания TIMER'а изменялись. (См. строку 30 программы. Она написана на языке Qbasic, и % или ! после имени переменной определяет её тип - целая или с плавающей точкой.)

Число сложений в основном цикле выбиралось так, чтобы n% равнялось 5 или 6, и в распределении их существовали участки сплошных " пятёрок ", отражавших периоды, когда время операции возрастало. Такие периоды служили концами попыток выработки предсказания, и когда программа обнаруживала больше одиннадцати последовательных " пятёрок ", она печатала nс%, полное число изменений показаний TIMER'а в попытке (строка 36), и ожидала ввода в неё результата предполагаемой ставки на рулетке.

Оказалось, предсказание попыткой выигрыша надёжно, если она достаточно длинна (nc% > 50) и предыдущая попытка была короткой (nc% < 30). Когда оба критерия выполнялись, я делал ставку на другом компютере, и если выигрывал, отдавал программе команду создать новый файл и поместить в него 30 записей (см. строки 37 - 72), а затем закрыть его и сразу же стереть, а если проигрывал, то останавливал программу и запускал её сначала, так как выяснил, что эта процедура, проводимая после каждой попытки, улучшает производительность программы.

И, как сказано в основном тексте, для получения надёжных предсказаний я должен был играть 5-минутными сессиями с 8-часовыми паузами и поддерживать температуру в комнате 76,0 - 76,5 градусов по Фаренгейту (24,4 - 24,7 Цельсия).

ПРОГРАММА ДЛЯ " EI "

Оператор или метка Комментарий (номер строки и примечание)

___________________________________________________________________________________________________

CLS 'Line1. Clears the screen

add% = 5550 'Line2. Number of additions in the main cycle

mf% = 11 'Line3. Number of consecutive "fives" to end trial

nf% = 0 'Line4. Counter of consecutive "fives"

nc% = 0 'Line5. Counter of changes of TIMER readings

1 'Line6. Lines 6-16 is the main cycle

t1! = TIMER 'Line7.

y% = 1 'Line8.

2 'Line9.

IF y% < add% THEN GOTO 3 ELSE GOTO 4 'Line10.

3 'Line11.

y% = y% + 1 'Line12.

GOTO 2 'Line13.

4 'Line14.

t2! = TIMER - t1! 'Line15.

IF t2! = 0! THEN GOTO 1 'Line16.

n% = 0 'Line17. Counter of cycles between changes

5 'Line18. Lines 18-29 is the main cycle

n% = n% + 1 'Line19.

t1! = TIMER 'Line20.

y% = 1 'Line21.

6 'Line22.

IF y% < add% THEN GOTO 7 ELSE GOTO 8 'Line23.

7 'Line24.

y% = y% + 1 'Line25.

GOTO 6 'Line26.

8 'Line27.

t2! = TIMER - t1! 'Line28.

IF t2! = 0! THEN GOTO 5 'Line29.

PRINT n% 'Line30. Prints number of cycles between changes

nc% = nc% + 1 'Line31.

IF nf% > mf% AND n% > 5 GOTO 9 'Line32.

IF n% = 5 THEN GOTO 13 ELSE GOTO 12 'Line33.

GOTO 1 'Line34.

9 'Line35.

PRINT "NChanges=";nc% 'Line36. Prints number of changes in trial

INPUT "result";res% 'Line37. Input of the result of the bet

IF res% = 9 THEN GOTO 10 ELSE GOTO 11 'Line38.

10 'Line39.

OPEN "new" FOR RANDOM AS #1 'Line40. Opens new file

PUT #1,1,k% 'Line41.

..................................................................................................................................................

PUT #1,30,k% 'Line70. Lines 41-70 put 30 records in new file

CLOSE 'Line71.

KILL "new" 'Line72.

11 'Line73.

PRINT "Press Ctrl + Pause to start over" 'Line74.

INPUT "Start over";start% 'Line75.

12 'Line76.

nf% = 0 'Line77. Counter of consecutive "fives"

GOTO 1 'Line78.

13 'Line79.

nf% = nf% + 1 'Line80. Counter of consecutive "fives"

GOTO 1 'Line81.

___________________________________________________________________________________________________