!header

Tenemos $objects objetos con
!if $weights>1
 diferentes
!else
 el mismo
!endif
 peso en el plano. La siguiente figura muestra
!if $type=1
 las posiciones de esos $objects objectos. ¿Dónde está el centro de
 gravedad del conjunto de esos $objects objetos?
!else
 la posición de $[$objects-1] de ellos, junto con el centro de gravedad
 de los $objects objetos.
 !if $weights>1
  El último objeto, escondido, es de peso $(w$objects). ¿Dónde está
  este objeto?
 !else
  ¿Dónde está escondido el último objeto?
 !endif
!endif

!if $status=wait
 <p>Para dar tu respuesta: haz click en la figura, en el lugar donde creas
que es el correcto.
 !form reply
 <table cellpadding=10>
 <td>
 !distribute item alt=Click,1,form click into ins_attr,ins_border,ins_tag
!else
 <p>Aquí está tu respuesta, además de
 !if $type=1
  el verdadero centro de gravedad.
 !else
  la posición real del objeto escondido.
 !endif
 <table cellpadding=10>
 <td>
 !set ins_attr=alt=Result
!endif
!insdraw fill 1,1,255,255,255\
transparent 255,255,255\
$ins_src
<td>&nbsp;&nbsp;&nbsp;<td>
!for i=1 to $weights
  <img src=$module_dir/gifs/o$i.gif>
  = un objeto de peso $i
  <br>
!next i
!if $type=2
 <img src=$module_dir/gifs/circle.gif> = el centro de gravedad<br>
!endif
!if $status!=wait
 <img src=$module_dir/gifs/cross.gif> = donde has hecho click<br>
 !if $type=1
  <img src=$module_dir/gifs/circle.gif> = el verdadero centro de gravedad
 !else
  <img src=$module_dir/gifs/o0.gif> = la verdadera posición del objeto escondido
 !endif
!endif

</table>
!if $status=wait
 </form>
!endif
<p>

!if $status!=wait
 Precisión de la respuesta (número $reply_cnt de $shoots): $[rint($error*2)/10] mm.
 !if $reply_cnt<$shoots
  Precisión media de la sesión: $mean mm.
  <p>
  !href cmd=next Continuar con un nuevo disparo
  .
 !else
  <p>Fin de la sesión con $reply_cnt disparos. Precisión media = $mean mm,
  puntuación = $module_score/10. <p>
  <table border=0>
  <td>Resumen de los disparos de la sesión.&nbsp;&nbsp;
  <td>
  !set insdraw_size=$[$ring_size*20],$[$ring_size*20]
  !insdraw fill 1,1,255,255,255\
   transparent 255,255,255\
   $rings\
   $target
  </td>
  </table> <p>
  !href cmd=renew&worksheet=$wims_sheet&$module_init_parm Comenzar una nueva sesión
  .
  !if $worksheet=$empty
   !href module=$module Cambiar el tipo de juego
.
  !endif
 !endif
!endif

:end
!tail
