summaryrefslogtreecommitdiff
path: root/texmf-dist/tex/latex/acrotex/usemcfi.def
blob: e202ed0b449faef7029406a44f5a8d26ea674e0a (plain)
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
%%
%% This is file `usemcfi.def',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% exerquiz.dtx  (with options: `copyright,mcfi')
%% 
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% Exerquiz.sty package,                                %%
%% Copyright (C) 1999-2021  D. P. Story                 %%
%%   dpstory@uakron.edu                                 %%
%%                                                      %%
%% This program can redistributed and/or modified under %%
%% the terms of the LaTeX Project Public License        %%
%% Distributed from CTAN archives in directory          %%
%% macros/latex/base/lppl.txt; either version 1 of the  %%
%% License, or (at your option) any later version.      %%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def\bMCFI{\withinMCFItrue
  \ifx\qRadionActionsHook\@empty
    \let\qRadionActionsHook@SAVE\@empty
    \def\qRadionActionsHook{\jsR
    qRadioButtonMCFI(\Ans@choice,"\currQuiz",\thequestionno);}\else
    \let\qRadionActionsHook@SAVE\qRadionActionsHook
    \def\qRadionActionsHook{\qRadionActionsHook@SAVE\jsR
    qRadioButtonMCFI(\Ans@choice,"\currQuiz",\thequestionno);}\fi
  \ifx\every@RespBoxMath\@empty
    \let\every@RespBoxMath@SAVE\@empty
    \def\every@RespBoxMath{%
    \AddAAKeystroke{mcfiKeyStroke("\currQuiz",\thequestionno);}}%
  \else
    \let\every@RespBoxMath@SAVE\every@RespBoxMath
    \expandafter\def\expandafter\every@RespBoxMath\expandafter
    {\every@RespBoxMath@SAVE
    \AddAAKeystroke{mcfiKeyStroke("\currQuiz",\thequestionno);}}%
  \fi
}
\def\eMCFI{%
  \ifx\qRadionActionsHook@SAVE\@empty
    \let\qRadionActionsHook\@empty\else
    \let\qRadionActionsHook\qRadionActionsHook@SAVE\fi
  \ifx\every@RespBoxMath@SAVE\@empty
    \let\every@RespBoxMath\@empty\else
    \let\every@RespBoxMath\every@RespBoxMath@SAVE\fi
  \withinMCFIfalse
}
\def\eqNA{-43252452452}
\@ifundefined{text}{\let\MCFIMarkup@BOX\mbox}{\let\MCFIMarkup@BOX\text}
\newcommand\mcfiMarkupfmt{\cgBdry
  ${}^{\MCFIMarkup@BOX{\aeb@creditmarkup}}$}
\def\mcfiMarkup{\addtocounter{questionno}{-1}\mcfiMarkupfmt
  \stepcounter{questionno}}
\newcommand{\clickChkBxMCFI}{"Click the check box preceding this
    math input field to enter text."}
\begin{insDLJS}{mcf}{Eq: Supports MCFI-type questions}
function mcfiKeyStroke(qname,n) {
    if (event.change=="") return;
    var qNumMC=--n;
    var mcName="mc."+qname+"."+qNumMC;
    var mc= this.getField(mcName);
    var aExpVs=mc.exportValues;
    var l=aExpVs.length-1;
    if (!mc.isBoxChecked(l)) {
        eqAppAlert(\clickChkBxMCFI,3);
        event.rc=false;
    }
}
function qRadioButtonMCFI(key,qname,n) {
    var fname = "obj."+qname+"."+(n+1);
    if ( key == 0) this.resetForm(fname);
}
\end{insDLJS}
\endinput
%%
%% End of file `usemcfi.def'.