Rucklidge chaotic attractor

Revision:
0:73bfbf91b6e5
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/main.cpp	Mon Jan 03 13:57:46 2011 +0000
@@ -0,0 +1,39 @@
+#include "TFT_4DGL.h"
+
+TFT_4DGL lcd(p9,p10,p11);
+
+int main() {
+
+    double x1,y1,z1,x,y,z,t,dt;
+    int   xp,yp;
+   
+    float k = 2;
+    float a = 6.7;
+
+    x1 = 1;
+    y1 = 0;
+    z1 = 4.5;
+    
+    dt = 0.01;
+
+    while(1)
+    
+    {
+    
+        x = x1+(-k*x1+a*y1-y1*z1)*dt;
+        y = y1+(x1)*dt;
+        z = z1+(-z+pow(y1,2))*dt;
+        t = t+dt;
+
+        xp = 160+(int)floor(14*x);
+        yp = 120+(int)floor(19*y);
+
+        lcd.pixel(yp,xp,WHITE);
+      
+        x1 = x;
+        y1 = y;
+        z1 = z;
+
+    }
+ 
+}
\ No newline at end of file