Subversion Repositories wimsdev

Rev

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

Rev 16307 Rev 16513
Line 21... Line 21...
21 
!! ------- check of good exercise parameters (peut-être un truc dans le c pour le faire à voir)
 21 
!! ------- check of good exercise parameters (peut-être un truc dans le c pour le faire à voir)
22 
data=!record $exolog of wimshome/log/classes/$wims_class/freeworks/.Wfreework$freework
 22 
data=!record $exolog of wimshome/log/classes/$wims_class/freeworks/.Wfreework$freework
23 
!distribute line $data into modu,para,bla,bla
 23 
!distribute line $data into modu,para,bla,bla
24 
para=wims_freework=$freework,$exolog&$para
 24 
para=wims_freework=$freework,$exolog&$para
25 
exec=!defof w_module\
 25 
exec=!defof w_module\
- 
 
 26 
w_module_init_parm\
26 
w_module_init_parm in wimshome/$wims_sesdir/exolog
 27 
w_module_score in wimshome/$wims_sesdir/exolog
27 
!distribute line $exec into modu2,para2
 28 
!distribute line $exec into modu2,para2,score
- 
 
 29 
!if $score<$wims_fwminscore
- 
 
 30 
  error=exolog-badscore
- 
 
 31 
  job=student
- 
 
 32 
  !changeto var.proc
- 
 
 33 
!endif
28 
!if $modu2 notsametext $modu or $para2 notsametext $para
 34 
!if $modu2 notsametext $modu or $para2 notsametext $para
29 
  error=exolog-badparameter
 35 
  error=exolog-badparameter
30 
  job=student
 36 
  job=student
31 
  !changeto var.proc
 37 
  !changeto var.proc
32 
!endif
 38 
!endif