Subversion Repositories wimsdev

Rev

Rev 17593 | Rev 17634 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 17593 Rev 17606
Line 28... Line 28...
28 
studentfile_ztype=file
 28 
studentfile_ztype=file
29 
 
 29 
 
30 
!! applets that do not appear in the student zone
 30 
!! applets that do not appear in the student zone
31 
nostudent_ztype=wimsexo
 31 
nostudent_ztype=wimsexo
32 
nostudent_ztype=wimsexo,randfile
 32 
nostudent_ztype=wimsexo,randfile
- 
 
 33 
 
- 
 
 34 
!! applets that do not appear in student zone but have random elements
- 
 
 35 
!! so teacher has to be able to see student assignment
- 
 
 36 
studentlist_ztype=wimsexo
- 
 
 37 
studentlist_ztype=wimsexo,randfile
33 
 
 38 
 
34 
!! file number to read in function of type
 39 
!! file number to read in function of type
35 
lpara_type=1,1,3,1
 40 
lpara_type=1,1,3,1
36 
lpara_type=1,1,3,1,3
 41 
lpara_type=1,1,3,1,3
37 
 
 42 
 
38 
nbztype=!itemcnt $listfilename_ztype
 43 
nbztype=!itemcnt $listfilename_ztype
- 
 
 44 
 
- 
 
 45 
!if $type=2
- 
 
 46 
  showstudlist=yes
- 
 
 47 
!else
- 
 
 48 
  showstudlist=no
- 
 
 49 
!endif
39 
 
 50 
 
40 
!! check access
 51 
!! check access
41 
!if $statutfreework!=open
 52 
!if $statutfreework!=open
42 
  error=notallowedmodule
 53 
  error=notallowedmodule
43 
  notallowed=1
 54 
  notallowed=1
Line 208... Line 219...
208 
      test=!record $k of wimshome/log/classes/$wims_class/freeworks/.freework$freework
 219 
      test=!record $k of wimshome/log/classes/$wims_class/freeworks/.freework$freework
209 
      test=!line 1 of $test
 220 
      test=!line 1 of $test
210 
      !distribute word $test into s,z
 221 
      !distribute word $test into s,z
211 
      !if $s=file and $z=student
 222 
      !if $s=file and $z=student
212 
        !increase numberfilezone
 223 
        !increase numberfilezone
- 
 
 224 
      !endif
- 
 
 225 
      !! do we have to show users' list?
- 
 
 226 
      !if $s isitemof $studentlist_ztype or $z=student
- 
 
 227 
        !set showstudlist=yes
213 
      !endif
 228 
      !endif
214 
    !next k
 229 
    !next k
215 
    !if $numberfilezone=0
 230 
    !if $numberfilezone=0
216 
      sizelimitfile=$empty
 231 
      sizelimitfile=$empty
217 
    !endif
 232 
    !endif