Code: Select all
let rouge=255
let vert=100
let bleu=0
repete 4
couleur 255 255 255
avance 100
tourne 90
repete 4
couleur rouge vert bleu
avance 50
tourne -90
repete 4
couleur 10 255 20
avance 25
tourne 90
repete 4
couleur 10 40 255
avance 12
tourne -90
repete 4
couleur 255 0 255
avance 6
tourne 90
fin_repete
fin_repete
fin_repete
fin_repete
fin_repete
(during the execution of a long drawing) it is necessary to click with the right button that stop the drawing.... then the left button on the fenetre graphic call the ahead plane editor and libere the mouse! the end of a short drawing has (in time) the fenetre graphic remainder in front to look at the drawing... one clicks left button on the fenetre graphic call the ahead plane editor and libere the mouse!Fangbeast wrote:While you are using this program, the mouse is restricted to inside the borders of the logo window, even when the display window is not in focus!!
Otherwise, great job
Code: Select all
let taille=12
let b=0
let t=0
let rouge=0
let vert=0
let bleu=0
to [cube]
let t=0-{taille}
repeat 4
forward taille
turn 90
end_repeat
forward taille
turn 45
forward taille
turn 45
forward taille
turn 135
forward taille
forward t
turn -45
forward taille
turn 45
forward taille
home
end_to
repeat 32
let b={b}+1
rnd 255, rouge
rnd 255, vert
rnd 255, bleu
let rouge={rouge}+50
let vert={vert}+50
let bleu={bleu}+50
color rouge, vert, bleu
[cube]
turn 90
if b=8
let taille={taille}*2
let b=0
endif
end_repeat
