#60,25,10,10 3-5 Diamond with two variables

#addo

Make a procedure DIAMONDS with two variables

(:size and :angle) 

so you can make different kinds of diamonds:

#diam4




#lamp

=====================

TO DIAMONDS :size :angle

REPEAT 2 [FORWARD :size RIGHT :angle FORWARD :size RIGHT (180-:angle)]

END