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
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
|
<!DOCTYPE html>
<html lang="en" dir="ltr" class="no-js">
<head>
<meta charset="utf-8" />
<title>graphicsimagejkeyevortex [BASIC 256 - Language Documentation]</title>
<link rel="stylesheet" type="text/css" href="lib/exe/cssc171c1dfe8519125bb40a349172b001a.css"/>
</head>
<body>
<div id="dokuwiki__site"><div id="dokuwiki__top" class="site dokuwiki mode_show tpl_dokuwiki ">
<div id="dokuwiki__header"><div class="pad group">
<div class="headings group">
<h1><a href="start.html" accesskey="h" title="[H]"><img src="lib/tpl/dokuwiki/images/logo.png" width="64" height="64" alt="" /> <span>BASIC 256 - Language Documentation</span></a></h1>
</div>
</div>
<div class="breadcrumbs">
<div class="youarehere"><span class="bchead">You are here: </span><span class="home"><bdi><a href="start.html" class="wikilink1" title="start">start</a></bdi></span> » <bdi><span class="curid"><a href="graphicsimagejkeyevortex.html" class="wikilink1" title="graphicsimagejkeyevortex">graphicsimagejkeyevortex</a></span></bdi></div>
</div>
<hr class="a11y" />
</div></div>
<div class="wrapper group">
<div id="dokuwiki__content"><div class="pad group">
<div class="pageId"><span>graphicsimagejkeyevortex</span></div>
<div class="page group">
<p>
<a href="http://doc.basic256.org/lib/exe/detail.php?id=graphicsimagejkeyevortex&media=en:kahn_joel_eye_in_vortex.png" class="media" title="en:kahn_joel_eye_in_vortex.png"><img src="lib/exe/en_kahn_joel_eye_in_vortex.png" class="media" alt="" width="200" /></a>
Eye in Vortex by Joel Kahn (June 2010)<br/>
Modified 2013-02 for version 0.9.9.45 and later
</p>
<pre class="code"># Contributed by Joel Kahn
cls
clg
l=700
w=500
graphsize l,w
dim f(8)
f[0]=0
f[1]=0
f[2]=17
f[3]=0
f[4]=17
f[5]=1
f[6]=0
f[7]=1
m1=1
m2=2
x1=l/2
y1=w/2
x2=x1+1
y2=y1+1
qq1=0.99999
q1=1.34
qq2=0.99998
q2=1.33
vv1=0.011
v1=0.0
vv2=0.012
v2=-0.1
s1=1.411
s2=1.412
c1=0.0
c2=2.0^24.0
for d=1 to 25000
m1=m1+1/m1
x1=x1+s1*cos(m1)
y1=y1+sin(m1)
c1=c1+6.01
q1=q1*qq1
v1=v1+vv1
color rgb(c1\256\256%256, c1\256%256, c1%256)
stamp x1,y1,q1,v1,f
m2=m2+1/m2
x2=x2+s2*cos(m2)
y2=y2+sin(m2)
c2=c2-6.02
q2=q2*qq2
v2=v2+vv2
color rgb(c2\256\256%256, c2\256%256, c2%256)
stamp x2,y2,q2,v2,f
next d</pre>
</div>
<div class="docInfo"><bdi>graphicsimagejkeyevortex.txt</bdi> · Last modified: 2013/02/05 11:49 by <bdi>admin</bdi></div>
</div></div>
<hr class="a11y" />
</div>
<div id="dokuwiki__footer"><div class="pad">
<div class="license">Except where otherwise noted, content on this wiki is licensed under the following license: <bdi><a href="http://creativecommons.org/licenses/by-sa/3.0/" rel="license" class="urlextern">CC Attribution-Share Alike 3.0 Unported</a></bdi></div>
</div></div>
</div></div>
<div id="screen__mode" class="no"></div>
</body>
</html>
|
