Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2002.07.29;
Скачать: [xml.tar.bz2];

Вниз

Осмысл   Найти похожие ветки 

 
esprit_bel   (2002-07-02 05:44) [0]

ББ реально ли написать прогу, текст exe файла которой имел бы смысл?


 
RV   (2002-07-02 09:42) [1]

????????????????????????????


 
Странный Прохожий   (2002-07-02 10:11) [2]

Можно взять hex-редактор и просмотреть произвольный exe-шник.
И тайный смысл откроется! Но лишь истинному буддисту...


 
limon   (2002-07-02 10:51) [3]


> текст exe файла которой имел бы смысл?

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


 
RV   (2002-07-02 10:56) [4]

Пиши операционку с встроенным интерпретатором :))


 
Леша   (2002-07-02 12:13) [5]

Интересно, а как тогда распотранять программы?


 
Alx2   (2002-07-02 13:27) [6]

В дикой молодости извращался: брал небольшой текстовый файл с каким-нибудь рассказиком, давал ему расширение .com и запускал. Иногда не зависало. А один раз даже написало что-то непонятное:))
Я так хотел одну идею проверить по шифрованию текстов:
Берем, значит, "секретную" депешу. Даем ей расширение com и дизассемблируем чем-нибудь (я Sourcer использовал). Получаем программку на asmе - типа зашифрованый текст. Чтобы его расшифровать, достаточно было снова откомпилировать.


 
Виктор Щербаков   (2002-07-02 13:33) [7]


> В дикой молодости извращался: брал небольшой текстовый файл
> с каким-нибудь рассказиком, давал ему расширение .com и
> запускал.


Круто :)
Я чуть со стула не упал.


 
Alexandr   (2002-07-02 13:39) [8]

ага.
Веселый тут народ собрался...
Большие оригиналы по страданию х@ней


 
Alx2   (2002-07-02 13:46) [9]

Ну, началось.... 8)
Я же подрос немножко уже :))


 
Виктор Щербаков   (2002-07-02 14:32) [10]

Alexandr © (02.07.02 13:39)
Ты типа всегда делом занят...
И не дурачишься никогда :)


 
Shaman_Naydak   (2002-07-02 14:40) [11]

COM файл можно действительно попытаться так написать..
но сколько трудов - даже представить страшно
:)
Мда, нехилые развлечения!


 
Mike B.   (2002-07-02 15:10) [12]

Желающим поразвлечся рекомендую попробовать переименовать, например, win.com и позапускать :-)


 
Malder   (2002-07-02 17:45) [13]

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


 
RV   (2002-07-02 18:02) [14]

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


 
Игорь Шевченко   (2002-07-02 18:10) [15]

Malder © (02.07.02 17:45)

Много в инете таких программ...


 
Malder   (2002-07-02 18:57) [16]

RV, не. Чтобы был *.exe файл. Его запускаешь - появляется листинг программы. Если этот листинг скомпилить - получиться тот самый exe

Игорь Шевченко, можно ссылочку ?


 
RV   (2002-07-02 19:07) [17]

ну да, *.exe должен быть...
ведь egavga.bgi линкуется к ехе (и шрифты), а если это с pasом провернуть...



 
Anatoly Podgoretsky   (2002-07-02 19:07) [18]

RV (02.07.02 18:02)
В коммерческих продуктах так и поступаю, что бы искходники не потерять.


 
MBo   (2002-07-02 19:19) [19]

>Malder
Зачем ссылочку, придумать же интереснее


 
Malder   (2002-07-02 19:47) [20]

А все таки хотелось бы ссылочку


 
MBo   (2002-07-02 20:23) [21]

Malder
Я не встречал


 
Blackweber   (2002-07-02 22:21) [22]

uses crt;
var s:string;i:integer;
begin
clrscr;
s:="uses crt;@var s:string;i:integer;@begin@clrscr;@for i:=1 to 208 do@ begin@ if i=48 then begin writeln; write("+#39+
+"s:=,#39,s,#39,#59); end;@ if s[i]=#64 THEN WRITELN;@ write(s[i])@ end;@readln;@end.";
for i:=1 to 208 do
begin
if i=48 then begin writeln; write("s:=",#39,s,#39,";"); end;
if s[i]=#64 THEN begin WRITELN;inc(i); end;
write(s[i]);
end;
readln;
end.


 
Malder   (2002-07-02 22:49) [23]

Blackweber, неправильно.
Не выдается например inc(i)
и еще по мелочи...
Кто еще что-нибудь скажет ?


 
Blackweber   (2002-07-03 00:15) [24]

А тебе никак не переделать эту "идею" или тебе готовый код подать?


 
MBo   (2002-07-03 06:29) [25]

>Malder
dpr

{$APPTYPE CONSOLE}var s:string;
i:byte;
begin s:="{$APPTYPE CONSOLE}var s:string;i:byte;begin s:=;for i:=1 to 168 do begin if s[i]=#59 then writeln(s[i]) else write(s[i]);if i=49 then writeln(#39+s+#39) end;readln;end.";
for i:=1 to 168 do begin if s[i]=#59 then writeln(s[i]) else write(s[i]);
if i=47 then write(#39+s+#39) end;
readln;
end.



Страницы: 1 вся ветка

Форум: "Потрепаться";
Текущий архив: 2002.07.29;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.62 MB
Время: 0.032 c
3-95253
Alenka
2002-07-09 10:31
2002.07.29
Запомнить значение в текущей ячейки


3-95257
Кузнецов
2002-07-05 14:37
2002.07.29
Запросы буть они не ладны


1-95283
ION T
2002-07-17 01:40
2002.07.29
Как вызвать диалог Run


1-95347
roman002
2002-07-18 10:15
2002.07.29
Объем занимаемого пространства


14-95543
Dr. Web
2002-07-02 13:03
2002.07.29
Mastak ICQ :)





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский