3D Axis - Play with it!

[Yashied]

LAST VERSION - 2.2

14-Mar-10

3D Axis is designed to draw graphs of almost any trigonometric functions that can be specified as a single function - f(a,b). The functions can be specified in one of the three coordinate systems: cartesian, cylindrical or spherical. By default, you can use any functions that are defined in AutoIt (Cos(), Sin(), Sqrt() etc.), but you can also import your own functions, for example write a function for Fourier series. At the beginning, try to play with the examples that appear below (Examples.3da). Just drag this file to the main program window, select any graphs, and click "Draw" button. But do not draw all graphs at once, as this may take a long time. Try to come up with their own functions, it all depends on your imagination. If anyone got beautiful graphs, please post it in this thread (better in .3da file).

3D Axis has one drawback - size of the main program window is more than 1250x860 and can not be resized that will fit not for all monitors! Therefore, recommended minimum size of your monitor should be 17".

The any questions or comments about 3D Axis please post it in this thread. I will be glad to any feedback and suggestions.

Files to download

Binary

Redirection to 3DAxis_bin.zip, 1.11 MB

3DAxis_bin.html

Binary (GUI smaller version, size of the client area - 1101x733)

Redirection to 3DAxis_small_bin.zip, 1.11 MB

3DAxis_small_bin.html

Source

Redirection to 3DAxis_source.zip, 668 KB

3DAxis_source.html

Examples

To draw graphs of the functions from the Examples.3da, just import or drag and drop this file into the program.

Examples.zip

Edited December 8, 2013 by Yashied

[UEZ]

Is this not working on Vista and higher OS?

Changed line 2805 to Case 'WIN_2000', 'WIN_XP', 'WIN_2003', 'WIN_VISTA', 'WIN_7'

Working properly on Vista!

Very nice program and code demonstration!

UEZ

PS: 5* from me

Edited December 22, 2009 by UEZ

[Yashied]

Is this not working on Vista and higher OS?

UEZ

Ahh, totally forgot about it. Edited December 21, 2009 by Yashied

[Yashied]

Fixed.

Thanks UEZ.

[Yashied]

Fixed a bug causing the wrong release resources in OnAutoItExit() when you exit the program.

[Yashied]

I'm surprised the number of posts. One of two things: either very few people use the "big" monitors, either the mathematics has lost its popularity. A pity.

[corgano]

A little of both, actually!

Got a lower res version?

[Mat]

You know... My school just paid out a lot of money by the sounds of it for a program with not a lot (if any) bonuses to this. They had the ability to drag the graph to turn it though. I like the ability to save it as a picture, that will probably come in very handy.

[KaFu]

One of two things

Three... lots of people are on Christmas holidays ... awesome code , pity I'm out of university for 10 years now ...

[James]

Oh wow. That is incredible. Visually, it doesn't look like AutoIt to me, but the code says otherwise. Very very nice Yashied!

[Ady]

Aaaaam Yashied?

Could you fix the program for 1024 x 768? Or i`ll try to figure out how to do it...

The program is awesome! 

Keep up the good work 

And about posting, i don`t know how many of you like math, no offence but i sure do!  

Edited December 27, 2009 by Ady

[Yashied]

Ady, corgano

OK, done. Now the size of the client area - 1101x733, see first post. This is the maximum that I can do.

Edited December 27, 2009 by Yashied

[Melba23]

Yashied,

It is not that we do not like maths.....we are just lost for words!

M23

Edit: Speeling, or rather tpying!

Edited December 27, 2009 by Melba23

[Mat]

It is not that we do not like maths.....we are just lost for words!

Yer, Mathematicians never were good with words... Numbers have always been far easier and logical.

[Yashied]

Many people ask me how to draw graphs in the plane of monitor. Here is a function for the transformation (projection) 3D coordinates (X; Y; Z) on the plane (Xp; Yp).

Func _2D($X, $Y, $Z, $D, $I, $T, ByRef $Xp, ByRef $Yp)

    Local $DC = Cos($D * $Pi / 180)
    Local $DS = Sin($D * $Pi / 180)
    Local $IC = Cos($I * $Pi / 180)
    Local $IS = Sin($I * $Pi / 180)
    Local $TC = Cos($T * $Pi / 180)
    Local $TS = Sin($T * $Pi / 180)

    $Xp = $X * ($DC * $TC - $DS * $TS * $IC) - $Y * ($DS * $TC + $DC * $TS * $IC) + $Z * ($TS * $IS)
    $Yp = $X * ($DS * $IS) + $Y * ($DC * $IS) + $Z * ($IC)

EndFunc   ;==>_2D

Is it true beautiful formula? Appointment of variables $D, $I and $T, you can understand after playing with the first three sliders in the program (Rotate, Skew and Twirl). Function does not take into account the perspective and other 3D effects.

[jchd]

Function does not take into account the perspective and other 3D effects.

Kudos for writing this impressive 3D-Axis in AutoIt!

Did you have a need for that which wasn't covered by some existing maths package, or was it for AutoIt fun or challenge?

[Skrip]

This is amazing. Very nice work.

[Andreik]

Why I get error "Read file error"?

[Yashied]

Why I get error "Read file error"?

What percentage of shows in the progress bar at this time? Edited January 20, 2010 by Yashied

[Andreik]

Don't know exactly, maybe 80%.