blob: c7c559ae3b4ecfd2d2209774e2a2c3cc720f0057 (
plain)
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
|
fn main() Int {
# Configure
var size: Float = 1000.0;
var maxVal: Float = 4.0;
var maxIter: Float = 50.0;
var plane: Float = 4.0;
# loop over coordinates
var x: Float = 0.0;
while x < size {
var y: Float = 0.0;
while y < size {
# Initialize
var cReal: Float = (x * plane / size) - 2.0;
var cImg: Float = (y * plane / size) - 2.0;
var zReal: Float = 0.0;
var zImg: Float = 0.0;
var count: Float = 0.0;
# Calculate
while (zReal * zReal + zImg * zImg) <= maxVal && count < maxIter {
var temp: Float = (zReal * zReal) - (zImg * zImg) + cReal;
zImg = 2.0 * zReal * zImg + cImg;
zReal = temp;
count = count + 1.0;
}
# Check
if as_int(count) == as_int(maxIter) {
termpos(as_int(x), as_int(y));
print("█");
}
y = y + 1.0;
}
x = x + 1.0;
}
return 0;
}
|
