/
question.php
117 lines (116 loc) · 3.88 KB
/
question.php
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
<?php
// This file is part of Moodle - http://moodle.org/
//
// Moodle is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// Moodle is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with Moodle. If not, see <http://www.gnu.org/licenses/>.
/**
* marvin Molecular Editor question definition class.
*
* @package qtype
* @subpackage easyofischer
* @copyright 2014 onwards Carl LeBlond
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
*/
defined('MOODLE_INTERNAL') || die();
require_once($CFG->dirroot . '/question/type/shortanswer/question.php');
class qtype_easyofischer_question extends qtype_shortanswer_question {
// All comparisons in easyofischer are case sensitive.
public function compare_response_with_answer(array $response, question_answer $answer) {
$numofstereo = $this->numofstereo;
$strictfischer = $this->strictfischer;
echo $strictfischer;
$usranswer = $response['answer'];
$coranswer = $answer->answer;
echo "$coranswer $usranswer";
$cor = explode("-", $coranswer);
$usr = explode("-", $usranswer);
for ($i = 0; $i < 2 * $numofstereo + 2; $i++) {
$cor[$i] = substr($cor[$i], 0, -1);
$usr[$i] = substr($usr[$i], 0, -1);
}
if ($cor == $usr) {
return 1;
} else {
$returnflag = 0;
}
if ($strictfischer == 1) {
$returnflag = $this->check_rotation_allowed($usr, $cor, $numofstereo);
}
return $returnflag;
}
public function check_rotation_allowed($usr, $cor, $numofstereo) {
if ($numofstereo == 1) {
$usrtemp = $usr[0];
$usr[0] = $usr[2];
$usr[2] = $usrtemp;
$usrtemp = $usr[1];
$usr[1] = $usr[3];
$usr[3] = $usrtemp;
}
if ($numofstereo == 2) {
$usrtemp = $usr[0];
$usr[0] = $usr[3];
$usr[3] = $usrtemp;
$usrtemp = $usr[1];
$usr[1] = $usr[4];
$usr[4] = $usrtemp;
$usrtemp = $usr[5];
$usr[5] = $usr[2];
$usr[2] = $usrtemp;
}
if ($numofstereo == 3) {
$usrtemp = $usr[0];
$usr[0] = $usr[4];
$usr[4] = $usrtemp;
$usrtemp = $usr[1];
$usr[1] = $usr[5];
$usr[5] = $usrtemp;
$usrtemp = $usr[7];
$usr[7] = $usr[3];
$usr[3] = $usrtemp;
$usrtemp = $usr[6];
$usr[6] = $usr[2];
$usr[2] = $usrtemp;
}
if ($numofstereo == 4) {
$usrtemp = $usr[0];
$usr[0] = $usr[5];
$usr[5] = $usrtemp;
$usrtemp = $usr[1];
$usr[1] = $usr[6];
$usr[6] = $usrtemp;
$usrtemp = $usr[9];
$usr[9] = $usr[4];
$usr[4] = $usrtemp;
$usrtemp = $usr[8];
$usr[8] = $usr[3];
$usr[3] = $usrtemp;
$usrtemp = $usr[7];
$usr[7] = $usr[2];
$usr[2] = $usrtemp;
}
ksort($usr);
if ($usr == $cor) {
return 1;
} else {
return 0;
}
}
public function get_expected_data() {
return array(
'answer' => PARAM_RAW,
'easyofischer' => PARAM_RAW,
'mol' => PARAM_RAW
);
}
}