!ROSSLER EQUATIONS

!dx/dt = -y - z

!dy/dt = x + y*a

!dz/dt = b + z*(x-c)

!USE a= .2, b = 0.2, c= 5.7

!x0 = -10, y0 = -1, z0 = -1

!deltat = 0.001

SET MODE "graphics"

SET WINDOW -15,15,-20,80

LET a=0.2

LET b=0.2

LET c=5.7

LET x=-10

LET z=-1

LET y=-1

LET DT = 0.001

SET COLOR "GREEN"

PLOT 0,-20;0,80

PLOT -20,0;20,0

PLOT -6,-20;15,50

SET COLOR "BLUE"

DO WHILE t<=150

LET xdot = -y-z

LET ydot = x + y*a

LET zdot = b + z*(x-c)

LET x = x + xdot*DT

LET y = y + ydot*DT

LET z = z + zdot*DT

LET t = t + DT

PLOT x,y+2*z;

LOOP

!

END

!