From 1030dc837b10a03a02a85d5504cbeec168ce49e2 Mon Sep 17 00:00:00 2001
From: Bernie Innocenti <bernie@codewiz.org>
Date: Mon, 03 May 2010 21:53:47 +0000
Subject: Import XaoS r489 (trunk after version 3.5)

---
(limited to 'tutorial/barnsley.xaf')

diff --git a/tutorial/barnsley.xaf b/tutorial/barnsley.xaf
new file mode 100644
index 0000000..eabdff2
--- /dev/null
+++ b/tutorial/barnsley.xaf
@@ -0,0 +1,204 @@
+; An introduction to fractals by Jan Hubicka
+; Version 1.0 done for XaoS 3.0 in July 1997
+; Use xaos -play to see it :)
+(load "head.xhf")
+(clearscreen)
+(textposition 'center 'middle)
+(message "intro4")
+(usleep 5000000)
+
+(palette 1 1686618586 0)
+(formula 'barnsley)
+(cycling #f)
+(periodicity #t)
+(juliaseed 1.0010901162790698318 -0.62500000000000004022)
+(angle 0)
+(autorotate #f)
+(maxiter 170)
+(outcoloring 0)
+(incoloring 0)
+(julia #f)
+(plane 0)
+(view 0 0 2.5 2.5)
+(display)
+(textposition 'center 'bottom)
+
+(message "barnsley1")
+(textsleep)
+
+(display)
+(message "barnsley2")
+(textsleep)
+
+(display)
+(message "barnsley3")
+(textsleep)
+
+(display)
+(line 'fractal 0 0 0 0)
+(line 'fractal 0 0 0 0)
+(line 'fractal 0 0 0 0)
+(line 'fractal 0 0 0 0)
+(fastjulia #t)
+(linekey 0)
+(morphline 'fractal 0.97109 -0.655 1.03109 -0.655)
+(morphline 'fractal 1.03109 -0.655 1.03109 -0.595)
+(morphline 'fractal 0.97109 -0.595 1.03109 -0.595)
+(morphline 'fractal 0.97109 -0.655 0.97109 -0.595)
+(usleep 1000000)
+(message "barnsley4")
+(textsleep)
+(display)
+(line 'fractal 0.97109 -0.655 1.03109 -0.655)
+(line 'fractal 1.03109 -0.655 1.03109 -0.595)
+(line 'fractal 0.97109 -0.595 1.03109 -0.595)
+(line 'fractal 0.97109 -0.655 0.97109 -0.595)
+(linekey 0)
+(morphline 'fractal 1.0027 0.47 1.0627 0.47)
+(morphline 'fractal 1.0627 0.47 1.0627 0.53)
+(morphline 'fractal 1.0027 0.53 1.0627 0.53)
+(morphline 'fractal 1.0027 0.47 1.0027 0.53)
+(morphjulia 1.0327 0.5)
+(usleep 2000000)
+(linekey 0)
+(morphline 'fractal 0.3282 1.207 0.3882 1.207)
+(morphline 'fractal 0.3882 1.207 0.3882 1.267)
+(morphline 'fractal 0.3282 1.267 0.3882 1.267)
+(morphline 'fractal 0.3282 1.207 0.3282 1.267)
+(morphjulia 0.3582 1.237)
+(linekey 0)
+(morphline 'fractal 0.3282 1.207 0.3882 1.207)
+(morphline 'fractal 0.3882 1.207 0.3882 1.267)
+(morphline 'fractal 0.3282 1.267 0.3882 1.267)
+(morphline 'fractal 0.3282 1.207 0.3282 1.267)
+(usleep 2000000)
+(morphjulia -0.3582 1.237)
+(linekey 0)
+(morphline 'fractal -0.3882 1.207 -0.3282 1.207)
+(morphline 'fractal -0.3282 1.207 -0.3282 1.267)
+(morphline 'fractal -0.3882 1.267 -0.3282 1.267)
+(morphline 'fractal -0.3882 1.207 -0.3882 1.267) 
+(usleep 2000000)
+(morphjulia -1.0327 0.65)
+(linekey 0)
+(morphline 'fractal -1.0627 0.62 -1.0027 0.62)
+(morphline 'fractal -1.0027 0.62 -1.0027 0.68)
+(morphline 'fractal -1.0627 0.68 -1.0027 0.68)
+(morphline 'fractal -1.0627 0.62 -1.0627 0.68)
+(usleep 2000000)
+(morphjulia -1.1591 -0.6125)
+(linekey 0)
+(morphline 'fractal -1.1891 -0.6425 -1.1291 -0.6425)
+(morphline 'fractal -1.1291 -0.6425 -1.1291 -0.5825)
+(morphline 'fractal -1.1891 -0.5825 -1.1291 -0.5825)
+(morphline 'fractal -1.1891 -0.6425 -1.1891 -0.5825)
+(usleep 2000000)
+(linekey 0)
+(morphline 'fractal -1.1591 -0.6125 -1.1591 -0.6125)
+(morphline 'fractal -1.1591 -0.6125 -1.1591 -0.6125)
+(morphline 'fractal -1.1591 -0.6125 -1.1591 -0.6125)
+(morphline 'fractal -1.1591 -0.6125 -1.1591 -0.6125)
+(usleep 1000000)
+(display)
+
+(message "barnsley5")
+(textsleep)
+(display)
+(message "barnsley6")
+(textsleep)
+
+(display)
+(fastjulia #f)
+(julia #t)
+(palette 1 1183407127 0)
+(juliaseed 1.0485101744186047187 -0.04166666666666666934)
+(maxiter 311)
+(outcoloring 1)
+(incoloring 0)
+(plane 1)
+(view -0.1884 -0.202 7.146 7.146)
+(usleep 2000000)
+
+
+;(palette 1 1779436629 0)
+;(juliaseed 0.031613372093023257869 -1.0500000000000000676)
+;(maxiter 170)
+;(outcoloring 0)
+;(incoloring 1)
+;(plane 1)
+;(view 0.1308 0.04816 4.578 4.578)
+;(usleep 2000000)
+
+
+(palette 1 25997414 0)
+(filter 'edge2 #t)
+(juliaseed -1.0472928330130634481 -0.087398343635324930658)
+(maxiter 170)
+(outcoloring 0)
+(incoloring 0)
+(plane 1)
+(view -0.1851 -0.09928 7.507 7.507)
+(usleep 2000000)
+(filter 'edge2 #f)
+
+(palette 3 558734359 0)
+(juliaseed 0.82617606890462195329 -0.59250450310750061547)
+(maxiter 54)
+(outcoloring 0)
+(incoloring 1)
+(plane 0)
+(view -0.5141 0.2394 1.84 1.84)
+(usleep 2000000)
+
+(palette 2 1355057888 0)
+(juliaseed -1.0221656976744186704 -0.062500000000000004012)
+(angle -310)
+(autorotate #f)
+(maxiter 33)
+(plane 1)
+(view -0.78537 0.20149 0.43535 0.43535)
+(usleep 2000000)
+
+(palette 2 1808462409 0)
+(juliaseed 0.58205451272674395567 0.83592626580482287831)
+(angle -405)
+(maxiter 50)
+(outcoloring 0)
+(incoloring 1)
+(plane 3)
+(view 1.009 0.04757 2.973 2.973)
+(usleep 2000000)
+
+(palette 3 2052922397 0)
+(formula 'barnsley)
+(juliaseed 0.0054390291189111917214 -1.0091451435058578867)
+(maxiter 38)
+(outcoloring 0)
+(incoloring 2)
+(plane 1)
+(view 1.0166 -0.015562 0.55972 0.55972)
+(usleep 2000000)
+
+
+(palette 1 1686618586 0)
+(formula 'barnsley2)
+(cycling #f)
+(periodicity #t)
+(juliaseed 1.0010901162790698318 -0.62500000000000004022)
+(angle 0)
+(autorotate #f)
+(maxiter 170)
+(outcoloring 0)
+(incoloring 0)
+(julia #f)
+(plane 0)
+(view 0 0 2.5 2.5)
+(display)
+(textposition 'center 'bottom)
+
+(message "barnsley7")
+(textsleep)
+
+(display)
+(message "barnsley8")
+(textsleep)
--
cgit v0.9.1