Type TVector3
Field Pointer:Byte Ptr
Field x:Float Ptr
Field y:Float Ptr
Field z:Float Ptr
Field temppointer:Int Ptr
Function Create:TVector3( x:Float , y:Float , z:Float )
Local Obj:TVector3 = New TVector3
obj.tempPointer = VECTOR3_Create( x , y , z )
Obj.Pointer = Byte Ptr(obj.tempPointer[0])
Obj.x = Float Ptr(obj.tempPointer[1])
Obj.y = Float Ptr(obj.tempPointer[2])
Obj.z = Float Ptr(obj.tempPointer[3])
Return Obj
End Function
Method Delete()
'VECTOR3_delete( Self.Pointer )
vector3_delete(Self.temppointer)
End Method
End Type