!set title=Describing People
!if $wims_read_parm!=$empty
 !goto $wims_read_parm
!endif
oef2wims_version=3.22
author=Csilla Ducrocq
email=csilla.ducrocq@u-psud.fr
language=fr
computeanswer=no

ansorder=r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r,r
varcnt=187
prevarcnt=180
postvarcnt=6
replycnt=40
choicecnt=0
conditioncnt=0
feedbackcnt=1
format=html

val1=$imagedir
val2=$confparm1
val3=$confparm2
val4=$confparm3
val5=$confparm4

!if $testcondition=yes
 !goto test
!endif
!if $status=waiting
 !exit
!endif

val6=pictures_sentences
!readproc slib/utilities/notepad Notepad,small 
tmp0=$slib_out
val7=$(tmp0)
tmp0=!nosubst Choose the sentences that describe the picture and drag them under the relevant heading. <i>(Glisser les phrases à côté du texte qu'elles décrivent)</i>

val8=$(tmp0)
tmp0=!nosubst 

val9=$(tmp0)
val10=
val11=
val12=no
val13=no
val14=no
val15=no
val16=yes
val17=450 x 30
val18=split
val19=1
val20=aucune de ces possibilités
val21=clickfill
val22=
val23=
val24=
val25=
val26=
val27=background-color: #66FF99; margin: 2% 5%; padding: 2%;
val28=background-color: #FFCC99; color: black; margin: 2% 5%; padding: 2%;
val29=
val30=ol li {list-style: upper-alpha; }
val31=yes
val32=inside
val33=yes
val34=1
val35=yes
val36=2
val37=
val38=---
tmp=!nonempty items $val6

tmp0=!randitem $tmp
val39=$(tmp0)
tmp0=!recordcnt $val39

val40=$[rint($(tmp0))]
val41=1
val42=1
val43=3

!ifval $val21 iswordof case 
val44= autocomplete=off
!endif
tmp0=!replace internal - by in $val38

val38=$(tmp0)
val45=$val22,$val23,$val24

!ifval $val25 = 
val25=++>
!endif

!ifval $val34 notwordof 0 
val34=$[rint( 1)]
!endif

!ifval $val26!=yes 
val46= noreaccent
!else
val46=
!endif

!ifval $val31 issametext no 
!readproc slib/utilities/nopaste  
tmp0=$slib_out
val47= $(tmp0)
!endif

!ifval $val8 issametext 
tmp0=!getdef instruction in $val39

val8= $(tmp0)
!endif

!ifval $val9 issametext 
tmp0=!getdef instruction2 in $val39

val9= $(tmp0)
!endif

!ifval $val17 issametext 
tmp0=!getdef size in $val39

val17= $(tmp0)
!endif

!ifval $val13 issametext 
tmp0=!getdef reading_file in $val39

val13= $(tmp0)
!endif
tmp0=!record 0 of $val13

val48=$(tmp0)

!ifval $val12 issametext 
tmp0=!getdef audio_file in $val39

val12= $(tmp0)
!endif

!ifval $val12 notsametext  and  $val12 notsametext no
!readproc slib/media/audio $val1/$val12,player=$val38 
tmp0=$slib_out
val49= 	<p align="center">$(tmp0)</p>
!endif

!ifval $val14 issametext 
tmp0=!getdef image_file in $val39

val14= $(tmp0)
!endif

!ifval $val14 notsametext  and  $val14 notsametext no
tmp0=!makelist <img src=$val1/x> for x in $val14

val50= 	$(tmp0)
!endif

!ifval $val15 issametext 
tmp0=!getdef video_file in $val39

val15= $(tmp0)
!endif
!if $val15 notsametext  and  $val15 notsametext no 

!ifval http notin $val15 
val15= $val1/$val15
!endif

!ifval $val15 notsametext 
val51= <a wims_target=external href="$val15">[video] </a></p>
!endif
!endif

!ifval $val10 issametext 
tmp0=!getdef choice in $val39

val52= $(tmp0)
!else
val52=$val10
!endif
val53=<style type="text/css">	 .question {$val27}	 .reponse {$val28}	 .oefstatement{$val29}	 $val30	 </style>	 

!ifval $val36 notwordof 1 2 3 4 5 6 7 8 9 10 
val36= 1
!endif

!ifval $val21 iswordof dragfill clickfill 
val17= $val17 x 1
!endif
val42=$[rint(min($val40,$val42))]
val41=$[rint(min($val42*$val41,$val40))]

!ifval $val16 issametext yes 
tmp0=!shuffle $val40

val54= $(tmp0) 
!else
tmp1=!makelist x for x = 1 to $val40

val54=	$(tmp1)
!endif
tmp0=!itemcnt $val6

val55=$(tmp0)
val56=
!for val57  = 2 to $val55 
tmp0=!recordcnt $(val6[$val57])

val58=$[rint($(tmp0))]
tmp0=!shuffle $val58

val59=$(tmp0)
tmp=!trim $val54	   $(val59[1..$val42])
val54=!translate internal $	\
$ to ;; in $tmp
!next
!for val57  = 1 to $val42 
!if $val16=no 
tmp0=!record $val57 of $val39

val60=$(tmp0)
!else
tmp0=!record $(val54[$val57]) of $val39

val60=$(tmp0)
!endif
val61=$val60
tmp=!translate internal $	$ to ; in $val61

tmp=!row 1 of $tmp
tmp0=!translate internal $\
$ to ; in $tmp
val61=$(tmp0)
tmp0=!getopt audio in $val61

val62=$(tmp0)
tmp0=!getopt image in $val61

val63=$(tmp0)
tmp0=!getopt title in $val61

val64=$(tmp0)
tmp0=!getopt intro in $val61

val65=$(tmp0)

!ifval $val62$val63$val64$val65  notsametext 
val66=$[rint( 1 )]
!else
val66=$[rint( 0)]
!endif
val67=

!ifval $val64 notsametext 
val67=$val67<p align="center">$val64</p>
!endif

!ifval $val65 notsametext 
val67=$val67 $val65
!endif

!ifval $val63 notsametext 
val67= $val67 <p align="center"><img src=$val1/$val63></p>
!endif
!if $val62 notsametext  

!ifval . isin $val62 or $val37= 
!readproc slib/media/audio $val1/$val62,,player=$val38 
tmp0=$slib_out
val68= 	       $(tmp0)
!else
!readproc slib/lang/swac $val62,$val37,player=$val38 
tmp1=$slib_out
val68=$(tmp1)
!endif
val67=$val67 <p align="center">$(val68[1;1])</p>
!endif
!if $val66=1 
val56=$val56 $val67
tmp0=!line 2 to -1 of $val60

val60=$(tmp0)
!endif
val56=$val56 <p> $val60 </p>
!next
tmp0=!embraced randitem $val56

val56=$(tmp0)
!readproc slib/text/cutchoice2 $val56 
tmp0=$slib_out
val56=$(tmp0)
tmp0=!replace internal || by | in $val56

val56=$(tmp0)
tmp=!translate internal $	$ to ; in $val56

tmp0=!rowcnt $tmp
val69=$(tmp0)
val70=$[rint(($val69-$val69%2)/2)]
tmp=!trim 
val71=!translate internal $	\
$ to ;; in $tmp
tmp=!trim 
val72=!translate internal $	\
$ to ;; in $tmp
val73=
tmp=!trim 
val74=!translate internal $	\
$ to ;; in $tmp
tmp=!trim 
val22=!translate internal $	\
$ to ;; in $tmp
tmp=!trim 
val23=!translate internal $	\
$ to ;; in $tmp
tmp=!trim 
val24=!translate internal $	\
$ to ;; in $tmp
!for val57  = 1 to $val70 
val75=$(val56[2*$val57;])
tmp0=!itemcnt $val75

val58=$[rint($(tmp0))]
tmp=!trim $val71	  $(val75[1])
val71=!translate internal $	\
$ to ;; in $tmp
val76=$(val75[1])
tmp0=!replace internal | by , in $val76

val77=$(tmp0)
val78=$(val77[1])
tmp0=!words2items $(val77[1])

val77=$(tmp0)
tmp0=!itemcnt $val77

val79=$(tmp0)
val80=
val81=
val82=
!if 1 isitemof $val45 or 2 isitemof $val45 
!for val83  = 1 to $val79 
val84=$(val77[$val83])
tmp0=!charcnt $val84

val85=$(tmp0)
tmp0=!makelist - for x = 1 to $val85

val86=$(tmp0)
tmp0=!items2words $val86

tmp1=!nospace $(tmp0)

val87=$(tmp1)
val88=$[rint(min($val85/2,3))]
tmp0=!shuffle $val85

val89=$(tmp0)
val90=$val86
!for val91  =1 to $val88 
val59=$[rint($(val89[$val91]))]
tmp0=!char $val59 of $val84

tmp1=!replace item number  $val59  by $(tmp0) in $val90

val90=$(tmp1)
!next
tmp0=!items2words $val90

tmp1=!nospace $(tmp0)

val90=$(tmp1)
val80=$val80 $val87
val81=$val81 $val90
!next
!endif
!if 3 isitemof $val45 
!readproc slib/lang/swac $val78,$val37,player=$val38 
tmp0=$slib_out
val92=$(tmp0)
val82=$val82 $(val92[1;1])
!endif
tmp=!trim $val22,$val80
val22=!translate internal $	\
$ to ;; in $tmp
tmp=!trim $val23,$val81
val23=!translate internal $	\
$ to ;; in $tmp
tmp=!trim $val24,$val82
val24=!translate internal $	\
$ to ;; in $tmp
tmp0=!singlespace $val75,$val52

tmp1=!listuniq $(tmp0)

val75=$(tmp1)
!if $val21 notwordof mark menu 
tmp=!trim $val72	  $val75
val72=!translate internal $	\
$ to ;; in $tmp
tmp=!trim $val74	  $val76
val74=!translate internal $	\
$ to ;; in $tmp
!else
tmp0=!replace internal | by , in $val76

val93=$(tmp0)

!ifval $val21 iswordof menu 
val94= $(val93[1]),$(val75[2..-1]) 
!else
tmp0=!replace internal | by , in $val75

tmp1=!listuniq $(tmp0)

val94= $(tmp1)
!endif
tmp0=!itemcnt $val94

val58=$[rint($(tmp0))]
tmp=!trim $val72	 $val94
val72=!translate internal $	\
$ to ;; in $tmp
val95=
tmp0=!itemcnt $val93

val96=$[rint($(tmp0))]
!for val59 =1 to $val96 
tmp0=!positionof item $(val93[$val59]) in $val94

val95=$val95, $(tmp0)
!next
tmp0=!nonempty items $val95

tmp=!trim $val74	  $(tmp0)
val74=!translate internal $	\
$ to ;; in $tmp
!endif
val73=$val73,$val58
!next
!if $val21 iswordof menu mark  

!ifval $val11 issametext yes 
tmp0=!rows2lines $val72

tmp1=!lines2items $(tmp0)

val52= $val52,$(tmp1)
!endif
tmp0=!listuniq $val52

val52=$(tmp0)
val73=
tmp=!trim 
val97=!translate internal $	\
$ to ;; in $tmp
tmp=!trim 
val98=!translate internal $	\
$ to ;; in $tmp
!for val99  = 1 to $val70 
tmp0=!listuniq $(val72[$val99;]),$val52

val100=$(tmp0)
tmp0=!shuffle $val100

val100=$(tmp0)
tmp=!trim $val97	      $val100
val97=!translate internal $	\
$ to ;; in $tmp
val95=
tmp0=!itemcnt $(val72[$val99;])

val96=$[rint($(tmp0))]
!for val101 =1 to $val96 
tmp0=!positionof item $(val72[$val99;$(val74[$val99;$val101])]) in $val100

val95=$val95,$(tmp0)
!next
tmp0=!nonempty items $val95

tmp=!trim $val98	     $(tmp0)
val98=!translate internal $	\
$ to ;; in $tmp
tmp0=!itemcnt $(val97[$val99;])

val58=$(tmp0)
val73=$val73,$val58
!next
tmp=!trim $val97
val72=!translate internal $	\
$ to ;; in $tmp
tmp=!trim $val98
val74=!translate internal $	\
$ to ;; in $tmp
!endif
tmp0=!nonempty items $val73

val73=$(tmp0)
tmp0=!nonempty items $val22

val22=$(tmp0)&nbsp;
tmp0=!nonempty items $val23

val23=$(tmp0)&nbsp;
tmp0=!nonempty items $val24

val24=$(tmp0)&nbsp;
tmp=!trim $val22	$val23	$val24
val102=!translate internal $	\
$ to ;; in $tmp

!ifval $val21 iswordof clickfill dragfill raw case 
tmp=!trim  $val71
val74=!translate internal $	\
$ to ;; in $tmp
!endif

!ifval $val21 iswordof case raw
tmp0=!replace internal &#44; by , in $val74

tmp=!trim  $(tmp0)
val74=!translate internal $	\
$ to ;; in $tmp
!endif

!ifval $val52 notsametext 
tmp0=!replace internal ; by , in $val71

tmp1=!append item $(tmp0) to $val52

val52= $(tmp1)
!endif
tmp0=!replace internal | by , in $val52

val52=$(tmp0)
tmp0=!listuniq $val52

val52=$(tmp0)
tmp=!translate internal $	$ to ; in $val74

tmp0=!rowcnt $tmp
val70=$[rint($(tmp0))]
tmp0=!makelist r x for x=1 to $val70

val103=$(tmp0)
val104=$val103
val105=
val106=
tmp0=!replace internal | by , in $val74

tmp=!trim $(tmp0)
val98=!translate internal $	\
$ to ;; in $tmp

!ifval $val21 iswordof case raw
val72= 
!endif
dynsteps=yes
oefsteps=$val104 
nextstep=!nosubst $val104 
!readproc oef/steps.proc
replytype1=$val21

replyoption1=shuffle $val46 nonstop 
replyname1=
replygood1=$(val74[1;]);$(val72[1;])
replytype2=$val21

replyoption2=shuffle $val46 nonstop 
replyname2=
replygood2=$(val74[2;]);$(val72[2;])
replytype3=$val21

replyoption3=shuffle $val46 nonstop 
replyname3=
replygood3=$(val74[3;]);$(val72[3;])
replytype4=$val21

replyoption4=shuffle $val46 nonstop 
replyname4=
replygood4=$(val74[4;]);$(val72[4;])
replytype5=$val21

replyoption5=shuffle $val46 nonstop 
replyname5=
replygood5=$(val74[5;]);$(val72[5;])
replytype6=$val21

replyoption6=shuffle $val46 nonstop 
replyname6=
replygood6=$(val74[6;]);$(val72[6;])
replytype7=$val21

replyoption7=shuffle $val46 nonstop 
replyname7=
replygood7=$(val74[7;]);$(val72[7;])
replytype8=$val21

replyoption8=shuffle $val46 nonstop 
replyname8=
replygood8=$(val74[8;]);$(val72[8;])
replytype9=$val21

replyoption9=shuffle $val46 nonstop 
replyname9=
replygood9=$(val74[9;]);$(val72[9;])
replytype10=$val21

replyoption10=shuffle $val46 nonstop 
replyname10=
replygood10=$(val74[10;]);$(val72[10;])
replytype11=$val21

replyoption11=shuffle $val46 nonstop 
replyname11=
replygood11=$(val74[11;]);$(val72[11;])
replytype12=$val21

replyoption12=shuffle $val46 nonstop 
replyname12=
replygood12=$(val74[12;]);$(val72[12;])
replytype13=$val21

replyoption13=shuffle $val46 nonstop 
replyname13=
replygood13=$(val74[13;]);$(val72[13;])
replytype14=$val21

replyoption14=shuffle $val46 nonstop 
replyname14=
replygood14=$(val74[14;]);$(val72[14;])
replytype15=$val21

replyoption15=shuffle $val46 nonstop 
replyname15=
replygood15=$(val74[15;]);$(val72[15;])
replytype16=$val21

replyoption16=shuffle $val46 nonstop 
replyname16=
replygood16=$(val74[16;]);$(val72[16;])
replytype17=$val21

replyoption17=shuffle $val46 nonstop 
replyname17=
replygood17=$(val74[17;]);$(val72[17;])
replytype18=$val21

replyoption18=shuffle $val46 nonstop 
replyname18=
replygood18=$(val74[18;]);$(val72[18;])
replytype19=$val21

replyoption19=shuffle $val46 nonstop 
replyname19=
replygood19=$(val74[19;]);$(val72[19;])
replytype20=$val21

replyoption20=shuffle $val46 nonstop 
replyname20=
replygood20=$(val74[20;]);$(val72[20;])
replytype21=$val21

replyoption21=shuffle $val46 nonstop 
replyname21=
replygood21=$(val74[21;]);$(val72[21;])
replytype22=$val21

replyoption22=shuffle $val46 nonstop 
replyname22=
replygood22=$(val74[22;]);$(val72[22;])
replytype23=$val21

replyoption23=shuffle $val46 nonstop 
replyname23=
replygood23=$(val74[23;]);$(val72[23;])
replytype24=$val21

replyoption24=shuffle $val46 nonstop 
replyname24=
replygood24=$(val74[24;]);$(val72[24;])
replytype25=$val21

replyoption25=shuffle $val46 nonstop 
replyname25=
replygood25=$(val74[25;]);$(val72[25;])
replytype26=$val21

replyoption26=shuffle $val46 nonstop 
replyname26=
replygood26=$(val74[26;]);$(val72[26;])
replytype27=$val21

replyoption27=shuffle $val46 nonstop 
replyname27=
replygood27=$(val74[27;]);$(val72[27;])
replytype28=$val21

replyoption28=shuffle $val46 nonstop 
replyname28=
replygood28=$(val74[28;]);$(val72[28;])
replytype29=$val21

replyoption29=shuffle $val46 nonstop 
replyname29=
replygood29=$(val74[29;]);$(val72[29;])
replytype30=$val21

replyoption30=shuffle $val46 nonstop 
replyname30=
replygood30=$(val74[30;]);$(val72[30;])
replytype31=$val21

replyoption31=shuffle $val46 nonstop 
replyname31=
replygood31=$(val74[31;]);$(val72[31;])
replytype32=$val21

replyoption32=shuffle $val46 nonstop 
replyname32=
replygood32=$(val74[32;]);$(val72[32;])
replytype33=$val21

replyoption33=shuffle $val46 nonstop 
replyname33=
replygood33=$(val74[33;]);$(val72[33;])
replytype34=$val21

replyoption34=shuffle $val46 nonstop 
replyname34=
replygood34=$(val74[34;]);$(val72[34;])
replytype35=$val21

replyoption35=shuffle $val46 nonstop 
replyname35=
replygood35=$(val74[35;]);$(val72[35;])
replytype36=$val21

replyoption36=shuffle $val46 nonstop 
replyname36=
replygood36=$(val74[36;]);$(val72[36;])
replytype37=$val21

replyoption37=shuffle $val46 nonstop 
replyname37=
replygood37=$(val74[37;]);$(val72[37;])
replytype38=$val21

replyoption38=shuffle $val46 nonstop 
replyname38=
replygood38=$(val74[38;]);$(val72[38;])
replytype39=$val21

replyoption39=shuffle $val46 nonstop 
replyname39=
replygood39=$(val74[39;]);$(val72[39;])
replytype40=$val21

replyoption40=shuffle $val46 nonstop 
replyname40=
replygood40=$(val74[40;]);$(val72[40;])
question=__EXECUTED_1692754_EXERCISE__

!goto stat

!exit

:question
$()$val47 $val53 $val8	   
!if $val48 notsametext  
$() 
!read oef/special.phtml help reading,[à lire] 
$() 
!endif
$()	   
!if $val50 notsametext  
$() 
!read oef/special.phtml help image,[à regarder] 
$() 
!endif
$()	  $val49$val51	  <div class="question">	 
!if $val21 iswordof case raw dragfill clickfill 
$()	    
!for m_k = 1 to $val70 
$()	    $(val56[2*$m_k-1;])   
!if r $m_k isitemof $val104 
$() 
!read oef/embed.phtml $(val103[$m_k]),$val17	    $val44 
$()	      
!if $(val45[$m_step]) iswordof 1 2 
$()	        
!read oef/special.phtml tooltip <font color=brown>[$val25]</font>,,$(val102[$(val45[$m_step]);$m_k]) 
$() 
!endif
$()	      
!if $(val45[$m_step])=3 
$()	       $(val102[3;$m_k]) 
!endif
$()	        
!else
$() 	        
!if $(val105[$m_k])=1 
$()<font color=green><b>$(val106[$m_k;])</b></font> 
!else
$()	             
!if $val35=yes 
$()<font color=green><b>$(val98[$m_k;1])</b></font> 
!endif
$()	             <font color=red><b><strike>$(val106[$m_k;])</strike></b></font>	           
!endif
$()	       
!endif
$()	    
!next
$()	  $(val56[2*$val70+1;])	   
!endif
$()	   
!if $val21 iswordof menu 
$()	     
!for m_k = 1 to $val70 
$()	      $(val56[2*$m_k-1;])	       
!if r $m_k isitemof $val104 
$() 
!read oef/embed.phtml $(val103[$m_k]) 
$() 
!else
$() 	        
!if $(val105[$m_k])=1 
$()<font color=green><b>$(val106[$m_k;])</b></font> 
!else
$()	            
!if $val35=yes 
$()<font color=green><b>$(val72[$m_k;$(val74[$m_k;1])])</b></font> 
!endif
$()	                <font color=red><b><strike>$(val106[$m_k;])</strike></b></font>	          
!endif
$()	       
!endif
$()	     
!next
$()	  $(val56[2*$val70+1;])	  
!endif
$()	 
!if $val21 iswordof mark 
$()	   
!for m_k = 1 to $val70 
$()	    $(val56[2*$m_k-1;])   
!if r $m_k isitemof $val104 
$()/	       
!for m_K = 1 to $(val73[$m_k]) 
$()  
!read oef/embed.phtml $(val103[$m_k]),\K 
$()/ 
!next
$()	    
!else
$() 	        
!if $(val105[$m_k])=1 
$()<font color=green><b>$(val106[$m_k;])</b></font> 
!else
$()	    	    
!if $val35=yes 
$()<font color=green><b>$(val72[$m_k;$(val74[$m_k;1])])</b></font> 
!endif
$()	   <font color=red><b><strike>$(val106[$m_k;])</strike></b></font> 
!endif
$()	    
!endif
$()	   
!next
$()	  $(val56[2*$val70+1;])	 
!endif
$()	  </div>	  	 
!if $val52 notsametext and $val21=case 
$()	<div class="reponse">$val52</div>	 
!endif
$()	
$()
!exit

:hint
$()
$()
!exit

:help
$()
$()
!exit

:solution
$()
$()
!exit

:latex
$()
$()
!exit

:postdef
val105=$m_sc_reply1,$m_sc_reply2,$m_sc_reply3,$m_sc_reply4,$m_sc_reply5,$m_sc_reply6,$m_sc_reply7,$m_sc_reply8,$m_sc_reply9,	$m_sc_reply10,$m_sc_reply11,$m_sc_reply12,$m_sc_reply13,$m_sc_reply14,$m_sc_reply15,$m_sc_reply16,$m_sc_reply17,$m_sc_reply18,$m_sc_reply19,	$m_sc_reply20,$m_sc_reply21,$m_sc_reply22,$m_sc_reply23,$m_sc_reply24,$m_sc_reply25,$m_sc_reply26,$m_sc_reply27,$m_sc_reply28,$m_sc_reply29,	$m_sc_reply30,$m_sc_reply31,$m_sc_reply32,$m_sc_reply33,$m_sc_reply34,$m_sc_reply35,$m_sc_reply36,$m_sc_reply37,$m_sc_reply38,$m_sc_reply39,	$m_sc_reply40
tmp=!trim $m_reply1	$m_reply2	$m_reply3	$m_reply4	$m_reply5	$m_reply6	$m_reply7	$m_reply8	$m_reply9	$m_reply10	$m_reply11	$m_reply12	$m_reply13	$m_reply14	$m_reply15	$m_reply16	$m_reply17	$m_reply18	$m_reply19	$m_reply20	$m_reply21	$m_reply22	$m_reply23	$m_reply24	$m_reply25	$m_reply26	$m_reply27	$m_reply28	$m_reply29	$m_reply30	$m_reply31	$m_reply32	$m_reply33	$m_reply34	$m_reply35	$m_reply36	$m_reply37	$m_reply38	$m_reply39	$m_reply40	
val106=!translate internal $	\
$ to ;; in $tmp
val104=
!if $m_step<=$val36 
!for val57 =1 to $val70 

!ifval $(val105[$val57])!=1 
val104= $val104,r $val57
!endif
!next
!endif
val107=$[rint($m_step-1)]

!exit

:feedback
!ifval 1=1
 <p> 
!if $val36 > 1 
$()Vous avez eu besoin de $val107	   
!if $val107=1 
$()essai. 
!else
$() essais. 
!endif
$() 
!endif
$()	
$()
!endif

!exit

:test

!exit

:stat
vsavelist=8,17,21,25,35,36,44,45,47,48,49,50,51,52,53,56,57,70,72,73,74,98,102,103,104,105,106
embedcnt=6
