Subversion Repositories wimsdev

Rev

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

Rev 9174 Rev 9436
Line 42... Line 42...
42
wims_oefdefault_precw\
42
wims_oefdefault_precw\
43
  into qnum,qcmlevel,scoredelay,intro_qcmpresent,intro_presentsol,intro_check,\
43
  into qnum,qcmlevel,scoredelay,intro_qcmpresent,intro_presentsol,intro_check,\
44
  expow,sepow,precw
44
  expow,sepow,precw
45
!endif
45
!endif
46
 
46
 
47
!! calcul du nombre d'exercices 
47
!! calcul du nombre d'exercices
48
!if /////classes/ isin /////$smodule
48
!if /////classes/ isin /////$smodule
49
    !! adresse du module d'exo d'une classe
49
    !! adresse du module d'exo d'une classe
50
    dir_header=wimshome/log/classes/$wims_class
50
    dir_header=wimshome/log/classes/$wims_class
51
!else
51
!else
52
    !! adresse d'un module public ou modtool
52
    !! adresse d'un module public ou modtool
Line 160... Line 160...
160
  		!endif
160
  		!endif
161
 	 !next i
161
 	 !next i
162
	 !if $lerror=1
162
	 !if $lerror=1
163
		listalready=!append item $ex to $listalready
163
		listalready=!append item $ex to $listalready
164
   	 !else
164
   	 !else
-
 
165
   	   desc_=!lookup $ex in wimshome/public_html/modules/$smodule/Descindex
-
 
166
   	   !if $desc_!=$empty
-
 
167
   	     desc=$desc_
-
 
168
   	   !endif
-
 
169
   	   obs_=!lookup $ex in wimshome/public_html/modules/$smodule/Obsindex
165
		writedon=!append line :$smodule\
170
		writedon=!append line :$smodule\
166
$exoiniparm\
171
$exoiniparm\
167
$require\
172
$require\
168
$weight\
173
$weight\
169
$(exotitle[$j])\
174
$(exotitle[$j])\
170
$desc\
175
$desc\
-
 
176
\
-
 
177
$obs_\
171
 to $writedon
178
 to $writedon
172
         !endif
179
         !endif
173
 !next j
180
 !next j
174
 !if $writedon!=$empty
181
 !if $writedon!=$empty
175
  !appendfile wimshome/log/classes/$wims_class/sheets/.sheet$picksheet $writedon
182
  !appendfile wimshome/log/classes/$wims_class/sheets/.sheet$picksheet $writedon