![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Генератор ников [D7, WinXP]
enZinger © (2007-02-16 10:44:00)Подскажите может кто, где то видел исходник или текстовый файл с никами.
Kolan (2007-02-17 21:22:00) [1]«Вебфил»
Отличный ник :)
Чапаев (2007-02-17 08:42:00) [2]> [0] enZinger (16.02.07 10:44)
Делал когда-то... В одном файле прилагательные, в другом существительные. Рэндомом выбирается прилагательное и существительное, плюсуются.
Ещё можно попробовать со слогами поиграться...
RASkov (2007-02-16 17:09:00) [3]> [10] Elen © (16.02.07 16:57)
Точно, это где они еще воевали с армией Йобнюда :)
Во ники прикольные.....
Elen (2007-02-16 16:57:00) [4]
> RASkov (16.02.07 16:37) [9]
В фантастическом романе "Прохождения Жогтила" описаны скитания его армии под командованием Зирдора. :)
RASkov (2007-02-16 16:37:00) [5]> [5] easy © (16.02.07 12:36)
Прикольно
> [0] enZinger (16.02.07 10:44)
Жэлйун, Жогтил, Зирдор, Рубтэн, Зэзжо , Йивмол, Йобнюд, Хафрэн, Гейнер, Бэлфу , Лэзсул, Сойбол, Йифзе , Кихсел, Мойзуд, Бакрюр, Буфрид, Мубзип, Лагфю , Войзе , Тахйюн, Тукло , Хистад, Миджюл, Дажза , Дифйэ , Фебфид, Донлуд, Жусни , Мюхфул, Фозре , Герйоп, Жэтжэ , Фежзеп, Вюрбо , Тэсгэ , Хайдед, Ватфэл, Синрен, Фюдгун, Замфюд, Бюсфал, Зэгню , Хурдир, Сазгюп, Йэврир, Хотлап, Мифгюп, Зэтхуд, Люктур, Лобгод, Гитже , Рэмзул, Лэжйо , Рюгфи , Дубган, Лукме , Зуйсо , Харфю , Жиммин, Хюзрул, Хедмел, Мэфсоп, Веллюп, Ридлан, Кафжен, Хефнэп, Бийжун, Рэско , Мигнэп, Тюзкюд, Зудбэн, Кетда , Несфад, Зерйэп, Дизхэн, Тифнуд, Йиссед, Миддэн, Тэфдел, Кютнар, Дискип, Дигжир, Гюзкан, Нукроп, Миггэп, Зафбуп, Вебфил, Хажнеп, Тетнун, Сожхюп, Рэздул, Гикйэп, Фукру , Вефбир, Вотвир, Хемрар, Мезсюд, Лиммюр, Хесход, Гайнап,
fd979 (2007-02-16 13:18:00) [6]fd979
Kolan (2007-02-16 13:18:00) [7]> enZinger
Решения нет. Как ты собираешься отличить ник от не ника? aderese - ник? qewrty - ник?
DrPass (2007-02-16 12:40:00) [8]
> где то видел исходник или текстовый файл с никами
Пжалста:
enZinger
Desdechado
Elen
Сергей М.
easy
DrPass
easy (2007-02-16 12:36:00) [9]вот -
procedure TForm1.FormCreate(Sender: TObject);
begin
randomize;
end;
procedure TForm1.Button2Click(Sender: TObject);
var
S1,S2,S3,S4,S5:string;
i:integer;
begin
S1:='БВГДЖЗЙКЛМНРСТФХЧ';
S2:='аеиоуэюя';
S3:=AnsiLowerCase(S1);
S4:=' плндрт';
memo1.Clear;
for i := 0 to 100 do
S5:=S5+S1[random(length(S1)-1)+1]+
S2[random(length(S2)-1)+1]+
S3[random(length(S3)-1)+1]+
S3[random(length(S3)-1)+1]+
S2[random(length(S2)-1)+1]+
S4[random(length(S4)-1)+1]+', ';
Memo1.text:=S5;
end;
генерит имена демонов, но для ников тож сойдёт..
Elen (2007-02-16 11:04:00) [10]
> enZinger (16.02.07 11:02) [2]
А зачем? для игр?
Сергей М. (2007-02-16 11:04:00) [11]Чем Фкмуч хуже Сени ?)
enZinger (2007-02-16 11:02:00) [12]И что получится Фкмуч, Ghtrs?
Я про Сеня, Robik, HellForce...
Desdechado (2007-02-16 10:49:00) [13]Букв в алфавите много, их комбинаций еще больше. Файл тебе зачем?