## Perspective Drawing

Started by JuneTheSecond, October 24, 2009, 11:34:18 AM

0 Members and 1 Guest are viewing this topic.

#### JuneTheSecond

#30
Thank you very much Vojo.

It was not the gravity of center,
but another one that I don't know the name.
It is represented in the formula.
xo=(xa+xb+xc+xd)/4
yo=(ya+yb+yc+yd)/4
Gravity center of 4-points?
I think this point is the center of ellipse.
Best Regards,

Junichi Yoda
http://june.minibird.jp/

#### JuneTheSecond

#31
Hi,

A man who is good in mathatics adviced me to search a counter example.
Then I made an example(image60.jpg and image61.jpg)
that the center of ellipse is 2 mm apart from the center of 4-points.
Now my hypothesis has been rejected.
Best Regards,

Junichi Yoda
http://june.minibird.jp/

#### JuneTheSecond

#32
Hi,

This is the shape for perspective view of circle.
The shapesheet version.
The ellipse works on shapesheet, but does not need VBA macro.
The ellipse smoothly follows the move of the frame.
I've applied the technique "Ellipse in Cut Face of Oblique Pyramid".
http://www.geocities.jp/visualcalculation/english/cutfacetwistedpiramid.htm
Best Regards,

Junichi Yoda
http://june.minibird.jp/

#### Visio Guy

Hi Junichi,

I was wondering if your 3D stuff uses any new features from Visio 2010?

Very cool work, thanks for sharing with the forum!
For articles, tips and free content, see the Visio Guy Website at http://www.visguy.com
Get my Visio Book! Using Microsoft Visio 2010

#### JuneTheSecond

Hi,

It works on Visio 2007.
You don't need any new feature.
But you need to work hard to build
complicated shapesheet formulas.
Best Regards,

Junichi Yoda
http://june.minibird.jp/

#### JuneTheSecond

#35
Hi,

Now, I am trying to make a cylinder in the perspective view.
I have to add manual operations yet.
I need to think of any new idea.
Best Regards,

Junichi Yoda
http://june.minibird.jp/

#### JuneTheSecond

Hi,

Here is a shape of perspective vertical cylinder.
Size and view can be changed with control handles.

If the cylinders are connected to the vanishing points,
perspective view can be changed with arrow keys.

Please select one of the vanishing point and press any arrow key.
If you move vanishing point with mouse, the cylinders break apart.
But if you press any arrow key, they are restored again.

I studied the reason why they behave differently.
And I found the  value of PinY of ellipse cannot be transferred
correctly on mouse move, and found a trick to fix it with SETF function.

But I did not fix it, because the solution is not elegant.

Best Regards,

Junichi Yoda
http://june.minibird.jp/

#### JuneTheSecond

Here is Visio drawing.
Best Regards,

Junichi Yoda
http://june.minibird.jp/

#### JuneTheSecond

#38
Hi,

I fixed the problem with SETF function to force the PinY value in some ellipse shapes, because I could not find any other solution.
Now you can change perspective view with both mouse or arrow keys.
Best Regards,

Junichi Yoda
http://june.minibird.jp/

#### JuneTheSecond

#39
Here is Visio drawing.
Best Regards,

Junichi Yoda
http://june.minibird.jp/

#### JuneTheSecond

#40
Hi,

They are heavy, because shapesheets are too complicated,and their cells are forced to recalculate with VBA macro.
It is because some of cells do not re-calculate themselves in the shapesheets, when you change the view.

Best Regards,

Junichi Yoda
http://june.minibird.jp/

#### JuneTheSecond

Hi,

Changed the view.
Best Regards,

Junichi Yoda
http://june.minibird.jp/

#### JuneTheSecond

#42
Here are holizontal cylinders.
Moving vanishing points makes changed views.
Best Regards,

Junichi Yoda
http://june.minibird.jp/

#### JuneTheSecond

Here are other views without boxes.
Best Regards,

Junichi Yoda
http://june.minibird.jp/

#### JuneTheSecond

Here is an example drawing.
Best Regards,

Junichi Yoda
http://june.minibird.jp/