Subversion Repositories wimsdev

Rev

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

Rev 5541 Rev 6769
Line 21... Line 21...
21 
!distribute item $slib_parm into slib_student_eq, slib_correct_eq, slib_ok_reply, slib_ko_reply
 21 
!distribute item $slib_parm into slib_student_eq, slib_correct_eq, slib_ok_reply, slib_ko_reply
22 
 
 22 
 
23 
!default slib_ok_reply=good
 23 
!default slib_ok_reply=good
24 
!default slib_ko_reply=bad
 24 
!default slib_ko_reply=bad
25 
 
 25 
 
- 
 
 26 
slib_out=$slib_ko_reply
- 
 
 27 
 
26 
chemeq_option=n
 28 
chemeq_option=n
27 
 
 29 
 
28 
slib_st_eq=!exec chemeq $slib_student_eq
 30 
slib_st_eq=!exec chemeq $slib_student_eq
- 
 
 31 
!if ERROR isin $wims_exec_error
- 
 
 32 
  !goto end
- 
 
 33 
!endif
- 
 
 34 
 
29 
slib_co_eq=!exec chemeq $slib_correct_eq
 35 
slib_co_eq=!exec chemeq $slib_correct_eq
- 
 
 36 
!if ERROR isin $wims_exec_error
- 
 
 37 
  !goto end
- 
 
 38 
!endif
30 
 
 39 
 
31 
!if $slib_st_eq = $slib_co_eq
 40 
!if $slib_st_eq = $slib_co_eq
32 
  slib_out=$slib_ok_reply
 41 
  slib_out=$slib_ok_reply
33 
!else
 - 
 
34 
  slib_out=$slib_ko_reply
 - 
 
35 
!endif
 42 
!endif
36 
 
 43 
 
- 
 
 44 
:end
37 
!reset chemeq_option
 45 
!reset chemeq_option
38 
 
 -