ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
16.04.2009, 01:42
|
|
Постоянный
Регистрация: 20.06.2008
Сообщений: 323
Провел на форуме:
1240829
Репутация:
165
|
|
Вот нашёл то, что тебе надо, правда на си..
Равномеpное pаспpеделение от 0 до 1. Метод вычетов. Он же метод Лемеpа.
=== Cut ===
struct time t; // стpyктypа вpемени
static long x; // для генеpатоpа
//----------------------------------------------------------------------------
// Инициализация генеpатоpа слyчайных чисел
double Randomize()
{
gettime(&t);
x=t.ti_sec;
}
//----------------------------------------------------------------------------
// Генеpатоp слyчайных чисел
double Rnd()
{
const a=13;
const c=15;
const long M=32768;
x=(a*x+c)\%M;
return (double)x/M;
}
=== Cut ===
Можешь поигpаться с константами...
|
|
|
16.04.2009, 02:29
|
|
Познающий
Регистрация: 19.02.2009
Сообщений: 83
Провел на форуме:
181715
Репутация:
50
|
|
спс, времени проверить нет, но чтото подобное я и хотел - хотя и слишком уж просто выглядит на 1 взгляд))
|
|
|
|
16.04.2009, 13:49
|
|
Познающий
Регистрация: 20.12.2008
Сообщений: 46
Провел на форуме:
123070
Репутация:
9
|
|
........................
Последний раз редактировалось Stil Free; 17.04.2009 в 18:02..
Причина: ненадо было
|
|
|
|
16.04.2009, 20:34
|
|
Постоянный
Регистрация: 26.01.2008
Сообщений: 796
Провел на форуме:
5209663
Репутация:
357
|
|
Сообщение от Stil Free
Написал прогу для автоматической авторизации аськи то есть кидаем список паролей и UINов и прога с интервалом аходит под ними на сайт. Хочу переделать её под спамер но немогу разобратся с отправкой письма использую асько клиент.
ICQClient1.SendMessage(Номер аси,'Собщение');
пример:
ICQClient1.SendMessage(454236500,'прив');
|
|
|
|
16.04.2009, 20:31
|
|
Постоянный
Регистрация: 26.01.2008
Сообщений: 796
Провел на форуме:
5209663
Репутация:
357
|
|
Вот тут надо мне сделать патч или билдер на делфи, буду благодарен тому кто даст линки на статьи как это делать
Google.ru
Google.com
ya.ru
yahoo.com
не помогили
|
|
|
|
16.04.2009, 20:33
|
|
Познавший АНТИЧАТ
Регистрация: 24.06.2008
Сообщений: 1,996
Провел на форуме:
6075534
Репутация:
2731
|
|
Есть ли класс для работы с куками в браузерах, и если нету, каков их алгоритм? Дельфи
|
|
|
|
16.04.2009, 20:39
|
|
Участник форума
Регистрация: 25.10.2008
Сообщений: 215
Провел на форуме:
2483773
Репутация:
78
|
|
НTL,Вот тут почитай может поможет(builder)
Последний раз редактировалось $Atlet$; 16.04.2009 в 20:41..
|
|
|
|
16.04.2009, 22:35
|
|
Познающий
Регистрация: 19.02.2009
Сообщений: 83
Провел на форуме:
181715
Репутация:
50
|
|
Есть ли класс для работы с куками в браузерах, и если нету, каков их алгоритм? Дельфи
если TWebBrowser (вообще он юзает ИЕшные кукисы из ...%username%\Cookies):
Код:
var doc:IHtmlDocument2; s:string;
//...
WebBrowser1.ControlInterface.Document.QueryInterface(IHtmlDocument2,doc);
s:=doc.cookie;
если работать с инди то юзай IdСookieManager
|
|
|
|
16.04.2009, 23:01
|
|
Познавший АНТИЧАТ
Регистрация: 24.06.2008
Сообщений: 1,996
Провел на форуме:
6075534
Репутация:
2731
|
|
Мне надо в опере кукис изменить.
|
|
|
|
16.04.2009, 23:08
|
|
Познающий
Регистрация: 19.02.2009
Сообщений: 83
Провел на форуме:
181715
Репутация:
50
|
|
Мне надо в опере кукис изменить.
и при чем тут делфи??
я хз где опера куки хранит, я фф юзаю)
напишу всетаки как в делфи с куками работать =)
вот так грузануть куки в мемо можно с помощью инди:
Код:
...
var i:Integer;
begin
IdHttp1.CookieManager:=IdCookieManager1;
IdHttp1.AllowCookies:=true;
IdHttp1.Get('http://forum.antichat.ru');
Memo1.Lines.Clear;
Memo1.Lines.Add('Cookies:');
for i:=0 to IdCookieManager1.CookieCollection.Count-1 do
Memo1.Lines.Add(IdCookieManager1.CookieCollection[i].ClientCookie);
...
вот так подставить можно в запрос из мемо (тут CookieManager не нужен):
Код:
...
var i:integer; s:string;
begin
s:='Cookie: '+Memo1.Lines.Strings[0];
for i:=1 to Memo1.Lines.Count-1 do
s:=s+'; '+Memo1.Lines.Strings[i];
IdHttp1.Request.CustomHeaders.Add(s);
IdHttp1.Get('http://forum.antichat.ru');
...
|
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Комбинированный вид