Subversion Repositories wimsdev

type=select datalist
textarea="data explain"
iEdit="explain"

:¸ù¾ÝÐÔÖÊ×÷±ê¼Ç.

¸øÄãÒ»¸ö¶ÔÏóµÄ±í, ÄãÓ¦¸Ã°´¹æ¶¨µÄÐÔÖʱê³öÏàÓ¦¶ÔÏó.
<p>
Ϊ¹¹Ôì´ËÀàÁ·Ï°, Ö»ÒªÊäÈë¶ÔÏó¼°ÆäÐÔÖʵıí.
</p><p>
Ö»ÒªÉÔ×÷Ð޸ľÍÄÜʹÓÃͼÏñ¶ÔÏó.</p>
<p class="wims_credits">Ä£¿é×÷Õß: <a href="mailto:qualite@wimsedu.info">Gang Xiao</a></p>

:%%%%%%%%%%%%%%%%%      ×¢       Òâ      %%%%%%%%%%%%%%%%%%%%

Èç¹ûÄãɾȥÁ˱¾·¶ÀýÖеıêÇ© (¼´¸úËæÔÚðºÅ ':' ºóÃæµÄÄǼ¸ÐÐ),
ÄÇôҲÇëɾȥÕâ¸öÍ·²¿, ·ñÔòÓпÉÄܻز»µ½ Createxo.

:%%%%%%%%%%%%%%%%%   ±»ÖØж¨ÒåµÄ²ÎÊýʾÀý   %%%%%%%%%%%%%%%%%%

:\title{¸ù¾ÝÐÔÖÊ×÷±ê¼Ç}
:\author{XIAO Gang}
:\email{qualite@wimsedu.info}

:Á·Ï°Öб»±ê¼ÇµÄ¶ÔÏóÊý, ÖÁ¶à 100 ¸ö.
ÄãÓ¦¸Ã¶¨Òå×ã¹»¶àµÄ¶ÔÏó!
\integer{tot=12}

:Ó¦±»±ê¼ÇµÄ¶ÔÏóµÄ×îÉÙ¸öÊý. ÖÁÉÙ 1.
\integer{mingood=1}

:²»Ó¦±»±ê¼ÇµÄ¶ÔÏóµÄ×îÉÙ¸öÊý. ÖÁÉÙ 1.
\integer{minbad=4}

:ÐÔÖʱí. ±»±ê¼ÇµÄÐÔÖʽ«±»Ëæ»úÑ¡È¡.
\text{prop=·¨¹ú,Òâ´óÀû,µÂ¹ú}

:Ö÷ÒªÊý¾Ý.
Ò»Ðж¨ÒåÒ»¸ö¶ÔÏó, ÏÈÊÇÃû³Æ, È»ºóÊÇÐÔÖÊ, ÓöººÅ·Ö¸ô. <p>
×îºÃÿ¸ö·¶³ëÖÐÓÐ×ã¹»¶àµÄ¶ÔÏó. <p>
×¢ÒâÔÚÊäÈëÐÔÖÊʱ²»Òª³öÏÖ´ò×Ö´íÎó!
·ñÔòÕâ¸ö¶ÔÏó»áʹÁ·Ï°±ÀÀ£.
\matrix{data=
Fabien Barthez,·¨¹ú
Gregory Coupet,·¨¹ú
Eric Abidal,·¨¹ú
William Gallas,·¨¹ú
Willy Sagnol,·¨¹ú
Lilian Thuram,·¨¹ú
Pascal Chimbonda,·¨¹ú
Mickael Silvestre,·¨¹ú
Claude Makelele,·¨¹ú
Patrick Vieira,·¨¹ú
Florent Malouda,·¨¹ú
Zinedine Zidane,·¨¹ú
Sylvain Wiltord,·¨¹ú
Franck Ribery,·¨¹ú
Vikash Dhorasoo,·¨¹ú
Sidney Govou,·¨¹ú
Thierry Henry,·¨¹ú
David Trezeguet,·¨¹ú
Louis Saha,·¨¹ú

Gianluigi Buffon,Òâ´óÀû
Morgan De Sanctis,Òâ´óÀû
Angelo Peruzzi,Òâ´óÀû
Christian Abbiati,Òâ´óÀû
Marco Amelia,Òâ´óÀû
Flavio Roma,Òâ´óÀû
Gianluca Zambrotta,Òâ´óÀû
Alessandro Nesta,Òâ´óÀû
Fabio Cannavaro,Òâ´óÀû
Fabio Grosso,Òâ´óÀû
Cristian Zaccardo,Òâ´óÀû
Marco Materazzi,Òâ´óÀû
Andrea Barzagli,Òâ´óÀû
Massimo Oddo,Òâ´óÀû
Mauro Camoranesi,Òâ´óÀû
Andrea Pirlo,Òâ´óÀû
Gennaro Gattuso,Òâ´óÀû
Francesco Totti,Òâ´óÀû
Daniele de Rossi,Òâ´óÀû
Aimo Diana,Òâ´óÀû
Simone Barone,Òâ´óÀû
Manuele Blasi,Òâ´óÀû
Simone Perrotta,Òâ´óÀû
Alberto Gilardino,Òâ´óÀû
Luca Toni,Òâ´óÀû
Alessandro Del Piero,Òâ´óÀû
Vicenzo Iaquinta,Òâ´óÀû
Christian Vieri,Òâ´óÀû
Antonio Cassano,Òâ´óÀû
Cristiano Lucarelli,Òâ´óÀû
Filippo Inzaghi,Òâ´óÀû

Jens Lehmann,µÂ¹ú
Oliver Kahn,µÂ¹ú
Timo Hildebrand,µÂ¹ú
Philipp Lahm,µÂ¹ú
Arne Friedrich,µÂ¹ú
Robert Huth,µÂ¹ú
Jens Nowotny,µÂ¹ú
Per Mertesacker,µÂ¹ú
Christoph Metzelder,µÂ¹ú
Marcell Jansen,µÂ¹ú
Bernd Schneider,µÂ¹ú
Sebastian Kehl,µÂ¹ú
Torsten Frings,µÂ¹ú
Michael Ballack,µÂ¹ú
Tim Borowski,µÂ¹ú
Bastian Schweinsteiger,µÂ¹ú
David Odonkor,µÂ¹ú
Thomas Hitzlsperger,µÂ¹ú
Miroslav Klose,µÂ¹ú
Lukas Podolski,µÂ¹ú
Gerald Asamoah,µÂ¹ú
Mike Hanke,µÂ¹ú
Oliver Neuville,µÂ¹ú
}

:Ñ¡Ïî
Èç¹ûѧÉúֻѡȡÁËÆäÖÐÒ»²¿·ÖÕýÈ·´ð°¸Ò²Äܸø·ÖµÄ»°, Çë¼ÓÉÏÑ¡Ïî "split".
\text{option=split}

:%%%%%%%%%%%%%%       ²»Òª¸Ä¶¯ÏÂÃæÕâ¶ÎÃüÁî          %%%%%%%%%%%%%%%%

\text{prop=randitem(\prop)}

\text{data=wims(nonempty rows \data)}
\text{good=wims(select \data where column 2 issametext \prop)}
\text{bad=wims(select \data where column 2 notsametext \prop)}
\text{good=shuffle(wims(nonempty item \good[;1]))}
\text{bad=shuffle(wims(nonempty item \bad[;1]))}
\integer{goodcnt=items(\good)}
\integer{badcnt=items(\bad)}
\integer{tot=min(\tot,\goodcnt+\badcnt)}
\integer{mingood=min(\mingood,\tot-1)}
\integer{minbad=min(\minbad,\tot-\mingood-1)}
\integer{pickgood=randint(min(\mingood,\goodcnt)..min(\tot-\minbad,\goodcnt))}
\integer{pickbad=min(\tot-\pickgood,\badcnt)}
\integer{tot=\pickgood+\pickbad}
\text{ind=wims(makelist 1 for x=1 to \pickgood),wims(makelist 0 for x=1 to \pickbad)}
\text{all=item(1..\pickgood,\good),item(1..\pickbad,\bad)}
\text{list=wims(values x for x=1 to \tot)}
\text{sh=shuffle(\list)}
\text{all=item(\sh,\all)}
\text{ind=item(\sh,\ind)}
\text{tomark=positionof(1,\ind)}

:%%%%%%%%%%%%% ÏÖÔÚ¿ÉÒÔÓà html ¸ñʽÌîÈëÎÊÌâµÄ³ÂÊö  %%%%%%%%%%%%%%%%%%%%%%%%%

:½âÊÍÔõô×öÕâ¸öÁ·Ï°.
Óà <span class="tt">\prop</span> ±íʾËæ»úÑ¡È¡µÄÐÔÖÊ.
$embraced_randitem
\text{explain=
ÔÚÒÔÏÂ²Î¼Ó 2006 ÄêÊÀ½ç±­µÄÇòÔ±ÖÐ, Çë±ê¼Ç³öÊôÓÚ\prop¶ÓµÄÇòÔ±.
}

:%% ¼ÆËã; ²»Òª¸Ä¶¯
\text{explain=wims(embraced randitem \explain)}

::Ò»°ãÇé¿öÏÂûÓбØÒª¸Ä¶¯Ëü

\statement{<p>\explain
</p>
<div>
\for{k=1 to \tot-1}{\embed{r1,\k},}
\embed{r1,\tot}.
</div>
}

:%%%%%%%%%%%%%      ²»Òª¸Ä¶¯ÒÔϵÄÃüÁî        %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\answer{ÄãµÄ±ê¼Ç}{\tomark;\all}{type=mark}{option=\option}