[bb] Simple Entity Parent by Blitzplotter [ 1 day ago ]

Started by BlitzBot, June 29, 2017, 00:28:40

Previous topic - Next topic
Print
Go Down Pages1
User actions

BlitzBot

June 29, 2017, 00:28:40
Title : Simple Entity Parent
Author : Blitzplotter
Posted : 1 day ago

Description : 6 cylinders parented, use the parent handle to rotate. The MGParent entity can be exported to an STL file using Tom Toads stl_exporter utility, link embedded in code.

Code :
Code (blitzbasic) Select
; entity_parent.bb
; Welding 6 cylinders and parenting them to a single entity
; By Blitzplotter - Jun 2017
; Successfull export of .STL can be tested by using blender


; Use TomToads STL Exporter File
; available here:
; https://www.blitzbasic.com/codearcs/codearcs.php?code=3271

Graphics3D 800,600

Dim ARYcylinder(6)

Global MGparent=CreateCylinder()

For x=1 To 6

ARYcylinder(x)=CreateCylinder(36)

ScaleEntity ARYcylinder(x),3,60,3

RotateEntity ARYcylinder(x),x*45,0,0

;add each of the cylinders to a parent entity
EntityParent ARYcylinder(x),MGparent

Next


pivot=CreatePivot()
cam=CreateCamera( pivot )
PositionEntity cam,0,0,-100

lit=CreateLight()
RotateEntity lit,45,45,0

spin_this=1

; Use TomToads STL Exporter File
; available here:
; https://www.blitzbasic.com/codearcs/codearcs.php?code=3271

;------------------------
Include "./STL_Export.bb"
;------------------------

While Not KeyHit(1)

RotateEntity MGparent,1,spin_this,0

UpdateWorld()
RenderWorld()

Flip

VWait 120

spin_this = spin_this +1

Wend

Comments : none...
Print
Go Up Pages1
User actions