EntityRadius and ScaleEntity

Blitz3D Forums/Blitz3D Programming/EntityRadius and ScaleEntity

here, try this. it shows that the entity radius doesn't get scaled with the entity.

up and down keys to scale the entity

left and right keys to move the entity

Graphics3D 800,600
SetBuffer BackBuffer()

camera=CreateCamera()
PositionEntity camera,0,0,-10

light=CreateLight()


sphere=CreateSphere()
PositionEntity sphere,5,0,0
EntityType sphere,1
EntityRadius sphere,1
scale#=1


sphere1=CreateSphere()
PositionEntity sphere1,-3,0,0
EntityType sphere1,2
EntityRadius sphere1,1


Collisions 1,2,1,1



While Not KeyHit(1)



If KeyDown(203) Then MoveEntity sphere,-0.1,0,0
If KeyDown(205) Then MoveEntity sphere,0.1,0,0
If KeyDown(200) Then scale=scale+0.1
If KeyDown(208) Then scale=scale-0.1


ScaleEntity sphere,scale,scale,scale

UpdateWorld
RenderWorld
Flip
Wend
End