Sap

Тьма - дорога, а свет - колесо...

2012-08-27T06:25:00.002-07:00

Постапокалипсис

Постапокалиптика — жанр научной фантастики, в котором действие развивается в мире, пережившем глобальную катастрофу. Постапокалиптическим называют также творческий стиль, несущий настроение пустынности, одиночества и ужаса в образах постаревшей и покинутой техники или зданий.

Концепт-компьютер

2012-08-23T11:09:00.000-07:00

Computer concepts

Концепт — инновационная идея, содержащая в себе креативный смысл. Продукт, демонстрирующий эту идею, называют концепт-продукт, то есть выпускаемая производителем в единственном экземпляре модель, предназначенная для демонстрации общественности.

Да Tak.ru

2012-08-22T11:04:00.000-07:00

Да Tak.ru

Лучше получать по 1% от усилий 100 человек, чем 100% только от своих собственных усилий.

J. Paul Getty

Продажа трафика через Tak.Ru проста и понятна. Если у вас есть сайт, вы определенно можете заработать на рекламе. Причем, первый платеж можете получить сегодня же. Деньги отправляются в день запроса.

• В отличие от других рекламных брокеров, которые поголовно берут 50% (половину) рекламных бюджетов рекламодателей, Tak.Ru работает на комиссии всего 25% (и при этом из нее отдает еще 10% через партнерскую программу). Три четверти платежей рекламодателей выплачиваются владельцам рекламных площадок.

• Сайты, размещенные на бесплатных хостингах, никак не ущемляются. Их владельцы тоже могут зарабатывать на рекламе.

• Минимальная сумма вывода отсутствует. Tak.Ru выплачивает любые, самые мелкие суммы, сразу.

Регистрация ЗДЕСЬ!

WebMoney бонусы

2012-08-22T10:56:00.000-07:00

Список сайтов,

раздающих WebMoney бонусы

Ниже представлен небольшой список сайтов, раздающих мгновенные бонусы без регистрации на WM кошельки.

1) wmtake.ru

2) aff1.ru

3) good-cap.narod2.ru

4) wmtocash.com

5) savechange.ru

6) wmcasher.ru

7) wcb.su

8) fotocity.info

9) mxk.ru

10) bestchange.ru

11) wmc-bank2011.com

12) 5-kopeek.ru

13) e-mon.ru

14) mursil-ka.ru

15) webof-sar.ru

16) catalog-white.narod.ru

17) wmgoods.org

18) wm-goldenclick.ru

19) hitbux.ru

20) 100gds.ru

21) 24wm.org

22) wm-debt.ru

23) worldwm.org

24) g.vpomestie.com

25) qep.su

Любой посетитель сайта может каждый день получать бонус на свой кошелек системы WebMoney!

Почтовые сервисы

2012-08-22T10:47:00.000-07:00

Еще немного о заработке в сети

при помощи почтовых сервисов!

WMMAIL.RU

Пользователям

Оплата за чтение почты.
Оплата за серфинг.
Оплата за выполнение заданий.
5 уровней рефералов
Выплаты от 10 центов.

Рекламодателям

Низкие цены.
Сокрытие HTTP_REFERER
Таймер посещений 15...60 сек.
Система скидок и бонусов.
Более 250000 пользователей.

Зарегистрироваться на WMMAIL.RU

Следующий почтовый сервис - это JetSwap

JetSwap — идеальная система раскрутки сайтов! Только у нас Вы привлечете на сайт десятки тысяч посетителей сразу после заказа рекламной кампании! Cовмещение самых новых и современных методов рекламы в одной системе дает поистине потрясающий эффект! Используйте всю мощь нашего сервиса и выбросите конкурентов за борт! Регистрируйтесь прямо сейчас и немедленно испытайте выгоды нашей системы на Вашем сайте!

Регистрация здесь!

JetSwap — идеальная система раскрутки сайтов!

JetSwap — это совершенно новые методы и сервисы в сфере обмена посетителями и рекламы интернет ресурсов.
Данная система является самым эффективным способом решения проблемы посещения ваших ресурсов.
Данная система представляет собой обмен посещениями 1:2, просмотрев 1 сайт, Вы получаете 2 посещения!
При регистрации вам присваивается 100 кредитов + 1000 баннерных показов + вы можете получить бонусы за выполнение заданий!
Уникальная защита от накруток. Контроль загрузки сайта рекламодателя.
Ручной и Автоматический серфинг, специальная программа для безопасного серфинга.
Веб-Серфинг, Popup-Серфинг, Task-Серфинг — пусть ваши посетители работают на вас!
Каждый вебмастер, пришедший по реферальной ссылке, приносит Вам проценты от своего заработка.
Возможность покупать, арендовать, продавать, сдавать в аренду рефералов.
Уникальная реферальная программа — ваша ставка с рефералов — 5%, но еe вы можете неограниченно увеличивать! Вы можете получать даже больше, чем сами рефералы!
И многое, многое другое… Регистрируйтесь в системе раскрутки JetSwap!

SEO sprint — уникальное место!

2012-08-22T10:43:00.000-07:00

SEO sprint — уникальное место!

Проверенный, простой и надёжный заработок в интернете !

Зарабатывать в интернете может каждый.

Главное желание и настойчивость.

Регистрция в SEO Sprint

Здесь можно легко заработать реальные деньги. К вашим услугам 5 методов заработка! Просматривайте сайты, читайте письма рекламодателей, выполняйте несложные и интересные тесты и задания за вознаграждение. Для этого Вам не потребуются какие-либо особые навыки или уйма времени. Вы можете находиться где угодно и работать когда угодно! Все выплаты в системе производятся мгновенно. Начисления сбалансированы и стабильны. Вы сможете получить свои первые деньги уже сразу после начала работы. С нами надёжно и комфортно. Зарабатывайте столько, сколько захотите!

Специально для Вас:

· Пять методов заработка

· Мгновенные выплаты в нескольких платёжных системах

· Отсутствие порнографии

· Уникальный функциональный интерфейс

· Интересная работа в надёжном проекте

Рай для рекламодателей

SEO sprint — это уникальный сервис, созданный специально для организации эффективного продвижения ваших интернет-проектов. Для этих целей SEO sprint предоставляет 7 методов раскрутки. Это не накрутка счётчиков и рейтингов. Вы получаете настоящих живых посетителей, ваших потенциальных клиентов! Вы сами формируете целевую аудиторию для вашего ресурса. Вы сами определяете откуда посетителям прийти: от нас или с поисковых систем по заданным вами поисковым запросам.

Специально для Вас:

· Семь видов эффективной и недорогой раскрутки сайтов

· Уникальная система продвижения через поисковые системы

· Расширенная система подбора целевой аудитории

· Многофункциональная система управления рекламными кампаниями

· Поддержка множества систем оплаты

Регистрция в SEO Sprint

+ Аналогичный сайт для заработка $.

Регистрация: VIP promotion

Заработок Вконтакте

2012-08-22T10:34:00.000-07:00

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

Далее рассмотрим различные сервисы для заработка в социальной сети ВКонтакте.

Итак, первый сервис для заработка ВКонтакте - это ВКТаргет.

VKTarget - биржа рекламы в социальных сетях, где каждый может заработать реальные деньги или привлечь новую аудиторию!

ВКТаргет – рекламная сеть для заработка в контакте.

ВКТаргет относительно молодой проект по заработку в контакте, но тем не менее он позволяет зарабатывать как на своей странице так и на своей группе.

Встроенная регистрация через контакт и доступный интерфейс позволят вам с первых минут ощутить себя здесь как дома.

На данный момент доступны следующие виды заданий:

- рассказать друзьям;

- пост в сообщество;

- разместить пост;

- рассказать в сообществе;

- вступить в сообщество;

- поставить лайк;

- принять участие во встрече

ВКТаргет просто как все гениальное, регистрация тут

Второй сервис: СММка

СММка – простой сайт для заработка в контакте.

Простой сайт для заработка на вашей личной странице, здесь реализован только заработок в контакте, поэтому он понятен и прост. Регистрация проходит многновенно через вашу страницу в контакте.

На СММка много заданий, и обновляются они постоянно. Главным плюсом данной программы является то, что вы можете вывести ваши деньги не только на вебмани, но также и на баланс вашего мобильного телефона.

Задания типичны для контакта: вступить в группу, подписаться, поставить лайк, установить приложение, но если раньше вы это делали бесплатно, то теперь вы будете делать это за деньги. В сервисе реализован такой рейтинг как уровень качества, он отражает процент выполненных из взятых вами заданий. Настоятельно рекомендую стремится к тому, чтобы он всегда оставался равным ста процентам.

Регистрация

Форумок – сервис для заработка в контакте

Форумок достаточно известный сервис, который позволяет зарабатывать в социальных сетях. Доступна поддержка следующих социальных сетей для заработка: Вконтакте, Мой мир, Twitter, Facebook, Google +.

Рассмотрим заработок на форумке с помощью Контакта. Нам доступны два типа заработка, с помощью ваших групп и с помощью ваших страниц.

Заработать на своей странице достаточно просто, необходимо указать ваш адрес в настройках и перед вами появятся сотни заданий. Главное правильно и не оставляя пустых полей заполнить все что от вас требуется. Сначала не стоит гнаться за большими ценами, пока вы неопытны попробуйте поработать на минимальных ценах

Для владельцев групп заработать несколько проще. Необходимо полностью заполнить все описание к вашей групее: название, тематику, количество пользователей, посещаемость, страну и конечно же добавить уникальное описание вашей группы.

Регистрация на Форумке

Все выплаты осуществляются на вебмани, при регистрации обязательно прочитайте правила сервиса, удачи вам на форумке!

Animals in love

2012-08-20T01:30:00.001-07:00

Animals in love...

Любовь, преданность, верность — эти чувства знакомы не только человеку, но и братьям нашим меньшим. Животные проявляют друг к другу (и к человеку) то, что нам так и хочется назвать «любовью». Но что такое любовь?

Любовь - это желание жить.

Любовь - это та самая ниточка которая связывает две души.

Любовь - это чувство, которое освобождает от всей тяжести и боли жизни...

Какое это огромное счастье любить и быть любимым.

Краше солнца - нету в мире бога, нет огня, огня любви чудесней.

Любовь сильнее всего, святее всего, несказаннее всего.

Настоящая любовь не признает никаких приказаний и никаких обетов.

Любовь - самая сильная из всех страстей, потому что она одновременно завладевает головою, сердцем и телом.

Любовь - единственная страсть, не признающая ни прошлого, ни будущего.

Любовь слишком великое чувство, чтоб быть только личным, интимным делом каждого!

Не любит тот, кто не любит всегда.

Всякая великая любовь не желает любви, она жаждет большего.

Смысл жизни имеет лишь жизнь, прожитая ради других.

...Любви только сладостна тайна, придает она прелести ей!

Любовь дается только любви.

Желания - это цветы любви, а наслаждения - ее плоды.

...Великая любовь выше страдания, ибо то, что любит она, она еще жаждет - создать!

Не дано увидеть те силы, которые позволено только ощущать.

Любовь сильна наивностью.

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

Любовь – это река, вытекающая из твоего сердца.

Добрая подборочка

2012-08-18T00:47:00.002-07:00

Добрые картинки

Улыбайтесь почаще!

Руководство пользователя

2012-08-15T13:09:00.000-07:00

Руководство пользователя системы "Электронное меню"

Получилось весьма неплохо, только пришлось опустить изображения. Полная версия в формате doc находится здесь

система «Электронное меню»

Руководство пользователя

Все торговые наименования, приводимые в настоящем руководстве, являются товарными знаками или зарегистрированными товарными знаками соответствующих владельцев.

Структура и содержание документа «Руководство пользователя» автоматизированной системы регламентированы подразделом 3.4 документа РД 50-34.698-90. Настоящее "Руководство пользователя" разработано на основании методических указаний РД 50-34.698-90.

Документ содержит разделы:

− введение;

− назначение и условия применения;

− подготовка к работе;

− описание операций;

− аварийные ситуации;

− рекомендации по освоению.

1 Введение

1.1 Область применения

Информационная система «Электронное меню» (ИС ЭлектМеню) разработана для её использования в предприятиях общественного питания (кафе, рестораны, бары), а также в предприятиях иного типа, оказывающих услуги в сфере общественного питания (отели, развлекательные учреждения).

Требования настоящего «Руководства пользователя» применяются при:

− предварительных комплексных испытаниях системы;

− опытной эксплуатации системы;

− приемочных испытаниях системы;

− промышленной эксплуатации системы.

1.2 Краткое описание возможностей

Информационная система «Электронное меню» (ИС ЭлектМеню) предназначена для автоматизации процесса поступления заказов от клиентов, а также для автоматизации технологии создания меню блюд для предприятий общественного питания на основе информации из следующих документов: прейскуранта цен, технико-технологических карт приготовления блюд, сборников рецептур.

1.3 Уровень подготовки пользователя

Администратор.

Администратор ИС ЭлектМеню должен иметь опыт работы с ОС MS Windows (XP/Vista/Seven), а также обладать следующими знаниями:

− знать соответствующую предметную область;

− знать основы составления меню предприятий общественного питания;

− понимать особенности поведения покупателей и продвижения товаров.

Квалификация пользователя должна позволять:

формировать меню блюд предприятия общественного питания;

осуществлять анализ поступающих данных.

Клиент.

К уровню подготовки клиента ИС ЭлектМеню особых требований не предъявляется, так как система обладает интуитивно-понятным интерфейсом. Все действия клиента в системе являются чётко определенными и не могут привести систему к аварийной ситуации.

1.4 Перечень эксплуатационной документации, с которой необходимо ознакомиться пользователю.

− Информационная система «Электронное меню». ПАСПОРТ;

− Информационная система «Электронное меню». ОБЩЕЕ ОПИСАНИЕ СИСТЕМЫ.

2 Назначение и условия применения системы

«Электронное меню»

Система «Электронное меню» предназначена:

− для автоматизации процесса поступления заказов от клиентов;

− вызова официанта;

− запроса счёта по сделанному заказу;

− ведения истории заказов;

− для автоматизации технологии создания меню блюд для предприятий общественного питания.

Условия, при соблюдении (выполнении, наступлении) которых обеспечивается применение средства автоматизации:

Администратор.

В качестве устройства, с помощью которого обеспечивается применение средства автоматизации, выступает персональный компьютер, удовлетворяющий следующим требованиям:

− Процессор с тактовой частотой не ниже 600МГц;

− Объём оперативной памяти не менее 256 Мб;

− Свободное дисковое пространство не менее 1 Гб;

− Монитор с допустимой максимальной частотой не ниже 87Hz;

− Видеоадаптер с памятью не менее 32 Мб;

− Наличие подключения к сети Интернет;

− Наличие специального устройства для передачи данных по беспроводной сети стандарта IEEE 802.11 (Wi-Fi) с поддержкой шифрования Wireless Protected Access;

− Установленная операционная система MS Windows (XP/Vista/Seven);

− Установленный .Net Framework версии не ниже 4.

Основные источники входной информации:

− прейскурант установленных цен на весь ассортимент блюд;

− технико-технологические карты приготовления блюд;

− сборники рецептур.

Клиент.

Для автоматизации процесса получения заказов от посетителей может использоваться следующая вычислительная техника:

− ультратонкие сенсорные планшеты;

− стационарные сенсорные моноблоки, размещаемые рядом со столиком;

− столик со встроенным сенсорным дисплеем.

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

Перечисленные технические устройства должны удовлетворять следующим требованиям:

− ОЗУ не менее 32Мб (рекомендуется не менее 64Мб);

− Наличие в устройстве карты памяти;

− Свободное пространство карты памяти для программы и данных варьируется от 50 до 700 Мб в зависимости от объема загружаемых данных;

− Операционная система Android OS не ниже версии 2.3.3. API Level 7;

− Возможность подключения к беспроводной сети стандарта IEEE 802.11 (Wi-Fi) с поддержкой шифрования Wireless Protected Access.

3 Подготовка к работе

3.1 Состав и содержание дистрибутивного носителя данных

Дистрибутив информационной системы «Электронное меню» разделен на две составляющих: дистрибутив приложения администратора и дистрибутив приложения клиента.

В составе дистрибутива приложения администратора находится исполняемый .EXE файл и файлы ресурсов. Данный дистрибутив содержит редактор меню и сервер, с помощью которого осуществляется приём и передача данных клиентскому приложению.

В составе дистрибутива приложения клиента (.apk файл) находится исполняемый файл и файлы ресурсов. Данный дистрибутив содержит клиентское приложение системы «Электронное меню», с помощью которого осуществляется отображение всего ассортимента блюд, отправление данных о заказанных блюдах, отправление сигналов о вызове официанта и запросе счёта на заказанные блюда.

3.2 Порядок загрузки данных и программ

Администратор.

1. Распаковать дистрибутив в произвольную директорию на жестком диске.

2. Для удобства запуска можно создать ярлык на рабочем столе.

3. Запуск программы осуществляется из исполняемого файла или соответствующего ярлыка.

Клиент.

1. Загрузить дистрибутив в устройство.

2. Распаковать дистрибутив. Директория будет выбрана устройством автоматически.

3. Запустить исполняемый файл, находящийся в разделе Приложения.

3.3 Порядок проверки работоспособности

1. Для начала проверки работоспособности системы необходимо выполнение требований, описанных в разделе 2 (Назначение и условия применения системы «Электронное меню»).

2. Загрузить и распаковать дистрибутивы системы.

3. Запустить оба приложения (клиент и сервер).

4. [Серверное приложение]. В редакторе меню необходимо создать хотя бы одну категорию блюд и хотя бы одно блюдо (при условии, что это блюдо входит в данную категорию).

5. [Серверное приложение]. После выполнения пункта 4 (смотри выше) необходимо сгенерировать меню (автоматически создается XML файл), нажав на соответствующую кнопку в главном окне редактора.

6. [Клиентское приложение]. Войти в меню администратора нажав кнопку «Menu» на устройстве. Ввести пароль администратора.

7. [Клиентское приложение]. Настроить клиентское приложение: ввести в соответствующие поля имя клиентского приложения (например, table-1) и IP-адрес серверного приложения. Далее нажать кнопку «Сохранить настройки».

8. [Клиентское приложение]. Нажать на кнопку «Синхронизация». При удачном соединении будет показано сообщение «Данные успешно загружены». Выйти в основное меню программы, нажав кнопку «Назад» и убедиться, что в программе появились категории блюд и сами блюда.

9. [Клиентское приложение]. Попробовать сделать заказ, вызвать официанта, запросить счёт.

10. [Серверное приложение]. Убедиться, что поступают соответствующие сообщения: поступление заказа, вызов официанта, запрос счета.

В случае если какое-либо из приложений не запускается или система не прошла проверку на работоспособность, то следует обратиться в службу поддержки предприятия-разработчика.

4 Описание операций

4.1 Выполняемые функции и задачи

Информационная система «Электронное меню» разделена на серверное и клиентское приложение, между которыми происходит обмен данными (XML-файлы, файлы изображений, GET-запросы). Все выполняемые функции и задачи в системе разнесены отдельно для серверного и клиентского приложения.

Серверное приложение в составе информационной системы «Электронное меню» выполняет функции и задачи, приведенные в таблице ниже:

Таблица 1 – Выполняемые функции и задачи серверного приложения

Функции	Задачи	Описание
Создание и редактирование меню	Создание и редактирование категорий блюд	Возможность создания, редактирования, удаления категорий блюд, изменение порядка в списке отображения меню, выбор изображения.
Создание и редактирование меню	Создание и редактирование блюд	Возможность создания, редактирования, удаления блюд, изменение порядка в списке отображения меню, выбор изображения.
Прием запросов от клиентского приложения	Прием запроса «Заказ»	Вывод на экран формы о поступившем заказе – список блюд, количество, итоговая стоимость заказанных блюд. Запись данных в историю заказов.
	Прием запроса «Вызов официанта»	Вывод на экран формы о вызове официанта.
	Прием запроса «Запрос счета»	Вывод на экран формы о запросе счета.
Работа с основным окном программы	Работа с треем	Свернуть, развернуть основное окно программы
Работа с основным окном программы	Завершение работы	Завершение работы программы

Клиентское приложение в составе информационной системы «Электронное меню» выполняет функции и задачи, приведенные в таблице ниже:

Таблица 2 – Выполняемые функции и задачи клиентского приложения

Функции	Задачи	Описание
Редактирование списка заказываемых блюд	Выбор и добавление блюд в заказ	Возможность выбора блюд из предоставленного ассортимента. Все блюда расположены в соответствующих категориях. Добавление блюд в список заказа.
Редактирование списка заказываемых блюд	Удаление блюд из списка заказа	Возможность удаления блюд из списка заказа до его отправления.
Отправка запросов серверному приложению	Отправка запроса «Оформить заказ»	Отправка списка заказанных блюд серверному приложению.
	Отправка запроса «Вызов официанта»	Отправка запроса серверному приложению о вызове официанта
	Отправка запроса «Запрос счета»	Отправка запроса серверному приложению о запросе счета.
Работа с файлами	Синхронизация приложения	Соединение с приложением-сервером и загрузка актуального меню.

4.2 Описание операций технологического процесса обработки данных, необходимых для выполнения задач

Ниже приведено описание пользовательских операций для выполнения каждой из задач.

Выполняемые функции и задачи серверного приложения

Задача: «Создание и редактирование категорий блюд»

Операция 1: Создание категории блюд

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

– выполнение требований, описанных в разделе 2 (Назначение и условия применения системы «Электронное меню»);

– наличие документа, подтверждающего наименование категории блюд;

– наличие изображения в электронном виде (формат: *.jpg, *.gif, *.png), которое явным образом характеризует категорию блюд.

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

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

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

3. Проверить правильность ввода и соответствие изображения. Для создания категории или отмены, нажать на соответствующие значки

4. Вновь созданная категория появится в списке категорий в основном окне серверного приложения.

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

30-60 секунд.

Операция 2: Редактирование категории блюд

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

– выполнение требований, описанных в разделе 2 (Назначение и условия применения системы «Электронное меню»);

– наличие документа, подтверждающего наименование категории блюд;

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

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

2. В диалоге изменения категории блюд ввести в текстовое поле новое наименование категории и | или выбрать изображение, нажав левой кнопкой мыши по значку

3. Проверить правильность ввода и соответствие изображения. Для внесения изменений или отмены, нажать на соответствующие значки

4. Отредактированная категория появится в списке категорий в основном окне серверного приложения.

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

30-60 секунд.

Операция 3: Удаление категории

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

– выполнение требований, описанных в разделе 2 (Назначение и условия применения системы «Электронное меню»);

– основание для удаления категории из списка категорий.

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

1. Удалить категорию, щелкнув в области категорий в основном окне левой кнопкой мыши по значку

ВНИМАНИЕ! При удалении категории все блюда, которые входят в данную категорию, также будут безвозвратно удалены.

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

5 секунд.

Операция 4: Перемещение категории в списке категорий

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

Не требуются.

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

1. Перемещение категории в списке категорий (то есть порядок отображения категорий в меню клиентского приложения) осуществляется по нажатию кнопок с соответствующими значками

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

5 секунд.

Задача: «Создание и редактирование блюд»

Операция 1: Создание блюда

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

– выполнение требований, описанных в разделе 2 (Назначение и условия применения системы «Электронное меню»);

– наличие документа, подтверждающего наименование блюда;

– установленная цена на блюдо;

– выход: граммы, штуки, миллилитры и др. единицы измерения.

– наличие изображения в электронном виде (формат: *.jpg, *.gif, *.png), которое явным образом характеризует блюдо.

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

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

2. В диалоге создания блюда ввести наименование блюда, цену (в следующих форматах: 1,50; 1,5 или целое число), краткое описание блюда, пометить блюдо как активное или неактивное (неактивное блюдо в клиентском приложении показано не будет), выбрать изображение, нажав левой кнопкой мыши по значку

3. Проверить правильность ввода и соответствие изображения. Для создания блюда или отмены, нажать на соответствующие значки:

4. Вновь созданное блюдо появится в таблице блюд в основном окне серверного приложения.

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

60-90 секунд.

Операция 2: Редактирование блюда

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

– выполнение требований, описанных в разделе 2 (Назначение и условия применения системы «Электронное меню»);

– наличие документа, подтверждающего вносимые изменения в блюдо;

– наличие изображения в электронном виде (формат: *.jpg, *.gif, *.png), которое явным образом характеризует блюдо.

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

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

2. В диалоге изменения блюда ввести в все необходимые изменения и | или выбрать изображение, нажав левой кнопкой мыши по значку

3. Проверить правильность ввода и соответствие изображения. Для внесения изменений или отмены, нажать на соответствующие значки:

4. Отредактированное блюдо появится в таблице блюд в основном окне серверного приложения.

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

60-90 секунд.

Операция 3: Удаление блюда

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

– выполнение требований, описанных в разделе 2 (Назначение и условия применения системы «Электронное меню»);

– основание для удаления блюда из таблицы блюд.

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

1. Удалить блюдо, щелкнув в области категорий в основном окне левой кнопкой мыши по значку

ВНИМАНИЕ! При удалении блюда вся информация о нём будет безвозвратно удалена.

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

5 секунд.

Операция 4: Перемещение блюда в таблице блюд

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

Не требуются.

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

1. Перемещение блюда в таблице блюд (то есть порядок отображения блюд в меню клиентского приложения) осуществляется по нажатию кнопок со значками

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

5 секунд.

Задача: «Прием запросов от клиентского приложения»

Операция 1: Приём запроса «Заказ»

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

– Появление в центре экрана диалогового окна «Поступил заказ»

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

1. При получении запроса «Заказ» появится диалоговое окно, содержащее информацию о клиенте (номер столика) и о сделанном заказе. После обработки заказа можно нажать кнопку «Ок».

ВНИМАНИЕ! Вся информация о поступивших заказах фиксируется в отдельном файле orderlog.log. Данный файл можно открыть с помощью любого текстового редактора. Путь к файлу: C:\Documents and Settings\ {ИМЯ ПОЛЬЗОВАТЕЛЯ}\Мои документы\ElectMenu\Log\orderlog.log

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

Не определены.

Операция 2: Приём запроса «Вызов официанта»

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

– Появление в центре экрана диалогового окна «Вызов официанта»

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

1. При получении запроса «Вызов официанта» появится диалоговое окно, содержащее информацию о клиенте (номер столика). После обработки заказа можно нажать кнопку «Ок».

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

Не определены.

Операция 3: Приём запроса «Запрос счёта»

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

– Появление в центре экрана диалогового окна «Запрос счёта»

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

1. При получении запроса «Запрос счёта» появится диалоговое окно, содержащее информацию о клиенте (номер столика). После обработки заказа можно нажать кнопку «Ок».

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

Не определены.

Задача: «Работа с основным окном программы»

Операция 1: Работа с треем

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

Не требуются.

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

1. Для того чтобы свернуть основное окно программы необходимо выполнить одно из следующих действий:

− Нажать на кнопку в правом верхнем углу основного окна;

− Нажать на кнопку в правом верхнем углу основного окна

− Левым щелчком мыши нажать на значок на панели задач

− Правым щелчком мыши нажать на значок на панели задач и из появившегося контекстного меню выбрать команду «Свернуть окно»

2. Для того чтобы развернуть основное окно программы необходимо выполнить одно из следующих действий:

− Левым щелчком мыши нажать на значок на панели задач

− Правым щелчком мыши нажать на значок на панели задач и из появившегося контекстного меню выбрать команду «Показать главное окно»

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

5 секунд.

Операция 2: Завершение работы

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

Не требуются.

Подготовительные действия:

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

Основные действия в требуемой последовательности:

1. При завершении работы с программой необходимо выполнить одно из следующих действий:

− В основном окне программы нажать на кнопку со значком:

− Правым щелчком мыши нажать на значок на панели задач и из появившегося контекстного меню выбрать команду «Выход»

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

5 секунд.

Выполняемые функции и задачи серверного приложения

Задача: «Редактирование списка заказываемых блюд»

Операция 1: Добавление блюда в лист заказа

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

– выполнение требований, описанных в разделе 2 (Назначение и условия применения системы «Электронное меню»);

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

1. В основном экране (РИСУНОК 1) из представленных категорий выбрать нужную категорию и нажать на изображение, соответствующее данной категории.

После этого откроется экран, содержащий список блюд.

РИСУНОК 1 – Экран категорий

2. В списке блюд (РИСУНОК 2) выбрать понравившееся блюдо и нажать на любое место области, в которую заключено данное блюдо. После этого откроется диалог заказа блюда.

РИСУНОК 2 - Список блюд

3. В диалоге заказа блюда (РИСУНОК 3) необходимо выбрать количество заказываемых порций (штук), нажимая на соответствующие кнопки (« + » и « - »). По умолчанию количество равно 1. После этого нажать на кнопку «В заказ». При отказе от заказа нажать кнопку «Отмена».

РИСУНОК 3 - Диалог заказа блюда

4. После нажатия кнопки «В заказ» выбранное блюдо попадает в лист заказа, который выглядит следующим образом (РИСУНОК 4):

РИСУНОК 4 - Лист заказа

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

Не определены.

Операция 2: Удаление блюд из списка заказа

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

– наличие блюд в листе заказа.

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

1. Для того чтобы удалить блюдо из листа заказа (РИСУНОК 5) необходимо нажать на кнопку, расположенную напротив блюда.

После этого выбранное блюдо будет удалено из заказа.

РИСУНОК 5 - Лист заказа

2. Для того чтобы очистить весь лист заказа полностью, не удаляя по одному блюду, необходимо нажать на устройстве кнопку «Menu», после чего появится меню с командой: «Очистить лист заказа». По нажатию на команду «Очистить лист заказа» все блюда из листа заказа будут удалены.

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

Не определены.

Задача: «Отправка запросов серверному приложению»

Операция 1: Отправка запроса «Оформить заказ»

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

– Наличие блюд в листе заказа.

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

1. Для того чтобы оформить заказ необходимо нажать на соответствующую кнопку внизу экрана в листе заказа.

Если данная операция завершилась успешно, то будет выведено сообщение

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

5-10 секунд.

Операция 2: Отправка запроса «Вызов официанта»

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

Не требуются.

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

1. Для того чтобы позвать официанта необходимо нажать на соответствующую кнопку внизу экрана.

После этого будет показан диалог согласия

Если была нажата кнопка «Да» и данная операция завершилась успешно, то будет выведено сообщение

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

5-10 секунд.

Операция 3: Отправка запроса «Запрос счёта»

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

1. Наличие обработанного или находящегося в обработке заказа.

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

2. Для того чтобы запросить счёт необходимо нажать на соответствующую кнопку внизу экрана.

После этого будет показан диалог согласия

Если была нажата кнопка «Да» и данная операция завершилась успешно, то будет выведено сообщение

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

5-10 секунд.

Задача: «Работа с файлами»

Операция 1: Вход в окно администратора

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

Не требуются.

Подготовительные действия:

Необходимо перейти в окно выбора категорий блюд.

Основные действия в требуемой последовательности:

1. Для того чтобы войти в окно администратора необходимо нажать на устройстве кнопку «Menu», после чего появится контекстное меню «Меню администратора». Нажав на него, откроется диалог ввода пароля.

2. Введя пароль («1»), запустится окно администратора.

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

30-60 секунд.

Операция 2: Ввод настроек приложения и синхронизация

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

− Открыто окно администратора.

Подготовительные действия:

Не требуются.

Основные действия в требуемой последовательности:

1. В окне администратора (РИСУНОК 6) необходимо ввести следующие данные:

− Имя клиента (например, «Table1»);

− IP-адрес компьютера в беспроводной сети, на котором установлено приложение – сервер.

2. Затем необходимо нажать на кнопку «Сохранить» для того, чтобы не вводить настройки постоянно.

3. Если введено имя клиента и верный IP- адрес, то необходимо нажать кнопку «Синхронизация» внизу экрана. Далее программа установит соединение с приложением – сервером и загрузит актуальное меню.

В случае неудачи операции проверьте правильность ввода настроек или наличие подключения к беспроводной сети обоих устройств (сервер и клиент).

РИСУНОК 6 Окно администратора (во время синхронизации)

Заключительные действия:

Не требуются.

Ресурсы, расходуемые на операцию:

90-300 секунд.

5 Аварийные ситуации

В случае возникновения ошибок при работе с информационной системой «Электронное меню», не описанных ниже в данном разделе, необходимо убедиться в выполнении требований, описанных в разделе 2 (Назначение и условия применения системы «Электронное меню»); обратиться к сотруднику подразделения технической поддержки предприятия-разработчика, либо к ответственному Администратору ИС «Электронное Меню».

ТАБЛИЦА 3 – Описание ошибок в приложении – сервере

Класс ошибки	Ошибка	Описание ошибки	Требуемые действия пользователя при возникновении ошибки
Ошибки файлов	Ошибка: Возможно файл поврежден.	Невозможно открыть файл изображения	Выбрать другой файл изображения.
Ошибки файлов	Не удалось записать файл	Невозможно скопировать файл в требуемую директорию	Убедитесь в наличии свободного дискового пространства.
Ошибки ввода	Не заполнены все поля	Возникает при создании или изменении категории/блюда	Убедитесь, что ввели всю необходимую информацию.
Ошибки ввода	Цена указана неверно	Возникает при создании или изменении блюда	Убедитесь, что верно указана цена и соответствует указанному формату.

ТАБЛИЦА 4 – Описание ошибок в приложении – клиенте

Класс ошибки	Ошибка	Описание ошибки	Требуемые действия пользователя при возникновении ошибки
Ошибки соединения	Ошибка соединения	Невозможно установить соединение, произошла ошибка скачивания файлов с сервера, введены неверные настройки приложения	Проверить правильность ввода в окне администратора IP-адреса, убедиться в наличии соединения устройств и правильной работы беспроводной сети. Проверить наличие свободного пространства на карте памяти устройства.
Ошибки ввода	Приложение не авторизовано	Не введены настройки приложения	Убедитесь, что ввели всю необходимую информацию в окне администратора (имя клиента и IP-адрес).

Действия в случае несоблюдения условий выполнения технологического процесса, в том числе при длительных отказах технических средств:

Под внешними причинами понимается в основном сбой в системе электричества. В этом случае при остановке работы программного средства практически вся информация сохранится, так как каждое действие фиксируется. В данном случае никаких действий не применяется. По всем вопросам можно обратиться к ответственному администратору системы или в службу технической поддержки предприятия – разработчика.

Действия по восстановлению программ или данных при отказе магнитных носителей или обнаружения ошибок в данных:

При ошибке в работе технических средств (будь то электронные носители, либо сами ЭВМ) необходимо всегда иметь резервную копию созданного или исправленного меню на флеш-носителе, на жестком диске, либо попытаться восстановить информацию в специальных организациях. Путь к файлам меню: C:\Documents and Settings\ {ИМЯ ПОЛЬЗОВАТЕЛЯ}\Мои документы\ElectMenu\.

Действия в случаях обнаружения несанкционированного вмешательства в данные:

При несанкционированном использовании данных необходимо обратиться в службу безопасности и изменить уровень доступа на рабочем месте.

Действия в других аварийных ситуациях:

При обнаружении сбоев в работе программного обеспечения (компьютера или самой программы) рекомендуется закрыть программу, перезагрузить компьютер (или другое техническое устройство) и попробовать продолжить работу с программой после перезагрузки. Если это не помогло, рекомендуется восстановить меню с резервных копий.

6 Рекомендации по освоению

При освоении информационной системы «Электронное меню» рекомендуется придерживаться настоящего «Руководства пользователя». Необходимо учитывать каждый пункт данного документа.

В качестве контрольного примера рекомендуется выполнить последовательность действий, описанных в разделе 3 (п.3.3 Порядок проверки работоспособности) настоящего документа, а также выполнение всех операций, описанных в разделе 4 (п.4.2 Описание операций технологического процесса обработки данных, необходимых для выполнения задач) настоящего документа.

Электронное меню

2012-08-14T12:39:00.000-07:00

Электронное меню

Спустя большой промежуток времени, решил поделиться наработками в программе Электронное меню, которую я начал создавать очень давно.
Из-за недостатка времени в программе остались некоторые скромные недочеты, но основной функционал все - таки реализован, а также реализовано множество различных решений специфических задач, возникающих при написании кода.

Вообще говоря, работой своей я доволен.

Приведу небольшое описание программы:

Ключевые слова: Электронное меню, Предприятия общественного питания, проектирование ИС, реализация ИС.

Объект исследования – автоматизация процессов получения заказов от посетителей предприятий общественного питания и формирование меню.

Цель работы – проектирование и создание информационной системы

«Электронное меню», состоящей из двух частей: приложение-клиент, выполняющее непосредственное взаимодействие с клиентами кафе или ресторана; и приложение-сервер, которое позволяет обновлять ассортимент меню и цены на блюда.

Система реализована в виде двух приложений – клиентская и серверная составляющие. Клиентская часть системы выполнена для операционной системы Android в интегрированной среде разработки Eclipse с использованием объектно-ориентированного языка Java. Для работы с базой данных использована библиотека SQLite, запросы написаны на языке SQL. Исходные коды серверной части системы написаны на объектно-ориентированном языке C# (Sharp) в среде разработки Microsoft Visual Studio 2010.

Вот несколько картинок:

Так выглядит главное окно приложения - сервера

Так выглядит таблица категорий блюд в приложении - клиенте

Так выглядит список блюд в отдельной категории

Так выглядит отдельное блюдо

Если Вас заинтересовало данное решение, можете написать на почту: saper666@inbox.ru

Общее количество строк кода получилось больше 7000! Даже сам не ожидал, что придется столько поработать.

Сведем воедино создание списка.

2012-02-16T04:54:00.000-08:00

Все 5 файлов.

Здесь приведены коды ранее созданных классов и разметки.

Встречаем все 5 файлов:

Dish.java

DishAdapter.java

BlogspotActivity.java

dish.xml

dishitem.xml

Ниже приведен код каждого из файлов:

Dish.java (с 1 конструктором, который и будет использован)

package saper.blogspot.namespace;

//Создаем класс Блюдо(Диш)
public class Dish
{
private int icon;
private String title; //название блюда
private String shortDescription; //краткое описание
//private String longDescription; //полное описание
private String mass; //масса на выходе гр/мл
private double price; //цена
//Коструктор

Dish(int icon,String title,String shortDescription,double price,String mass)
{
this.icon=icon;
this.title=title;
this.shortDescription=shortDescription;
this.price=price;
this.mass=mass;
}

// методы
public String getInfo()
{
return title;
}
public String getshortDescription()
{
return shortDescription;
}
public String getMass()
{
return mass;
}
public double getPrice()
{
return price;
}

public void setInfo(String title)
{
this.title=title;

}
public void setMass(String mass)
{
this.mass=mass;
}
public void setPrice(double price)
{
this.price=price;
}

public int getIcon()
{
return icon;
}

public void setIcon(int icon)
{
this.icon = icon;
}
}

DishAdapter.java

package saper.blogspot.namespace;

import java.util.ArrayList;
import android.content.Context;
import android.view.LayoutInflater;
import android.view.View;
import android.view.ViewGroup;
import android.widget.BaseAdapter;
import android.widget.ImageView;
import android.widget.TextView;

public class DishAdapter extends BaseAdapter {
private LayoutInflater mLayoutInflater;
private ArrayList<Dish> list;

public DishAdapter (Context ctx,ArrayList<Dish> lst) {
mLayoutInflater = LayoutInflater.from(ctx);
list = lst;
}

public int getCount () {
return list.size();
}

public Object getItem (int position) {
return position;
}

public long getItemId (int position) {
return position;
}

public Dish getString (int position) {
return (Dish) list.get(position);
}

public View getView(int position, View convertView, ViewGroup parent) {

if (convertView == null)
convertView = mLayoutInflater.inflate(R.layout.dishitem, null);

ImageView icon = (ImageView)convertView.findViewById(R.id.Image);
icon.setImageResource(((Dish) list.get(position)).getIcon());

TextView title = (TextView)convertView.findViewById(R.id.Title);
title.setText(((Dish) list.get(position)).getInfo());

TextView shortDescription = (TextView)convertView.findViewById(R.id.ShortDescription);
shortDescription.setText(((Dish) list.get(position)).getshortDescription());

TextView mass = (TextView)convertView.findViewById(R.id.Mass);
String massa =(((Dish) list.get(position)).getMass());
mass.setText("\tВес:"+"\r"+massa+"\t");

TextView price = (TextView)convertView.findViewById(R.id.Price);
String pric = Double.toString(((Dish) list.get(position)).getPrice());
price.setText("\tЦена:"+"\r"+pric+"р."+"\t");

return convertView;
}
}

BlogspotActivity.java

package saper.blogspot.namespace;

import java.util.ArrayList;
import android.app.ListActivity;
import android.os.Bundle;
import android.view.View;
import android.widget.ListView;

public class BlogspotActivity extends ListActivity {
ArrayList<Dish> list = new ArrayList<Dish>(); //список блюд
DishAdapter mAdapter; //адаптер для поля блюда
@Override
public void onCreate(Bundle savedInstanceState) {
super.onCreate(savedInstanceState);
setContentView(R.layout.dish);

mAdapter = new DishAdapter(this,list);
setListAdapter(mAdapter);

list.add(new Dish(R.drawable.food003,"Пицца с угрем и гребешком",
"Великолепный коктейль из тигровых креветок," +
" копченого угря и морского гребешка, приправленных " +
"сырами Моцарелла и Пармезан, сливками, красным луком и чесноком. ",
475,"370"));

list.add(new Dish(R.drawable.food004,"Шампиньоны по-французски","Великолепные свежие шампиньоны" +
" в оливковом масле и соке лимона под соевым соусом",220,"250"));
list.add(new Dish(R.drawable.food009,"Нака-нака Йоката-Ва Аната","Вкусное японское ассорти" +
" на листьях салата. Подается соевым соусом, имбирем и васаби .",220,"250"));

}

public void onListItemClick (ListView parent, View v, int position, long id)
{
}
}

dish.xml

<RelativeLayout xmlns:android="http://schemas.android.com/apk/res/android"
android:id="@+id/linearLayout1"
android:layout_width="fill_parent"
android:layout_height="wrap_content"
android:orientation="vertical" >

<ListView
android:id="@android:id/list"
android:layout_width="fill_parent"
android:layout_height="wrap_content"
android:layout_alignParentTop="true" />

</RelativeLayout>

dishitem.xml

<?xml version="1.0" encoding="utf-8"?>
<LinearLayout xmlns:android="http://schemas.android.com/apk/res/android"
android:layout_height="wrap_content"
android:layout_width="wrap_content"
android:orientation="horizontal"
android:padding="5px">

<ImageView
android:id="@+id/Image"
android:layout_width="wrap_content"
android:layout_height="wrap_content"/>

<LinearLayout
android:layout_height="wrap_content"
android:layout_width="wrap_content"
android:orientation="vertical"
android:paddingLeft="15px">

<TextView
android:id="@+id/Title"
android:layout_width="wrap_content"
android:layout_height="wrap_content"
android:textSize="14sp"
android:textStyle="bold"/>

<TextView
android:id="@+id/ShortDescription"
android:layout_width="wrap_content"
android:layout_height="wrap_content"
android:textSize="10sp"
android:textStyle="italic"/>

<LinearLayout
android:layout_height="wrap_content"
android:layout_width="wrap_content"
android:orientation="horizontal"
android:paddingLeft="15px">

<TextView
android:id="@+id/Mass"
android:layout_width="wrap_content"
android:layout_height="wrap_content"
android:textSize="12sp"
android:textStyle="italic"/>

<TextView
android:id="@+id/Price"
android:layout_width="wrap_content"
android:layout_height="wrap_content"
android:textSize="12sp"
android:textStyle="italic"/>

</LinearLayout>
</LinearLayout>
</LinearLayout>

Создание Activity и запуск приложения.

2012-02-07T00:56:00.000-08:00

Осталось создать последний класс BlogspotActivity,
который и будет основным для того, чтобы мы увидели созданный нами список блюд. Также мы запустим наше приложение и посмотрим на результат.

Класс BlogspotActivity - будет нашей Activity (деятельностью или, проще говоря, будет нашим основным экраном).

! Картинки блюд должны быть предварительно загружены в папку res/drawable

Приступим к его созданию:

// импорты
import java.util.ArrayList;
import android.app.ListActivity;
import android.os.Bundle;
import android.view.View;
import android.widget.ListView;

// новый класс на основе существующего класса ListActivity
public class BlogspotActivity extends ListActivity {
ArrayList<Dish> list = new ArrayList<Dish>(); //создаем список блюд
DishAdapter mAdapter; //адаптер для конкретного блюда
@Override // перегружаем методы класса ListActivity

public void onCreate(Bundle savedInstanceState) {
super.onCreate(savedInstanceState);
setContentView(R.layout.dish); //основная xml разметка. Это файл dish.xml

mAdapter = new DishAdapter(this,list); // создаем дочерний объект класса DishAdapter
setListAdapter(mAdapter); // "прикручиваем" адаптер к ListView

// А вот и самое интересное! Добавляем наши блюда в ArrayList, используя один из
// конструкторов, определенных в классе Dish. Мы используем конструктор:
// Dish(int icon,String title,String shortDescription,double price,String mass)

// Картинки блюд должны быть предварительно загружены в папку res/drawable
list.add(new Dish(R.drawable.food003,"Пицца с угрем и гребешком",
"Великолепный коктейль из тигровых креветок," +
" копченого угря и морского гребешка, приправленных " +
"сырами Моцарелла и Пармезан, сливками, красным луком и чесноком. ",
475,"370"));

list.add(new Dish(R.drawable.food004,"Шампиньоны по-французски",
"Великолепные свежие шампиньоны" +
" в оливковом масле и соке лимона под соевым соусом",220,"250"));

list.add(new Dish(R.drawable.food009,"Нака-нака Йоката-Ва Аната","Вкусное японское ассорти" +
" на листьях салата. Подается соевым соусом, имбирем и васаби .",220,"250"));

// этот метод обрабатывает нажатие на элемент списка,
// у нас ничего происходить не будет
public void onListItemClick (ListView parent, View v, int position, long id)
{
}
}

Сохраняем все изменения. И теперь можно приступить к запуску приложения.
Нажмем следующую комбинацию клавиш в Eclipse: ctrl + F11.
Немного подождем пока запустится эмулятор и установится наше приложения.
Вот результат:

Адаптер для списка ListView.

2012-02-07T00:00:00.000-08:00

В этом посте создаем новый класс, который будет адаптером для нашего списка блюд.

Адаптер (англ. adapter, от лат. adapto — приспособляю) — приспособление, устройство или деталь, предназначенные для соединения устройств, не имеющих иного совместимого способа соединения.

Как это понять?

С помощью данного адаптера мы создадим возможность добавления в ListView элементов с собственной разметкой, все наши блюда (элементы) будут содержаться в ArrayList.

Вот код нашего нового адаптера:

// импорты
import java.util.ArrayList;
import android.content.Context;
import android.view.LayoutInflater;
import android.view.View;
import android.view.ViewGroup;
import android.widget.BaseAdapter;
import android.widget.ImageView;
import android.widget.TextView;

// класс DishAdapter

public class DishAdapter extends BaseAdapter {
private LayoutInflater mLayoutInflater;
private ArrayList<Dish> list;

public DishAdapter (Context ctx,ArrayList<Dish> lst) {
mLayoutInflater = LayoutInflater.from(ctx);
list = lst;
}

public int getCount () {
return list.size();
}

public Object getItem (int position) {
return position;
}

public long getItemId (int position) {
return position;
}

public Dish getString (int position) {
return (Dish) list.get(position);
}

public View getView(int position, View convertView, ViewGroup parent) {

if (convertView == null)
convertView = mLayoutInflater.inflate(R.layout.dishitem, null);
// R.layout.dishitem - это наш xml файл, теперь мы можем обратиться
// к каждому его элементу по id и задать значение.

ImageView icon = (ImageView)convertView.findViewById(R.id.Image);// id ImageView
icon.setImageResource(((Dish) list.get(position)).getIcon()); // получаем картинку блюда,
//используя метод getIcon(), который мы определили в классе Dish
// и так далее соответственно в разметку подставляются конкретные характеристики блюда
TextView title = (TextView)convertView.findViewById(R.id.Title);
title.setText(((Dish) list.get(position)).getInfo()); //название блюда

TextView shortDescription = (TextView)convertView.findViewById(R.id.ShortDescription);
shortDescription.setText(((Dish) list.get(position)).getshortDescription()); // краткое описание

TextView mass = (TextView)convertView.findViewById(R.id.Mass);
String massa =(((Dish) list.get(position)).getMass()); //масса
mass.setText("\tВес:"+"\r"+massa+"\t");

TextView price = (TextView)convertView.findViewById(R.id.Price);
String pric = Double.toString(((Dish) list.get(position)).getPrice());
//цена (конвертируется в тип String из типа Double)
price.setText("\tЦена:"+"\r"+pric+"р."+"\t");

return convertView;
// на выходе получаем полноценный элемент списка блюд, то есть конкретное блюдо со
//своими характеристиками, расположенными в соответствии с разметкой xml.
}
}

XML разметка для списка блюд.

2012-02-06T23:21:00.000-08:00

Создаем XML разметку для списка блюд.
В этом посте напишем разметку для нашего списка блюд. Она будет включать два XML файла: dish.xml и dishitem.xml. С помощью первого файла мы сможем отобразить весь экран, на котором будет расположен наш список блюд, а с помощью второго файла мы зададим отображение отдельного элемента нашего списка, то есть конкретного блюда.

Данные файлы должны быть расположены в папке res/layout нашего проекта.

Итак, вот код XML разметки файла dish.xml, он очень простой и содержит всего два элемента: RelativeLayout и ListView.

<RelativeLayout xmlns:android="http://schemas.android.com/apk/res/android"
android:id="@+id/layout1"
android:layout_width="fill_parent"
android:layout_height="wrap_content"
android:orientation="vertical" >

<ListView
android:id="@android:id/list"
android:layout_width="fill_parent"
android:layout_height="wrap_content"
android:layout_alignParentTop="true" />

</RelativeLayout>

А вот код файла dishitem.xml:

<?xml version="1.0" encoding="utf-8"?>
<LinearLayout xmlns:android="http://schemas.android.com/apk/res/android"
android:layout_height="wrap_content"
android:layout_width="wrap_content"
android:orientation="horizontal"
android:padding="5px">

// здесь будет наша картинка

// не забываем использовать id, они нам еще понадобятся.
// id для ImageView - Image
<ImageView
android:id="@+id/Image"
android:layout_width="wrap_content"
android:layout_height="wrap_content"/>

<LinearLayout
android:layout_height="wrap_content"
android:layout_width="wrap_content"
android:orientation="vertical"
android:paddingLeft="15px">

// название блюда

<TextView
android:id="@+id/Title"
android:layout_width="wrap_content"
android:layout_height="wrap_content"
android:textSize="14sp"
android:textStyle="bold"/>
// краткое описание блюда
<TextView
android:id="@+id/ShortDescription"
android:layout_width="wrap_content"
android:layout_height="wrap_content"
android:textSize="10sp"
android:textStyle="italic"/>

<LinearLayout
android:layout_height="wrap_content"
android:layout_width="wrap_content"
android:orientation="horizontal"
android:paddingLeft="15px">

// масса блюда на выходе

<TextView
android:id="@+id/Mass"
android:layout_width="wrap_content"
android:layout_height="wrap_content"
android:textSize="12sp"
android:textStyle="italic"/>

// цена одной порции нашего блюда

<TextView
android:id="@+id/Price"
android:layout_width="wrap_content"
android:layout_height="wrap_content"
android:textSize="12sp"
android:textStyle="italic"/>

</LinearLayout>
</LinearLayout>
</LinearLayout>

Комментарии, написанные в этом коде, в самих файлах должны отсутствовать, они здесь написаны для понимания.

Сохраняем оба файла под их именами, соответственно: dish и dishitem. Вот теперь у нас готова разметка для списка блюд.

Java.Создаем новый класс.

2012-02-06T04:19:00.000-08:00

Создаем класс на языке Java в Eclipse.

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

Итак вот он, наш класс Dish (англ. блюдо):

//Создаем класс Блюдо(Диш)
public class Dish
{
private String category; // категория блюда (чем является наше блюдо: суп, гарнир, закуска,
// салат, мясное блюдо, рыбное блюдо, блюдо из курицы и т.п.)
private int icon; // картинка для нашего блюда
private String title; //название блюда
private String shortDescription; //краткое описание
private String longDescription; //полное описание
private String mass; //масса на выходе гр/мл
private double price; //цена
private int number; //количество порций
//Кострукторы блюда
// ! Java не допускает использование деструкторов. Для этого используется метод finalize()

//Конструктор с названием и кратким описанием
Dish(String title,String shortDescription)
{
this.title=title;
this.shortDescription=shortDescription;
}

//Конструтор с картинкой, названием и кратким описанием
Dish(int icon,String title,String shortDescription)
{
this.icon=icon;
this.title=title;
this.shortDescription=shortDescription;
}

// далее уже понятно, что находится в конструкторе
// конструкторы нам нужны для создания экземпляров блюд
//т.е. чтобы создать конкретное блюдо мы будем пользоваться конструктором
Dish(int icon,String title,String shortDescription,double price,String mass,int number)
{
this.number=number;
this.icon=icon;
this.title=title;
this.shortDescription=shortDescription;
this.price=price;
this.mass=mass;
}
Dish(String category,int icon,String title,String shortDescription,double price,String mass)
{
this.category=category;
this.icon=icon;
this.title=title;
this.shortDescription=shortDescription;
this.price=price;
this.mass=mass;
}
Dish(int icon,String title,String shortDescription,double price,String mass)
{
this.icon=icon;
this.title=title;
this.shortDescription=shortDescription;
this.price=price;
this.mass=mass;
}

// методы получения и задания отдельных характеристик блюда
//т.е. если хотим узнать название блюда, то пользуемся методом getInfo()
//а если хотим переименовать наше блюдо, то пользуемся методом setInfo()

// слово return возвращает нам определенный результат действий (напр. название блюда).
//слово void указывает на то, что метод ничего не возвращает.
public String getInfo()
{
return title;
}
public String getshortDescription()
{
return shortDescription;
}
public String getMass()
{
return mass;
}
public double getPrice()
{
return price;
}
public int getNumber()
{
return number;
}
public void setInfo(String title)
{
this.title=title;
}
public void setMass(String mass)
{
this.mass=mass;
}
public void setPrice(double price)
{
this.price=price;
}
public void setNumber(int number)
{
this.number=number;
}
public int getIcon() {
return icon;
}
public void setIcon(int icon) {
this.icon = icon;
}
public String getCategory()
{
return category;
}
public void setCategory(String category)
{
this.category = category;
}
// вот здесь и заканчивается наш класс
}

Если мы хотим создать новое блюдо, то просто пишем следующую конструкцию, использующую конструктор:

new Dish(R.drawable.food004,"Шампиньоны по-французски","Великолепные свежие шампиньоны в оливковом масле и соке лимона под соевым соусом",220,"250");

Здесь применялся конструктор:

Dish(int icon,String title,String shortDescription,double price,String mass)

Начало программирования под андроид

2012-02-03T01:37:00.000-08:00

Первое знакомство с Android.
Передо мной встала немыслимая задача написания одного приложения под Android - электронного меню для кафе. В нескольких статьях я попробую немного разобраться в этом сложном для меня вопросе, так как с языком Java я мало знаком и с самой ОС Android тоже.
Итак, приступим. Мое первое знакомство с Android.

Для начала разработки под Андроид нам понадобятся:

1) JDK (Java Development Kit) - Java платформа, необходимая для Eclipse
Скачать JDK можно с официального сайта Oracle:
www.oracle.com

2) Eclipse (я использую eclipse-java-indigo-SR1-win32) - среда разработки
Скачать eclipse можно здесь:
www.eclipse.org

3) Android SDK - плагин для Eclipse, чтобы появилась возможность разрабатывать под Андроид, а также виртуальный эмулятор Android устройтв.
SDK:
developer.android.com

Этот сайт должен стать для вас основным помощником в разработке приложений для Android.

Этот набор можно бесплатно скачать в интернете. Также в интернете очень много информации о том, как установить и настроить данные пакеты.

Начнем:

Установка
1. Устанавливаем Java Development Kit (JDK), ничего не обычного там нет. Ставим все по умолчанию.
2. Распаковываем Eclipse Classic в c:eclipse
3. Распаковываем Android SDK в папку c:eclipse

Eclipse. Установка представляет собой сжатую папку. Распакуйте содержимое папки в удобное место на своем компьютере. Программа установки не создает никаких значков или ярлыков в Windows®. Для целей этого руководства папка Eclipse будет расположена в каталоге c:\software\eclipse.

Чтобы запустить Eclipse, дважды щелкните на файле eclipse.exe в каталоге установки Eclipse. Это приведет к запуску IDE. Программа запросит рабочую область (workspace) и предложит место по умолчанию, например, c:\documents and settings\username\workspace. Выберите его или укажите рабочую область в другом месте.

После загрузки Eclipse нажмите значок Workbench - Go to the workbench на главном экране.

Теперь пора получить Android SDK.

Существуют версии SDK для установки на Windows, Mac OS X (только на Intel®) и Linux (i386). Выберите последнюю версию SDK для нужной платформы.

Android SDK представляет собой сжатую папку. Распакуйте содержимое этого файла в удобное место на своем компьютере. Для целей настоящего руководства SDK установлен в каталог c:\software\google\android_m3-rc37a. Очевидно, что если вы устанавливаете его на Mac OS X и Linux, то SDK нужно поместить туда, где вы обычно размещаете инструменты разработки.

Итак, Eclipse и Android SDK установлены. Пришло время установить плагин в Eclipse, чтобы воспользоваться преимуществами среды Eclipse.

Установка Android Developer Tools:

Выполните функцию "Find and Install" в Eclipse из меню Help > Software Updates.
Выберите опцию Search for new features to install (Поиск новых функций для установки).
Выберите New Remote Site (Новый удаленный сайт). Присвойте этому адресу имя, например, "Android Developer Tools". В диалоге используйте следующий URL: https://dl-ssl.google.com/android/eclipse. Обратите внимание на HTTPS в этом URL.

По умолчанию новая запись будет проверена и добавлена в список. Нажмите Finish. В результатах поиска присутствует Android Developer Tools. Выберете Developer Tools и нажмите Next.
Просмотрев и приняв условия лицензионного соглашения, нажмите Next. Обратите внимание на то, что лицензионное соглашение включает в себя особые требования по использованию Google Maps API. Проверьте и примите источник установки, затем нажмите Finish.

Теперь плагин загружен и установлен. Для собственного удобства нажмите Install All (Установить все), а затем перезапустите Eclipse.

Настройка плагина Eclipse

После перезапуска Eclipse необходимо подключить плагин к установке SDK. Выберите Preferences в меню Window. На представлении дерева слева нажмите Android. В правой панели укажите местоположение установки SDK.

Среда Eclipse готова к созданию Android-приложений.

ABC-XYZ анализ

2012-01-30T18:02:00.000-08:00

ABC-XYZ анализ.
Описание и алгоритмы проведения ABC-анализа и XYZ-анализа и пример в Excel.

ABC-анализ — метод, позволяющий классифицировать ресурсы фирмы по степени их важности. В его основе лежит принцип Парето — 20 % всех товаров дают 80 % оборота. По отношению к ABC-анализу правило Парето может прозвучать так: надёжный контроль 20 % позиций позволяет на 80 % контролировать систему, будь то запасы сырья и комплектующих, либо продуктовый ряд предприятия и т. п. Часто ABC-анализ путают с ABC-методом, расшифровывая ABC как Activity Based Costing, что в корне не верно.

ABC-анализ — анализ товарных запасов путём деления на три категории:
А — наиболее ценные, 20 % — тов.запасов; 80 % — продаж
В — промежуточные, 30 % — тов.запасов; 15 % — продаж
С — наименее ценные, 50 % — тов.запасов; 5 % — продаж

Алгоритм ABC-анализа:
1) Описание номенклатуры товаров;
2) Подсчет полной стоимости товаров, попадающих в каждую группу номенклатуры;
3) Ранжирование групп номенклатуры в порядке убывания суммарной стоимости;
4) Вычисление стоимости нарастающим итогом в ранжированном ряду;
5) Распределение товаров по группам A,B,C.

XYZ-анализ позволяет произвести классификацию ресурсов компании в зависимости от характера их потребления и точности прогнозирования изменений в их потребности в течение определенного временного цикла. Алгоритм проведения можно представить в четырёх этапах:
Определение коэффициентов вариации для анализируемых ресурсов;
Группировка ресурсов в соответствии с возрастанием коэффициента вариации;
Распределение по категориям X, Y, Z.
Графическое представление результатов анализа.

Категория X — ресурсы характеризуются стабильной величиной потребления, незначительными колебаниями в их расходе и высокой точностью прогноза. Значение коэффициента вариации находится в интервале от 0 до 10 %.

Категория Y — ресурсы характеризуются известными тенденциями определения потребности в них (например, сезонными колебаниями) и средними возможностями их прогнозирования. Значение коэффициента вариации — от 10 до 25 %.

Категория Z — потребление ресурсов нерегулярно, какие-либо тенденции отсутствуют, точность прогнозирования невысокая. Значение коэффициента вариации — свыше 25 %.

Алгоритм XYZ-анализа:
1) Описание номенклатуры товаров;
2) Сбор данных за несколько периодов вглубь истории о продажах каждого товара в прошлый период;
3) Вычисление коэффициента вариации для каждого товара;
4) Ранжирование всех товаров в порядке возрастания коэффициента вариации;
5) Распределение всей номенклатуры по коэффициенту вариации на группы X,Y,Z.

Вот пример в Экселе:
letitbit.net
depositfiles.com

Матрица БКГ в Excel

2012-01-30T17:41:00.000-08:00

Матрица БКГ является двумерной моделью для анализа конкуренции. Эта схема анализа конкурентной ситуации носит название "Матрица БКГ". Она разработана Бостонской консалтинговой группой и другое ее название - матрица "темпы роста - доля рынка" (матрица БКГ). Этот самый распространенный инструмент анализа современного менеджмента был создан Брюсом Хендерсоном, основателем Бостонской консалтинговой группы.

Матрица, предложенная Бостонской консультативной группой (БКГ), представляет собой один из наиболее известных инструментов стратегического анализа номенклатуры фирмы, т.н. портфолио-анализа. Цель анализа – выявить, на каком этапе жизненного цикла находится каждый товар фирмы; разделить все товары на однородные группы, относящиеся к соответствующему этапу и разработать политику фирмы по каждой группе. В классической матрице позиция каждого товара определяется двумя параметрами:

· текущей долей рынка бизнеса (отношением доли рынка, занимаемой товаром данной фирмы, к доле рынка товара ведущего конкурента);

· потенциалом роста бизнеса (среднегодовым темпом прироста объема реализации данного товара).

Описание матрицы БКГ:

Слева вверху – «дикие кошки». Быстрый рост рынка делает данные товарные позиции привлекательными. Но их относительная доля на рынке низка и рождает вопрос, удастся ли реализовать потенциально высокую прибыль. Поэтому фирма должна решить, следует ли ей инвестировать капитал в товары, расположенные в этом квадранте.

Справа вверху – «звезды». Это лучшая позиция для бизнеса. Но «звезды» обычно требуют больших инвестиций для поддержки экспансии продукции и увеличения производственных мощностей. Они также могут генерировать свои собственные внутренние потоки инвестиций вследствие преимуществ низких издержек при больших масштабах производства. Те товарные позиции в этой области, которые долго существуют и приближаются к зрелости, поддерживают сами себя, а «юные» часто требуют существенных инвестиций.

Справа внизу – «дойные коровы». Бизнес в этом секторе с относительно большой контролируемой частью рынка и при лидирующих позициях в отрасли обеспечивает достаточно притягательную прибыль, но вследствие слабого роста отрасли в целом нет необходимости реинвестировать капитал для поддержания позиции данных товаров на рынке, а потоки инвестиций целесообразно направить в другие секторы. Многие из сегодняшних «дойных коров» вчера были «звездами». Их следует «доить» для выплаты дивидендов и для финансирования новых товаров – юных «звёзд» и перспективных «диких кошек» (для превращения последних в «звезды»). Слабые «дойные коровы» становятся кандидатами для «раздевания», если в отрасли, достигшей зрелости, создаются неблагоприятные конкурентные условия.

Слева внизу – «собаки». Наименее привлекательный сектор вследствие непередовых позиций на рынке и малых прибылей по сравнению с лидерами, которые пользуются преимуществами масштаба производства. Таким образом, эти товары, как правило, – кандидаты к ликвидации.

Применение классической матрицы БКГ на отечественном рынке иногда бывает затруднительно по следующим причинам:

· во-первых, часто нет достоверной информации о долях рынка конкурентов;

· во-вторых, у большинства отечественных фирм история насчитывает всего несколько лет, что не позволяет оперировать понятием среднегодового темпа роста;

· в-третьих, отечественный рынок редко бывает занят полностью – места хватает практически всем, так что понятие доли рынка теряет ту «фатальную» значимость, которую изначально придавали ей разработчики матрицы.

По ссылке ниже можно скачать файлы - порядок создания матрицы БКГ в Excel, варианты для самостоятельной практики и один вариант матрицы БКГ в файле xml:
depositfiles.com
letitbit.net

Шифр Виженера в Delphi

2012-01-30T17:15:00.000-08:00

Шифр Виженера в Delphi

Шифр Виженера (фр. Chiffre de Vigenère) — метод полиалфавитного шифрования буквенного текста с использованием ключевого слова.

Этот метод является простой формой многоалфавитной замены. Шифр Виженера изобретался многократно. Впервые этот метод описал Джован Баттиста Беллазо (итал. Giovan Battista Bellaso) в книге La cifra del. Sig. Giovan Battista Bellasо в 1553 году, однако в XIX веке получил имя Блеза Виженера, французского дипломата. Метод прост для понимания и реализации, он является недоступным для простых методов криптоанализа.

Использование "таблицы Виженера”, которая представляет собой квадратную таблицу с числом строк и столбцов равным количеству букв алфавита. Чтобы зашифровать какое-либо сообщение выбирают слово - лозунг (например, "монастырь”) и надписывают его над сообщением с необходимым повторением.
Чтобы получить шифрованный текст, находят очередной знак лозунга, начиная с первого в вертикальном алфавите, а ему соответствующий знак сообщения в горизонтальном алфавите. На пересечении выделенных столбца и строки находим первую букву шифра. Очевидно, что ключом к такому шифру является используемый лозунг.

Лозунг: м о н а с т ы р ь м о н а с т ы р ь м о н
Исходный текст: р а с к и н у л о с ь м о р е ш и р о к о
Шифротекст: э о я к щ а п ы й ю й щ о в ч ф ш л ь ш ы

Таблица Виженера
А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я
Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А
В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б
Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В
Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г
Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д
Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е
З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж
И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З
Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И
К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й
Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К
М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л
Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л М
О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л М Н
П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л М Н О
Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л М Н О П
С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л М Н О П Р
Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л М Н О П Р С
У Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т
Ф Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У
Х Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф
Ц Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х
Ч Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц
Ш Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч
Щ Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш
Ь Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ
Ы Э Ю Я А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь
Э Ю Я А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы
Ю Я А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э
Я А Б В Г Д Е Ж З И Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ы Э Ю

Итак, вот краткое описание функций программы:

1) Шифрование русскоязычных текстов;

2) Взлом русскоязычных текстов методом МНК(метод наименьших вадратов):

3) Вывод на экран ключевого слова в случае взлома;

4) Результат выводится на экран группами по 6 символов;

5) Все символы, отличные от букв, программа игнорирует, кроме того, все символы принудительно переводятся в верхний регистр;

6) Предусмотрена защита foolproof.

Исходники можно найти тут:
depositfiles.com
letitbit.net

Вот небольшое задание для взлома:
depositfiles.com
letitbit.net

Ниже приведу полный код программы на Delphi в среде Developer Studio 2006:

unit Unit1; // реализация метода виженера

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ComCtrls, Grids, math, ExtCtrls;// подключаемые модули

type
TForm1 = class(TForm) // форма
Edit1: TEdit; // ключ
Button1: TButton; // шифровать
Button2: TButton; // дешифровать
Button3: TButton;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Memo1: TMemo;
Memo2: TMemo;
Button5: TButton;
Button6: TButton; // взлом
Label4: TLabel;
Edit2: TEdit;
Label5: TLabel;
Label6: TLabel;
procedure FormCreate(Sender: TObject);
procedure Button6Click(Sender: TObject);
procedure FormActivate(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Edit1KeyPress(Sender: TObject; var Key: Char);
procedure Button5Click(Sender: TObject);

private
{ Private declarations }
SaveWindowProc: TWndMethod;
public
procedure TEditWindowProc(var Message: TMessage);
{ Public declarations }
end;

var
Form1: TForm1;
trs,trb:array [0..31] of char;
frs,frst:array [0..31] of real; // массивы частот
vig:array [1..32] of string; // таблица виженера

implementation
//Шифрование Виженера
function Viz_Crypt(s,key:string):string;
const
SizeA = 32; //Размер алфавита
RusA = 'абвгдежзийклмнопрстуфхцчшщъыьэюя'; //Алфавит
var i, P, t :integer;
temp:string;
begin
s:=AnsiLowerCase(s); // Нижний регистр
key:=AnsiLowerCase(key);
t:=0; // Символ ключа
for i := 1 to length(s) do // Удаляем посторонние символы
if pos(s[i],RusA)<>0 then // ищем русские буквы
temp:=temp+s[i];
s:=temp;
for i:=1 to length(s) do
begin
inc(t); // Увеличиваем на 1
if t>length(key) then t:=1; // распространяем ключ по тексту
P:=pos(s[i],RusA)+pos(key[t],RusA);//Ищем новую позицию
P:=P-1;
if P>SizeA then P:=P-SizeA; // Если больше 33
Result:=Result+RusA[P]; // Получаем шифрованный текст
end;
end;

//Дешифрование Виженера
function Viz_DeCrypt(s,key:string):string;
const
SizeA = 32; //Размер алфавита
RusA = 'абвгдежзийклмнопрстуфхцчшщъыьэюя'; //Алфавит
var i, P, t :integer;
temp:string;
begin
s:=AnsilowerCase(s); // нижний регистр
key:=AnsilowerCase(key);
t:=0;
for i := 1 to length(s) do // Удаляем посторонние символы
if pos(s[i],RusA)<>0 then // ищем русские буквы
temp:=temp+s[i];
s:=temp;
for i:=1 to length(s) do
begin
inc(t); // увеличиваем на 1
if t>length(key) then t:=1;
P:=pos(s[i],RusA)-pos(key[t],RusA);// поиск новой позиции
P:=P+1;
if P<=0 then P:=P+SizeA; // если больше 33
Result:=Result+RusA[P]; // получаем расшифрованный текст
end;
end;

//функция возвращает наибольший общий делитель двух чисел
function nod(a,b:longint):longint;
begin
while (a<>0) and (b<>0) do
if a>=b then a:=a mod b // mod возвращает остаток от
else b:=b mod a; // целочисленного деления
nod:=a+b; // получаем НОД
end;

//функция сдвига символа. Ей передается алфавит, символ и величина сдвига
function kod(alphabet:array of char;char:char;displacement:integer):char;
var i:integer;
begin
Result:=char;
for i:=0 to high(alphabet) do //по каждому символу алфавита
begin
if char=alphabet[i] then //если переданный символ является i-символом алфавита
begin
kod:=alphabet[(i+displacement) mod length(alphabet)]; //то результат функции - сдвиг этого символа
break;
end;
end;
end;

//функция получения величины сдвига путем анализа частот встречаемости букв
function getkey(text:string;alphabet:array of char;frequencies:array of real):integer;
var i,j:integer; textfr:array of integer; tt:array of double;
begin
Result:=0;
setlength(textfr,length(frequencies)); // заполняем массив частот
setlength(tt,length(alphabet)); // заполняем массив алфавитом
for i:=1 to length(text) do //считаем количество каждой буквы в тексте
for j:=0 to high(alphabet) do // для каждой буквы
if text[i]=alphabet[j] then textfr[j]:=textfr[j]+1; // количество букв в тексте
for i:=0 to high(alphabet) do //для каждой буквы
begin
tt[i]:=0; // массив наименьших квадратов
for j:=0 to high(alphabet) do //считаем столько сумм, сколько букв в алфавите
begin
tt[i]:=tt[i]+sqr(frequencies[j]-textfr[(i+j+1) mod 32]); //сумма - это сумма квадратов разностей между частотой встречаемости...
end; //...1..32 буквы языка и количеством в тексте (1..32)+номер суммы буквы шифротекста
end;
for i:=0 to high(tt) do
if tt[i]=minvalue(tt) then getkey:=31-i; //величина сдвига=длина алфавита-номер минимальной суммы.
end;

//функция удаления из строки небуквенных символов. строчные буквы возвращаются прописными
function probely(s:string;b:byte):string;
var i,g:integer;
begin
i:=0;
g:=length(s);
s:=ansiuppercase(s); // верхний регистр
repeat
inc(i); // увеличиваем на 1
if not (s[i] in ['А'..'Я']) then // если не соответствует сиволу
begin // русского алфавита, то
delete(s,i,1); // удаляем
dec(i); // на символ назад
dec(g); // т.к. удаляем сиволы, то уменьшается дляна текста
end
until i=g; // количество русских символов равно длине текста
probely:=s; // а пока i не равно g повторяем нашу функцию
end;
{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject); // шифровать
var
obr:string;
gr:integer;
begin
if memo1.Text='' then // если текст пустой
begin
showmessage('Введите текст для шифровки');
abort;
end;
if edit1.Text='' then // если ключ пустой
begin
showmessage('Введите текст ключа');
abort;
end;
memo1.Text:=StringReplace(Memo1.Text,'ё','е',[rfReplaceAll]);// заменяем ё на е
memo1.Text:=StringReplace(Memo1.Text,'Ё','Е',[rfReplaceAll]);// заменяем Ё на Е
memo2.Text:=Viz_Crypt(memo1.Text,edit1.Text);//выполнить функцию шифрования
obr:=memo2.text;// делим обработанный текст на группы символов
gr:=0;
while gr<length(obr) do
begin
gr:=gr+7;
insert(' ',obr,gr);
end;
memo2.Text:=ansiuppercase(obr); // верхний регистр

end;

procedure TForm1.Button2Click(Sender: TObject); // дешифровать
var
obr:string;
gr:integer;
begin
if memo1.Text='' then // если не введен текст
begin
showmessage('Введите текст для расшифровки');
abort;
end;
if edit1.Text='' then // если не введен ключ
begin
showmessage('Введите текст ключа');
abort;
end;
memo1.Text:=StringReplace(Memo1.Text,'ё','е',[rfReplaceAll]);// заменяем ё на е
memo1.Text:=StringReplace(Memo1.Text,'Ё','Е',[rfReplaceAll]);// заменяем Ё на Е
memo2.Text:=Viz_DeCrypt(memo1.Text,edit1.Text); // выполняем функцию дешифрования
obr:=memo2.text;
gr:=0;
while gr<length(obr) do // делим полученный текст на группы
begin
gr:=gr+7;
insert(' ',obr,gr);
end;
memo2.Text:=ansiuppercase(obr); // переводим в регистр (верхний если что)
end;

procedure TForm1.Button3Click(Sender: TObject); // очистка
begin
memo1.Lines.Clear; // очищаем
memo2.Lines.Clear; // очищаем
edit1.Text:=''; // очищаем
edit2.visible:=false; // скрываем
label4.Visible:=false; // скрываем
label5.Visible:=false; // скрываем
label6.Visible:=false; // скрываем
end;

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
case key of
#8, 'А'..'я': ; // разрешено для ввода
else key:=#0; // запрет ввода
end;
end;

procedure TForm1.FormActivate(Sender: TObject);
var i:integer;
begin
edit2.Enabled:=false;
vig[1]:='АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ'; // первая строка таблицы
for i:=2 to 32 do //создание таблицы виженера
vig[i]:=copy(vig[1],i,33-i)+copy(vig[1],1,i-1);
//заполнение массива частот встречаемости букв в русском языке
frs[0]:=0.062;frs[1]:=0.014;frs[2]:=0.038;frs[3]:=0.013;
frs[4]:=0.025;frs[5]:=0.072;frs[6]:=0.007;frs[7]:=0.016;
frs[8]:=0.062;frs[9]:=0.010;frs[10]:=0.028;frs[11]:=0.035;
frs[12]:=0.026;frs[13]:=0.052;frs[14]:=0.090;frs[15]:=0.023;
frs[16]:=0.040;frs[17]:=0.045;frs[18]:=0.053;frs[19]:=0.021;
frs[20]:=0.002;frs[21]:=0.009;frs[22]:=0.003;frs[23]:=0.012;
frs[24]:=0.006;frs[25]:=0.003;frs[26]:=0.007;frs[27]:=0.016;
frs[28]:=0.007;frs[29]:=0.003;frs[30]:=0.006;frs[31]:=0.018;
for i:=0 to 31 do //заполнение буквами массивов алфавитов
begin
trb[i]:=chr(192+i);
trs[i]:=chr(224+i);
end;
edit2.visible:=false; // скрыть
label4.Visible:=false; // скрыть
label5.Visible:=false; // скрыть
label6.Visible:=false; // скрыть
memo1.SetFocus; // сделать текущим
end;

procedure TForm1.Button5Click(Sender: TObject); // выход
begin
close;
end;

procedure TForm1.Button6Click(Sender: TObject); // взломать
var i,g,y,u,gr:integer; obr,s,s1,s3,s4,s2:string; t,r:word;
dist,kolnod,nody,distu,kk:array of integer; sm:array of string;
label zomg;
begin
if memo1.Text='' then // если текстовое полу пустое
begin
showmessage('Введите текст для взлома');
abort;
end;
s:=memo1.text; // s - присваиваем текст
y:=0;
begin
if (length(memo1.text)>0) and (strtointdef(edit1.text,3) in [3..20]) then
begin
s:=probely(memo1.Text,1);// удаляем ненужные символы
s3:=s;
s4:=s;
memo2.Clear;
setlength(dist,0);
g:=0;

for i:=1 to length(s) do //поиск совпадений букв
begin
s2:=copy(s,i,strtointdef(edit1.text,3));// копируем часть текста с i
if length(s2)>strtointdef(edit1.text,3)-1 then
begin
delete(s3,1,1); // удаляем первый символ
if pos(s2,s3)>0 then
begin
setlength(dist,g+1);
dist[g]:=pos(s2,s3);
inc(g);
end;
end;
end;

if length(dist)<2 then // если мало совпадений или вовсе текста нет
zomg:begin
showmessage('Не могу взломать, слишком сложная задача либо введен текст, не содержащий символы русского алфавита!'); // если мало совпадений или их вовсе нет
exit;
end;

for i:=0 to high(dist) do
begin
if maxintvalue(dist)>0 then // максимальные расстояния
begin
setlength(distu,i+1);
distu[i]:=maxintvalue(dist);
end;
for g:=0 to length(dist) do
if distu[i]=dist[g] then
dist[g]:=-1;
end;
setlength(nody,high(distu));

for i:=0 to high(distu)-1 do // находим ноды
nody[i]:=nod(distu[i],distu[i+1]);

for i:=0 to high(nody)-1 do // считаем ноды
begin
setlength(kolnod,length(kolnod)+1);
if nody[i]>1 then
for g:=1 to high(nody) do
if nody[i]=nody[g] then
begin
kolnod[i]:=kolnod[i]+1;
end;
end;
for i:=0 to high(kolnod) do
if maxintvalue(kolnod)=kolnod[i] then
y:=nody[i];
if y=0 then goto zomg;
end;

divmod(length(s),y,t,r);
setlength(sm,y);
setlength(kk,y);
for i:=0 to length(s) do
sm[i mod y]:=sm[i mod y]+s[i+1];
s1:='';
edit2.Clear;

for i:=1 to y do
begin
u:=getkey(sm[i-1],trb,frs); // определяем ключ
kk[i-1]:=u;
for g:=1 to length(sm[i-1]) do
sm[i-1][g]:=kod(trb,sm[i-1][g],u);
if kk[i-1]=0 then edit2.text:=edit2.Text+'А' else
edit2.Text:=edit2.text+trb[32-kk[i-1]]; // находим ключевое слово
end;

s:='';
for i:=1 to length(sm[0]) do
for g:=1 to y do
s:=s+sm[g-1][i];

delete(s,length(s)-(y-r)+1,y-r);
end;
memo2.Text:=s;
begin // делим текст на группы символов
obr:=memo2.text;
gr:=0;
while gr<length(obr) do
begin
gr:=gr+7;
insert(' ',obr,gr);
end;
memo2.Text:=ansiuppercase(obr); // регистр
label4.Caption:=inttostr(edit2.GetTextLen);// длина ключа
edit2.visible:=true; // показать ключевое слово
label4.Visible:=true; // показать длину ключа
label5.Visible:=true; // показать надпись
label6.Visible:=true; // показать надпись
end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
SaveWindowProc:=Edit1.WindowProc;
Edit1.WindowProc:=TEditWindowProc;
end;

procedure TForm1.TEditWindowProc(var Message: TMessage);
begin
if Message.Msg=wm_paste then Message.Result:=0
else SaveWindowProc(Message);
end;
end. // конец

Шифр Цезаря в Delphi

2012-01-30T14:41:00.001-08:00

Шифр Цезаря в Delphi

Шифр Цезаря, также известный как шифр сдвига, код Цезаря или сдвиг Цезаря — один из самых простых и наиболее широко известных методов шифрования.

Шифр Цезаря — это вид шифра подстановки, в котором каждый символ в открытом тексте заменяется буквой находящейся на некоторое постоянное число позиций левее или правее него в алфавите. Например, в шифре со сдвигом 3, А была бы заменена на Г, Б станет Д, и так далее.

Шифр назван в честь римского императора Гая Юлия Цезаря, использовавшего его для секретной переписки со своими генералами.

Шаг шифрования, выполняемый шифром Цезаря, часто включается как часть более сложных схем, таких как шифр Виженера, и все еще имеет современное приложение в системе ROT13. Как и все моноалфавитные шифры, шифр Цезаря легко взламывается и не имеет практически никакого применения на практике.

Итак, вот краткое описание функций программы:
1) Шифрование русскоязычных и англоязычных текстов при известном ключе;
2) Дешифрование русскоязычных и англоязычных текстов при известном ключе;
3) Взлом русскоязычных текстов с определением ключа:
4) Все символы, отличные от букв, программа игнорирует, кроме того, все символы принудительно переводятся в верхний регистр;
5) Результат выводится на экран группами по 6 символов;
6) Программа работает с любыми целыми значениями сдвига;
7) Предусмотрена защита foolproof.

Вот ссылочки на исходники:
depositfiles.com
letitbit.net

Вот небольшое задание для взлома:
depositfiles.com
letitbit.net

Ниже приведу полный код программы на Delphi в среде Developer Studio 2006:

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Mask, Buttons;

type
TRusLetters = set of Char; // all rusletters
TRusSrcAlphabet = array [0..65] of Char;// rus alpabet
TRusFrequency = array [0..32] of Real;//frequency
TFrequency = array [Char] of Real;
TRusDstAlphabet = array [Char] of Char;
TForm1 = class(TForm)
IshMemo: TMemo;
ObrMemo: TMemo;
GroupBox3: TGroupBox;
Label2: TLabel;
Button1: TBitBtn;
Button5: TBitBtn;
Button3: TBitBtn;
Button4: TBitBtn;
RadioButton1: TRadioButton;
RadioButton2: TRadioButton;
Edit1: TMaskEdit;
procedure IshMemoChange(Sender: TObject);
procedure Edit1KeyPress(Sender: TObject; var Key: Char); // decrypt
procedure FormActivate(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure Button5Click(Sender: TObject);

private
{ Private declarations }
{ Private declarations }
SaveWindowProc: TWndMethod;
nHackKey: Integer;// hack key
nCount: LongInt;// count letters in encrypting message
AbsFrequency: TFrequency;// absolut frequency (count each letter) in encrypting message
RelFreqInMsg: TFrequency; // relative frequency letters of rusalpgabet in encrypting message
RelFreqInLang: TFrequency;// relative frequency letters of rusalpgabet in ruslanguage
function UpCaseRus(Ch: Char): Char;

public
{ Public declarations }
procedure TEditWindowProc(var Message: TMessage);
end;

const
RusLetters: TRusLetters = ['Ё', 'ё', 'А'..'я'];
RusSrcAlphabet: TRusSrcAlphabet = 'АБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ' +
'абвгдеёжзийклмнопрстуфхцчшщъыьэюя';
RusFrequency: TRusFrequency =(
0.063, 0.014, 0.038, 0.013, 0.025, 0.072, 0.072, 0.007,
0.016, 0.062, 0.010, 0.028, 0.035, 0.026, 0.052, 0.090,
0.023, 0.040, 0.045, 0.053, 0.021, 0.001, 0.009, 0.004,
0.012, 0.005, 0.003, 0.015, 0.017, 0.015, 0.002, 0.006,
0.018); // frequency in russian alphabet

var
Form1: TForm1;
key:integer; // ключ
ish,Rus,russmall,Eng,engsmall,obr:string; // алфавит
i,j,sdv,gr:integer;

implementation
{$R *.dfm}

procedure TForm1.FormActivate(Sender: TObject);
begin
IshMemo.Clear;
ObrMemo.Clear;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
i,j:integer;
begin
if radiobutton1.Checked =true then // шифрование
if IshMemo.text='' then
begin
showmessage('Введите текст');
abort;end;
If edit1.text='' then
begin
showmessage('Введите ключ');
abort;end;
ObrMemo.Clear;
ish:=IshMemo.Text;
obr:=ObrMemo.Text;
ish:=AnsiUpperCase(ish); // верхний регистр
rus:='АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ';
russmall:='абвгдежзийклмнопрстуфхцчшщъыьэюя';
eng:='ABCDEFGHIJKLMNOPQRSTUVWXYZ';
engsmall:='abcdefghijklmnopqrstuvwxyz';

for i:=1 to length(ish) do //по тексту
for j:=1 to 32 do //по алфавиту
begin
key:=StrToInt(Edit1.Text); //ключ
if (ish[i]=rus[j]) or (ish[i]=russmall[j]) then
begin
if key<0 then // для отрицательного ключа
begin
while key<-32 do
key:=key+32;
key:=32-abs(key);
end;
begin
while key>32 do
key:=key-32; // ключ в пределах 32
end;
if j+key>32 // сдвиг
then
sdv:=j+key-32
else
sdv:=j+key;
ObrMemo.Text:=ObrMemo.Text+rus[sdv];
end;

If (ish[i]=Eng[j]) or (ish[i]=engsmall[j])
then
begin
if key<0 then // для отрицательного ключа
begin
while key<-26 do
key:=key+26;
key:=26-abs(key);
end;
begin
while key>26 do
key:=key-26; // ключ в пределах 26
end;
if j+key>26 // сдвиг
then
sdv:=j+key-26
else
sdv:=j+key;
ObrMemo.Text:=ObrMemo.Text+Eng[sdv];
end;

ObrMemo.Text:=ObrMemo.Text+'';
end;

obr:=ObrMemo.Text; // группа по 6 символов
gr:=0;
while gr<length(obr) do
begin
gr:=gr+7;
insert(' ',obr,gr);
end;
ObrMemo.Text:=obr;

if radiobutton2.checked=true then // расшифрование
begin
if IshMemo.text='' then
begin
showmessage('Введите текст');
abort;
end;
If edit1.text='' then
begin
showmessage('Введите ключ');
abort;
end;
ObrMemo.Clear;
ish:=IshMemo.Text;
ish:=AnsiUpperCase(ish);
rus:='АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ';
russmall:='абвгдежзийклмнопрстуфхцчшщъыьэюя';
eng:='ABCDEFGHIJKLMNOPQRSTUVWXYZ';
engsmall:='abcdefghijklmnopqrstuvwxyz';

for i:=1 to length(ish) do // по тексту
for j:=1 to 32 do //по алфавиту
begin
key:=StrToInt(Edit1.Text); //ключ
if (ish[i]=rus[j]) or (ish[i]=russmall[j]) then
begin
if key<0 then // если отрицательный ключ
begin
while key<-32 do
key:=key+32;
key:=32-abs(key);

end;
begin
while key>32 do
key:=key-32; // ключ в пределах 32
end;
if j-key<=0 //сдвиг
then
sdv:=j-key+32
else
sdv:=j-key;
ObrMemo.Text:=ObrMemo.Text+rus[sdv]
end;

If (ish[i]=Eng[j]) or (ish[i]=engsmall[j])then
begin
begin
while key>26 do
key:=key-26; // ключ в пределах 26
end;
if j-key<=0 // сдвиг
then
sdv:=j-key+26
else
sdv:=j-key;
ObrMemo.Text:=ObrMemo.Text+Eng[sdv]
end;
ObrMemo.Text:=ObrMemo.Text+'';
end;
obr:=ObrMemo.Text; // группа по 6 символов
gr:=0;
while gr<length(obr) do
begin
gr:=gr+7;
insert(' ',obr,gr);
end;
ObrMemo.Text:=obr;
end;
end;

procedure TForm1.FormCreate(Sender: TObject);
var
i, h: Integer;
begin
h := High(RusSrcAlphabet) div 2;
for i := Low(RusSrcAlphabet) to High(RusSrcAlphabet) do
RelFreqInLang[RusSrcAlphabet[i]] := RusFrequency[i mod h];

SaveWindowProc:=Edit1.WindowProc;
Edit1.WindowProc:=TEditWindowProc;
end;

procedure TForm1.IshMemoChange(Sender: TObject);
begin
ishmemo.Text:=StringReplace(ishmemo.Text,'ё','е',[rfReplaceAll]);// заменяем ё на е
ishmemo.Text:=StringReplace(ishmemo.Text,'Ё','Е',[rfReplaceAll]);// заменяем Ё на Е
end;

function Tform1.UpCaseRus(Ch: Char): Char;
begin
if Ch = 'ё' then Ch := 'Ё';
if Ch in ['а'..'я'] then Dec(Ch, 32);
Result := Ch;
end;

procedure TForm1.Button5Click(Sender: TObject);
var
Ch: Char;
i, j, h: Integer;
Delta, MinDelta: Real;
begin
nCount := 0; // обнуляем счетчик русских букв в закодированном сообщении
FillChar(AbsFrequency, SizeOf(AbsFrequency), 0);

for i := 0 to IshMemo.Lines.Count - 1 do
for j := 1 to Length(IshMemo.Lines[i]) do
begin
Ch := IshMemo.Lines[i][j];// очередной символ сообщения
// принадлежит ли символ множеству русских букв
if Ch in RusLetters then
begin
// подсчитываем количество данной буквы в отдельности
// и в совокупности со всеми русскими буквами
AbsFrequency[UpCaseRus(Ch)] := AbsFrequency[UpCaseRus(Ch)] + 1;
Inc(nCount);
end;
end;
if nCount = 0 then
begin
Showmessage('Введите текст');
Exit;
end;
// вычисляем относительные частоты букв в закодированном сообщении
FillChar(RelFreqInMsg, SizeOf(RelFreqInMsg), 0);
for i := Low(RusSrcAlphabet) to High(RusSrcAlphabet) div 2 do
RelFreqInMsg[RusSrcAlphabet[i]] := AbsFrequency[RusSrcAlphabet[i]] / nCount;
// перебираем все возможные ключи и выбираем тот, при
// использовании которого частоты появления русских букв
// в закодированном сообщении наиболее близки к частотам
// появления русских букв в русском языке, то есть сумма
// абсолютных разностей частот букв должна быть наименьшей
h := High(RusSrcAlphabet) div 2 + 1;
MinDelta := h;
for i := 1 to h - 1 do
begin
Delta := 0;
for j := 0 to h - 1 do
Delta := Delta + Sqr(RelFreqInLang[RusSrcAlphabet[j]] -
RelFreqInMsg[RusSrcAlphabet[(i + j + h) mod h]]);
// очередная сумма разностей меньше всех предыдущих
if MinDelta > Delta then
begin
// запоминаем ее...
MinDelta := Delta;
//и запоминаем ключ, при котором получено данное значение
nHackKey := i;
if nhackkey>20 then nhackkey:=nhackkey-1;

end;
end;
edit1.Text := IntToStr(nHackKey);
ObrMemo.Clear;
ish:=IshMemo.Text;
ish:=AnsiUpperCase(ish);
rus:='АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ';
russmall:='абвгдежзийклмнопрстуфхцчшщъыьэюя';
eng:='ABCDEFGHIJKLMNOPQRSTUVWXYZ';
engsmall:='abcdefghijklmnopqrstuvwxyz';
for i:=1 to length(ish) do //по тексту
for j:=1 to 32 do //по алфавиту}
begin
key:=StrToInt(Edit1.Text); //ключ
if (ish[i]=rus[j]) or (ish[i]=russmall[j]) then
begin
key:=nhackkey;
if j-key<=0 then
sdv:=j-key+32
else
sdv:=j-key;
ObrMemo.Text:=ObrMemo.Text+rus[sdv]
end;
end;
obr:=ObrMemo.Text; //группа по 6 символов
gr:=0;
while gr<length(obr) do
begin
gr:=gr+7;
insert(' ',obr,gr);
end;
ObrMemo.Text:=obr;
end;
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
case key of
#46,#8, '0'..'9': ;
'-' : if length(edit1.Text)<>0 then key:=#0;
else key:=#0;
end;
end;

procedure TForm1.Button4Click(Sender: TObject); // close
begin
Close;
end;

procedure TForm1.Button3Click(Sender: TObject); // clear
begin
IshMemo.Clear;
ObrMemo.Clear;
Edit1.Clear;
end;

procedure TForm1.TEditWindowProc(var Message: TMessage);
begin
if Message.Msg=wm_paste then Message.Result:=0
else SaveWindowProc(Message);
end;
end.

Девушка на мосту

2012-01-30T14:41:00.000-08:00

Девушка на мосту

История любви двух одиноких душ, которые вместе сумели достичь небывалых высот. Юная девушка, которая хотела броситься с моста в Сену, и немолодой метатель ножей, которому нужна была ассистентка для представления. Как только они объединили свои усилия, весь мир оказался у их ног. В тот момент, когда они расстались, счастье и удача покинули их…

Начну свой блог именно с описания этого фильма.

Именно этот фильм заставляет поверить в удачу.

Фильм можно скачать тут: letitbit.net