Subversion Repositories wimsdev

Rev

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

Rev 17542 Rev 17553
Line 45... Line 45...
45 
 
 45 
 
46 
tries_min=1
 46 
tries_min=1
47 
tries_max=100
 47 
tries_max=100
48 
tries_default=3
 48 
tries_default=3
49 
 
 49 
 
- 
 
 50 
minscore_min=0
- 
 
 51 
minscore_max=100
- 
 
 52 
minscore_default=100
50 
!default duration=$duration_default
 53 
!default duration=$duration_default
51 
wims_helper=chapter=3
 54 
wims_helper=chapter=3
52 
 
 55 
 
53 
!if $wims_user!=supervisor
 56 
!if $wims_user!=supervisor
54 
  !bound job within student, score, scorereg default student
 57 
  !bound job within student, score, scorereg default student
Line 392... Line 395...
392 
      !read update.exam
 395 
      !read update.exam
393 
      cutt_save=$cutt
 396 
      cutt_save=$cutt
394 
    !endif
 397 
    !endif
395 
  !endif
 398 
  !endif
396 
!endif
 399 
!endif
397 
 
 - 
 
398 
 
 400 
 
399 
!! --------------- get/save weight parameter
 401 
!! --------------- get/save weight parameter
400 
rec=!record 0 of wimshome/log/classes/$wims_class/exams/.eseverity
 402 
rec=!record 0 of wimshome/log/classes/$wims_class/exams/.eseverity
401 
!if $save!=$empty
 403 
!if $save!=$empty
402 
  !bound weight between $min_weight and $max_weight default $df_weight
 404 
  !bound weight between $min_weight and $max_weight default $df_weight
Line 434... Line 436...
434 
  !endif
 436 
  !endif
435 
!endif
 437 
!endif
436 
 
 438 
 
437 
!if $job!=text
 439 
!if $job!=text
438 
  !if $title_save$desc_save=$empty
 440 
  !if $title_save$desc_save=$empty
439 
    rec=!record $exam of wimshome/log/classes/$wims_class/exams/.exams
 441 
    rec=!record $exam of wimshome/log/classes/$wims_class/exams/.exams
440 
    !distribute lines $rec into bidon,bidon,setup_save,title_save,desc_save,cutt_save,comment_save,formal_hidden_condition_save,mode_save
 442 
    !distribute lines $rec into bidon,bidon,setup_save,title_save,desc_save,cutt_save,comment_save,formal_hidden_condition_save,mode_save
441 
  !endif
 443 
  !endif
442 
  setup=$setup_save
 444 
  setup=$setup_save
443 
  title=$title_save
 445 
  title=$title_save
444 
  desc=$desc_save
 446 
  desc=$desc_save
Line 471... Line 473...
471 
    formal_hidden_condition=$empty
 473 
    formal_hidden_condition=$empty
472 
  !endif
 474 
  !endif
473 
  !ifval $activetest<=0
 475 
  !ifval $activetest<=0
474 
    !bound duration between integer $duration_min and $duration_max default $duration_default
 476 
    !bound duration between integer $duration_min and $duration_max default $duration_default
475 
    !bound tries between integer $tries_min and $tries_max default $tries_default
 477 
    !bound tries between integer $tries_min and $tries_max default $tries_default
- 
 
 478 
    !bound minscore between integer $minscore_min and $minscore_max default $minscore_default
- 
 
 479 
    !if $mode=0
476 
    setup=$duration $tries
 480 
      setup=$duration $tries
- 
 
 481 
    !else
- 
 
 482 
      setup=$duration $tries $minscore
- 
 
 483 
    !endif
477 
  !else
 484 
  !else
478 
    rec=!record $exam of wimshome/log/classes/$wims_class/exams/.exams
 485 
    rec=!record $exam of wimshome/log/classes/$wims_class/exams/.exams
479 
    !distribute lines $rec into bidon,bidon,setup_save
 486 
    !distribute lines $rec into bidon,bidon,setup_save
480 
    setup=$setup_save
 487 
    setup=$setup_save
481 
  !endif
 488 
  !endif
Line 538... Line 545...
538 
  cutt_save=$cutt
 545 
  cutt_save=$cutt
539 
  comment_save=$comment
 546 
  comment_save=$comment
540 
  formal_hidden_condition_save=$formal_hidden_condition
 547 
  formal_hidden_condition_save=$formal_hidden_condition
541 
  mode_save=$mode
 548 
  mode_save=$mode
542 
!endif
 549 
!endif
- 
 
 550 
!if $mode=1
- 
 
 551 
  !distribute words $setup into sdure,stries,sminscore
543 
 
 552 
!else
544 
!distribute words $setup into sdure,stries,sprime
 553 
  !distribute words $setup into sdure,stries,sprime
- 
 
 554 
!endif
545 
!default sprime=0
 555 
!default sprime=0
- 
 
 556 
!default sminscore=100
546 
duration=$sdure
 557 
duration=$sdure
- 
 
 558 
minscore=$sminscore
547 
!if $activetest>0 or $wims_user=supervisor
 559 
!if $activetest>0 or $wims_user=supervisor
548 
  !! FIXME unuseless if one wants to create an exam ??
 560 
  !! FIXME unuseless if one wants to create an exam ??
549 
  !read score.proc
 561 
  !read score.proc
550 
!endif
 562 
!endif
551 
 
 563 
 
- 
 
 564 
!if $job=activate and $[$activetest]=0 or ($exam_mode=1 and $job=text and $[$activetest]=0)
552 
!if $job=activate and $[$activetest]=0
 565 
  !if $job=activate and $[$activetest]=0
553 
  !distribute item 1,1 into update_field,update_content
 566 
    !distribute item 1,1 into update_field,update_content
554 
  !read update.exam
 567 
    !read update.exam
- 
 
 568 
  !endif
555 
  !if $exam_mode=1
 569 
  !if $exam_mode=1
556 
    !! fix exercise dependancy in case of course mode to lock exercice order
 570 
    !! fix exercise dependancy in case of course mode to lock exercice order
557 
    !! and protect for adress hack
 571 
    !! and protect for adress hack
558 
    dataexam=$empty
 572 
    dataexam=$empty
559 
    dataexam=!record 1 of wimshome/log/classes/$wims_class/exams/.exam$exam
 573 
    dataexam=!record 1 of wimshome/log/classes/$wims_class/exams/.exam$exam
Line 561... Line 575...
561 
    !for k=2 to $exocnt
 575 
    !for k=2 to $exocnt
562 
      dt=!record $k of wimshome/log/classes/$wims_class/exams/.exam$exam
 576 
      dt=!record $k of wimshome/log/classes/$wims_class/exams/.exam$exam
563 
      dt=$dt\
 577 
      dt=$dt\
564 
\
 578 
\
565 
 
 579 
 
566 
      dt=!replace line number 4 by $[$k-1]:100 in $dt
 580 
      dt=!replace line number 4 by $[$k-1]:$minscore in $dt
567 
      dataexam=!append line :$dt to $dataexam
 581 
      dataexam=!append line :$dt to $dataexam
568 
    !next k
 582 
    !next k
569 
    !writefile wimshome/log/classes/$wims_class/exams/.exam$exam $dataexam
 583 
    !writefile wimshome/log/classes/$wims_class/exams/.exam$exam $dataexam
570 
  !endif
 584 
  !endif
- 
 
 585 
  !if $job=activate
571 
  activetest=1
 586 
    activetest=1
- 
 
 587 
  !endif
572 
!endif
 588 
!endif
573 
 
 589 
 
574 
!if $activetest=0
 590 
!if $activetest=0
575 
  !readproc vfilter/listvarfilter.proc
 591 
  !readproc vfilter/listvarfilter.proc
576 
  # delete an item
 592 
  # delete an item
Line 579... Line 595...
579 
    delete=
 595 
    delete=
580 
    exocnt=!recordcnt wimshome/log/classes/$wims_class/exams/.exam$exam
 596 
    exocnt=!recordcnt wimshome/log/classes/$wims_class/exams/.exam$exam
581 
  !endif
 597 
  !endif
582 
 
 598 
 
583 
  # move to specific position
 599 
  # move to specific position
- 
 
 600 
  !if $job=moveto and $movetarget>=1 and $movetarget<=$[$exocnt+1] \
584 
  !if $job=moveto and $movetarget>=1 and $movetarget<=$[$exocnt+1] and $movesource!=$movetarget and $movesource>=1 and $movesource<=$exocnt
 601 
      and $movesource!=$movetarget and $movesource>=1 and $movesource<=$exocnt
585 
    !read adm/sheet/sheetexam.shift exam,$exam,$movetarget,$movesource
 602 
    !read adm/sheet/sheetexam.shift exam,$exam,$movetarget,$movesource
586 
  !endif
 603 
  !endif
587 
!endif
 604 
!endif
588 
 
 605 
 
589 
# modify an exercise
 606 
# modify an exercise