Программисты, выручайте.., такой программы в интернете нету =(( |
DMUTPUU
Опытный юзверь
Группа: Заблокированные Сообщений: 103 Регистрация: 10.09.2007 Пользователь №: 494.424
Респектов: 5
| Подобная тема уже была, скажу сразу, но здесь не много иное совсем.. Нужна программка, которая работала бы по принципу Программы-транслита, то есть переводила бы текст туда и обратно, точнее меняла бы символы друг на друга по словарикам в обоих направлениях! НО! но... в этом та вся и начинка.. Меняла бы их не по "символ"-ическим значениям, а по значениям "Hex-редактор"-ским.. Объясню: **** В Hex-редакторе текст выглядет так: [HIDE][/HIDE] , а в текстовом виде, текст бы выглядел слейдующим образом: " !щ" (спереди 2 первых символа пробелы).. Для ЛЮБЫХ Транслит-программ эти самые первые 2 символа совершенно одинаковые, потомучто они не могут распознать их не в одной кодировке, и считают эти оба символа просто за "Пробелы".. но пробел выглядет в коде совсем не так, он разлогаетсо как "20".. а тут "20" и "1f" совершенно разные символы, и перевести их Транслит-Программами по словарикам не получитьсо с одного направления в другое, и обратно! они либо приведут всё к значениям "20", либо переводить документ не станут, и высветят соответствующую ошибку в приложении.. Вот в этом та и вопрос! Нужна программка для первода документов (самого обычного Текстового файла), которая меняла бы "символы" (значения) друг на друга и обратно подобным образом.. ( с пользовательскими словариками, и не консольная желательно бы, воопще не умею с ними обращитьсо, увы) в интернете искал, подобного не нашёл, либо я не умею пользоваться поисковиками, либо ввожу то чего не надо, вопщем запутался уже.. Подскажите пожалуйсто и Помогите кто сможет в решении возникшей проблемки..)) | |
| |
15.08.2008 - 22:49 |
KLUCHICK
Вечная память...
[SoftoRooMTeaM]
Группа: Администраторы Сообщений: 5.668 Регистрация: 15.03.2004 Из: The Ural federal district Пользователь №: 326
Респектов: 3848
| Цитата | Quote в интернете искал, подобного не нашёл, либо я не умею пользоваться поисковиками, либо ввожу то чего не надо, вопщем запутался уже.. Подскажите пожалуйсто и Помогите кто сможет в решении возникшей проблемки..)) Искал плохо. Вот программа Trans 1.02free pap.mam.by Результат транслита квотированного выше текста v internete iskal, podobnogo ne nashyel, libo ya ne umeyu pol'zovat'sya poiskovikami, libo vvozhu to chego ne nado, vopschem zaputalsya uzhe.. Podskazhite pozhaluysto i Pomogite kto smozhet v reshenii voznikshey problemki..))Обработало пулей, нисколько не задумываясь... Попробуйте сами. | |
| |
16.08.2008 - 1:13 |
RusHacK
Опытный юзверь
Группа: Пользователи Сообщений: 54 Регистрация: 12.08.2008 Пользователь №: 1.024.026
Респектов: 7
Предупреждений:
| Программа писалась на delphi Версия 1 Переводит текстовые файлы Попробуйте ввести слово "привет" и нажмите шифровать; Code procedure TForm1.Button1Click(Sender: TObject); begin OpenDialog1.Execute(); Memo1.Lines.LoadFromFile(OpenDialog1.FileName); end;
procedure TForm1.Button2Click(Sender: TObject); begin SaveDialog1.Execute(); Memo1.Lines.SaveToFile(SaveDialog1.FileName); end;
procedure TForm1.Button3Click(Sender: TObject); var I,num: integer; sh,itog,cod:string; begin itog:=''; cod:=''; sh:=Memo1.Text; for I := 1 to Length(sh) do begin Num:=Ord(Sh[i]);//Возвращаем номер буквы case Num of 239: cod:='пу'; 240: cod:='ру'; 232: cod:='ту'; 226: cod:='ры'; 229: cod:='шуры'; 242: cod:='муры'; end; itog:=itog+cod; end; Memo1.Clear; Memo1.Text:=itog; end;
procedure TForm1.Button3Click(Sender: TObject); - Кнопочка шифровки. Версия 2 Переводит любые файлы Попробуйте открыть файл "File" Code procedure TForm1.Button1Click(Sender: TObject); var f: file of byte; b: Byte; i:integer; g:longint; s,cod:string; begin OpenDialog1.Execute(); AssignFile(f,OpenDialog1.FileName); Reset(f); g:=Filesize(f); for I := 0 to g-1 do begin Seek(f,i); read(f,b); case b of 31: cod:='C'; 32: cod:='o'; 33: cod:='o'; 249: cod:='L'; end; s:=s+cod; end; memo1.Clear; memo1.Text:=s; end;
Вобщем такой вот алгоритм. К сожалению не смог прикрепить откомпилированные программы (интернет медленный). В понедельник постараюсь с работы выложить. Присоединённые файлы
File.zip ( 118байт )
Кол-во скачиваний: 4 | |
| |
17.08.2008 - 16:43 |
DMUTPUU
Опытный юзверь
Группа: Заблокированные Сообщений: 103 Регистрация: 10.09.2007 Пользователь №: 494.424
Респектов: 5
| Ждёмсик коипилированных в понедельник.. постарайся повалусто, очень прошу!)) ещё вот вопросик возник 1.. скажи только RusHack что это воопще возможно воплотить в реаль.. можно ли сделать подобный транслит, который бы работал с 256шт. словарями, при условии что каждый символ будет транслированн *послейдующим словарём? то есть вот например имеем документ, фраза слейдующая : "Адронный Клорайдер", всего значит 18 символов, вместе с пробелом, и значит из 256шт. словарей будут использованны только 18шт.! , с №1 по №18.. в каждом естественно свои замены и переводы.. схема конечно немного запутанней чем с одним словарём, но такое *Шифрование/Дешефрование станет ещё на много сложней для расшифровки.. P.S.: ну или если с не 256шт. словариками, то с одним, который содержал бы в себе все 256)) схему писать не стану, уж больно обширной она получается, но при надобности отпишуся)) | |
| |
17.08.2008 - 18:35 |
DMUTPUU
Опытный юзверь
Группа: Заблокированные Сообщений: 103 Регистрация: 10.09.2007 Пользователь №: 494.424
Респектов: 5
| Цитата | Quote(PILOTIX @ 17.08.2008 - 17:40) ...
окей, и мы тоже! ты бы разобраться бы ещё не помог? мой пост, чуть выше.. шариш в этом чё нить? =)) | |
| |
17.08.2008 - 18:46 |
_Slava
Unregistered
| весь топик не писал, извинюхи если повторюсь..на C# пол часа делов, + полчасика на касметику... |
|
| |
17.08.2008 - 22:58 |
RusHacK
Опытный юзверь
Группа: Пользователи Сообщений: 54 Регистрация: 12.08.2008 Пользователь №: 1.024.026
Респектов: 7
Предупреждений:
| Цитата | Quote(DMUTPUU @ 17.08.2008 - 16:46) можно ли сделать подобный транслит, который бы работал с 256шт. словарями Можно. Правда немного по другому алгоритму, но можно. | |
| |
18.08.2008 - 8:19 |
RusHacK
Опытный юзверь
Группа: Пользователи Сообщений: 54 Регистрация: 12.08.2008 Пользователь №: 1.024.026
Респектов: 7
Предупреждений:
| Вобщем выкладываю обещанные файлы. v1 - первая программа, которая работает с простыми(текстовыми) файлами. V2 - вторая, которая работает с бинарными файлами. ! Важно ! Как видно из исходника, программа v1 заменяет только 6 букв (привет), а программа v2 - только 4 (1f 20 21 f9). Присоединённые файлы
v1.zip ( 212.04кб )
Кол-во скачиваний: 3
v2.zip ( 213.05кб )
Кол-во скачиваний: 3 | |
| |
18.08.2008 - 9:53 |
Soloton
Грамотный
Группа: Наши Люди Сообщений: 292 Регистрация: 18.12.2005 Из: Невинномысск Пользователь №: 88.260
Респектов: 72
| Пробую составить ТЗ своими словами. 1. Составить программу для кодирования/декодирования бинарных файлов. 2. Диапазон кодируемых символов -- от 0x0 до 0x255. 3. Словари задаются конечным пользователем. 4. Кодирование ведётся посимвольно. В зависимости от позиции вибирается словарь, из которого для замены символа выбирается группа символов.
Пример словаря: 0=Ша 1=Ры 2=zUx ... 255=RhГЧ
Вопросы: 1. Декодирование сильно зависит от правильного составленного словаря. Этот пункт непонятен. 2. Словари используются циклически, т.е. если фраза длиннее 255 символов, то на 256-м символе передём к 0-му словарю? | |
| |
18.08.2008 - 10:40 |
RusHacK
Опытный юзверь
Группа: Пользователи Сообщений: 54 Регистрация: 12.08.2008 Пользователь №: 1.024.026
Респектов: 7
Предупреждений:
| Цитата | Quote(Soloton @ 18.08.2008 - 9:56) 1. Декодирование сильно зависит от правильного составленного словаря. Если при декодировании словарь иной чем при кодировании, то декодирование не получится. Я так понимаю. Цитата | Quote(Soloton @ 18.08.2008 - 9:56) 2. Словари используются циклически, т.е. если фраза длиннее 255 символов, то на 256-м символе передём к 0-му словарю? Зачем? К первому. | |
| |
|
|