Rev 8311 | Rev 11107 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 8311 | Rev 10922 | ||
---|---|---|---|
Line 7... | Line 7... | ||
7 | !if $formula=prep |
7 | !if $formula=prep |
8 | !exit |
8 | !exit |
9 | !endif |
9 | !endif |
10 | !reset formula reg |
10 | !reset formula reg |
11 | reg= |
11 | reg= |
- | 12 | !set tmp=!defof DF_SEVERITY in wimshome/public_html/bases/sys/define.conf |
|
- | 13 | !distribute words $tmp into tmp_w,tmp_s,tmp_ss |
|
12 | !for i=1 to $totsheets |
14 | !for i=1 to $totsheets |
13 | !bound w$i between 0 and 100000 default |
15 | !bound w$i between 0 and 100000 default $tmp_w |
14 | !bound s$i between integer 0 and 6 default |
16 | !bound s$i between integer 0 and 6 default $tmp_s |
15 | !bound ss$i between integer 0 and 2 default |
17 | !bound ss$i between integer 0 and 2 default $tmp_ss |
16 | reg=!append line $(w$i) $(s$i) $(ss$i) to $reg |
18 | reg=!append line $(w$i) $(s$i) $(ss$i) to $reg |
17 | !next i |
19 | !next i |
- | 20 | !reset tmp tmp_s tmp_ss |
|
18 | !bound maxscore between integer 1 and 1000 default 10 |
21 | !bound maxscore between integer 1 and 1000 default 10 |
19 | scoremax=$maxscore |
22 | scoremax=$maxscore |
20 | defaultformula=$reg |
23 | defaultformula=$reg |
21 | !writefile wimshome/log/classes/$wims_class/sheets/.severity $maxscore\ |
24 | !writefile wimshome/log/classes/$wims_class/sheets/.severity $maxscore\ |
22 | $reg |
25 | $reg |