samples/candyvortex.ta


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
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143

(lp0
(I0
S'repeat'
p1
I212
I116
(lp2
NaI1
aI2
aNatp3
a(I1
(S'number'
p4
I350
tp5
I298
I125
(lp6
I0
aNatp7
a(I2
S'setpensize'
p8
I307
I165
(lp9
I0
aI3
aI4
atp10
a(I3
S'heading'
p11
I381
I182
(lp12
I2
aNatp13
a(I4
S'forward'
p14
I307
I219
(lp15
I2
aI5
aI6
atp16
a(I5
(g4
S'1000'
p17
tp18
I381
I228
(lp19
I4
aNatp20
a(I6
S'setcolor'
p21
I307
I258
(lp22
I4
aI7
aI8
atp23
a(I7
S'xcor'
p24
I381
I275
(lp25
I6
aNatp26
a(I8
S'setshade'
p27
I307
I312
(lp28
I6
aI9
aI10
atp29
a(I9
S'ycor'
p30
I381
I329
(lp31
I8
aNatp32
a(I10
S'back'
p33
I307
I366
(lp34
I8
aI11
aI12
atp35
a(I11
(g4
S'1000'
p36
tp37
I381
I375
(lp38
I10
aNatp39
a(I12
S'left'
p40
I307
I405
(lp41
I10
aI13
aNatp42
a(I13
(g4
I1
tp43
I381
I414
(lp44
I12
aNatp45
a(I-1
S'turtle'
p46
F0.0
F0.0
F10.0
F190.8089953765448
F981.62718344766392
F11.0
tp47
a.