Отправляет email-рассылки с помощью сервиса Sendsay

Программирование. Форум !!!

Re: защита от копирования

Hi!
Точно алгоритм я уже не помню, но в принципе суть в смещении символа
char-таблице. Стандартный алгоритм вообще прост: смещает ord(ch) на
какое-то числа (189 к примеру)...потом это все обрабатывается
(ord(ch)<256).

pAssWord+Key сделан так:

ищем сумму ord(ch) в строке кода
sum:=sum+ord(labelededit3.Text[i]);
потом генерим код
code:=sum/(length(labelededit3.Text));
оставляем только первые 2 цыфры (можешь сколько угодно :) ) не целой части
деления
Dec:=100*(code-trunc(code));
генерим код
code:=trunc(code-dec);

потом ищем сумму ord(ch) в строке ключа
sum:=sum+ord(labelededit2.Text[i]);
аналогично генерим код для ключа
scode:=sum/(length(labelededit2.Text));
Dec:=100*(scode-trunc(scode));
тут может быть любая функция (главное - однозначная, а то не декодишь :) )
scode:=trunc((sqrt(scode-dec)));
и финальный код
code:=code-scode;
в конце смещаем все при записи в файл (тут, я только что подумал, trunc не
надо)
inchcrypt:=ord(ch)+trunc(code);
if inchcrypt>255 then
inchcrypt:=inchcrypt-256;

Ну и все, в принцыпе... остальные варианты выходят из этого... Если будут
вопросы - пиши...
-=BorMaN=-

mailto:Boris_Kolupa***@u*****.net
http://BOrmanCreation.narod.ru - 95% рабочий (нет нескольких книг по РНР,
CGI, HTML, чат не готов...я работаю над этим. А так все ОК!)
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

Ответить   Tue, 13 Jan 2004 17:29:09 +0200 (#53637)