Subversion Repositories wimsdev

Rev

Rev 7692 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7692 Rev 8584
Line 119... Line 119...
119 
 
 119 
 
120 
!! axe_x
 120 
!! axe_x
121 
slib_dessin=$slib_dessin\
 121 
slib_dessin=$slib_dessin\
122 
linewidth 3\
 122 
linewidth 3\
123 
hline 0, $[10*$slib_yo], $slib_grey\
 123 
hline 0, $[10*$slib_yo], $slib_grey\
124 
line $[10*$slib_xd-3],$[10*$slib_yo-1],$[10*$slib_xd-1],$[10*$slib_yo], $slib_grey\
 124 
segment $[10*$slib_xd-3],$[10*$slib_yo-1],$[10*$slib_xd-1],$[10*$slib_yo], $slib_grey\
125 
line $[10*$slib_xd-3],$[10*$slib_yo+1],$[10*$slib_xd-1],$[10*$slib_yo], $slib_grey\
 125 
segment $[10*$slib_xd-3],$[10*$slib_yo+1],$[10*$slib_xd-1],$[10*$slib_yo], $slib_grey\
126 
parallel 0,$[10*$slib_yo+1],0,$[10*$slib_yo-1], 10, 0, $slib_xd+1, $slib_grey
 126 
parallel 0,$[10*$slib_yo+1],0,$[10*$slib_yo-1], 10, 0, $slib_xd+1, $slib_grey
127 
 
 127 
 
128 
slib_val=$[-$slib_xo*$slib_xs]
 128 
slib_val=$[-$slib_xo*$slib_xs]
129 
slib_dessin=$slib_dessin\
 129 
slib_dessin=$slib_dessin\
130 
linewidth 1
 130 
linewidth 1
Line 140... Line 140...
140 
 
 140 
 
141 
!! axe_y
 141 
!! axe_y
142 
slib_dessin=$slib_dessin\
 142 
slib_dessin=$slib_dessin\
143 
linewidth 3\
 143 
linewidth 3\
144 
vline $[10*$slib_xo],0, $slib_grey\
 144 
vline $[10*$slib_xo],0, $slib_grey\
145 
line $[10*$slib_xo-1],$[10*$slib_yd-3],$[10*$slib_xo],$[10*$slib_yd-1], $slib_grey\
 145 
segment $[10*$slib_xo-1],$[10*$slib_yd-3],$[10*$slib_xo],$[10*$slib_yd-1], $slib_grey\
146 
line $[10*$slib_xo+1],$[10*$slib_yd-3],$[10*$slib_xo],$[10*$slib_yd-1], $slib_grey\
 146 
segment $[10*$slib_xo+1],$[10*$slib_yd-3],$[10*$slib_xo],$[10*$slib_yd-1], $slib_grey\
147 
parallel $[10*$slib_xo+1],0,$[10*$slib_xo-1], 0, 0, 10, $slib_yd+1, $slib_grey
 147 
parallel $[10*$slib_xo+1],0,$[10*$slib_xo-1], 0, 0, 10, $slib_yd+1, $slib_grey
148 
 
 148 
 
149 
slib_val=$[-$slib_yo*$slib_ys]
 149 
slib_val=$[-$slib_yo*$slib_ys]
150 
slib_dessin=$slib_dessin\
 150 
slib_dessin=$slib_dessin\
151 
linewidth 1
 151 
linewidth 1
Line 174... Line 174...
174 
 slib_y1=$[10*$slib_yo+$slib_y-0.6]
 174 
 slib_y1=$[10*$slib_yo+$slib_y-0.6]
175 
 slib_y2=$[10*$slib_yo+$slib_y+0.6]
 175 
 slib_y2=$[10*$slib_yo+$slib_y+0.6]
176 
 !! add one red dot
 176 
 !! add one red dot
177 
 slib_dessin=$slib_dessin\
 177 
 slib_dessin=$slib_dessin\
178 
 linewidth 2\
 178 
 linewidth 2\
179 
 line $slib_x1,$slib_y1,$slib_x2,$slib_y2,red\
 179 
 segment $slib_x1,$slib_y1,$slib_x2,$slib_y2,red\
180 
 line $slib_x2,$slib_y1,$slib_x1,$slib_y2,red
 180 
 segment $slib_x2,$slib_y1,$slib_x1,$slib_y2,red
181 
!endif $i < $n1
 181 
!endif $i < $n1
182 
!next i
 182 
!next i
183 
 
 183 
 
184 
!! black dots
 184 
!! black dots
185 
n2=!itemcnt $slib_point
 185 
n2=!itemcnt $slib_point
Line 194... Line 194...
194 
 slib_y1=$[10*$slib_yo+$slib_y-0.6]
 194 
 slib_y1=$[10*$slib_yo+$slib_y-0.6]
195 
 slib_y2=$[10*$slib_yo+$slib_y+0.6]
 195 
 slib_y2=$[10*$slib_yo+$slib_y+0.6]
196 
 !! add one '$slib_dc' dot
 196 
 !! add one '$slib_dc' dot
197 
 slib_dessin=$slib_dessin\
 197 
 slib_dessin=$slib_dessin\
198 
 linewidth 2\
 198 
 linewidth 2\
199 
 line $slib_x1,$slib_y1,$slib_x2,$slib_y2,$slib_dc\
 199 
 segment $slib_x1,$slib_y1,$slib_x2,$slib_y2,$slib_dc\
200 
 line $slib_x2,$slib_y1,$slib_x1,$slib_y2,$slib_dc
 200 
 segment $slib_x2,$slib_y1,$slib_x1,$slib_y2,$slib_dc
201 
!endif $i < $n2
 201 
!endif $i < $n2
202 
!next i
 202 
!next i
203 
 
 203 
 
204 
slib_out= $slib_dessin
 204 
slib_out= $slib_dessin