Henon-Mod3 - Henon quadratic map - Mod3 color

Users » JLS » Code » Henon-Mod3

Henon quadratic map - Mod3 color

main.cpp@0:4608db13c46a, 2011-01-09 (annotated)

User	Revision	Line number	New contents of line
JLS	0:4608db13c46a	1	#include "TFT_4DGL.h"
JLS	0:4608db13c46a	2
JLS	0:4608db13c46a	3	TFT_4DGL lcd(p9,p10,p11);
JLS	0:4608db13c46a	4
JLS	0:4608db13c46a	5	int main() {
JLS	0:4608db13c46a	6
JLS	0:4608db13c46a	7	float a = 0.425;
JLS	0:4608db13c46a	8	float b = 0.382;
JLS	0:4608db13c46a	9
JLS	0:4608db13c46a	10	float x = 0.1;
JLS	0:4608db13c46a	11	float y = 0.1;
JLS	0:4608db13c46a	12
JLS	0:4608db13c46a	13	int xout = 0;
JLS	0:4608db13c46a	14	int yout = 0;
JLS	0:4608db13c46a	15	int n = WHITE;
JLS	0:4608db13c46a	16	int m = 0;
JLS	0:4608db13c46a	17
JLS	0:4608db13c46a	18	while (1) {
JLS	0:4608db13c46a	19
JLS	0:4608db13c46a	20	double x1 = x;
JLS	0:4608db13c46a	21	double y1 = y;
JLS	0:4608db13c46a	22
JLS	0:4608db13c46a	23	x = x1cos(a)-(y1-pow(x1,2))sin(b);
JLS	0:4608db13c46a	24	y = x1sin(a)+(y1-pow(x1,2))cos(b);
JLS	0:4608db13c46a	25
JLS	0:4608db13c46a	26	m++;
JLS	0:4608db13c46a	27
JLS	0:4608db13c46a	28	if (m==150) {
JLS	0:4608db13c46a	29
JLS	0:4608db13c46a	30	m = 0;
JLS	0:4608db13c46a	31
JLS	0:4608db13c46a	32	n = rand();
JLS	0:4608db13c46a	33
JLS	0:4608db13c46a	34	}
JLS	0:4608db13c46a	35
JLS	0:4608db13c46a	36	xout = 110+(750*x);
JLS	0:4608db13c46a	37	yout = 160+(950*y);
JLS	0:4608db13c46a	38
JLS	0:4608db13c46a	39	lcd.pixel(xout,yout,n);
JLS	0:4608db13c46a	40
JLS	0:4608db13c46a	41	}
JLS	0:4608db13c46a	42	}