diff options
Diffstat (limited to 'tutorial/magnet.xaf')
-rw-r--r-- | tutorial/magnet.xaf | 233 |
1 files changed, 233 insertions, 0 deletions
diff --git a/tutorial/magnet.xaf b/tutorial/magnet.xaf new file mode 100644 index 0000000..9a4bf25 --- /dev/null +++ b/tutorial/magnet.xaf @@ -0,0 +1,233 @@ +; 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 "intro7") +(usleep 5000000) + +(display) +(defaultpalette 0) +(textposition 'center 'bottom) +(formula 'magnet) +(angle 0) +(outcoloring 0) +(plane 0) +(view 2.0193 -1.6338 0.17812 0.26124) +(message "magnet") +(textsleep) +(display) +(morphview 1.5 0 3 4.4) +(usleep 6000000) +(wait) +(message "magnet1") +(textsleep) +(display) +(message "magnet2") +(textsleep) +(display) +(palette 1 2104064959 0) +(formula 'magnet) +(angle -361) +(maxiter 170) +(outcoloring 0) +(plane 0) +(view 1.847209822 -1.339254931 7.031666521E-06 1.03131109E-05) +(message "similiar") +(textsleep) + +(display) +(palette 1 1979730731 0) +(formula 'magnet) +(angle 26.7) +(outcoloring 6) +(plane 0) +(view -0.33728908 -0.37438809 0.00018856268 0.0002765586) +(usleep 2000000) + +(palette 1 765726463 0) +(formula 'magnet) +(angle 88.3) +(outcoloring 6) +(plane 0) +(view -0.3371366 -0.37663387 0.00069439878 0.0010184515) +(usleep 2000000) + + +(palette 1 1510803482 0) +(formula 'magnet) +(angle -269) +(outcoloring 1) +(plane 0) +(view 1.275 0.006127 0.14027 0.20573) + +(usleep 2000000) + + + + +(palette 1 1734551171 0) +(formula 'magnet) +(angle -88.8) +(outcoloring 8) +(incoloring 0) +(plane 0) +(view 2.095 -0.01928 1.292 1.895) +(usleep 3000000) + + +(palette 1 258644272 0) +(formula 'magnet) +(angle -540) +(outcoloring 0) +(plane 0) +(view 1.2689826 -2.0404879 0.000258881 0.00037969213) +(usleep 1000000) + +(morphview 1.5 0 3 4.4) +(usleep 10000000) +(wait) +(juliaseed 1.5404263026792413359 1.2313365559633509793) +(fastjulia #t) +(message "magjulia") +(textsleep) +(display) +(line 'fractal 1.5404263026792413359 1.2313365559633509793 1.5404263026792413359 1.2313365559633509793) +(line 'fractal 1.5404263026792413359 1.2313365559633509793 1.5404263026792413359 1.2313365559633509793) +(line 'fractal 1.5404263026792413359 1.2313365559633509793 1.5404263026792413359 1.2313365559633509793) +(line 'fractal 1.5404263026792413359 1.2313365559633509793 1.5404263026792413359 1.2313365559633509793) +(linekey 0) +(morphline 'fractal 1.51043 1.20134 1.57043 1.20134) +(morphline 'fractal 1.57043 1.20134 1.57043 1.26134) +(morphline 'fractal 1.51043 1.26134 1.57043 1.26134) +(morphline 'fractal 1.51043 1.20134 1.51043 1.26134) +(usleep 1000000) + + +(morphjulia 1.4602 -1.209) +(linekey 0) +(morphline 'fractal 1.4302 -1.239 1.4902 -1.239) +(morphline 'fractal 1.4902 -1.239 1.4902 -1.179) +(morphline 'fractal 1.4302 -1.179 1.4902 -1.179) +(morphline 'fractal 1.4302 -1.239 1.4302 -1.179) +(usleep 3000000) + +(morphjulia -0.3184 -1.1289) +(linekey 0) +(morphline 'fractal -0.3484 -1.1589 -0.2884 -1.1589) +(morphline 'fractal -0.2884 -1.1589 -0.2884 -1.0989) +(morphline 'fractal -0.3484 -1.0989 -0.2884 -1.0989) +(morphline 'fractal -0.3484 -1.1589 -0.3484 -1.0989) +(usleep 3000000) + +(morphjulia -0.273 1.378) +(linekey 0) +(morphline 'fractal -0.303 1.348 -0.243 1.348) +(morphline 'fractal -0.243 1.348 -0.243 1.408) +(morphline 'fractal -0.303 1.408 -0.243 1.408) +(morphline 'fractal -0.303 1.348 -0.303 1.408) +(usleep 3000000) +(morphjulia 1.5404 1.2313) +(linekey 0) +(morphline 'fractal 1.5104 1.2013 1.5704 1.2013) +(morphline 'fractal 1.5704 1.2013 1.5704 1.2613) +(morphline 'fractal 1.5104 1.2613 1.5704 1.2613) +(morphline 'fractal 1.5104 1.2013 1.5104 1.2613) +(usleep 3000000) +(linekey 0) +(morphline 'fractal 1.5404 1.2313 1.5404 1.2313) +(morphline 'fractal 1.5404 1.2313 1.5404 1.2313) +(morphline 'fractal 1.5404 1.2313 1.5404 1.2313) +(morphline 'fractal 1.5404 1.2313 1.5404 1.2313) +(usleep 1000000) +(display) +(fastjulia #f) + +(palette 1 999460631 0) +(formula 'magnet) +(juliaseed 2.0193023255813953853 -0.022000000000000001542) +(angle -268) +(maxiter 251) +(outcoloring 1) +(julia #t) +(plane 0) +(view -0.02084 0.04831 4.953 7.265) +(usleep 3000000) + +(palette 1 523407644 0) +(formula 'magnet) +(juliaseed -0.057906976744186156036 0) +(angle 89.6) +(maxiter 170) +(outcoloring 1) +(julia #t) +(plane 0) +(view 0.88499 0.039171 0.7298 1.0704) + + +(palette 1 1982820186 0) +(formula 'magnet) +(juliaseed 1.2774418604651162634 -0.92400000000000006488) +(outcoloring 0) +(julia #t) +(plane 1) +(view 157 380 94.4 138) +(usleep 2000000) + +(palette 1 1716597759 0) +(formula 'magnet) +(juliaseed 3.0208139534883721999 -0.022000000000000001542) +(angle -88.9) +(outcoloring 1) +(julia #t) +(plane 0) +(view -0.9297 -0.02747 1.683 2.468) + +(usleep 3000000) +(palette 1 98634059 0) +(formula 'magnet) +(juliaseed -0.26191860465116291456 -0.022000000000000001542) +(angle -274) +(maxiter 170) +(outcoloring 7) +(julia #t) +(plane 0) +(view 0.9202 0.05028 1.371 2.01) +(usleep 3000000) + +(palette 1 952140389 0) +(formula 'magnet) +(juliaseed 1.3330813953488371976 0) +(outcoloring 9) +(julia #t) +(plane 5) +(view -0.01039 0.008669 1.341 1.966) +(usleep 3000000) + +(palette 1 2094414250 0) +(formula 'magnet) +(juliaseed 1.6483720930232558244 0) +(angle -91.6) +(outcoloring 7) +(julia #t) +(plane 0) +(view -0.011859 0.016696 0.8126 1.1918) +(usleep 3000000) + + +(display) +(palette 3 1083366997 0) +(textposition 'center 'bottom) +(formula 'magnet2) +(angle 0) +(outcoloring 0) +(plane 0) +(view 1 0 3 3.2) +(message "magnet3") +(textsleep) +(display) +(morphview 1.94584 -0.90656 0.0534806 0.057046) +(usleep 6000000) +(wait) + |