Subversion Repositories wimsdev

Rev

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

Rev 4626 Rev 8422
Line 152... Line 152...
152 
 
 152 
 
153 
s=!record 0 of wimshome/log/classes/$qclass/sheets/.severity
 153 
s=!record 0 of wimshome/log/classes/$qclass/sheets/.severity
154 
scoremax=!line 1 of $s
 154 
scoremax=!line 1 of $s
155 
!default scoremax=20
 155 
!default scoremax=20
156 
 
 156 
 
157 
!read scripts/sheetweights
 157 
!read adm/class/sheetweights
158 
 
 158 
 
159 
class_superclass=!defof class_superclass in $classdeffile
 159 
class_superclass=!defof class_superclass in $classdeffile
160 
#Le dossier des etudiants se situe toujours dans la superclasse
 160 
#Le dossier des etudiants se situe toujours dans la superclasse
161 
!if $class_superclass != $empty
 161 
!if $class_superclass != $empty
162 
	users_dir = wimshome/log/classes/$class_superclass/.users
 162 
	users_dir = wimshome/log/classes/$class_superclass/.users
Line 169... Line 169...
169 
 l=!record $u of wimshome/log/classes/$qclass/.userlist
 169 
 l=!record $u of wimshome/log/classes/$qclass/.userlist
170 
 user_login=!item 3 of $l
 170 
 user_login=!item 3 of $l
171 
 !defread $users_dir/$user_login
 171 
 !defread $users_dir/$user_login
172 
 !if $scores=yes
 172 
 !if $scores=yes
173 
  uu=$user_login
 173 
  uu=$user_login
174 
  !read scripts/userscore $user_login
 174 
  !read adm/class/userscore $user_login
175 
  user_average1=$per
 175 
  user_average1=$per
176 
  user_average2=$(manual_$user_login)
 176 
  user_average2=$(manual_$user_login)
177 
  !if average0 isitemof $dl
 177 
  !if average0 isitemof $dl
178 
   user_average0=$[rint($manual*$user_average2+(100-$manual)*($per))/100]
 178 
   user_average0=$[rint($manual*$user_average2+(100-$manual)*($per))/100]
179 
  !endif
 179 
  !endif
180 
  !for i=1 to $sheetcnt
 180 
  !for i=1 to $sheetcnt
181 
   !if sheet$i isitemof $dl
 181 
   !if sheet$i isitemof $dl
182 
    p_=!line $i of $percents
 182 
    p_=!line $i of $percents
- 
 
 183 
!! cfr r7612-r7638 for adm/class/userscore
- 
 
 184 
!!   and r7638-r7664
183 
    !distribute words $p_ into p1,p2
 185 
    !distribute words $p_ into p1,p2,p3,p4
184 
    !if $p2!=$empty
 186 
    !if $p2!=$empty
185 
     !distribute item $[$p1/100],$[$p2/10] into x_,y_
 187 
     !distribute item $[$p1/100],$[$p2/10],$[$p3/100],$[$p4/100] into x0_,y_,x1_,x2_
- 
 
 188 
     !set ff_$i=!mathsubst Q=$y_ in $(f_$i)
- 
 
 189 
     !for sev=0 to 2
- 
 
 190 
       !set ff_$i=!mathsubst I$sev=$(x$(sev)_) in $(ff_$i)
- 
 
 191 
     !next
186 
     user_sheet$i=$[rint(100*$scoremax*$(f_$i))/100]
 192 
     user_sheet$i=$[rint(100*$scoremax*$(ff_$i))/100]
187 
 
 - 
 
188 
    !else
 193 
    !else
189 
     user_sheet$i=0
 194 
     user_sheet$i=0
190 
    !endif
 195 
    !endif
191 
   !endif
 196 
   !endif
192 
  !next i
 197 
  !next i