Subversion Repositories wimsdev

Rev

Rev 15179 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 15179 Rev 18080
Line 77... Line 77...
77 
\integer{size=(1.5*\facteur)*(\M+1)}
 77 
\integer{size=(1.5*\facteur)*(\M+1)}
78 
\integer{height2=4*\height}
 78 
\integer{height2=4*\height}
79 
\text{size=\size,\height2}
 79 
\text{size=\size,\height2}
80 
\text{fleche=xrange \xrange
 80 
\text{fleche=xrange \xrange
81 
yrange \yrange
 81 
yrange \yrange
82 
lines \couleur,\M,\wi/2,-1,\wi/2,-1,-\wi/2,\M,-\wi/2,\M,-\wi,\N+0.5,0,\M,\wi,\M,\wi/2
 82 
polyline \couleur,\M,\wi/2,-1,\wi/2,-1,-\wi/2,\M,-\wi/2,\M,-\wi,\N+0.5,0,\M,\wi,\M,\wi/2
83 
fill 0,0,\couleur
 83 
fill 0,0,\couleur
84 
}
 84 
}
85 
 
 85 
 
86 
\text{STEP=\choix=0 ? wims(values x for x=1 to 2*\N)}
 86 
\text{STEP=\choix=0 ? wims(values x for x=1 to 2*\N)}
87 
\text{STEP=\choix=1 ? wims(values 2*x-1 for x=1 to \N)}
 87 
\text{STEP=\choix=1 ? wims(values 2*x-1 for x=1 to \N)}
Line 91... Line 91...
91 
\text{positionbas=}
 91 
\text{positionbas=}
92 
\text{positionhaut=}
 92 
\text{positionhaut=}
93 
\text{positionbas2=}
 93 
\text{positionbas2=}
94 
\for{j=0 to \N-1}{
 94 
\for{j=0 to \N-1}{
95 
  \text{fleche=\choix=0 or \choix=1 or \choix=3 ? \fleche
 95 
  \text{fleche=\choix=0 or \choix=1 or \choix=3 ? \fleche
96 
  line \j-0.1,-\wi/2,\j-0.1,-2*\wi,\couleur}
 96 
  segment \j-0.1,-\wi/2,\j-0.1,-2*\wi,\couleur}
97 
  \text{fleche=\choix=0 or \choix=2 or \choix=3? \fleche
 97 
  \text{fleche=\choix=0 or \choix=2 or \choix=3? \fleche
98 
  line \j-0.1,\wi/2,\j-0.1,2*\wi,\couleur}
 98 
  segment \j-0.1,\wi/2,\j-0.1,2*\wi,\couleur}
99 
  \text{ans=pari([2*\j+1,2*\j+2])}
 99 
  \text{ans=pari([2*\j+1,2*\j+2])}
100 
  \text{v=slib(draw/convpixel \j-0.5,-2,\size,\xrange,\yrange,0,pixels)}
 100 
  \text{v=slib(draw/convpixel \j-0.5,-2,\size,\xrange,\yrange,0,pixels)}
101 
  \text{positionbas=\positionbas
 101 
  \text{positionbas=\positionbas
102 
 r\ans[1],\v[1] x \v[2]}
 102 
 r\ans[1],\v[1] x \v[2]}
103 
 \text{v=slib(draw/convpixel \j-0.5,-2,\size,\xrange,\yrange,0,pixels)}
 103 
 \text{v=slib(draw/convpixel \j-0.5,-2,\size,\xrange,\yrange,0,pixels)}