exemples/TEST_VERS.JLOGO
POUR ORG
SOIT "C ARRONDIS VERS [0 0]
SOIT "D DISTANCE [0 0]
ECG PH PH :D " :C
FIN
POUR TEST :T :A
CT VE
REPETE 360 / :A [TD :A AV :T ORG RE :T]
FIN
POUR ESSAI
SOIT "XMAX ITEM 1 TGRAPH
SOIT "YMAX ITEM 2 TGRAPH
FCC HASARD NBCOUL
CT FPOS PH DIFF HASARD :XMAX :XMAX / 2 DIFF HASARD :YMAX :YMAX / 2
ECG POS
FCAP VERS [0 0] AV DISTANCE [0 0]
FIN