Subversion Repositories wimsdev

Rev

Rev 11365 | Blame | Compare with Previous | Last modification | View Log | RSS feed

\matrix{PHRASE=}
\matrix{PRELIMINAIRE=}
\for{i=1 to \MAX}{
 \text{phrase=wims(randrecord randitem(\file))}
 \text{phrase=wims(embraced randitem \phrase)}
 \text{preliminaire_test=wims(\phrase)}
 \text{preliminaire_test=row(1,\phrase)}
 \text{inst_audio=wims(getopt audio in \preliminaire_test)}
 \text{inst_image=wims(getopt image in \preliminaire_test)}
 \text{inst_title=wims(getopt title in \preliminaire_test)}
 \text{inst_intro=wims(getopt intro in \preliminaire_test)}
 \integer{test_inst=\inst_audio\inst_image\inst_title\inst_intro notsametext ? 1 : 0}
 \text{rab_inst=}
 \text{rab_inst=\inst_title notsametext ?\rab_inst<div class="wimscenter">\inst_title</div>}
 \text{rab_inst=\inst_intro notsametext ?\rab_inst \inst_intro}
 \text{rab_inst=\inst_image notsametext ? \rab_inst <div class="wimscenter"><img src="\imagedir/\inst_image" alt=""></div>}
 \if{\inst_audio notsametext }{
     \text{rab_inst1= . isin \inst_audio or \packs= ?
       slib(media/audio \imagedir/\inst_audio,\player_option,player=\player):slib(lang/swac \inst_audio,\packs,player=\player,\player_option)}
     \text{rab_inst=\rab_inst <div class="wimscenter">\rab_inst1[1;1]</div>}
   }
 \text{preliminaire=\test_inst=1 ? \rab_inst:}
 \text{phrase=\test_inst=1 ? wims(line 2 of \phrase)}
 \text{phrase=wims(replace internal / by , in \phrase)}
 \text{test_phrase=rows(wims(rows2lines \phrase))}
 \text{phrase=\test_phrase=1 ? \phrase;}
 \matrix{PHRASE=\PHRASE
 \phrase}
 \matrix{PRELIMINAIRE=\PRELIMINAIRE
 \preliminaire}
}

\text{STEP = wims(makelist r x for x = 1 to \MAX)}
\text{U = pari(divrem(\MAX,\N)~)}
\integer{cnt_step = \U[1] + 1}
\matrix{STEPS = }
\for{ u = 1 to \cnt_step -1}{
   \matrix{STEPS =\STEPS
wims(makelist r x for x = (\u -1)*\N +1 to \N*\u)}
}
\matrix{STEPS = \STEPS
 wims(makelist r x for x = \N*(\cnt_step-1)+1 to \MAX)}
\steps{\STEPS}


\statement{\nopaste <div class="instruction">\instruction</div>
  \if{\reading notsametext }{\special{help reading,READING}}
  \if{\image notsametext }{\special{help image,IMAGES}}
  \audio\video
  \for{ h = 1 to \N}{
  \if{\PRELIMINAIRE[\h;] notsametext}{<div class="reponse">\PRELIMINAIRE[\h;]</div>}

  <div class="question"> \embed{reply \STEPS[\step; \h],\size} </div>
  }
}

\answer{}{\PHRASE[1,2;]}{type=compose}
\answer{}{\PHRASE[3,4;]}{type=compose}
\answer{}{\PHRASE[5,6;]}{type=compose}
\answer{}{\PHRASE[7,8;]}{type=compose}
\answer{}{\PHRASE[9,10;]}{type=compose}
\answer{}{\PHRASE[11,12;]}{type=compose}
\answer{}{\PHRASE[13,14;]}{type=compose}
\answer{}{\PHRASE[15,16;]}{type=compose}
\answer{}{\PHRASE[17,18;]}{type=compose}
\answer{}{\PHRASE[19,20;]}{type=compose}
\answer{}{\PHRASE[21,22;]}{type=compose}
\answer{}{\PHRASE[23,24;]}{type=compose}
\answer{}{\PHRASE[25,26;]}{type=compose}
\answer{}{\PHRASE[27,28;]}{type=compose}
\answer{}{\PHRASE[29,30;]}{type=compose}
\answer{}{\PHRASE[31,32;]}{type=compose}
\answer{}{\PHRASE[33,34;]}{type=compose}
\answer{}{\PHRASE[35,36;]}{type=compose}
\answer{}{\PHRASE[37,38;]}{type=compose}
\answer{}{\PHRASE[39,40;]}{type=compose}
\answer{}{\PHRASE[41,42;]}{type=compose}
\answer{}{\PHRASE[43,44;]}{type=compose}
\answer{}{\PHRASE[45,46;]}{type=compose}
\answer{}{\PHRASE[47,48;]}{type=compose}
\answer{}{\PHRASE[49,50;]}{type=compose}
\answer{}{\PHRASE[51,52;]}{type=compose}
\answer{}{\PHRASE[53,54;]}{type=compose}
\answer{}{\PHRASE[55,56;]}{type=compose}
\answer{}{\PHRASE[57,58;]}{type=compose}