to yellowsun setscreencolor 0 setpencolor 6 repeat 25 [ repeat 100 [ forward repcount * 2 right 91 ] ] end yellowsun