@options;
  repereortho(200,250,25,1,1){ 0 , moyen , noir , num1 ,i};

@figure;
  A = point( -5.41 , -1.76 )  { rouge , rond2 , sansnom };
  B = point( 0.48 , -1.01 )  { rouge , rond2 , sansnom };
  dAB = droite( A , B )  { marron , 2 , sansnom };
  perpAdAB = perpendiculaire( A , dAB )  { i };
  K = point( -6 , -5 )  { fixe , i };
  L = point( -3 , -5 )  { fixe , i };
  sKL = segment( K , L );
  Z = pointsur( sKL , 0 )  { vert , rond2 , sansnom };
  var a =20*KZ/KL { 0 };
  P = pointsur( perpAdAB , 1 )  { i };
  paraPdAB = parallele( P , dAB )  { i };
  Q = pointsur( paraPdAB , a )  { noir , rond3 , sansnom };
  var b =PQ { 0 };
  var rayQAP =AP { 1 };
  cerayQAP = cerclerayon( Q , rayQAP )  { noir , 2 };
  var p =90+b*180/3.1416 { 90 };
  R = pointsur( cerayQAP , p )  { i };
  C = projete( Q , dAB )  { i };
  perpQparaPdAB = perpendiculaire( Q , paraPdAB )  { i };
  sax_perpQparaPdAB = reflexion( perpQparaPdAB )  { noir };
  R' = image( sax_perpQparaPdAB , R )  { i };
  D = symetrique( R' , Q )  { vert , trace , rond2 };
  s2 = segment( Q , R' )  { grisfonce };
  s3 = segment( Q , D )  { grisfonce };
  paraQdAB = parallele( Q , dAB )  { i };
  S = pointsur( paraQdAB , 3.86 )  { noir , rond3 , sansnom };
  t_QS = translation( Q , S )  { noir };
  it_QScerayQAP = image( t_QS , cerayQAP )  { noir , 2 };
  it_QSs3 = image( t_QS , s3 )  { grisfonce };
  it_QSs2 = image( t_QS , s2 )  { grisfonce };
  I = milieu( Q , S )  { grisfonce , rond3 , sansnom };
  cerayI0.3 = cerclerayon( I , 0.3 )  { grisfonce , plein30 };
  J = milieu( D , Q )  { i };
  t_QI = translation( Q , I )  { noir };
  J' = image( t_QI , J )  { i };
  sIJ' = segment( I , J' )  { grisfonce , 2 };
  r_Q = rotation( Q , 30 )  { noir };
  s_1 = image( r_Q , s2 )  { grisfonce };
  s_2 = image( r_Q , s_1 )  { grisfonce };
  s_3 = image( r_Q , s_2 )  { grisfonce };
  s_4 = image( r_Q , s_3 )  { grisfonce };
  s_5 = image( r_Q , s_4 )  { grisfonce };
  s_6 = image( r_Q , s3 )  { grisfonce };
  s_7 = image( r_Q , s_6 )  { grisfonce };
  s_8 = image( r_Q , s_7 )  { grisfonce };
  s_9 = image( r_Q , s_8 )  { grisfonce };
  s_10 = image( r_Q , s_9 )  { grisfonce };
  E = symetrique( J' , I )  { i };
  sEI = segment( E , I )  { grisfonce , 2 };
  it_QSs_1 = image( t_QS , s_1 )  { grisfonce };
  it_QSs_2 = image( t_QS , s_2 )  { grisfonce };
  it_QSs_3 = image( t_QS , s_3 )  { grisfonce };
  it_QSs_4 = image( t_QS , s_4 )  { grisfonce };
  it_QSs_5 = image( t_QS , s_5 )  { grisfonce };
  it_QSs_6 = image( t_QS , s_6 )  { grisfonce };
  it_QSs_7 = image( t_QS , s_7 )  { grisfonce };
  it_QSs_8 = image( t_QS , s_8 )  { grisfonce };
  it_QSs_9 = image( t_QS , s_9 )  { grisfonce };
  it_QSs_10 = image( t_QS , s_10 )  { grisfonce };
  paraEdAB = parallele( E , dAB )  { i };
  paraJ'dAB = parallele( J' , dAB )  { i };
  cerayE1 = cerclerayon( E , 0.2 )  { i };
  F2 = intersection( paraEdAB , cerayE1 , 1 )  { i };
  F = intersection( paraEdAB , cerayE1 , 2 )  { i };
  sFF2 = segment( F , F2 )  { grisfonce , 2 };
  cerayJ'1 = cerclerayon( J' , 0.2 )  { i };
  G2 = intersection( paraJ'dAB , cerayJ'1 , 1 )  { i };
  G = intersection( paraJ'dAB , cerayJ'1 , 2 )  { i };
  sG2G = segment( G2 , G )  { grisfonce , 2 };
  r_Q1 = rotation( Q , 60 )  { noir };
  S' = image( r_Q1 , S )  { i };
  sQS' = segment( Q , S' )  { i };
  T = pointsur( sQS' , 0.47 )  { i };
  sQT = segment( Q , T )  { grisfonce , 2 };
  perpTdAB = perpendiculaire( T , dAB )  { i };
  U = pointsur( perpTdAB , 0.71 )  { i };
  perpUperpTdAB = perpendiculaire( U , perpTdAB )  { i };
  cerayU1 = cerclerayon( U , 0.5 )  { i };
  H2 = intersection( perpUperpTdAB , cerayU1 , 1 )  { i };
  H = intersection( perpUperpTdAB , cerayU1 , 2 )  { i };
  r_U = rotation( U , -30 )  { noir };
  V = image( r_U , H2 )  { i };
  polyH2VH = polygone( H2 , V , H  )  { grisfonce , plein30 };
  sUT = segment( U , T )  { grisfonce , 2 };
  perpTperpTdAB = perpendiculaire( T , perpTdAB )  { i };
  W = pointsur( perpTperpTdAB , -2.36 )  { i };
  sQI = segment( Q , I )  { grisfonce , 2 };
  sTW = segment( T , W )  { grisfonce , 2 };
  sWI = segment( W , I )  { grisfonce , 2 };
  sIT = segment( I , T )  { grisfonce , 2 };
  sWS = segment( W , S )  { grisfonce , 2 };
  perpWperpTperpTdAB = perpendiculaire( W , perpTperpTdAB )  { i };
  X = pointsur( perpWperpTperpTdAB , -0.5 )  { i };
  ceWX = cercle( W , X )  { i };
  Y = pointsur( ceWX , 360 )  { i };
  arcXWY = arc( Y , W , X )  { grisfonce , 3 };
  sXW = segment( X , W )  { grisfonce , 2 };

@analyse;

@enonce;
Le vélo : deplacer le curseur pour mettre en 
mouvement le velo et voir la trace du point D.

@config;
couleurfonddessin=0xceddff;
couleurfondtexte=0xceddff;
couleurfondanalyse=0xceddff;
couleurfondenonce=0xceddff;
couleurtextinfo=0xffffff;
figure=0,0,485,440,ouvert;
script=495,94,255,321,ouvert;
analyse=493,407,257,100,ouvert;
enonce=493,3,253,100,ouvert;
info=50,470,435,435;
listetransfos=visible;
actualisescript=oui;
pasapas=non;
boutons=point,pointsur,inter,inter2,milieu,projeteortho,segment,droite,demidroite,polygone,vecteur,droiteparallele,droiteperpendiculaire,mediatrice,bissectrice,droitev,tangente,cercle,cercledia,cerclerayon,arc,angle,symetrique,symetriqued,deftransfo,imagetransfo,texte,mesure,mesureangle,nombres,animation,lieu,supprimer,effacerbase,effacertout,renomme,posnom,invisible,visible,aspect,repere,zoomp,zoomm,zoomb,zoombm,deplacement,rapporteur,guide,miseenforme,tepmep,aide,fichier,fiche,ootep,exporter,oooexport,configuration,escape;
commandes=point,milieu,intersection,inter,intercercles,interlignes,projete,symetrique,pointsur,barycentre,image,segment,segmentlong,vecteur,vecteurcoord,droite,droitev,droiteeqr,droiteeq,demidroite,parallele,perpendiculaire,bissectrice,mediatrice,tangente,cercle,cercledia,cerclerayon,angle,arc,entier,reel,calcul,distance,perimetre,mesureangle,mesureangleg,mesurearc,aire,symetrie,reflexion,translation,rotation,homothetie,similitude,polygone,lieu,groupe,fonction;
commandesanalyse=distance,calc,abscisse,ordonnee,coord,ec,er,angle,position,nature,aire,alignés,sto,pgcd,ppcm,simplifie,anglev,exact,dim;