-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathfractal.ion
More file actions
55 lines (45 loc) · 1.37 KB
/
Copy pathfractal.ion
File metadata and controls
55 lines (45 loc) · 1.37 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
var leftEdge := -520.0;
var rightEdge := 300.0;
var topEdge := 300.0;
var bottomEdge := -300.0;
var xStep := 5.0;
var yStep := 10.0;
var maxIter := 100;
fn main () -> void {
for (var y0 := topEdge; y0 > bottomEdge; y0 = y0 - yStep) {
for (var x0 := leftEdge; x0 < rightEdge; x0 = x0 + xStep) {
var x := 0.0;
var y := 0.0;
var theChar := " ";
var i := 0;
while (i < maxIter) {
var x_x := (x * x) / 200.0;
/*
print("X: " + x + "\n");
print("BRUH: " + ((x * x) / 200.0) + "\n");
print("X_X: " + x_x + "\n");
*/
var y_y := (y * y) / 200.0;
if ((x_x + y_y) > 800.0) {
if (i > 9) {
theChar = "@";
} else {
theChar = "" + i;
}
i = maxIter;
}
y = ((x * y) / 100.0) + y0;
x = x_x - y_y + x0;
/*
print("x_x: " + x_x + "\n");
print("y_y: " + y_y + "\n");
print("x: " + x + "\n");
print("y: " + y + "\n");
*/
i = i + 1;
}
print(theChar);
}
print("\n");
}
}