course, $USER->id)){ error( get_string( 'only_teachers', 'game')); } $currenttab = 'answers'; include('tabs.php'); $action = optional_param('action', "", PARAM_ALPHANUM); // action if( $action == 'delstats') delete_records('game_repetitions', 'gameid', $game->id, 'userid', $USER->id); if( $action == 'computestats') game_compute_repetitions($game); echo ''.get_string('repetitions', 'game').':   '; echo get_string('user').': '; game_showusers($game); echo "  wwwroot/mod/game/showanswers.php?q=$q&action=delstats\">".get_string('clearrepetitions','game').''; echo "   wwwroot/mod/game/showanswers.php?q=$q&action=computestats\">".get_string('computerepetitions','game').''; echo '

'; game_showanswers( $game, false); print_footer(); function game_compute_repetitions($game){ global $CFG, $USER; delete_records('game_repetitions', 'gameid', $game->id,'userid',$USER->id); $sql = "INSERT INTO {$CFG->prefix}game_repetitions( gameid,userid,questionid,glossaryentryid,repetitions) ". "SELECT $game->id,$USER->id,questionid,glossaryentryid,COUNT(*) ". "FROM {$CFG->prefix}game_queries WHERE gameid=$game->id AND userid=$USER->id GROUP BY questionid,glossaryentryid"; if( !execute_sql( $sql, false)) error('Problem on computing statistics for repetitions'); } function game_showusers($game) { global $CFG, $USER; $users = array(); $context = get_context_instance(CONTEXT_COURSE, $game->course); if ($courseusers = get_course_users( $game->course)) { foreach ($courseusers as $courseuser) { $users[$courseuser->id] = fullname($courseuser, has_capability('moodle/site:viewfullnames', $context)); } } if ($guest = get_guest()) { $users[$guest->id] = fullname($guest); } $userid = optional_param('userid',$USER->id,PARAM_INT); ?> gamekind == 'bookquiz' and $existsbook){ showanswers_bookquiz( $game); return; } switch( $game->sourcemodule){ case 'question': showanswers_question( $game); break; case 'glossary': showanswers_glossary( $game); break; case 'quiz': showanswers_quiz( $game); break; } } function showanswers_appendselect( $game) { switch( $game->gamekind){ case 'hangman': case 'cross': case 'crypto': return " AND qtype='shortanswer'"; case 'millionaire': return " AND qtype = 'multichoice'"; case 'sudoku': case 'bookquiz': case 'snakes': return " AND qtype in ('shortanswer', 'truefalse', 'multichoice')"; } return ''; } function showanswers_question( $game) { if( $game->gamekind != 'bookquiz'){ $select = ' category='.$game->questioncategoryid; if( $game->subcategories){ $cats = question_categorylist( $game->questioncategoryid); if( strpos( $cats, ',') > 0){ $select = ' category in ('.$cats.')'; } } }else { $select = ''; $recs = get_records_select( 'question_categories', '', '', '*', 0, 1); foreach( $recs as $rec){ if( array_key_exists( 'course', $rec)){ $select = "course=$game->course"; }else{ $context = get_context_instance(50, $game->course); $select = "contextid in ($context->id)"; } break; } $select2 = ''; if( $recs = get_records_select( 'question_categories', $select, 'id,id')){ foreach( $recs as $rec){ $select2 .= ','.$rec->id; } } $select = ' category IN ('.substr( $select2, 1).')'; } $select .= ' AND hidden = 0 '; $select .= showanswers_appendselect( $game); $showcategories = ($game->gamekind == 'bookquiz'); $order = ($showcategories ? 'category,questiontext' : 'questiontext'); showanswers_question_select( $game, 'question q', $select, '*', $order, $showcategories, $game->course); } function showanswers_quiz( $game) { global $CFG; $select = "quiz='$game->quizid' ". " AND qzi.question=q.id". " AND q.hidden=0". showanswers_appendselect( $game); $table = "question q,{$CFG->prefix}quiz_question_instances qzi"; showanswers_question_select( $game, $table, $select, "q.*", 'category,questiontext', false, $game->course); } function showanswers_question_select( $game, $table, $select, $fields='*', $order='questiontext', $showcategoryname=false, $courseid=0) { global $CFG; if( ($questions = get_records_select( $table, $select, $order, $fields)) === false){ return; } $table .= ",{$CFG->prefix}game_repetitions gr"; $select .= " AND gr.questionid=q.id AND gr.glossaryentryid=0 AND gr.gameid=".$game->id; $userid = optional_param('userid',0,PARAM_INT); if( $userid) $select .= " AND gr.userid=$userid"; $sql = "SELECT q.id as id,SUM(repetitions) as c FROM {$CFG->prefix}$table WHERE $select GROUP BY q.id"; $reps = get_records_sql( $sql); $categorynames = array(); if( $showcategoryname){ $select = ''; $recs = get_records_select( 'question_categories', '', '', '*', 0, 1); foreach( $recs as $rec){ if( array_key_exists( 'course', $rec)){ $select = "course=$courseid"; }else{ $context = get_context_instance(50, $courseid); $select = " contextid in ($context->id)"; } break; } if( ($categories = get_records_select( 'question_categories', $select, '', 'id,name'))){ foreach( $categories as $rec){ $categorynames[ $rec->id] = $rec->name; } } } echo ''; echo ''; if( $showcategoryname){ echo ''; } echo ''; echo ''; echo ''; if( $reps) echo ''; echo "\r\n"; $line = 0; foreach( $questions as $question){ echo ''; echo ''; if( $showcategoryname){ echo ''; } echo ''; switch( $question->qtype){ case 'shortanswer': $recs = get_records_select( 'question_answers', "question=$question->id", 'fraction DESC', 'id,answer,feedback'); if( $recs == false){ $rec = false; }else{ foreach( $recs as $rec) break; } echo ""; if( $rec->feedback == '') $rec->feedback = ' '; echo ""; break; case 'multichoice': case 'truefalse': $recs = get_records_select( 'question_answers', "question=$question->id"); $feedback = ''; echo ''; if( $feedback == '') $feedback = ' '; echo ""; break; default: echo ""; if( $feedback == '') $feedback = ' '; echo ""; break; } //Show repetitions if( $reps){ if( array_key_exists( $question->id, $reps)){ $rep = $reps[ $question->id]; echo ''; }else echo ''; } echo "\r\n"; } echo "

	'.get_string( 'categories', 'quiz').'	'.get_string( 'questions', 'quiz').'	'.get_string( 'answers', 'quiz').'	'.get_string( 'feedbacks', 'game').'	'.get_string( 'repetitions', 'game').'
'.(++$line); echo '	'; if( array_key_exists( $question->category, $categorynames)){ echo $categorynames[ $question->category]; }else{ echo ' '; } echo '	'; echo "wwwroot/question/question.php?inpopup=1&id=$question->id&courseid=$courseid\" target=\"_blank\">wwwroot/pix/t/edit.gif\" alt=\"Edit\" /> "; echo $question->questiontext.'	$rec->answer	$rec->feedback	'; $i = 0; foreach( $recs as $rec){ if( $i++ > 0) echo ' '; if( $rec->fraction == 1){ echo " $rec->answer"; if( $rec->feedback == '') $feedback .= ' '; else $feedback .= "$rec->feedback "; }else { echo " $rec->answer"; if( $rec->feedback == '') $feedback .= ' '; else $feedback .= " "; } } echo '	$feedback	$question->qtype	$feedback	'.$rep->c.'

\r\n\r\n"; } function showanswers_glossary( $game) { global $CFG; $table = 'glossary_entries ge'; $select = "glossaryid={$game->glossaryid}"; if( $game->glossarycategoryid){ $select .= " AND gec.entryid = ge.id ". " AND gec.categoryid = {$game->glossarycategoryid}"; $table .= ",{$CFG->prefix}glossary_entries_categories gec"; } if( ($questions = get_records_select( $table, $select, 'definition', "ge.id,definition,concept")) === false){ return; } //Show repetiotions of questions $table = "glossary_entries ge, {$CFG->prefix}game_repetitions gr"; $select = "glossaryid={$game->glossaryid} AND gr.glossaryentryid=ge.id AND gr.gameid=".$game->id; $userid = optional_param('userid',0,PARAM_INT); if( $userid) $select .= " AND gr.userid=$userid"; if( $game->glossarycategoryid){ $select .= " AND gec.entryid = ge.id ". " AND gec.categoryid = {$game->glossarycategoryid}"; $table .= ",{$CFG->prefix}glossary_entries_categories gec"; } $sql = "SELECT ge.id,SUM(repetitions) as c FROM {$CFG->prefix}$table WHERE $select GROUP BY ge.id"; $reps = get_records_sql( $sql); echo ''; echo ''; echo ''; echo ''; if( $reps != false) echo ''; echo "\r\n"; $line = 0; foreach( $questions as $question){ echo ''; echo ''; echo ''; echo ''; if( $reps != false){ if( array_key_exists( $question->id, $reps)) { $rep = $reps[ $question->id]; echo ''; }else echo ''; } echo "\r\n"; } echo "

	'.get_string( 'questions', 'quiz').'	'.get_string( 'answers', 'quiz').'	'.get_string( 'repetitions', 'game').'
'.(++$line); echo '	'.$question->definition.'	'.$question->concept.'	'.$rep->c.'

\r\n\r\n"; } function showanswers_bookquiz( $game) { global $CFG; $select = "{$CFG->prefix}game_bookquiz_questions.questioncategoryid={$CFG->prefix}question.category ". " AND {$CFG->prefix}game_bookquiz_questions.bookid = $game->bookid". " AND {$CFG->prefix}book_chapters.id = {$CFG->prefix}game_bookquiz_questions.chapterid"; $table = "question,{$CFG->prefix}game_bookquiz_questions,{$CFG->prefix}book_chapters"; showanswers_question_select( $game, $table, $select, "{$CFG->prefix}question.*", "{$CFG->prefix}book_chapters.pagenum,questiontext"); }