Конференция VBStreets

**SeT** » 31.03.2006 (Пт) 14:05

Подскажите, как можно текстовый файл закодить до неузнаваемости, и раскодить по паролю? Заранее спасибо.

**SeT** » 31.03.2006 (Пт) 14:15

У меня у самого есть такая мысль:
К коду каждого символа прибавлять код 1 символа пароля, а потом 2 символа и т.д. по циклу. Как это реализовать?

**Antonariy** » 31.03.2006 (Пт) 14:17

А не проще воспользоваться каким-нибудь готовым классом?

**SeT** » 31.03.2006 (Пт) 14:19

А не проще воспользоваться каким-нибудь готовым классом?

Был бы - не спрашивал.

**alibek** » 31.03.2006 (Пт) 14:31

Ну так найди, на форуме с десяток найдется, в инете еще больше.

**SeT** » 31.03.2006 (Пт) 15:15

Угу мл@, спасибо за помощь.

**SeT** » 31.03.2006 (Пт) 15:16

Я спросил "как сделать" а не "где найти"

**GSerg** » 31.03.2006 (Пт) 15:24

SeT писал(а):Угу мл@, спасибо за помощь.

Предупреждение.

**SeT** » 31.03.2006 (Пт) 15:26

Предупреждение.

Ну ладно, испугаемся.

Такс... Если ввод символа по коду - это Chr() то какая функция для вывода кода по символу?

**hCORe** » 31.03.2006 (Пт) 15:29

Автор, пей ноотропил!
http://www.di-mgt.com.au/src/BlowfishVB_6.zip

**GSerg** » 31.03.2006 (Пт) 15:30

Исходя из последнего вопроса, переношу.

**SeT** » 31.03.2006 (Пт) 15:32

Исходя из последнего вопроса, переношу.

Последний вопрос относился к первому...

**SeT** » 31.03.2006 (Пт) 15:33

http://www.di-mgt.com.au/src/BlowfishVB_6.zip

400 КБ хлама...

**hCORe** » 31.03.2006 (Пт) 15:42

Да ну?! Совершенно нормальная шифровка по алгоритму Blowfish, по-моему.

А функцию Asc() хорошо бы и знать, вообще говоря

**alibek** » 31.03.2006 (Пт) 15:44

SeT, не надо хамить. С вещами на выход. Бан на месяц.

**SMR** » 07.04.2006 (Пт) 6:48

SeT, надеюсь ты это увидишь.
Надо просто по циклу накладывать буквы из пароля на буквы текста по операции XOR.
Побитовая операция XOR:
0 ^ 0 = 0
0 ^ 1 = 1
1 ^ 0 = 1
1 ^ 1 = 0
Допустим первая буква слова имеет код 01011001
первая буква пароля 00010010
закодируется так (для наглядности в столбик)
01011001
XOR
00010010
=
01001011
Для того чтобы раскодировать операцию повторяешь.

Тоже самое для остальных букв до конца текста.
Если пароль короче текста (а это обычное дело), то строку пароля накчинаем с начала(повторяем) пока текст не кончиться.
Это алгоритм.
Теперь надо найти перевод символов в код и обратно, а также найти в VB или написать самому XOR

**SMR** » 07.04.2006 (Пт) 6:52

Дополнение по поводу раскодирования :

Допустим первая буква слова имеет код 01011001
первая буква пароля 00010010
закодируется так (для наглядности в столбик)
01011001
XOR
00010010
=
01001011
раскодируется так

01001011
XOR
00010010
=
01011001 - получили первый символ

**hCORe** » 07.04.2006 (Пт) 16:20

"Крутое шифрование" - ксорку - выполнял каждый второй начинающий программист. Достаточно знать кусок текста, "угадать" код (гамму), и раскрыть все не составит труда

Несколько усилить алгоритм можно, применив упаковку текста методом LZW.

**SMR** » 10.04.2006 (Пн) 8:03

Шифрование не крутое - этого никто не утверждал.
А если ты знаешь текст - тебе уже и расшифровывать не надо.

**SMR** » 10.04.2006 (Пн) 8:09

а LZW немного из другой оперы

**tyomitch** » 10.04.2006 (Пн) 8:17

Вай, ещё один эксперт по LZW появился? ;-)

**SMR** » 10.04.2006 (Пн) 8:35

hCORe
ты ссылку давал.
Там прога.
Ты её сам писал ?

**tyomitch** » 10.04.2006 (Пн) 8:38

Эту?

hCORe писал(а):Автор, пей ноотропил!
http://www.di-mgt.com.au/src/BlowfishVB_6.zip

По-моему, там внутри ясно написано:

**SMR** » 10.04.2006 (Пн) 8:41

может hCORe это псевдоним, David Ireland реальное имя.
Что врядли.

**GB826** » 10.04.2006 (Пн) 11:20

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

Самое простое заиксорить и примешать свою фишку (хотя бы поменять буквы местами :о) хоть чуть-чуть, но все равно сложнее дшифровать).

может SMR это псевдоним, SeT реальное имя.

Конференция VBStreets

Мегакодировка

Мегакодировка

Кто сейчас на конференции