|
View Poll Results: На чем вы пишете свои программы? | |||
Delfi | 42 | 21.76% | |
Pascal | 63 | 32.64% | |
C, C++ | 87 | 45.08% | |
Java | 40 | 20.73% | |
PHP | 31 | 16.06% | |
Perl | 13 | 6.74% | |
VBasic | 21 | 10.88% | |
ZedFret | 5 | 2.59% | |
На английском | 43 | 22.28% | |
Какие программы? | 48 | 24.87% | |
Multiple Choice Poll. Ті, хто голосували: 193. You may not vote on this poll |
|
Опції теми | Опції перегляду |
17-01-2007, 14:35 | #111 | |
Гигант мысли
Реєстрація: Dec 2006
Адреса: Порубежье
Повідомлення: 1,052
|
Цитата:
|
|
17-01-2007, 14:51 | #112 |
Ветеран
Реєстрація: Aug 2006
Адреса: В шопі, що збудована на імаші
Повідомлення: 2,032
|
Вопрос по ActionScript 2.0
Почему ball описывает только половину параболы , а дальше скользит чуть-чуть и останавливается?? Код:
ball._x = -50; ball._y = 170; var X0 = 50; var Y0 = 170; var t = 0; var a = 2; var Vy = 0; var Vx = 6; var newV = null; var newX = null; var newY = null; _root.onEnterFrame = function() { if (ball._y>300) { Vy = -newV*0.15; Vx = 0.85*Vx; X0 = newX; Y0 = newy; t = 0.6; } ball._y = Y0+Vy*t+a*t*t/2; ball._x = X0+Vx*t; newV = Vy+a*t; newY = ball._y; newX = ball._x; t += 0.6; };
__________________
я не анти-фашист, я анти-довбойоб Kiss a non-smoker; taste the difference. "Praemia cum poscit medicus, satana est" ВОЕНЕ УПЧК 1.0*on retirement
|
17-01-2007, 14:53 | #113 | |
Читатель
|
Цитата:
__________________
|
|
17-01-2007, 15:02 | #114 | |
Читатель
|
Цитата:
возможно что я не могу откомпилировать туториал потому что он написан для другого "с" файл проэкта visual c++ 6.0 - dsw а тут вот:
__________________
|
|
17-01-2007, 15:07 | #115 | |
Гигант мысли
Реєстрація: Dec 2006
Адреса: Порубежье
Повідомлення: 1,052
|
Цитата:
|
|
17-01-2007, 15:14 | #116 |
Ветеран
Реєстрація: Aug 2006
Адреса: В шопі, що збудована на імаші
Повідомлення: 2,032
|
2Бартез
Вот в 6 плеере сделано.
__________________
я не анти-фашист, я анти-довбойоб Kiss a non-smoker; taste the difference. "Praemia cum poscit medicus, satana est" ВОЕНЕ УПЧК 1.0*on retirement
|
18-01-2007, 12:56 | #117 |
Banned
|
ВОЗВРАЩЕНИЕ БЛОКНОТА - Готовим западло на скриптах
Привет, великий западлостроитель. Я надеюсь, от тебя не отвернулись еще твои друзья-компьютерщики (а других у тебя быть не может - вам просто не о чем разговаривать), тебя не выгоняют из компьютерных клубов, а на работе злой админ не запретил запуск любимого Блокнота. Тогда появился реальный шанс припомнить былые обиды и попрактиковаться в любимом хобби - западлостроении. Об этом я тебе расскажу в сегодняшней статье.
Вкратце напомню, что весь предлагаемый далее код в компиляции не нуждается и пишется в любом текстовом редакторе (лишь бы формат выходного файла был текстовый.), сохраняется в текстовом файле с расширением WSF и запускается так же, как и ЕХЕ-файлы. Не забудь добавлять обязательные XML элементы: <?xml version="1.0" encoding="ISO-8859-1"?> <job id="T1"> <script language="VBScript"> <![CDATA[ в начало файла и ]]> </script> </job> в конец файла соответственно. Итак, приступим. БОРЬБА С ПИРАТСТВОМ Скажи, где ты брал диск с дистрибутивом твоей ОСи? А за сколько? Что-что? ЛИЦЕНЗИОННАЯ?! И все остальные диски ТОЖЕ? Ну, тогда бросай журнал и иди кататься с девочками (мальчиками ) на яхте. Это будет для тебя более полезным занятием. Реально же, по официальным данным, пиратский рынок в России составляет 89 процентов. То есть с вероятностью 1:10 можно утверждать, что вставленная в дисковод компашка, если это не собственный сборник, является пиратской копией. Мы же с тобой займемся тем, что будем при попытке использования такого диска извлекать его с выдачей ну оч-ч-ч-ень строгого предупреждения . Делать это будем, конечно же, с помощью сценариев на языке VBScript. Итак, пиши следующий код: Option Explicit Dim fso,mplayer Dim Drive Dim Count, f f=0 'Объявляются используемые переменные On Error Resume Next 'Блокировка сообщений об ошибках set fso=CreateObject("Scripting.FileSystemObject") set mplayer=CreateObject("WMPlayer.OCX.7") 'Подключение системных объектов Do while f=0 'Создается бесконечный цикл 'для работы скрипта до перезагрузки WScript.sleep 5000 'Пауза между проверками наличия диска в дисководе в миллисекундах Count=-1 'Начальное положение счетчика 'Нужен на случай нескольких сидюков For Each Drive in FSO.Drives 'Проверка всех дисков компа If Drive.DriveType=4 then 'Если это сидюк count=count+1 'То увеличиваем счетчик if Drive.IsReady Then 'Если он вставлен If (fso.fileexists(Drive.DriveLetter & ":\" & "Autorun.inf")) then 'И на нем есть файл Autorun.inf 'Значит есть автозапуск 'И это не ручной сборник '(кто ставит на ручной сборник автозапуск? %)) 'И не музыкальный диск mplayer.cdromcollection.item(count).eject() 'Извлекается лоток msgbox "Обнаружена пиратская копия диска. Дальнейшая работа с диском невозможна." &_ vbcrlf & "Сообщите в местные органы ФСБ о месте его покупки.",48,_ "Антипиратская система Windows" 'И выдается грозное предупреждение End if End If End If Next Loop Можешь не сомневаться, что твой ламернутый друган или не менее ламернутая секретарша будут рассказывать об этой "защите" всем и каждому, а первым делом побегут в магазин, продавший этот диск, а может и в ФСБ позвонят . При желании можешь усовершенствовать этот скрипт. Например, можно считать количество попыток использования диска и каждый раз выдавать новое предупреждение. В общем, пофантазируй. |
18-01-2007, 23:40 | #118 |
Фанат
|
ой ржунимагу уже 2е повелись
__________________
°•†КLaЊ Delux?™•° здох |
09-02-2007, 00:50 | #119 |
Читатель
|
так... написал прогу типа 3D
не могу понять почему когда я в ней хожу перемещение происходит рывками(т.е. не тормозит как при малых fps(frame per second) а скорость перемещения изменяется плавно от быстрой к медленной) знатоки С++ посмотрите пожалуйста код что в нём не так:
__________________
|
10-02-2007, 15:29 | #120 | |
Гигант мысли
Реєстрація: Dec 2006
Адреса: Порубежье
Повідомлення: 1,052
|
Цитата:
|
|
|
|