Subversion Repositories wimsdev

Rev

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

Rev 13999 Rev 14006
Line 12... Line 12...
12 
!if $(replytype$i) iswordof flashcard
 12 
!if $(replytype$i) iswordof flashcard
13 
  !set inputsize1=!word 1 of $inputsize
 13 
  !set inputsize1=!word 1 of $inputsize
14 
!else
 14 
!else
15 
  !set inputsize1=$inputsize
 15 
  !set inputsize1=$inputsize
16 
!endif
 16 
!endif
- 
 
 17 
 
- 
 
 18 
!!! i -> iii
17 
!set cnt_$i= !linecnt $(Rg$i)
 19 
!!! i_ -> i dans print version
18 
!if $printing=yes or $cmd=hint
 20 
!if $printing=yes or $cmd=hint
- 
 
 21 
  !set cnt_$iii= !linecnt $(Rg$iii)
19 
  !! i__ is the question number
 22 
  !! i__ is the question number
20 
  !! i is the exercise number (print version)
 23 
  !! iii is the exercise number (print version)
21 
  !! does not exist in case cmd=hint
 24 
  !! does not exist in case cmd=hint
22 
  !reset prompt___
 25 
  !reset prompt___
23 
  !set i__=!replace internal reply by in $t_
 26 
  !set i__=!replace internal reply by in $t_
24 
  !set i__=!replace internal r by in $i__
 27 
  !set i__=!replace internal r by in $i__
25 
  !set i__=!trim $i__
 28 
  !set i__=!trim $i__
26 
  !if $cmd!=hint
 29 
  !if $cmd!=hint
27 
    !set replytype$i__=!item $i__ of $(Replytype$i)
 30 
    !set replytype$i__=!item $i__ of $(Replytype$iii)
28 
    !set replystyle$i__=!item $i__ of $(Replystyle$i)
 31 
    !set replystyle$i__=!item $i__ of $(Replystyle$iii)
29 
  !endif
 32 
  !endif
30 
  !reset anstyle
 33 
  !reset anstyle
31 
  !readproc anstype/$(replytype$i__).input def
 34 
  !readproc anstype/$(replytype$i__).input def
32 
  !set replystyle$i__=$anstyle
 35 
  !set replystyle$i__=$anstyle
33 
  !default replystyle$i__=$(replytype$i__)
 36 
  !default replystyle$i__=$(replytype$i__)
34 
  !!  mc=checkbox click flashcard mark menu radio
 37 
  !!  mc=checkbox click flashcard mark menu radio
35 
  !if mc iswordof $(replystyle$i__) \
 38 
  !if mc iswordof $(replystyle$i__) \
36 
      or $(replytype$i__) iswordof dragfill clickfill coord
 39 
      or $(replytype$i__) iswordof dragfill clickfill
37 
    !if $inputsize1>0
 40 
    !if $inputsize1>0
38 
      !if $prompt_=$empty
 41 
      !if $prompt_=$empty
39 
        !if $cmd=hint
 42 
        !if $cmd=hint
40 
          !set g_=!rows2lines $(replygood$i__)
 43 
          !set g_=!rows2lines $(replygood$i__)
41 
          !set prompt_=!line 2 of $g_
 44 
          !set prompt_=!line 2 of $g_
42 
        !else
 45 
        !else
43 
          !set prompt_=!line $i__ of $(Rg$i)
 46 
          !set prompt_=!line $i__ of $(Rg$iii)
44 
        !endif
 47 
        !endif
45 
        !set prompt_=!item $inputsize1 of $prompt_
 48 
        !set prompt_=!item $inputsize1 of $prompt_
46 
        !set prompt_=<span style="display:inline-block;">$prompt_</span>
 49 
        !set prompt_=<span style="display:inline-block;">$prompt_</span>
47 
      !endif
 50 
      !endif
48 
    !else
 51 
    !else
49 
      !if $prompt_=$empty
 52 
      !if $prompt_=$empty
50 
        !set prompt_=!line $i__ of $(Rg$i)
 53 
        !set prompt_=!line $i__ of $(Rg$iii)
51 
        !set prompt_=!items2lines $prompt_
 54 
        !set prompt_=!items2lines $prompt_
52 
        !set prompt__=$prompt_
 55 
        !set prompt__=$prompt_
53 
        !if $(replytype$i__) iswordof menu checkbox radio click
 56 
        !if $(replytype$i__) iswordof menu checkbox radio click
54 
          !set prompt_=!replace internal $\
 57 
          !set prompt_=!replace internal $\
55 
$ by  </li>$ $<li> in <div class="inline"><ul><li>$prompt_</li></ul></div>
 58 
$ by  </li>$ $<li> in <div class="inline"><ul><li>$prompt_</li></ul></div>
56 
        !else replytype with labels
 59 
        !else replytype with labels
57 
          !set prompt_$i=!append line $prompt__ to $(prompt_$i)
 60 
          !set prompt_$iii=!append line $prompt__ to $(prompt_$i)
58 
          !set inputsize1_=!replace internal x by , in $inputsize1
 61 
          !set inputsize1_=!replace internal x by , in $inputsize1
59 
          !if $(inputsize1_[4])!=$empty and $(inputsize1_[4])>1
 62 
          !if $(inputsize1_[4])!=$empty and $(inputsize1_[4])>1
60 
            !set prompt_=<table class="wimsborder">
 63 
            !set prompt_=<table class="wimsborder">
61 
            !for j=1 to $(inputsize1_[4])
 64 
            !for j=1 to $(inputsize1_[4])
62 
              !set prompt_=$prompt_<tr>
 65 
              !set prompt_=$prompt_<tr>
Line 66... Line 69...
66 
              !set prompt_=$prompt_ </tr>
 69 
              !set prompt_=$prompt_ </tr>
67 
            !next
 70 
            !next
68 
            !set prompt_=$prompt_</table>
 71 
            !set prompt_=$prompt_</table>
69 
          !endif
 72 
          !endif
70 
          !! regroupe les prompts des dragfill et de clickfill
 73 
          !! regroupe les prompts des dragfill et de clickfill
71 
          !if $i__>=$(cnt_$i)
 74 
          !if $i__>=$(cnt_$iii)
72 
            !set prompt_$i=!lines2items $(prompt_$i)
 75 
            !set prompt_$iii=!lines2items $(prompt_$iii)
73 
            !set prompt_$i=!listuniq $(prompt_$i)
 76 
            !set prompt_$iii=!listuniq $(prompt_$iii)
74 
            !set prompt_$i=!shuffle $(prompt_$i)
 77 
            !set prompt_$iii=!shuffle $(prompt_$iii)
75 
            !set prompt___=!replace internal , \
 78 
            !set prompt___=!replace internal , \
76 
              by </div>$ $<div class="drag_label" style="display:inline-block;"> \
 79 
              by </div>$ $<div class="drag_label" style="display:inline-block;"> \
77 
in <div class="drag_label" style="display:inline-block;">$(prompt_$i)</div>
 80 
in <div class="drag_label" style="display:inline-block;">$(prompt_$iii)</div>
78 
          !endif
 81 
          !endif
79 
          !reset prompt_
 82 
          !reset prompt_
80 
        !endif
 83 
        !endif
81 
      !endif
 84 
      !endif
82 
    !endif
 85 
    !endif
83 
  !else
 86 
  !else
84 
    !set prompt_=!line $i__ of $(Rg$i)
 87 
    !set prompt_=!line $i__ of $(Rg$iii)
85 
    !if $(replytype$i__) iswordof compose reorder
 88 
    !if $(replytype$i__) iswordof compose reorder
86 
      !set prompt_=!shuffle $prompt_
 89 
      !set prompt_=!shuffle $prompt_
87 
      !set prompt_=!replace internal , by </div>$  $ <div class="drag_label" style="display:inline-block;"> \
 90 
      !set prompt_=!replace internal , by </div>$  $ <div class="drag_label" style="display:inline-block;"> \
88 
in <div class="drag_label" style="display:inline-block;">$prompt_</div>
 91 
in <div class="drag_label" style="display:inline-block;">$prompt_</div>
89 
    !endif
 92 
    !endif
90 
  !endif
 93 
  !endif
91 
  !!!FIXME : confusion with the i of the anstype and the i here
 - 
 
92 
  !!! So should be fix or delete ...
 - 
 
93 
  !!! works only if there is only one question and one exercise
 - 
 
94 
  !if $(replytype$i__) iswordof jsxgraph jsxgraphcurve clock draw
 94 
  !if $(replytype$i__) iswordof jsxgraph jsxgraphcurve clock draw
95 
    $(oefcss_$i)
 95 
    $(oefcss_$iii)
96 
    !read anstype/$(replytype$i__).input
 96 
    !read anstype/$(replytype$i__).input $i__
97 
    !exit
 97 
    !exit
98 
  !endif
 98 
  !endif
99 
  !if $prompt_ issametext $empty
 99 
  !if $prompt_ issametext $empty
100 
    !set prompt_=$prompt_empty
 100 
    !set prompt_=$prompt_empty
101 
  !endif
 101 
  !endif