Toggle navigation
j2launch
my files
sign in
level 1
2
3
turtle
ARC length angle
CIRCLE radius
CLEARTEXT
HIDETURTLE
PENWIDTH width
PRINT [ . ]
RESET
SETHEADING angle
SETX x
SETXY x y
SETY y
SHOWTURTLE
maths
ARCTAN number
COS angle
INT number
RANDOM number
ROUND number
SIN angle
SQRT number
lists
BUTFIRST list
BUTLAST list
FIRST list
FPUT thing list
ITEM index thing
LAST list
LPUT thing list
SETITEM index array value
reset to flower :size :c1 :c2 :c3 ;--OUTER PETALS setpensize 40/:size colour :c1 repeat 12 [fd 100/:size bk 100/:size rt 30] ;--MIDDLE PETTALS setpensize 30/:size colour :c2 repeat 12 [fd 50/:size bk 50/:size rt 30] ;--CENTRAL PETALS setpensize 10/:size colour :c3 repeat 12 [fd 25/:size bk 25/:size rt 30] end to vase :vsize colour "black lt 5 fd :vsize rt 95 fd :vsize/100*40 rt 95 fd :vsize rt 85 fd :vsize/100*23 rt 85 end to stalk :ssize :angle colour "lightgreen rt :angle setpensize :ssize/20 fd :ssize bk:ssize lt :angle end ;Play with the code below to make a vase of flowers - different sizes and colours. pu setxy 0 -200 pd vase 100 stalk 200 -8 pu setxy 0 0 pd flower 1 "red "white "blue pu setxy 150 150 pd flower 2 "red "white "blue pu setxy -150 -150 pd flower 3 "red "white "blue hideturtle
Your browser doesn't support canvas tags.
