texlive[51205] Master/texmf-dist: alterqcm (23may19)

commits+karl at tug.org commits+karl at tug.org
Thu May 23 22:58:10 CEST 2019


Revision: 51205
          http://tug.org/svn/texlive?view=revision&revision=51205
Author:   karl
Date:     2019-05-23 22:58:10 +0200 (Thu, 23 May 2019)
Log Message:
-----------
alterqcm (23may19)

Modified Paths:
--------------
    trunk/Master/texmf-dist/doc/latex/alterqcm/README
    trunk/Master/texmf-dist/tex/latex/alterqcm/alterqcm.sty

Added Paths:
-----------
    trunk/Master/texmf-dist/doc/latex/alterqcm/examples/latex/example_3.tex
    trunk/Master/texmf-dist/doc/latex/alterqcm/examples/pdf/example_3.pdf

Modified: trunk/Master/texmf-dist/doc/latex/alterqcm/README
===================================================================
--- trunk/Master/texmf-dist/doc/latex/alterqcm/README	2019-05-23 20:56:57 UTC (rev 51204)
+++ trunk/Master/texmf-dist/doc/latex/alterqcm/README	2019-05-23 20:58:10 UTC (rev 51205)
@@ -1,4 +1,4 @@
-Contents of the README file   (v 3.7 c)
+Contents of the README file   (v 4.0)
 
 A. Purpose
 
@@ -48,11 +48,16 @@
 
 F. History 
 
+-- 4.0 Added full linguistic support  
+
 -- 3.7 Correction of bug 
        add the macro \AQpoints
 
-G. The author of the 'alterqcm.sty' package is Alain Matthes.
+G. The original author of the 'alterqcm.sty' package is Alain Matthes. This
+    version was developed by Apostolos Syropoulos and Anastasios Dimou.
 --
 Alain Matthes, <al.ma at mac.com>
-April, 20th, 2009 
+Apostolos Syropoulos, <asyropoulos at yahoo.com>
+Anastastios Dimou, <ansdimou at tassosdimou.gr>
+May, 23rd, 2019 
 

Added: trunk/Master/texmf-dist/doc/latex/alterqcm/examples/latex/example_3.tex
===================================================================
--- trunk/Master/texmf-dist/doc/latex/alterqcm/examples/latex/example_3.tex	                        (rev 0)
+++ trunk/Master/texmf-dist/doc/latex/alterqcm/examples/latex/example_3.tex	2019-05-23 20:58:10 UTC (rev 51205)
@@ -0,0 +1,64 @@
+\documentclass[11pt]{article}
+\usepackage{xltxtra}
+\usepackage{xgreek}
+\usepackage{amsmath,amssymb,stmaryrd,calc}%}% pour geqslant qui existe ds fourier
+\usepackage{xkeyval}
+\usepackage{multirow,longtable}
+\usepackage[%
+      a4paper,%
+      textwidth=16cm,
+      top=2cm,%
+      bottom=2cm,%
+      headheight=25pt,%
+      headsep=12pt,%
+      footskip=25pt]{geometry}%
+\usepackage[greek]{alterqcm}
+\usepackage{tikz}
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\parindent=0pt
+\begin{document}
+\setmainfont[Mapping=tex-text,Ligatures=Common]{Minion Pro}
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%\nogreekalph 
+\begin{minipage}[t][][b]{.45\linewidth}
+	Έστω $f$ ορισμένη και παραγωγίσιμη στο διάστημα $\big[-3,\,+\infty\big)$,
+	αύξουσα στα διαστήματα $\big[-3,\,-1\big]$ et $\big[2,\,+\infty\big)$
+	και φθίνουσα στο διάστημα $\big[-1,\,2\big]$.
+Έστω $f^{\prime}$ η παράγωγός της στο διάστημα $[-3,\,+\infty)$.
+	Η γραφική παράσταση $\Gamma$ της $f$ είναι σχεδιασμένη στο διπλανό σχήμα ως προς ένα ορθογώνιο σύστημα αξόνων $\big(O,~\vec{\imath},~\vec{\jmath}\big)$.
+	Διέρχεται από το σημείο A$(-3,\,0)$ και δέχεται ως ασύμπτωτη της ευθεία
+	$(\delta)$ με εξίσωση $y = 2x -5$.
+\end{minipage}
+\begin{minipage}[t][][b]{.45\linewidth}
+	\null
+	\begin{tikzpicture}[scale=0.5,>=latex]
+	\draw[very thin,color=gray] (-3,-2) grid (10,8);
+	\draw[->] (-3,0) -- (10,0) node[above left] {\small $x$};
+	\foreach \x in {-3,-2,-1,1,2,...,9}
+	\draw[shift={(\x,0)}] (0pt,1pt) -- (0pt,-1pt)node[below] { $\x$};
+	\draw[->] (0,-2) -- (0,8) node[below right] {\small $y$};
+	\foreach \y/\ytext in {-2,-1,1,2,...,8}
+	\draw[shift={(0,\y)}] (1pt,0pt) -- (-1pt,0pt) node[left] { $\y$};
+	\draw (-0.5,-2) -- (10,8);
+	\node[above right] at (-3,0) {\textbf{A}};
+	\node[above right] at (0,0) {\textbf{O}};
+	\node[below right] at (4,3) {$\mathbf{\Delta}$};
+	\node[above right] at (4,5) {$\mathbf{\Gamma}$};
+	\draw plot[smooth] coordinates{%
+		(-3,0)(-2,4.5)(-1,6.5)(0,5.5)(1,3.5)(2,3)(3,3.4)(4,4.5)(5,6)(6,7.75)};
+	\end{tikzpicture}
+\end{minipage}
+
+\vspace{20pt}
+\begin{alterqcm}[VF,pre=true,lq=125mm]
+	\AQquestion{Για κάθε $x \in (-\infty,\,2],\;f^{\prime}(x) \geqslant 0$.}
+	\AQquestion{Η συνάρτηση $F$ παρουσιάζει μέγιστο στο $2$}
+	\AQquestion{$\displaystyle\int_{0}^2 f’(x)\:\text{d}x = - 2$}
+\end{alterqcm}
+%\greekalph    %%% <----------------------------------------------
+
+\end{document}


Property changes on: trunk/Master/texmf-dist/doc/latex/alterqcm/examples/latex/example_3.tex
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: trunk/Master/texmf-dist/doc/latex/alterqcm/examples/pdf/example_3.pdf
===================================================================
(Binary files differ)

Index: trunk/Master/texmf-dist/doc/latex/alterqcm/examples/pdf/example_3.pdf
===================================================================
--- trunk/Master/texmf-dist/doc/latex/alterqcm/examples/pdf/example_3.pdf	2019-05-23 20:56:57 UTC (rev 51204)
+++ trunk/Master/texmf-dist/doc/latex/alterqcm/examples/pdf/example_3.pdf	2019-05-23 20:58:10 UTC (rev 51205)

Property changes on: trunk/Master/texmf-dist/doc/latex/alterqcm/examples/pdf/example_3.pdf
___________________________________________________________________
Added: svn:mime-type
## -0,0 +1 ##
+application/pdf
\ No newline at end of property
Modified: trunk/Master/texmf-dist/tex/latex/alterqcm/alterqcm.sty
===================================================================
--- trunk/Master/texmf-dist/tex/latex/alterqcm/alterqcm.sty	2019-05-23 20:56:57 UTC (rev 51204)
+++ trunk/Master/texmf-dist/tex/latex/alterqcm/alterqcm.sty	2019-05-23 20:58:10 UTC (rev 51205)
@@ -1,5 +1,5 @@
+% Copyright (C) 2019 Alain Matthes, Apostolos Syropoulos, and Anastasios Dimou
 % Copyright (C) 2009 Alain Matthes  
-%
 % This file may be distributed and/or modified
 %
 % 1. under the LaTeX Project Public License , either version 1.3
@@ -26,26 +26,32 @@
 
 %<–––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––>
 \NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{alterqcm}
-  [2011/06/01 v3.6 qcm creation]
+\ProvidesPackage{alterqcm}[2019/05/23 v4.0]
+  \newcount\locall at ng% to set language specific strings:
+%                    % 0 stands for French, 1 for English, 2 for German, and 3 for Greek 
+  \locall at ng=0%
   \DeclareOption{french}{%
-  \def\aqlanguage{french}%
   \def\aqlabelforquest{Questions}%
   \def\aqlabelforrep{R\'eponses}%
   \def\aqfoottext{suite sur la page suivante\ldots}}%
   \DeclareOption{english}{%
-  \def\aqlanguage{english}
+  \locall at ng=1%
   \def\aqlabelforquest{Questions}
   \def\aqlabelforrep{Answers}
   \def\aqfoottext{Continued on the next page\ldots}}%
   \DeclareOption{german}{%
-  \def\aqlanguage{german}%
+  \locall at ng=2%
   \def\aqlabelforquest{Fragen}%
   \def\aqlabelforrep{Antworten}%
   \def\aqfoottext{Fortsetzung nächste Seite\ldots}}%
+  \DeclareOption{greek}{%
+  \locall at ng=3%
+  \def\aqlabelforquest{Ερωτήσεις}
+  \def\aqlabelforrep{Απαντήσεις}
+  \def\aqfoottext{Συνεχίζεται στην επόμενη σελίδα\ldots}}%
 \ExecuteOptions{french}
 \ProcessOptions\relax
-\RequirePackage{xkeyval}[2005/11/25]
+%\RequirePackage{xkeyval}[2005/11/25] % Not required anymore
 \RequirePackage{calc}
 \RequirePackage{ifthen}
 \RequirePackage{array}
@@ -135,11 +141,7 @@
 %                         Début Code QCM
 %<–––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––>
 
-\define at choicekey*[AQ]{global}{language}[\val\nr]{french,
-                                                  english,
-                                                  german}{%
-\edef\AQ at global@language{\nr}
-\ifcase\nr\relax
+\ifcase\locall at ng
 \def\cmdAQ at global@tone{Questions}
 \def\cmdAQ at global@ttwo{R\'eponses}
 \def\aqfoottext{suite sur la page suivante\ldots}   
@@ -151,8 +153,11 @@
 \def\cmdAQ at global@tone{Fragen}
 \def\cmdAQ at global@ttwo{Antworten}
 \def\aqfoottext{Fortsetzung nächste Seite\ldots} 
+\or
+\def\cmdAQ at global@tone{Ερωτήσεις}
+\def\cmdAQ at global@ttwo{Απαντήσεις}
+\def\aqfoottext{Συνεχίζεται στην επόμενη σελίδα\ldots} 
 \fi%
-}
 \define at cmdkey  [AQ] {global} {lq}{}
 \define at cmdkey  [AQ] {global} {pq}{}
 \define at cmdkey  [AQ] {global} {points}{}
@@ -206,13 +211,26 @@
                                alea        = false}{}
 \define at cmdkey[AQ]{local}{pq}{}
 \define at cmdkey[AQ]{local}{br}{}
-\presetkeys[AQ]{local}{br=1,pq= \cmdAQ at global@pq}{}%
+\presetkeys[AQ]{local}{br=5,pq= \cmdAQ at global@pq}{}%
+%
+\ifcase\locall at ng
 \newcommand{\aq at pre}{Pour chacune des questions ci-dessous, une seule des r\'eponses propos\'ees est exacte. Vous devez  cocher la r\'eponse exacte sans justification.
 Une bonne r\'eponse rapporte \textbf{\cmdAQ at global@bonus\ point}. Une mauvaise r\'eponse enl\`eve \textbf{\cmdAQ at global@malus\ point}.  L'absence de r\'eponse ne rapporte ni n'enl\`eve aucun point. Si le total des points est n\'egatif, la note globale attribu\'ee \`a l'exercice est \textbf{0}.}%
-
+%
 \newcommand{\aq at preVF}{Pour chacune des affirmations ci-dessous, cocher la case V (l'affirmation est vraie) ou la case F (l'affirmation est fausse) sur l'ANNEXE, \`a rendre avec la copie. Les r\'eponses ne seront pas justifi\'ees.
 Une bonne r\'eponse rapporte \textbf{\cmdAQ at global@bonus\ point}. Une mauvaise r\'eponse enl\`eve \textbf{\cmdAQ at global@malus\ point}.  L'absence de r\'eponse ne rapporte ni n'enl\`eve aucun point. Si le total des points est n\'egatif, la note globale attribu\'ee \`a l'exercice est \textbf{0}.}%
-
+\or
+\newcommand{\aq at pre}{For each of the questions below, only one of the proposed answers is true. You must choose the right answer without justification.}%
+\newcommand{\aq at preVF}{For each of the statements below, check the \textbf{T} box (the statement is true) or the \textbf{F} box (the statement is false).}%
+\or
+\newcommand{\aq at pre}{Für jede der unterstehenden Fragen ist nur eine der vorgeschlagenen Antworten richtig. 
+Kreuzen Sie die richtige Antwort ohne Begründung an.}%
+\newcommand{\aq at preVF}{Für jede der unterstehenden Aussagen kreuzen Sie  R (für die richtige Aussage) und F (für die falsche Aussage) an.}%
+\or
+\newcommand{\aq at pre}{Από τις επόμενες προτάσεις επιλέξετε αυτήν, που θεωρείτε σωστή.}%
+\newcommand{\aq at preVF}{Να επιλέξετε \textbf{Σ}(ωστό), αν θεωρείτε την πρόταση που δίνεται παρακάτω σωστή, ή \textbf{Λ}(άθος) αν την θεωρείτε λανθασμένη.}%
+\fi
+%
 \newcommand*{\AQms}{\aq at ms}%
 \def\aq at ms(#1,#2){\vrule height #1pt depth #2pt width 0pt}
 \newcommand*{\altersquare}{\vbox{\hrule\hbox to 6pt{\vrule height 5.2pt \hfil\vrule}\hrule}}%
@@ -404,8 +422,19 @@
 \setkeys[AQ]{local}{#1}
 \stepcounter{AQ at numquestion}% 
 \setcounter{AQ at numprop}{0}% v0.93 
+\ifcase\locall at ng
 \protected at xdef\aq at arga{\textbf{V}}
 \protected at xdef\aq at argb{\textbf{F}}
+\or
+\protected at xdef\aq at arga{\textbf{T}}
+\protected at xdef\aq at argb{\textbf{F}}
+\or
+\protected at xdef\aq at arga{\textbf{R}}
+\protected at xdef\aq at argb{\textbf{F}}
+\or
+\protected at xdef\aq at arga{\textbf{Σ}}
+\protected at xdef\aq at argb{\textbf{Λ}}
+\fi
 \setcounter{aq at numb}{2}%
 \aq at adjust{#2}%
 \multirow{3}{\cmdAQ at global@lq}[\cmdAQ at local@pq]{%



More information about the tex-live-commits mailing list