Тема: xCreateInstance
Показать сообщение отдельно
Старый 20.08.2012, 20:18   #27
FREE MAN
Разработчик
 
Регистрация: 20.02.2010
Сообщений: 397
Написано 173 полезных сообщений
(для 565 пользователей)
Ответ: xCreateInstance

Сообщение от burovalex Посмотреть сообщение
ну хз, лучше не стало, (может не правильно) переделал так:

Global sp=xCreateSphere(16)
tx=xLoadTexture("accept.png")
xEntityTexture sp,tx
Global HWIFX=xLoadFXFile("hwinstancing.fx")
xSetEntityEffect sp,HWIFX
xSetEffectTechnique sp, "Instancing"
xSetEffectMatrixSemantic sp,"MatViewProj",WORLDVIEWPROJ
xSetEffectMatrixSemantic sp,"MatWorld",WORLD
xHideEntity sp

Dim c(10000)
Dim s(500)
For y=0 To 90
s(y)=xCopyEntity(sp)
xHideEntity s(y)
	For i=1 To 100
	c(i*y)=xCreateInstance(s(y))
	xPositionEntity c(i*y),Rnd(-3,3),Rnd(0,0.5),Rnd(-3,3)
	xScaleEntity c(i*y),0.1,0.1,0.1
	xShowEntity c(i*y)
	Next
Next
Получилось 9к сфер, а фпс 26
Сделай проще, должно работать.

amount = 100
For i = 0 To amount
copy_entity = xCreateInstance(entity)
x# = Rand(0, 1500)
z# = Rand(0, 1500)
xPositionEntity copy, x, 0, z
Next
(Offline)
 
Ответить с цитированием