Subversion Repositories wimsdev

Rev

Rev 10479 | Rev 12459 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
9099 bpr 1
 
54 guerimand 2
!if $step=$empty
12411 bpr 3
  !readdef wimshome/log/classes/$wims_class/supervisor
4
  !read oef/default
5
  !bound user_qnum between integer 1 and 9 default $(default_choice[1])
6
  !bound user_qcmlevel between integer 1 and 9 default $(default_choice[2])
7
  !bound user_sepow between 1 and 6 default $(list_sepow[1])
8
  !bound user_expow between 1 and 6 default $(list_expow[1])
9
  !bound user_precw between 0 and 1 default $(list_precw[1])
10
  !if $nw_scoredelay!=$empty
11
    nw_scoredelay=!items2words $nw_scoredelay
12
    !distribute word $nw_scoredelay into l1,l2
13
    !bound l1 between 1 to 2000
14
    !bound l2 between $l1 to 2000 default $l1
15
    nw_scoredelay=$l1,$l2
16
  !endif
17
  !bound user_qcmpresent between integer 2 and 8 default $(default_choice[4])
18
  !bound user_presentsol between 0 and 2 default $(default_choice[3])
9099 bpr 19
  nw_check_=$nw_check1,$nw_check2,$nw_check3,$nw_check4
20
  nw_check_=!listintersect $nw_check_ and 1,2,3,4
54 guerimand 21
!else
12411 bpr 22
  !bound nw_qnum between integer 1 and 9 default $user_qnum
23
  !bound nw_qcmlevel between 1 and 9 default $user_qcmlevel
24
  nw_scoredelay=!items2words $nw_scoredelay
25
  !distribute word $nw_scoredelay into l1,l2
26
  !if $l1!=$empty or $l2!=$empty
27
    !bound l1 between 1 and 2000
28
    !bound l2 between $l1 and 2000 default $empty
29
    nw_scoredelay=$l1,$l2
30
  !else
31
    nw_scoredelay=$empty
32
  !endif
33
  !bound nw_qcmpresent between 2 and 8 default $user_qcmpresent
34
  !bound nw_presentsol between 0 and 2 default $user_presentsol
35
  !bound nw_sepow between 1 and 6 default $user_sepow
36
  !bound nw_expow between 1 and 6 default $user_expow
37
  !bound nw_precw between 0 and 1 default $user_precw
38
  !set nw_check_=$nw_check1,$nw_check2,$nw_check3,$nw_check4
39
  !set nw_check_=!nonempty items $nw_check_
40
  !set nw_check_=!listintersect $nw_check_ and 1,2,3,4
9099 bpr 41
 
12411 bpr 42
  !setdef !set user_qnum=$nw_qnum\
54 guerimand 43
!set user_qcmlevel=$nw_qcmlevel\
44
!set user_scoredelay=$nw_scoredelay\
45
!set user_qcmpresent=$nw_qcmpresent\
46
!set user_presentsol=$nw_presentsol\
9099 bpr 47
!set user_check=$nw_check_\
48
!set user_sepow=$nw_sepow\
49
!set user_expow=$nw_expow\
50
!set user_precw=$nw_precw\
51
in wimshome/log/classes/$wims_class/supervisor
52
 
12411 bpr 53
  !setdef wims_oefdefault_qnum=$nw_qnum\
54 guerimand 54
wims_oefdefault_qcmlevel=$nw_qcmlevel\
55
wims_oefdefault_scoredelay=$nw_scoredelay\
56
wims_oefdefault_qcmpresent=$nw_qcmpresent\
57
wims_oefdefault_presentsol=$nw_presentsol\
9099 bpr 58
wims_oefdefault_check=$nw_check_\
59
wims_oefdefault_expow=$nw_expow\
60
wims_oefdefault_sepow=$nw_sepow\
61
wims_oefdefault_precw=$nw_precw\
62
in wimshome/sessions/$wims_session/var.stat
7684 bpr 63
 
12411 bpr 64
  !readdef wimshome/log/classes/$wims_class/supervisor
9099 bpr 65
 
7684 bpr 66
!endif