Skip to content

Latest commit

 

History

History
53 lines (39 loc) · 747 Bytes

nicki.toby

File metadata and controls

53 lines (39 loc) · 747 Bytes
 
Apr 18, 2001
Apr 18, 2001
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
number color
function main() returns nothing
disableFence()
hideturtle()
flower(50, 100, 1)
endfunction
function flower(number start, number end, number hop) returns nothing
// nicki is cool
number joe
number color = 0
number direction = 1
for joe = start to end step hop
color = color + direction
if (color > 11)
color = 11
direction = -1
endif
if (color < 0)
color = 0
direction = 1
endif
setPenColor(color)
webbox(joe)
endfor
endfunction
function webbox(number size) returns nothing
number x
for x = 1 to 360 / 10
octogon(size)
turnRight(15)
endfor
endfunction
function octogon(number size) returns nothing
number i
for i = 1 to 8
goForward(size)
turnRight(45)
endfor
endfunction