Graphic Formula control

[jvanegmond]

Thanks to imbatmo for the idea with his Plotting Tool

I was bored, and decided to recreate this UDF style. Here is a example, and I have added the UDF (Graph.au3) as an attachment.There's a few bugs now, but I really don't feel like bug-fixing, so go ahead and pick this up.

#include <GUIConstants.au3>
#include <Graph.au3>

$pi = 3.1415926535897932384626433832795

GUICreate("Manadar's Plotting Example",400,400)

$Plot = _GraphCreate(5,5,390,390)
_GraphDrawBackground($Plot)

_GraphSetBound($Plot, -2,2,-2*$pi,2*$pi) ; Boundaries are bugged if you take a positive value as minimum bound, or when you don't take -n as minimum and +n as maximum.

$Formula1 = _GraphCreateFormula($Plot,"Sin(x)")
$Formula2 = _GraphCreateFormula($Plot,"Cos(x)")
$Formula3 = _GraphCreateFormula($Plot,"Tan(x)")

GUISetState()

_GraphDrawFormula($Plot,$Formula1,50) ; Draws the formula with a delay of 50 ms between each pixel. Normal speed imo.
_GraphDrawFormula($Plot,$Formula2,25) ; Draws the formula twice as fast as the last one.
_GraphDrawFormula($Plot,$Formula3) ; Draws the formula instantly.

;_GraphClear($Plot) ;_GraphClear is bugged because it doesn't make a white background.


While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSe
            Exit
    EndSwitch
WEnd

Graph.au3

Edited November 14, 2006 by Manadar

[clearguy]

This is a real good work! Thanx.

[cool0403]

This is a magnificient piece of art, i love this , now this is what i call a true program its one of the best program i ve seen through out the whole forum . nice job keep it up