Subversion Repositories wimsdev

Rev

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

Rev 12547 Rev 13586
Line 1... Line 1...
1
!if $wims_read_parm!=slib_header
1
!if $wims_read_parm!=slib_header
2
!goto proc
2
  !goto proc
3
!endif
3
!endif
4
 
4
 
5
slib_parms=4\
5
slib_parms=4\
6
,[min_x, max_x,size_x,size_y] in real coord and in pixels, by default size_x=300,size_y=100\
6
,[min_x, max_x,size_x,size_y] in real coord and in pixels, by default size_x=300,size_y=100\
7
,3- or 5- vector for [d1,q1,mediane,q2,d2] or [q1,mediane,q2] \
7
,3- or 5- vector for [d1,q1,mediane,q2,d2] or [q1,mediane,q2] \
Line 114... Line 114...
114
$(slib_jx)_pt3m=$slib_brd.create('point',[function(){return $(slib_jxP)3.X()},$slib_h4], {$slib_font,visible:false});\
114
$(slib_jx)_pt3m=$slib_brd.create('point',[function(){return $(slib_jxP)3.X()},$slib_h4], {$slib_font,visible:false});\
115
$(slib_jx)_pt3p=$slib_brd.create('point',[function(){return $(slib_jxP)3.X()},$slib_h3], {$slib_font,visible:false});\
115
$(slib_jx)_pt3p=$slib_brd.create('point',[function(){return $(slib_jxP)3.X()},$slib_h3], {$slib_font,visible:false});\
116
$(slib_jx)_pt4m=$slib_brd.create('point',[function(){return $(slib_jxP)4.X()},$slib_h4], {$slib_font,visible:false});\
116
$(slib_jx)_pt4m=$slib_brd.create('point',[function(){return $(slib_jxP)4.X()},$slib_h4], {$slib_font,visible:false});\
117
$(slib_jx)_pt4p=$slib_brd.create('point',[function(){return $(slib_jxP)4.X()},$slib_h3], {$slib_font,visible:false});\
117
$(slib_jx)_pt4p=$slib_brd.create('point',[function(){return $(slib_jxP)4.X()},$slib_h3], {$slib_font,visible:false});\
118
 
118
 
119
!set slib_script3=\
119
  !set slib_script3=\
120
$slib_brd.create('line',[$(slib_jxP)1,$(slib_jxP)2],{straightFirst:false, straightLast:false});\
120
$slib_brd.create('line',[$(slib_jxP)1,$(slib_jxP)2],{straightFirst:false, straightLast:false});\
121
$slib_brd.create('line',[$(slib_jxP)4,$(slib_jxP)5],{straightFirst:false, straightLast:false});\
121
$slib_brd.create('line',[$(slib_jxP)4,$(slib_jxP)5],{straightFirst:false, straightLast:false});\
122
$slib_brd.create('line',[$(slib_jx)_pt1m,$(slib_jx)_pt1p],{straightFirst:false, straightLast:false});\
122
$slib_brd.create('line',[$(slib_jx)_pt1m,$(slib_jx)_pt1p],{straightFirst:false, straightLast:false});\
123
$slib_brd.create('line',[$(slib_jx)_pt5m,$(slib_jx)_pt5p],{straightFirst:false, straightLast:false});\
123
$slib_brd.create('line',[$(slib_jx)_pt5m,$(slib_jx)_pt5p],{straightFirst:false, straightLast:false});\
124
$slib_brd.create('line',[$(slib_jx)_pt2m,$(slib_jx)_pt2p],{straightFirst:false, straightLast:false});\
124
$slib_brd.create('line',[$(slib_jx)_pt2m,$(slib_jx)_pt2p],{straightFirst:false, straightLast:false});\
Line 148... Line 148...
148
$slib_scriptmove\
148
$slib_scriptmove\
149
$slib_script2\
149
$slib_script2\
150
$slib_script3
150
$slib_script3
151
 
151
 
152
!if anstype iswordof $slib_opt
152
!if anstype iswordof $slib_opt
153
   slib_out=$slib_jx $slib_brd Y=$slib_h\
153
  slib_out=$slib_jx $slib_brd Y=$slib_h\
154
   $slib_out
154
  $slib_out
155
 
155
 
156
slib_out=$slib_out
156
  slib_out=$slib_out
157
 
157
 
158
  !for slib_i=1 to $slib_ch
158
  !for slib_i=1 to $slib_ch
159
     slib_out=$slib_out$(slib_jxr)$slib_i=$(slib_jxP)$slib_i;
159
    slib_out=$slib_out$(slib_jxr)$slib_i=$(slib_jxP)$slib_i;
160
  !next
160
  !next
161
  slib_out=$slib_out\
161
  slib_out=$slib_out\
162
 
162
 
163
  !for slib_i=1 to $slib_ch
163
  !for slib_i=1 to $slib_ch
164
     slib_out=$slib_out$(slib_jxv)$slib_i=$(slib_p[$slib_i]);
164
    slib_out=$slib_out$(slib_jxv)$slib_i=$(slib_p[$slib_i]);
165
  !next
165
  !next
166
!else
166
!else
167
  !if raw notwordof $slib_opt
167
  !if raw notwordof $slib_opt
168
    !readproc slib/geo2D/jsxgraph $slib_jx,$(slib_xsize) x $(slib_ysize),$slib_out
168
    !readproc slib/geo2D/jsxgraph $slib_jx,$(slib_xsize) x $(slib_ysize),$slib_out
169
  !endif
169
  !endif