![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Когда ж будет реальный GLScene
MeF88 © (2003-03-06 10:42:00)
Блин в GLScene 0.9 столько недоработок. Прям садись и пиши его сам. Каждый раз приходится все самому править. Вот и сейчас инерцию исправляю... Потом надо будет тенями заняться. Кто-нить знает, когда будет релиз GLScene?
MeF88 (2003-03-07 12:07:00) [1]Не секрет: Я делал так:
function TGLDamping.Calculate(speed, deltaTime : Double) : Double;
var
dt : Double;
begin
while deltaTime>0 do begin
if deltaTime>0.01 then begin
dt:=0.01;
deltaTime:=deltaTime-0.01;
end else begin
dt:=deltaTime;
deltaTime:=0;
end;
if speed>0 then begin speed:=speed-dt*((FQuadratic*speed+FLinear)*speed+FConstant); if speed<0 then speed:=0; end;
( (FQuadratic*speed+FLinear)
Не секрет: Я делал так:
function TGLDamping.Calculate(speed, deltaTime : Double) : Double;
var
dt : Double;
begin
while deltaTime>0 do begin
if deltaTime>0.01 then begin
dt:=0.01;
deltaTime:=deltaTime-0.01;
end else begin
dt:=deltaTime;
deltaTime:=0;
end;
if speed>0 then begin speed:=speed-dt*((FQuadratic*speed+FLinear)*speed+FConstant); if speed<0 then speed:=0; end;
if speed<0 then begin speed:=speed+dt*((FQuadratic*speed+FLinear)*speed+FConstant); if speed>0 then speed:=0; end;
end;
Result:=speed;
end;
Alek Aaz (2003-03-06 17:27:00) [2]
>теперь она у меня и на +англ и на -англ
Если не секрет как? Я тоже правил. Но на -англ он никогда до конца не останавливался :(
MeF88 (2003-03-06 13:14:00) [3]
Согласен, а инерцию я все же немного подправил - теперь она у меня и на +англ и на -англ работает. Вот найду учебник физики... А тени в ГЛСцене по-моему тормознутые. Или это я торможу. У меня 1000fps снижается до 10fps при попытке "отcastить" тени на модели всего 3000 полигон...
Alek Aaz (2003-03-06 11:17:00) [4]
Риторический вопрос :)
PS. Инерцию до конца не исправишь ...