Subversion Repositories wimsdev

Rev

Rev 11095 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 11095 Rev 14180
Line 4... Line 4...
4 
 
 4 
 
5 
#Pour commencer, on verifie la classe
 5 
# Pour commencer, on verifie la classe
6 
!read scripts/check.class
 6 
!read scripts/check.class
7 
!if $error!=$empty
 7 
!if $error!=$empty
8 
 !exit
 8 
  !exit
9 
!endif
 9 
!endif
10 
 
 10 
 
11 
#puis on verifie l'exam qexam
 11 
# Puis on verifie l'exam qexam
12 
type=exams
 12 
type=exams
13 
!read scripts/check.proc
 13 
!read scripts/check.proc
14 
!if $error!=$empty
 14 
!if $error!=$empty
15 
 !exit
 15 
  !exit
16 
!endif
 16 
!endif
17 
 
 17 
 
18 
exocnt=!recordcnt $qfile
 18 
exocnt=!recordcnt $qfile
19 
exam_properties=!lines2items $qproperties\
 19 
exam_properties=!lines2items $qproperties\
20 
 
 20 
 
Line 42... Line 42...
42 
#TITLE_EXO
 42 
#TITLE_EXO
43 
#DEPENDENCES
 43 
#DEPENDENCES
44 
#autogen
 44 
#autogen
45 
 
 45 
 
46 
!for i=1 to $exocnt
 46 
!for i=1 to $exocnt
47 
 exo=!record $i of $qfile
 47 
  exo=!record $i of $qfile
48 
 exo_weight=!line 1 of $exo
 48 
  exo_weight=!line 1 of $exo
49 
 exo_ids=!line 2 of $exo
 49 
  exo_ids=!line 2 of $exo
50 
 exo_title=!line 3 of $exo
 50 
  exo_title=!line 3 of $exo
51 
 exo_dependences=!line 4 of $exo
 51 
  exo_dependences=!line 4 of $exo
52 
 exo_autogen=!line 5 of $exo
 52 
  exo_autogen=!line 5 of $exo
53 
 
 53 
 
54 
 !if $exolist!=$empty
 54 
  !if $exolist!=$empty
55 
  exolist=$exolist,$i
 55 
    exolist=$exolist,$i
56 
  exotitlelist=$exotitlelist$separator$i:$exo_title
 56 
    exotitlelist=$exotitlelist$separator$i:$exo_title
57 
 !else
 57 
  !else
58 
  exolist=$i
 58 
    exolist=$i
59 
  exotitlelist=$i:$exo_title
 59 
    exotitlelist=$i:$exo_title
60 
 !endif
 60 
  !endif
61 
!next i
 61 
!next i
62 
 
 62 
 
63 
#on ajoute "duration" et "attempts" de manire sŽparŽe
 63 
# On ajoute "duration" et "attempts" de maniere separee
64 
examdefs=$examdefs,duration,attempts
 64 
examdefs=$examdefs,duration,attempts
65 
option=!listintersect $option and $examdefs
 65 
option=!listintersect $option and $examdefs
66 
!if $option=$empty
 66 
!if $option=$empty
67 
 option=$examdefs
 67 
  option=$examdefs
68 
!endif
 68 
!endif