| 388 |
388 |
|
| 389 |
389 |
next BOX if($indic && !$annote_indicatives);
|
| 390 |
390 |
|
| 391 |
|
next BOX if($layout->get_box_flags($p->{'student'},$q,$r)
|
| 392 |
|
& BOX_FLAGS_DONTANNOTATE);
|
| 393 |
|
|
| 394 |
391 |
# to be ticked?
|
| 395 |
392 |
my $bonne=$scoring->correct_answer($p_strategy,$q,$r);
|
| 396 |
393 |
|
| ... | ... | |
| 409 |
406 |
}
|
| 410 |
407 |
}
|
| 411 |
408 |
|
| 412 |
|
if($sy->{type} eq 'circle') {
|
| 413 |
|
cercle_coors($context,$b->{'zoneid'},$sy->{color});
|
| 414 |
|
} elsif($sy->{type} eq 'mark') {
|
| 415 |
|
croix_coors($context,$b->{'zoneid'},$sy->{color});
|
| 416 |
|
} elsif($sy->{type} eq 'box') {
|
| 417 |
|
boite_coors($context,$b->{'zoneid'},$sy->{color});
|
| 418 |
|
} elsif($sy->{type} eq 'none') {
|
| 419 |
|
} else {
|
| 420 |
|
debug "Unknown symbol type ($bonne-$cochee): $sy->{type}";
|
|
409 |
if(!($layout->get_box_flags($p->{'student'},$q,$r)
|
|
410 |
& BOX_FLAGS_DONTANNOTATE)) {
|
|
411 |
if($sy->{type} eq 'circle') {
|
|
412 |
cercle_coors($context,$b->{'zoneid'},$sy->{color});
|
|
413 |
} elsif($sy->{type} eq 'mark') {
|
|
414 |
croix_coors($context,$b->{'zoneid'},$sy->{color});
|
|
415 |
} elsif($sy->{type} eq 'box') {
|
|
416 |
boite_coors($context,$b->{'zoneid'},$sy->{color});
|
|
417 |
} elsif($sy->{type} eq 'none') {
|
|
418 |
} else {
|
|
419 |
debug "Unknown symbol type ($bonne-$cochee): $sy->{type}";
|
|
420 |
}
|
| 421 |
421 |
}
|
| 422 |
422 |
|
| 423 |
423 |
# pour avoir la moyenne des coors pour marquer la note de
|