Rev 546 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 546 | Rev 15353 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | 1 | ||
2 | exo=!listintersect $exo and $exolist |
2 | exo=!listintersect $exo and $exolist |
3 | nn=!itemcnt $exo |
3 | nn=!itemcnt $exo |
4 | wims_intro_parm=$exo |
4 | wims_intro_parm=$exo |
5 | !if $nn<=0 |
5 | !if $nn<=0 |
6 | exo=$exolist |
6 | exo=$exolist |
7 | nn=!itemcnt $exolist |
7 | nn=!itemcnt $exolist |
8 | !endif |
8 | !endif |
9 | 9 | ||
10 | shlist= |
10 | shlist= |
11 | !ifval $random=0 |
11 | !ifval $random=0 |
12 | shufflelist=$exo |
12 | shufflelist=$exo |
13 | !else |
13 | !else |
14 | shuffle=!shuffle $nn |
14 | shuffle=!shuffle $nn |
15 | shufflelist=!item $shuffle of $exo |
15 | shufflelist=!item $shuffle of $exo |
16 | !endif |
16 | !endif |
17 | 17 | ||
18 | presentgood=!item $qcmlevel of 1,1,1,1,1,1,0,0 |
18 | presentgood=!item $qcmlevel of 1,1,1,1,1,1,0,0 |
19 | presentsol =!item $qcmlevel of 2,2,1,1,0,0,0,0 |
19 | presentsol =!item $qcmlevel of 2,2,1,1,0,0,0,0 |
20 | givehint =!item $qcmlevel of 1,1,1,1,1,0,0,0 |
20 | givehint =!item $qcmlevel of 1,1,1,1,1,0,0,0 |
Line 25... | Line 25... | ||
25 | loglist=$nn |
25 | loglist=$nn |
26 | !else |
26 | !else |
27 | loglist=$shufflelist |
27 | loglist=$shufflelist |
28 | !endif |
28 | !endif |
29 | wims_module_log=$cmd: $qnum exos on $loglist level=$qcmlevel |
29 | wims_module_log=$cmd: $qnum exos on $loglist level=$qcmlevel |
30 | - |