I recently found my first program I wrote using Logo and was wondering if it could have been improved:
to gnome
repeat 180 [bk 1 rt 1] repeat 180 [bk 1 rt 1/4]
rt 97 repeat 180 [bk 1 rt 1/4] pu lt 90 fd 50
lt 90 fd 25
rt 90 pd repeat 90 [fd 1/2 rt 1/4]
repeat 180 [bk 1/2 lt 1/4] pu rt 60 fd 50 pd
repeat 360 [fd 1/4 rt 1] lt 60 pu fd 25 pd
repeat 360 [fd 1/4 rt 1] pu rt 90 fd 50 lt 90 fd 12 rt 180
pd pu bk 20 pd lt 10 repeat 240 [fd 1/2 rt 1/2] pu
fd 50 rt 90 fd 90 rt 180 pd pu lt 30 fd 110 lt 45 fd 10 setfillcolour [0 204 0]
fill pu lt 45 fd 40 setfillcolour [243 143 133] fill
end
I think the only thing I do not remember the reason for is the repeats of pu pd
but I think it was to ensure that the pen is up.