Subversion Repositories wimsdev

Rev

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

Rev 11962 Rev 12146
Line 4... Line 4...
4
  !exit
4
  !exit
5
!endif
5
!endif
6
 
6
 
7
!set min_maxscore = 1
7
!set min_maxscore = 1
8
!set max_maxscore = 1000
8
!set max_maxscore = 1000
-
 
9
 
-
 
10
!set tmp=!defof DF_SEVERITY\
-
 
11
MAX_WEIGHT\
-
 
12
MIN_WEIGHT in wimshome/public_html/bases/sys/define.conf
-
 
13
!distribute line $tmp into tmp,max_weight,min_weight
-
 
14
!distribute words $tmp into tmp_w,tmp_s,tmp_ss
9
 
15
 
10
!if $formula=prep
16
!if $formula=prep
11
  !exit
17
  !exit
12
!endif
18
!endif
13
 
19
 
14
!reset formula reg
20
!reset formula reg
15
reg=
21
reg=
16
!set tmp=!defof DF_SEVERITY\
-
 
17
MAX_WEIGHT\
-
 
18
MIN_WEIGHT in wimshome/public_html/bases/sys/define.conf
-
 
19
!distribute line $tmp into tmp,max_weight,min_weight
-
 
20
!distribute words $tmp into tmp_w,tmp_s,tmp_ss
-
 
21
!for i=1 to $totsheets
22
!for i=1 to $totsheets
22
  !bound w$i between $min_weight and $max_weight default $tmp_w
23
  !bound w$i between $min_weight and $max_weight default $tmp_w
23
  !bound s$i between integer 0 and 6 default $tmp_s
24
  !bound s$i between integer 0 and 6 default $tmp_s
24
  !bound ss$i between integer 0 and 2 default $tmp_ss
25
  !bound ss$i between integer 0 and 2 default $tmp_ss
25
  reg=!append line $(w$i) $(s$i) $(ss$i) to $reg
26
  reg=!append line $(w$i) $(s$i) $(ss$i) to $reg