Code: Select all
InitEngine3D()
InitSprite()
OpenWindow(0,0,0,1000,700,"")
OpenWindowedScreen(WindowID(0),0,0,1000,700,0,0,0,#PB_Screen_NoSynchronization)
CreateCube(0,1)
CreateEntity(0,MeshID(0),#PB_Material_None) : ScaleEntity(0,10,1,1)
CreateEntity(1,MeshID(0),#PB_Material_None) : ScaleEntity(1,1,10,1)
CreateEntity(2,MeshID(0),#PB_Material_None) : ScaleEntity(2,1,1,10)
CreateNode(0)
AttachNodeObject(0,EntityID(0))
AttachNodeObject(0,EntityID(1))
AttachNodeObject(0,EntityID(2))
CreateCamera(0,0,0,100,100) : MoveCamera(0,10,0,30)
CameraLookAt(0,NodeX(0),NodeY(0),NodeZ(0))
CreateLight(0,#White,-30,30,30)
timer=0
Repeat
WindowEvent()
timer+1
If timer>1000
timer=0 : num.f=Random(100,1)/8
ScaleNode(0,num,num,num,#PB_Absolute)
Debug num
EndIf
RenderWorld()
FlipBuffers()
Delay(1)
ForEver