|
|
The first place in the October contest:
The source:
procedure main
color red
repeat 180,circle,step=60,line=10
color blue
repeat 180,circle,step=75,line=10
rt 1
color red
repeat 180,circle,step=75,line=10
rt 1
color yellow
repeat 180,circle,step=90,line=10
rt 1
color black
repeat 180,circle,step=90,line=10
end
procedure circle
penup
go step
pendown
go line
penup
rt 180
go line+step
rt 182
end
|