moodle/moodle
3
0
Fork 0
mirror of https://github.com/moodle/moodle.git synced 2025-08-05 00:46:50 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

CONTRIB-490 Adding support for generation of test calculated question type (thanks Pierre Pichet)

Browse source
This commit is contained in:
nicolasconnault 2008-06-17 12:08:53 +00:00
parent 986dca608e
commit 0d03d6be5b
1 changed files with 51 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

55
question/type/calculated/questiontype.php
View file

@ -771,11 +771,11 @@ class question_calculated_qtype extends question_dataset_dependent_questiontype
$answer->answer, $data, $answer->tolerance, $answer->answer, $data, $answer->tolerance,
$answer->tolerancetype, $answer->correctanswerlength, $answer->tolerancetype, $answer->correctanswerlength,
$answer->correctanswerformat, $unit); $answer->correctanswerformat, $unit);
eval('$answer->answer = '.$formula.';') ; eval('$answer->answer = '.$formula.';') ;
$virtualqtype->get_tolerance_interval($answer); $virtualqtype->get_tolerance_interval($answer);
if ($answer->min === '') { if ($answer->min === '') {
// This should mean that something is wrong // This should mean that something is wrong
$stranswers .= " -$formattedanswer->answer".'<br/><br/>'; $stranswers .= " -$formattedanswer->answer".'<br/><br/>';
} else { } else {
$stranswers .= $formula.' = '.$formattedanswer->answer.'<br/>' ; $stranswers .= $formula.' = '.$formattedanswer->answer.'<br/>' ;
$stranswers .= $strmin. $delimiter.$answer->min.'---'; $stranswers .= $strmin. $delimiter.$answer->min.'---';
@ -783,11 +783,11 @@ class question_calculated_qtype extends question_dataset_dependent_questiontype
$stranswers .='<br/>'; $stranswers .='<br/>';
$correcttrue->correct = $formattedanswer->answer ; $correcttrue->correct = $formattedanswer->answer ;
$correcttrue->true = $answer->answer ; $correcttrue->true = $answer->answer ;
if ($formattedanswer->answer < $answer->min || $formattedanswer->answer > $answer->max){ if ($formattedanswer->answer < $answer->min || $formattedanswer->answer > $answer->max){
$stranswers .=get_string('trueansweroutsidelimits','qtype_calculated',$correcttrue);//<span class="error">ERROR True answer '..' outside limits</span>'; $stranswers .=get_string('trueansweroutsidelimits','qtype_calculated',$correcttrue);//<span class="error">ERROR True answer '..' outside limits</span>';
}else { }else {
$stranswers .=get_string('trueanswerinsidelimits','qtype_calculated',$correcttrue);//' True answer :'.$calculated->trueanswer.' inside limits'; $stranswers .=get_string('trueanswerinsidelimits','qtype_calculated',$correcttrue);//' True answer :'.$calculated->trueanswer.' inside limits';
} }
$stranswers .='<br/>'; $stranswers .='<br/>';
} }
} }
@ -1079,6 +1079,53 @@ class question_calculated_qtype extends question_dataset_dependent_questiontype
return $status; return $status;
} }
/**
* Runs all the code required to set up and save an essay question for testing purposes.
* Alternate DB table prefix may be used to facilitate data deletion.
*/
function generate_test($name, $courseid = null) {
list($form, $question) = parent::generate_test($name, $courseid);
$form->feedback = 1;
$form->multiplier = array(1, 1);
$form->shuffleanswers = 1;
$form->noanswers = 1;
$form->qtype ='calculated';
$question->qtype ='calculated';
$form->answers = array('{a} + {b}');
$form->fraction = array(1);
$form->tolerance = array(0.01);
$form->tolerancetype = array(1);
$form->correctanswerlength = array(2);
$form->correctanswerformat = array(1);
$form->questiontext = "What is {a} + {b}?";
if ($courseid) {
$course = get_record('course', 'id', $courseid);
}
$new_question = $this->save_question($question, $form, $course);
$dataset_form = new stdClass();
$dataset_form->nextpageparam["forceregeneration"]= 1;
$dataset_form->calcmin = array(1 => 1.0, 2 => 1.0);
$dataset_form->calcmax = array(1 => 10.0, 2 => 10.0);
$dataset_form->calclength = array(1 => 1, 2 => 1);
$dataset_form->number = array(1 => 5.4 , 2 => 4.9);
$dataset_form->itemid = array(1 => '' , 2 => '');
$dataset_form->calcdistribution = array(1 => 'uniform', 2 => 'uniform');
$dataset_form->definition = array(1 => "1-0-a",
2 => "1-0-b");
$dataset_form->nextpageparam = array('forceregeneration' => false);
$dataset_form->addbutton = 1;
$dataset_form->selectadd = 1;
$dataset_form->courseid = $courseid;
$dataset_form->cmid = 0;
$dataset_form->id = $new_question->id;
$this->save_dataset_items($new_question, $dataset_form);
return $new_question;
}
} }
//// END OF CLASS //// //// END OF CLASS ////