Fibonacci word/fractal: Difference between revisions
Added Quackery.
No edit summary |
(Added Quackery.) |
||
Line 1,813:
main()</syntaxhighlight>
The output image is probably the same.
=={{header|Quackery}}==
<syntaxhighlight lang="Quackery"> [ $ "turtleduck.qky" loadfile ] now!
[ ' [ 1 ]
' [ 0 ]
rot dup 1 = iff
2drop done
dup 2 = iff
[ drop nip ] done
2 - times
[ dup rot join ]
nip witheach
[ 3 2 walk
0 = if
[ i^ 1 &
2 * 1 -
4 turn ] ] ] is fibofractal ( n --> )
turtle 0 frames
450 1 fly
1 4 turn
300 1 fly
1 2 turn
23 fibofractal
frame</syntaxhighlight>
{{out}}
[[File:Quackery Fibonacci word fractal.png|thumb|center]]
=={{header|R}}==
| |||