MathGroup Archive 2011

[Date Index] [Thread Index] [Author Index]

Search the Archive

Problem loading 3d models

  • To: mathgroup at smc.vnet.net
  • Subject: [mg121252] Problem loading 3d models
  • From: Roger Bagula <roger.bagula at gmail.com>
  • Date: Tue, 6 Sep 2011 03:57:12 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com

I'm also having problems with downloading Mathematica 3d Models:
the Rabbit came through fine,
but only that. I tried the shark and the zephlin too.
I'm getting fractured results...
Try:

ExampleData["Geometry3D"]
ExampleData["ColorTexture"]
Clear[g0]
g0 = ListSurfacePlot3D[
  ExampleData[{"Geometry3D", "BassGuitar"}, "VertexData"],
  Lighting -> "Neutral", MaxPlotPoints -> 50, Mesh -> None,
  Axes -> False, Boxed -> False, PlotRange -> All,
  PlotStyle -> {Brown, Specularity[White, 20],
    Texture[ExampleData[{"ColorTexture", "BurlOak"}]]},
  TextureCoordinateFunction -> (Normalize[{#1, #2, #3}] &)]
Export["BassGuitarMathematica.3ds", g0]
Export["BassGuitarMathematica.obj", g0]
Import["BassGuitarMathematica.3ds"]




  • Prev by Date: Re: CDF files now on Gyre&Gimble (math blog)
  • Next by Date: Re: Quit versus Clear["Global`*"]
  • Previous by thread: Re: CDF files now on Gyre&Gimble (math blog)
  • Next by thread: Re: Problem loading 3d models