MobiNet v1.1.100 CMobile (-94.7111,2.55445,0) (46,0,0) 0 0 0 2155905024 0.3 0.3 0 0 x: xsouris y: ysouris si cliquee alors si mem1=0 alors p: plusproche si dist(moi,p)~20 alors mem1: p finsi sinon p:mem1; met_en(p,x,y) finsi sinon mem1: 0 finsi 0 0 0 0 0 (97.1,4.9,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 1 (92.3531,0.98248,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 0 0 0 2 (92,20,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 3 (92,30,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 4 (92,40,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 5 (92,50,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 6 (92,60,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 7 (92,70,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 8 (92,80,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 9 (92,90,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 10 (92,-10,0) (0,0,0) 27 0.78 0 0 1 10 0 1 p: mem1 1 si p=moi alors si touche_espace alors si mem2 alors mem2:0 sinon si mem1 alors mem1:0; finsi finsi finsi finsi i: mem1 j: mem2 si i alors si j alors angle: ang(xj -xi, yj -yi) -Pi/2 hauteur: dist(i,j) x: (xi+xj)/2 y: (yi+yj)/2 sinon angle: ang(xi -x, yi -y) -Pi/2 hauteur: 2*dist(moi,i) finsi finsi d: 0; I: 0; R:2 si i et j alors U: mem1 j - mem1 i; I: U/R mem1 j: mem1 j - I/2 mem1 i: mem1 i + I/2 rouge j: mem1 j; vert j: 1-rouge j rouge i: mem1 i; vert i: 1-rouge i finsi rouge: abs(2*I); vert: rouge; bleu:0 i: mem1 j: mem2 si icone lui = 15 alors si i=0 alors mem1: lui sinon si j=0 et lui ~$ i alors mem2: lui finsi finsi finsi mem1: 0 0 0 0 0 11 (92,-18,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 12 (92,-26,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 13 (92,-34,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 14 (92,-42,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 15 (92,-50,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 16 (92,-58,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 17 (92,-66,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 18 (92,-74,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 19 (92,-82,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 20 (96.5,-82,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 21 (96.5,-74,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 22 (96.5,-66,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 23 (96.5,-58,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 24 (96.5,-50,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 25 (96.5,-42,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 26 (96.5,-34,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 27 (96.5,-26,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 28 (96.5,-18,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 29 (96.5,-10,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 30 (97,96,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 31 (97,86,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 32 (97,76,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 33 (97,66,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 34 (97,56,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 35 (97,46,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 36 (97,36,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 37 (97,26,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 38 (97,16,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 39 (92.2646,10.6376,0) (0,0,0) 15 0 1 0 0.3 0.3 0 1 0 1 0 0 40 (96.5,-90,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 41 (92,-90,0) (0,0,0) 27 0.78 0 0 1 10 0 1 comme 12 comme 12 mem1: 0 0 0 0 0 42 (-64.8437,-18.6671,0) (0,0,0) 27 1.5708 0 0 1 24.3655 0 1 comme 12 comme 12 mem1: 0 0 47 0 0 43 (-65.2367,7.27035,0) (0,0,0) 27 1.5708 0 0 1 25.1515 0 1 comme 12 comme 12 mem1: 0 0 46 0 0 44 (-77.8124,7.27035,0) (0,0,0) 15 0 0 4278190080 0.5 0.5 0 1 mem1: 1 couleur: ROUGE 0 1 0 0 45 (-77.0264,-18.6671,0) (0,0,0) 15 0 0 16711680 0.5 0.5 0 1 mem1: 0 couleur: VERT 0 0 0 0 46 (-46.3731,44.9976,0) (0,0,0) 0 0 0 2155905024 1 1 0 1 i: pp couleur: GRIS ; icone:0; v:0 met_en(suiv,x-10,y) si i~$NULL et dist(i,moi)~10 alors si icone i=15 alors couleur:ROUGE; v: 99.9*rouge i; finsi si icone i=27 alors couleur:JAUNE; v: 99.9*rouge i; finsi finsi icone: v mod 10 icone suiv: ent(v/10) couleur suiv: couleur 0 0 0 0 47 (-56.3731,44.9976,0) (0,0,0) 0 0 1 2155905024 1 1 0 1 0 0 0 0 48 (23.9725,45.3906,0) (0,0,0) 0 0 0 2155905024 1 1 0 1 comme 48 0 0 0 0 49 (13.9725,45.3906,0) (0,0,0) 0 0 1 2155905024 1 1 0 1 0 0 0 0 50 (-11.7898,45.3906,0) (0,0,0) 0 0 0 2155905024 1 1 0 1 comme 48 0 0 0 0 51 (-21.7898,45.3906,0) (0,0,0) 0 0 1 2155905024 1 1 0 1 0 0 0 0 52