From a8c733a97ba6f3ac7cdec06999d277df75737d24 Mon Sep 17 00:00:00 2001 From: thepurpleblob Date: Fri, 19 Jan 2007 14:35:44 +0000 Subject: [PATCH] MDL-8226 Move aiken import format from head into contrib. No longer maintained. Use GIFT instead. --- question/format/aiken/format.php | 94 -------------------------------- 1 file changed, 94 deletions(-) delete mode 100644 question/format/aiken/format.php diff --git a/question/format/aiken/format.php b/question/format/aiken/format.php deleted file mode 100644 index c799bff83b..0000000000 --- a/question/format/aiken/format.php +++ /dev/null @@ -1,94 +0,0 @@ - 2 November 2003 -/// - -//////////////////////////////////////////////////////////////////////////// -/// AIKEN FORMAT -/// -/// This Moodle class provides all functions necessary to import and export -/// one-correct-answer multiple choice questions in this format: -/// -/// Question text -/// A) Choice #1 -/// B) Choice #2 -/// C) Choice #3 -/// D) Choice #4 -/// ANSWER: B -/// (blank line next not necessary since "AN" at the beginning of a line -/// triggers the question input and causes input to start all over. -/// -///Only ONE correct answer is allowed with no feedback responses. -/// -///Be sure to reword "All of the above" type questions as "All of these" (etc.) so that choices can -/// be randomized -/// -///This should work on WIN, Mac and Unix although only tested on Mac -/// -//////////////////////////////////////////////////////////////////////////// - -// Based on format.php, included by ../../import.php - -class qformat_aiken extends qformat_default { - - function provide_import() { - return true; - } - -//will this override default function? - function readquestions($lines){ - $questions = array(); - $question = $this->defaultquestion(); - $endchar = chr(13); - foreach ($lines as $line) { - $stp = strpos($line,$endchar,0); - $newlines = explode($endchar,$line); - $foundQ = 0; - for ($i=0; $i < count($newlines);$i++){ - $nowline = addslashes($newlines[$i]); - ///Go through the arrage and build an object called $question - ///When done, add $question to $questions - if (strlen($nowline)< 2) { - continue; - } - // This will show everyline when file is being processed - // print("$nowline
"); - $leader = substr(ltrim($nowline),0,2); - if (strpos(".A)B)C)D)E)F)G)H)I)J)A.B.C.D.E.F.G.H.I.J.",$leader)>0){ - //trim off the label and space - $question->answer[] = substr($nowline,3); - $question->fraction[] = 0; - $question->feedback[] = ''; - continue; - } - if ($leader == "AN"){ - $ans = trim(strstr($nowline,":")); - $ans = substr($ans,2,1); - //A becomes 0 since array starts from 0 - $rightans = ord($ans) - 65; - $question->fraction[$rightans] = 1; - $questions[] = $question; - //clear array for next question set - $question = $this->defaultquestion(); - continue; - } else { - //Must be the first line since no leader - $question->qtype = MULTICHOICE; - $question->name = addslashes( substr($nowline,0,50) ); - $question->questiontext = $nowline; - $question->single = 1; - $question->feedback[] = ""; - } - } - } - return $questions; - } - - function readquestion($lines) { - //this is no longer needed but might still be called by default.php - return; - } -} - -?> -- 2.39.5