Rev 11105 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 11105 | Rev 12551 | ||
---|---|---|---|
Line 14... | Line 14... | ||
14 | !set examweights=!record 0 of wimshome/log/classes/$wims_class/exams/.eseverity |
14 | !set examweights=!record 0 of wimshome/log/classes/$wims_class/exams/.eseverity |
15 | !set formula_list=!record 0 of adm/class/sheetformula |
15 | !set formula_list=!record 0 of adm/class/sheetformula |
16 | !set tmp=!defof DF_SEVERITY in wimshome/public_html/bases/sys/define.conf |
16 | !set tmp=!defof DF_SEVERITY in wimshome/public_html/bases/sys/define.conf |
17 | !distribute words $tmp into tmp_w,tmp_s,tmp_ss |
17 | !distribute words $tmp into tmp_w,tmp_s,tmp_ss |
18 | !for i_=1 to $totsheets |
18 | !for i_=1 to $totsheets |
19 | !set f_=!line $i_ of $defaultformula |
19 | !set f_=!line $i_ of $defaultformula |
20 | !distribute word $f_ into w_$i_,s,ss |
20 | !distribute word $f_ into w_$i_,s,ss |
21 | !bound w_$i_ between integer 0 and 100000 default $tmp_w |
21 | !bound w_$i_ between integer 0 and 100000 default $tmp_w |
22 | !bound s between integer 0 and 6 default $tmp_s |
22 | !bound s between integer 0 and 6 default $tmp_s |
23 | !bound ss between integer 0 and 2 default $tmp_ss |
23 | !bound ss between integer 0 and 2 default $tmp_ss |
24 | !! f_$i_=!line $s+1 of max($$x$(ss)_,$$y_)\ |
24 | !! f_$i_=!line $s+1 of max($$x$(ss)_,$$y_)\ |
25 | $$x$(ss)_\ |
25 | $$x$(ss)_\ |
26 | $$x$(ss)_*$$y_^0.3\ |
26 | $$x$(ss)_*$$y_^0.3\ |
27 | $$x$(ss)_*$$y_^0.5\ |
27 | $$x$(ss)_*$$y_^0.5\ |
28 | $$x$(ss)_*$$y_\ |
28 | $$x$(ss)_*$$y_\ |
29 | $$x$(ss)_^2*$$y_\ |
29 | $$x$(ss)_^2*$$y_\ |
30 | ($$x$(ss)_*$$y_)^2 |
30 | ($$x$(ss)_*$$y_)^2 |
31 | 31 | ||
32 | !set f_$i_=!record 0 of adm/class/sheetformula |
32 | !set f_$i_=!record 0 of adm/class/sheetformula |
33 | !set f_$i_=!item $s+1 of $(f_$i_) |
33 | !set f_$i_=!item $s+1 of $(f_$i_) |
34 | !set f_$i_=!replace internal I by I$ss in $(f_$i_) |
34 | !set f_$i_=!replace internal I by I$ss in $(f_$i_) |
35 | !if $i_ isitemof $activesh |
35 | !if $i_ isitemof $activesh |
36 | !set totweight=$[$totweight+$(w_$i_)] |
36 | !set totweight=$[$totweight+$(w_$i_)] |
37 | !endif |
37 | !endif |
38 | !set s_$i_=$s |
38 | !set s_$i_=$s |
39 | !set ss_$i_=$ss |
39 | !set ss_$i_=$ss |
40 | !next i_ |
40 | !next i_ |
41 | 41 | ||
42 | !for i_=1 to $totexams |
42 | !for i_=1 to $totexams |
43 | !set ew_$i_=!line $i_ of $examweights |
43 | !set ew_$i_=!line $i_ of $examweights |
44 | !default ew_$i_=1 |
44 | !default ew_$i_=1 |
45 | !if $i_ isitemof $activexams |
45 | !if $i_ isitemof $activexams |
46 | !set totweight=$[$totweight+$(ew_$i_)] |
46 | !set totweight=$[$totweight+$(ew_$i_)] |
47 | !endif |
47 | !endif |
48 | !next i_ |
48 | !next i_ |
49 | 49 | ||
50 | !reset tmp tmp_s tmp_ss tmp_w |
50 | !reset tmp tmp_s tmp_ss tmp_w |