Для тех кто хочет знать, какого пола их компьютер

← →
oldman © (2011-02-07 16:40) [0]

1) Откройте блокнот
2) Скопируйте CreateObject("SAPI.SpVoice").Speak"I love you"
3) Сохраните как xyz.vbs
4) Запустите. Если вы услышите мужской голос - у вас мальчик, если женский - девочка.

← →
Jeer © (2011-02-07 17:06) [1]

У меня мужского пола только острый инструмент ( ножи, пилы, топоры и т.п.).
Весь остальной - исключительно женского :)

Даже велосипед, который ходит по горам, грязюкам, камням и снегам - ласково зову Меридкой.

← →
Inovet © (2011-02-07 17:14) [2]

На 286 в autoexec.bat втыкали запуск некоего экзешника, и системник говорил своим динамиком - "Я готова, мой повелитель" - одно озадачивало - голос был мужской.

← →
oldman © (2011-02-07 17:21) [3]

> Inovet © (07.02.11 17:14) [2]

Под DOS была программа (не помню названия, назовем aaa).
Пишешь в командной строке ааа строка
Компутер проговаривает "строка", причем соблюдаtn интонацию и знаки препинания.
Один кадр просто запустил эту ааа без параметра. Секунда и все. Никакого эффекта.
Тогда он пишет "ааа /?". Помнит, как помощь вызывать по параметрам...

Но когда комп его переспросил "Косая скобка?", я лично видел его физиономия и реакцию.
:)))))))))))))

← →
Bat-an (2011-02-07 17:36) [4]

>>> oldman © (07.02.11 17:21) [3]
помню ее, молодцы программисты
а еще был инструмент для подготовки текста заранее и приклеивания к ядру ехе файла для исполнения, получалось меньше и качества можно было добиться больше

← →
Dennis I. Komarov © (2011-02-07 17:52) [5]

У кого-нить она осталась а закромах. Хорошая была :)

> Если вы услышите мужской голос - у вас мальчик, если женский
> - девочка.

А как сменить пол? :)

← →
oldman © (2011-02-07 17:54) [6]

> Dennis I. Komarov © (07.02.11 17:52) [5]
> А как сменить пол? :)

как обычно - хирургическим вмешательством.

← →
Jeer © (2011-02-07 17:57) [7]

> oldman © (07.02.11 17:54) [6]
> как обычно - хирургическим вмешательством.

Любитель радикализма :)

Не.. нужно аккуратненько - реинкарнацией :)

← →
Игорь Шевченко © (2011-02-07 18:40) [8]

have fun:

http://www.visualbasicscript.com/Making-PC39s-Speak-with-SAPISpVoice-m63061.aspx

← →
И. Павел © (2011-02-07 19:12) [9]

А мне "Дигало" нравится. Их голос "Николай" при должном подборе словарей читает книги почти как профессиональный диктор.

← →
Anatoly Podgoretsky © (2011-02-07 19:24) [10]

> Inovet (07.02.2011 17:14:02) [2]

Он не такой как все

← →
AlexDn © (2011-02-07 21:31) [11]

Блин, у меня женского, позор...)

← →
И. Павел © (2011-02-07 21:34) [12]

> Блин, у меня женского, позор...)

Тогда остерегайтесь использовать в программах тип данных boolean. Ваш компьютер по другому обрабатывает переменные логического типа :)

← →
KilkennyCat © (2011-02-07 23:12) [13]

пол определяется легко по сидирому. если выдвижной - мужской, ну а если щелевой - женский. если сидюк отсутствует - то транссексуал.

← →
antonn © (2011-02-07 23:15) [14]

а если два - мутант

← →
clickmaker © (2011-02-07 23:20) [15]

> а если два - мутант

если и сидюк выдвижной и флоповод, то гермофродит

← →
KilkennyCat © (2011-02-07 23:34) [16]

с мышами все-таки проще. яйцо либо есть, либо нет.

← →
clickmaker © (2011-02-07 23:42) [17]

проще всего с клавой )

← →
antonn © (2011-02-08 00:05) [18]

у некоторых клав есть яйцо

← →
Dimka Maslov © (2011-02-08 00:18) [19]

Вообще-то голос настраивается через Панель управления/Речь

← →
clickmaker © (2011-02-08 00:35) [20]

> у некоторых клав есть яйцо

это не яйцо. это клитор

← →
antonn © (2011-02-08 00:40) [21]

такой большой...
и да, руки так и тянутся потрогать %)

← →
Inovet © (2011-02-08 01:29) [22]

> [3] oldman © (07.02.11 17:21)
> Пишешь в командной строке ааа строка
> Компутер проговаривает "строка", причем соблюдаtn интонацию и знаки препинания.

Ещё была, может эта и была, ей можно было текстовый файл подсунуть. Когда кто-то её притащил, решили проверить, а как раз тогда текстовый файл гулял про уринотерапию, его и подсунули. Старательно проговаривал через "о" в каждом предложении "моча", "мочу", "мочи". Это текст, видимо, из книги Малахова был, уже в наше время Первый канал идею украл, теперь автор с видео собственной персоной вещает почти с тем же говором. Эх, недавно прикрыли передачу с его откровениями.

← →
Копир © (2011-02-08 01:40) [23]

>oldman © (07.02.11 16:40) :

Не корректно сформулированный сабж.
Конечно, я понимаю. Своеобразный стёб.

На самом деле, половое, мначе, гендерное отличие
касается функции размножения.

Как у лягушек.

И каким голосом запоёт лягушка если
откроет блокнот и скопирует CreateObject("SAPI.SpVoice").Speak"I love you"
- неясно.

Компьютеры не размножаются ни делением, ни половым способом.
Нечего дурака валять...

← →
Копир © (2011-02-08 01:52) [24]

"В индустрии развлечений самой удачной идеей было разделение людей на два пола".
(Русское Радио).

← →
Германн © (2011-02-08 01:53) [25]

У меня - мальчик, у дочки - девочка.
Дочка предложила поменяться компами, ибо по молодости смущается вопросами о "нетрадиционной ориентации". Отказался. :)

← →
brother © (2011-02-08 05:42) [26]

Мальчик! И других голосов нет) Где скачать девочку, или лучше девушку? ))

← →
brother © (2011-02-08 06:34) [27]

Осмыслил, что сам написал))) я имел ввиду голос))))))))))))))))))))))

← →
MonoLife © (2011-02-08 06:37) [28]

> brother © (08.02.11 05:42) [26]
>
> .. Где скачать девочку, или > лучше девушку? ))

Это как в анекдоте: "как отодрать соску?")))

← →
brother © (2011-02-08 06:45) [29]

не как, а где!)))

← →
AlexDn © (2011-02-08 06:56) [30]

> brother © (08.02.11 05:42) [26]
> Мальчик! И других голосов нет) Где скачать девочку, или
> лучше девушку? ))
причём голос не очень то.. какой-то зрелой шлюхи :)...

← →
KilkennyCat © (2011-02-08 07:01) [31]

> не как, а где!)))

не где, а чем!

← →
MonoLife © (2011-02-08 07:01) [32]

> brother © (08.02.11 06:45) [29]
>
> не как, а где!)))

не, там, как раз, было известно "где")))

← →
AlexDn © (2011-02-08 09:35) [33]

Причём если немного изменить текст то меняется и интонация..!)

← →
AlexDn © (2011-02-08 09:38) [34]

а вот это финал!! не ожидал..! - CreateObject("SAPI.SpVoice").Speak"23554465"

← →
Anatoly Podgoretsky © (2011-02-08 10:59) [35]

> brother (08.02.2011 05:42:26) [26]

baby.download.com если уже закрыли, то xxx.com

← →
brother © (2011-02-08 11:34) [36]

> CreateObject("SAPI.SpVoice").Speak"23554465"

афигеть!!!

← →
Inovet © (2011-02-08 11:39) [37]

> [36] brother © (08.02.11 11:34)
> > CreateObject("SAPI.SpVoice").Speak"23554465"
>
> афигеть!!!

"Афигеть" уж слишком сильно, скорее неожиданно, но если подумать, то так и должно быть, что сложного-то, а по правилам языка чило и надо читать как число, а не набор цифр.

← →
Inovet © (2011-02-08 11:44) [38]

Кстати, самое большое число которое читается, как число - 999999999999999999.

← →
clickmaker © (2011-02-08 11:55) [39]

> чило и надо читать как число, а не набор цифр

CreateObject("SAPI.SpVoice").Speak"Call me, baby! 5-5-2-5-2-2-2" ?

← →
Inovet © (2011-02-08 12:03) [40]

> [39] clickmaker © (08.02.11 11:55)
> 5-5-2-5-2-2-2"

Это выражение, а вот это число
"999,999,999,999,999,999"

← →
Inovet © (2011-02-08 12:04) [41]

После точки не хочет правильно читать.

← →
Inovet © (2011-02-08 12:07) [42]

> [40] Inovet © (08.02.11 12:03)
> > [39] clickmaker © (08.02.11 11:55)
> > 5-5-2-5-2-2-2"
>
> Это выражение,

Номер телефона, а как же выражение прочитать?

← →
Anatoly Podgoretsky © (2011-02-08 12:18) [43]

> Inovet (08.02.2011 12:07:42) [42]

Пять пять два два пять два два два

← →
Inovet © (2011-02-08 12:29) [44]

> [43] Anatoly Podgoretsky © (08.02.11 12:18)
> Пять пять два два пять два два два

Нет, надо математическое выражение "Пять минус пять минус два минус два минус пять минус два минус два минус два"

← →
oldman © (2011-02-08 12:32) [45]

> Inovet © (08.02.11 12:29) [44]

"минус пятнадцать"

> Inovet © (08.02.11 11:39) [37]
> > [36] brother © (08.02.11 11:34)
> > > CreateObject("SAPI.SpVoice").Speak"23554465"
> >
> > афигеть!!!
>
> "Афигеть" уж слишком сильно, скорее неожиданно, но если
> подумать, то так и должно быть, что сложного-то,
а алгоритм то какой..!) ничего сложного. ну-ну..

> [46] AlexDn © (08.02.11 12:33)
> а алгоритм то какой..!) ничего сложного. ну-ну..

Пользователи Fast Report периодически просили сделать такое, естественно для суммы прописью, так разработчики отвечали, что это языко-зависимо и логику локализации ради одной простой но зависимой от языка функции менять нет смысла, дескать возмите любую стороннюю и пользуйтесь.

Ничего сложного нет.

Где-то так
enum Gender {genM, genF, genN}; void __fastcall NumSpell1(__int64 n, AnsiString &w, Gender g) { AnsiString s; switch(n % 20) { case 1: switch(g) { case genF: s = "одна"; break; case genN: s = "одно"; break; default: s = "один"; } break; case 2: switch(g) { case genF: s = "две"; break; default: s = "два"; } break; case 3: s = "три"; break; case 4: s = "четыре"; break; case 5: s = "пять"; break; case 6: s = "шесть"; break; case 7: s = "семь"; break; case 8: s = "восемь"; break; case 9: s = "девять"; break; case 10: s = "десять"; break; case 11: s = "одиннадцать"; break; case 12: s = "двенадцать"; break; case 13: s = "тринадцать"; break; case 14: s = "четырнадцать"; break; case 15: s = "пятнадцать"; break; case 16: s = "шестнадцать"; break; case 17: s = "семнадцать"; break; case 18: s = "восемнадцать"; break; case 19: s = "девятнадцать"; break; } if(!w.IsEmpty() && !s.IsEmpty()) w += " "; w += s; } void __fastcall NumSpell2(__int64 n, AnsiString &w, Gender g) { AnsiString s; if(n % 100 < 20) { NumSpell1(n, w, g); } else { switch(n / 10 % 10) { case 2: s = "двадцать"; break; case 3: s = "тридцать"; break; case 4: s = "сорок"; break; case 5: s = "пятьдесят"; break; case 6: s = "шестьдесят"; break; case 7: s = "семьдесят"; break; case 8: s = "восемьдесят"; break; case 9: s = "девяносто"; break; } if(!w.IsEmpty() && !s.IsEmpty()) w += " "; w += s; NumSpell1(n % 10, w, g); } } void __fastcall NumSpell3(__int64 n, AnsiString &w, Gender g) { AnsiString s; switch(n / 100 % 10) { case 1: s = "сто"; break; case 2: s = "двести"; break; case 3: s = "триста"; break; case 4: s = "четыреста"; break; case 5: s = "пятьсот"; break; case 6: s = "шестьсот"; break; case 7: s = "семьсот"; break; case 8: s = "восемьсот"; break; case 9: s = "девятьсот"; break; } if(!w.IsEmpty() && !s.IsEmpty()) w += " "; w += s; NumSpell2(n, w, g); } void __fastcall NumSpellE(__int64 n, AnsiString &w, Gender g, __int64 e, AnsiString s1, AnsiString s2, AnsiString s3) { __int64 t; t = n / e; t %= 1000; if(n) { NumSpell3(t, w, g); } else { w = "ноль"; } AnsiString s; if(t > 0 || e == 1) { t %= 100; if(t < 11 || t > 19) { switch(t % 10) { case 1: s = s1; break; case 2: case 3: case 4: s = s2; break; default: s = s3; } } else s = s3; } if(!w.IsEmpty() && !s.IsEmpty()) w += " "; w += s; } AnsiString __fastcall NumSpell(__int64 n, Gender g, AnsiString s1, AnsiString s2, AnsiString s3) { AnsiString w; NumSpellE(n, w, genM, 1000000000000000i64, "квадраллион", "квадраллиона", "квадраллионов"); NumSpellE(n, w, genM, 1000000000000i64, "триллион", "триллиона", "триллионов"); NumSpellE(n, w, genM, 1000000000i64, "миллиард", "миллиарда", "миллиардов"); NumSpellE(n, w, genM, 1000000i64, "миллион", "миллиона", "миллионов"); NumSpellE(n, w, genF, 1000i64, "тысяча", "тысячи", "тысяч"); NumSpellE(n, w, g, 1, s1, s2, s3); return w; }

> Inovet (08.02.2011 12:29:44) [44]

Ну так сказали же телефон, а там нет минусов

Inovet © (08.02.11 12:48) [48]

изучай:

http://ru.wikipedia.org/wiki/%D0%98%D0%BC%D0%B5%D0%BD%D0%BD%D1%8B%D0%B5_%D0%BD%D0%B0%D0%B7%D0%B2%D0%B0%D0%BD%D0%B8%D1%8F_%D1%81%D1%82%D0%B5%D0%BF%D0%B5%D0%BD%D0%B5%D0%B9_%D1%82%D1%8B%D1%81%D1%8F%D1%87%D0%B8

> [50] Игорь Шевченко © (08.02.11 13:10)
> изучай:

квадриллион = квадраллион. Не помню откуда, но где-то видел, с этими числительными больше триллиона (да и сам он) всё как-то не однозначно. Впрочем, таких чисел не попадалось для прописи.:)
Хотя вот
http://pics.livejournal.com/sam_soloviev/pic/0000hwwq

← →
vajo (2011-02-08 13:25) [52]

[50]
дуцентдуомилианонгентновемдециллион - язык сломать можно :)

> vajo (08.02.2011 13:25:52) [52]

Зачем самому ломать, пусть агент ломает.

> нанолионо

нонилионов

> Думкин (08.02.2011 14:35:54) [54]

Медведев обязан тебе премией

> Anatoly Podgoretsky © (08.02.11 14:36) [56]

Лучше пусть вложит в инновации - я возьму. А то что я не отдам потом - так он сам разрешил!

> Думкин (08.02.2011 14:40:57) [57]

Ага получишь, нанолимон

> [55] Думкин © (08.02.11 14:36)
> нонилионов

Это ж 10**30 получается, сколько же при цифрах отличных от нуля она говорить будет или на сколько строк писать.:) Реально надо было?

> Inovet © (08.02.11 15:01) [59]

Просто так написал, для побаловаться. Фрагменты в вавки и вперед. Сшивка вот не всегда гладко прошла. Но переозвучивать стало ломко. :)

> [58] Anatoly Podgoretsky © (08.02.11 14:42)
> Ага получишь, нанолимон

1 рупь чё ли?

> [60] Думкин © (08.02.11 15:03)
> Сшивка вот не всегда гладко прошла

Ну это отдельная песня и не столь программерская.:)

ну вот, с полов на деньги перешли.

← →
Урсулапов_ (2011-02-08 21:20) [64]

Прикольно.
А можно ли тут добавить другой голос в процессе выполнения скрипта? По умолчанию стоит MsSam, хотелось бы в папку со скриптом закинуть файл с голосом, и как-то подключить его.

CreateObject("SAPI.SpVoice").Speak"If you want to fuck for funny - fuck yourself and save your money"
хи-хи)

Для тех кто хочет знать, какого пола их компьютер Найти похожие ветки