% \iffalse
% makeindex -s gglo.ist -o aeb_dad.gls aeb_dad.glo
% makeindex -s gind.ist -o aeb_dad.ind aeb_dad.idx
%<*copyright>
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% aeb_dad package %%
%% Copyright (C) 2012--2016 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. %%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%</copyright>
%<package>\NeedsTeXFormat{LaTeX2e}
%<package>\ProvidesPackage{aeb_dad}
%<package> [2016/10/26 v1.2b Drag and drop stamps matching game (dps)]
%<*driver>
\documentclass{ltxdoc}
\usepackage[colorlinks,hyperindex=false]{hyperref}[2012/10/12] % to support calculate for pdfyrc
\pdfstringdefDisableCommands{\let\\\textbackslash}
\OnlyDescription
\EnableCrossrefs
\CodelineIndex
\RecordChanges
\def\ltag{<}\def\rtag{>}
\InputIfFileExists{aebdocfmt.def}{\PackageInfo{aeb_dad}{Inputting aebdocfmt.def}}
{\def\IndexOpt{\DescribeMacro}\def\IndexKey{\DescribeMacro} \let\setupFullwidth\relax
\PackageInfo{aeb_dad}{aebdocfmt.def cannot be found}}
\begin{document}
\GetFileInfo{aeb_dad.sty}
\title{\textsf{aeb\_dad}: Drag and drop stamps in a game or learning setting}
\author{D. P. Story\\
Email: \texttt{dpstory@uakron.edu}}
\date{processed \today}
\maketitle
\tableofcontents
\let\Email\texttt
\DocInput{aeb_dad.dtx}
\IfFileExists{\jobname.ind}{\newpage\setupFullwidth\PrintIndex}{\paragraph*{Index} The index goes here.\\Execute
\texttt{makeindex -s gind.ist -o aeb\_dad.ind aeb\_dad.idx} on the command line and recompile
\texttt{aeb\_dad.dtx}.}
\IfFileExists{\jobname.gls}{\PrintChanges}{\paragraph*{Change History} The list of changes goes here.\\Execute
\texttt{makeindex -s gglo.ist -o aeb\_dad.gls aeb\_dad.glo} on the command line and recompile
\texttt{aeb\_dad.dtx}.}
\end{document}
%</driver>
% \fi
%
% \MakeShortVerb{|}
% \InputIfFileExists{aebdonotindex.def}{\PackageInfo{aeb_dad}{Inputting aebdonotindex.def}}
% {\PackageInfo{aeb_dad}{aebdonotindex.def cannot be found}}
%
% \begin{macrocode}
%<*package>
% \end{macrocode}
%
% \paragraph*{Description.}
% The \textsf{aeb\_dad} package consists of {\LaTeX} commands and JavaScript for creating a
% \underbar{d}rag \underbar{a}nd \underbar{d}rop ``game'' of matching. The
% user drags and drops an icon image and drops it into a target region (a
% push button), then clicks on the button. If the placement is correct, the
% image centers itself in the target region and the border changes color.
% If the user drops the image in the wrong region, the icon is returned to
% its initial position. In each case an alert message appears and announces
% ``Right'' or ``Wrong''.
%
% Generally, \textsf{AA} and \textsf{AR} do not support drag and
% drop. In version 11 (XI) of \textsf{AR}, you can move a stamp around on a page.
% This opens a number of possibilities. \textsf{aeb\_dad} uses a (rubber)
% stamp as the icons that can be move around in \textsf{ARXI} (and
% \textsf{AAXI}). You cannot attach JS to a stamp, however, that is why the
% target of the drop is a push button. The user drops the stamp on a target
% and presses the underlying button. The JS associated with the button then
% determines whether the stamp that is within its bounding rectangle is the
% correct one.
%
% \paragraph*{Documentation and Code.}\strut\par\medskip\noindent
% The \textsf{eforms} package is also required, but it is not listed here. Include
% \textsf{eforms} prior to this package. The \textsf{web} package is encourage, but
% not required.
% \begin{macrocode}
\RequirePackage{annot_pro}[2012/11/10]
\RequirePackage{xkeyval}
\RequirePackage{calc}
\RequirePackage{refcount}
\newcounter{aebdadcnt}
\edef\dad@subCat{\the\catcode`\_}
\def\dd@csarg#1#2{\expandafter#1\csname#2\endcsname}
\@makeother\_
% \end{macrocode}
% \DescribeMacro{\ddDimens} is a macro to set the dimensions of
% the stamp icons and the push buttons.
% \begin{macrocode}
\newcommand{\ddDimens}[1]{\setkeys{ddm}{#1}}
% \end{macrocode}
% The width of the icon stamp. (Height appropriately scaled)
% \begin{macrocode}
\define@key{ddm}{iconwidthTo}[]{{%
\def\ddm@argi{#1}\ifx\ddm@argi\@empty
\global\let\ddm@iconwidthTo\@empty
\else
\setlength{\dimen@}{#1}%
\xdef\ddm@iconwidthTo{\the\dimen@}%
\fi
}}
\define@key{ddm}{iconwidth}[\defaultStampWidth]{{%
\setlength{\dimen@}{#1}%
\xdef\ddm@iconwidth{\the\dimen@}%
}}
\define@key{ddm}{iconheight}[\defaultStampHeight]{{%
\setlength{\dimen@}{#1}%
\xdef\ddm@iconheight{\the\dimen@}%
}}
% \end{macrocode}
% The width of the target button.
% \begin{macrocode}
\define@key{ddm}{targetwidth}{{%
\setlength{\dimen@}{#1}%
\xdef\ddm@targetwidth{\the\dimen@}%
}}
% \end{macrocode}
% The height of the target button.
% \begin{macrocode}
\define@key{ddm}{targetheight}{{%
\setlength{\dimen@}{#1}%
\xdef\ddm@targetheight{\the\dimen@}%
}}
% \end{macrocode}
% We set some reasonable defaults for \cs{ddDimens}.
% \begin{macrocode}
\ddDimens{iconwidth,iconheight,iconwidthTo,%
targetwidth=1.25in,targetheight=1.25in}
% \end{macrocode}
% \DescribeMacro{\ddGameIcon} is a convenience command for placing
% the icon stamps. The one required argument is the name associated
% with the stamp.
% \begin{macrocode}
\newcommand{\ddGameIcon}[1]{%
\expandafter\if\csname\thisDDNAME-init\endcsname0\relax
\refstepcounter{aebdadcnt}\phantomsection
\edef\@currentlabelname{Beginning of DAD Game: \thisDDNAME}%
\label{aebdadcnt\theaebdadcnt}%
\dd@EmitPageAction
\global\dd@csarg\let{\thisDDNAME-init}=1\relax
\fi
\ifx\ddm@iconwidthTo\@empty
\def\ddGameIconArgs{type=stamp,name=\##1,%
width=\ddm@iconwidth,%
height=\ddm@iconheight}%
\else
\def\ddGameIconArgs{type=stamp,name=\##1,%
width=\ddm@iconwidth,%
height=\ddm@iconheight,
widthTo=\ddm@iconwidthTo}%
\fi
% \end{macrocode}
% Finally we use \cs{annotpro} to create the stamp.
% \begin{macrocode}
\expandafter\annotpro\expandafter[\ddGameIconArgs]{}%
}
% \end{macrocode}
% \DescribeMacro{\ddBtnAppr} is the preset button appearance for the
% target buttons.
% \begin{macrocode}
\newcommand{\ddBtnAppr}{\S{S}\BG{}
\AA{\AAMouseEnter{%
\JS{btnMouseUpAction(event,this.pageNum,"\thisDDNAME");}}}%
}
% \end{macrocode}
% \DescribeMacro{\ddTargetOfIcon} is a convenience command for placing
% a push button. The two are arguments, the first is the name of the stamp
% associated with this target, the second is the caption that is to go beneath
% the button.
% \begin{macrocode}
\newcommand{\ddTargetOfIcon}[2]{%
\expandafter\if\csname\thisDDNAME-init\endcsname0\relax
\refstepcounter{aebdadcnt}\phantomsection
\edef\@currentlabelname{Beginning of DAD Game: \thisDDNAME}%
\label{aebdadcnt\theaebdadcnt}%
\dd@EmitPageAction
\global\dd@csarg\let{\thisDDNAME-init}=1\relax
\fi
\parbox[t]{\ddm@targetwidth}
{\kern0pt\pushButton[\presets{\ddBtnAppr}
]{\thisDDNAME @\##1}{\ddm@targetwidth}{\ddm@targetheight}%
\ddTargetCaption{#2}}%
}
\newcommand{\ddTargetFmt}[1]{\def\ddm@targetfmt{#1}}
\ddTargetFmt{}
\newcommand{\ddTargetCaption}[1]{\\[3pt]%
\parbox[t]{\linewidth}{\centering\ddm@targetfmt#1}}
% \end{macrocode}
% \paragraph*{Page and Document JavaScript}\strut\par\medskip\noindent
% As of this writing, only one drag and drop stamp game per page. The
% \DescribeMacro{\initDDGame}\cs{initDDGame} macro should appear on that page.
% \begin{macrocode}
\newcommand{\thisDDName}[1]{%
\setAnnotOptions{subject={#1}}%
\gdef\thisDDNAME{#1}%
}
\newcount\dd@GameCnt \dd@GameCnt=0
\newcommand{\initDDGame}[1]{\thisDDName{#1}%
\global\advance\dd@GameCnt1\relax
\global\dd@csarg\let{#1-init}0\relax
}
% \end{macrocode}
% \changes{v1.2b}{2016/10/26}{Removed \string\cs{thisPageAction} in favor of a push button action}
% Removed \cs{thisPageAction} in favor of a page open action of a push button. This is to
% cover the case where the begins on the first page.
% \begin{macrocode}
\def\dd@EmitPageAction{%
\@ifundefined{ddEmitOnPage\getpagerefnumber{aebdadcnt\theaebdadcnt}}
{\global\dd@csarg
\let{ddEmitOnPage\getpagerefnumber{aebdadcnt\theaebdadcnt}}\@empty
\pushButton[\F{\FHidden}\BG{}\BC{}\S{S}
\AApageopen{ddPageOpen(this.pageNum);}
]{btnEmitPA-\theaebdadcnt}{0bp}{0bp}%
}{}%
}
% \end{macrocode}
% \DescribeMacro{\ddReset} is the reset button for the drag and drop matching game.
%
% It is recommended that the reset button be between the icons and the
% target buttons. The game executes a \texttt{Field.setFocus()} method to take the focus
% off of the stamps when they are dropped. The focus goes on the reset button.
% If the reset button is out of the user's sight, AA or AR will scroll the page
% to place the reset button in the (middle of the) viewing area
% \begin{macrocode}
\newcommand{\ddReset}[1][]{\def\dd@arg{#1}%
\ifx\dd@arg\@empty\else\thisDDName{#1}\fi
\mbox{\makebox[0pt][l]{%
\pushButton[\W0\BC{}\BG{}\S{S}]{ddHReset\thisDDNAME}{0bp}{0bp}}%
\pushButton[\CA{Reset}\A{\JS{%
resetDDM(this.pageNum,"\thisDDNAME");}}
\AA{\AAOnFocus{\JS{%
this.getField("ddHReset\thisDDNAME").setFocus();
}}}]{ddReset\thisDDNAME}{}{11bp}}%
}
% \end{macrocode}
% Open action, to warn user that XI is required for reader.
% \begin{macrocode}
\OpenAction{\JS{ddOpenDocAction();}}
% \end{macrocode}
% \paragraph*{Document JavaScript.}
% The JavaScript function called by the target push buttons.
% \begin{macrocode}
\newcommand{\ddRightMsg}{"Right!"}
\newcommand{\ddWrongMsg}{"Wrong!"}
\newcommand{\ddDragOnlyOne}{"Drag one icon at a time"}
\newcommand{\ddExternalMsg}{"Drag and Drop of icons does not work "
+ "in a browser. Save this file to your computer and view it in "
+ "Adobe Reader XI or later, or in the Acrobat application."}
\newcommand{\ddBadAppMsg}{"Any version of Adobe Acrobat, "
+"or Adobe Reader XI is required!"}
% \end{macrocode}
% \cmd\ddTrueName\DescribeMacro{\ddTrueName} is a convenience command for referencing
% the \texttt{ddTrueName} JavaScript function, defined below. There must be no spurious spaces
% in the argument of \cs{ddTrueNaqme}. The first argument is the name of the DD Game as set in the document
% by \cs{initDDGame}; the second argument is a name of a stamp (excluding \texttt{\#}).
% \changes{v1.2}{2016/08/22}{Added \string\cs{ddTrueName}}
% \begin{macrocode}
\def\ddTrueName(#1,#2){ddTrueName("#1","#2")}
% \end{macrocode}
% Now for the document JavaScript.
% \begin{macrocode}
\begin{insDLJS}{dadjs}{AcroTeX Stamp Game JavaScript}
var oDADStamp=new Object();
var oDADCnt=new Object();
var aDDPageCtrl=new Array(this.numPages);
var oDADAlerts=new Object();
var ddTO;
% \end{macrocode}
% \texttt{activeStampName} holds the name of the stamp that is being moved around.
% \changes{v1.2}{2016/08/22}{Added JS variable activeStampName}
% \begin{macrocode}
var activeStampName="";
% \end{macrocode}
% \texttt{ddTrueName} is a JS function that returns the ``true'' (internal) name of the game/stamp
% combination.
% \changes{v1.2}{2016/08/22}{Added JS function ddTrueName}
% \begin{macrocode}
function ddTrueName (ddName,stampName) {
return ddName+"@#"+stampName;
}
function btnMouseUpAction(event,page,ddName)
{
var stamps;
var aBtnRect=event.target.rect;
var cBtnName=event.target.name;
var l = cBtnName.indexOf("@#");
cBtnName = cBtnName.substring(1+l);
// convert to rotated user coordinates
var mxToDefault=(new Matrix2D()).fromRotated(this,page);
var mxToRotated=mxToDefault.invert();
var aBtnRectRot=mxToRotated.transform(aBtnRect);
% \end{macrocode}
% Format for Default User Space: \texttt{[left,bottom,right,top]}
% \begin{macrocode}
var btnWidth=aBtnRect[2]-aBtnRect[0];
var btnHeight=aBtnRect[3]-aBtnRect[1];
% \end{macrocode}
% Originally, we gathered all annots on this page,
%\begin{verbatim}
% stamps=this.getAnnots(page);
%\end{verbatim}
% Now we gather the selected annots (throughout the entire document)
% \begin{macrocode}
stamps=this.selectedAnnots;
if (typeof stamps == "undefined") return;
if (stamps.length>1) {
app.alert({cMsg: \ddDragOnlyOne,
nIcon: 3, cTitle: "AcroTeX Drag and Drop"});
for (var i=0; i<stamps.length; i++) {
var index=stamps[i].subject+page;
stamps[i].rect=oDADStamp[index][stamps[i].AP][0];
stamps[i].setProps({rotate:0})
}
resetFocus("ddReset"+ddName);
this.dirty=false;
return;
}
for (var i=0; i<stamps.length; i++) {
var aStmpRect=stamps[i].rect;
var index=stamps[i].subject+page;
% \end{macrocode}
% Format for Rotated User Space: \texttt{[left,top,right,bottom]}
% \begin{macrocode}
var stmpWidth=aStmpRect[2]-aStmpRect[0];
var stmpHeight=aStmpRect[3]-aStmpRect[1];
var nHorzCenter=(aStmpRect[2]+aStmpRect[0])/2;
var nVertCenter=(aStmpRect[3]+aStmpRect[1])/2;
% \end{macrocode}
% See if the center of this stamp is in the button rect
% \begin{macrocode}
if ( (nHorzCenter >= aBtnRectRot[0] )%
&&(nHorzCenter<=aBtnRectRot[2]) ) {
if ( (nVertCenter>=aBtnRectRot[3])%
&& (nVertCenter<=aBtnRectRot[1]) ) {
% \end{macrocode}
% Now see if it is the correct one, and center the stamp inside the rectangle.
% \begin{macrocode}
if (( (cBtnName==stamps[i].AP)%
&& (stamps[i].subject==ddName))%
&& (!oDADStamp[index][stamps[i].AP][1]) ) {
% \end{macrocode}
% center stamp on button face\\
% Field: \texttt{[left,bottom,right,top]}\\
% Annot: \texttt{[left,top,right,bottom]}\\
% We get the original rectangle, and use it to calculate the width and height.
% \begin{macrocode}
activeStampName=stamps[i].AP.substring(1);
var aStmpRect=oDADStamp[index][stamps[i].AP][0];
var stmpWidth=aStmpRect[2]-aStmpRect[0];
var stmpHeight=aStmpRect[3]-aStmpRect[1];
oDADStamp[index][stamps[i].AP][1]=true;
var deltaX=(btnWidth-stmpWidth)/2;
var deltaY=(btnHeight-stmpHeight)/2;
% \end{macrocode}
% We calculate the dimensions of the centered icon. If the user rescaled the icon
% it will be locked in at its original scale.
% \begin{macrocode}
aCenterStamp=[
aBtnRectRot[0]+deltaX,
aBtnRectRot[3]-deltaY,
aBtnRectRot[0]+deltaX+stmpWidth,
aBtnRectRot[3]-deltaY-stmpHeight];
ddCorrectAction(event,ddName);
event.target.strokeColor=color.green;
% \end{macrocode}
% Correct stamp in the correct target field. We want to center the stamp, make sure
% the user did not rotate it, or resize it.
% \begin{macrocode}
stamps[i].setProps({rotate:0});
stamps[i].rect=aCenterStamp;
event.target.readonly=true;
resetFocus("ddReset"+ddName);
break;
} else {
% \end{macrocode}
% Attach the stamp name to the \texttt{stampName} property of \texttt{ddWrongAction} so we can
% conveniently reference it when using custom a wrong actions.
% \begin{macrocode}
% ddWrongAction.stampName=stamps[i].AP;
activeStampName=stamps[i].AP.substring(1);
ddWrongAction(event,ddName);
if (!oDADAlerts[ddName].oAlrtChk.bAfterValue)
ddReturnStamp(page,ddName,stamps[i]);
else {
ddReturnStamp.o=stamps[i];
ddTO=app.setTimeOut("ddReturnStamp("
+page+",\""+ddName
+"\",ddReturnStamp.o);",250);
}
break;
}
} else {
// too high or two low.
if(!oDADStamp[index][stamps[i].AP][1])
ddReturnStamp(page,ddName,stamps[i]);
}
} else {
// outside left or right of button
if(!oDADStamp[index][stamps[i].AP][1])
ddReturnStamp(page,ddName,stamps[i]);
}
}
this.dirty=false;
}
function ddReturnStamp(page,ddName,oStamp) {
var index=oStamp.subject+page;
oStamp.setProps({rotate:0})
oStamp.rect=oDADStamp[index][oStamp.AP][0];
resetFocus("ddReset"+ddName);
}
function resetDDM(page,ddName) {
var stamps=this.getAnnots(page);
for (var i=0; i<stamps.length; i++) {
if ( stamps[i].subject == ddName ) {
stamps[i].rect=oDADStamp[ddName+page][stamps[i].AP][0];
stamps[i].setProps({rotate:0})
oDADStamp[ddName+page][stamps[i].AP][1]=false;
}
}
oDADCnt[ddName+page]=[0,0];
for (var i=0; i<this.numFields; i++) {
var fname=this.getNthFieldName(i);
% \end{macrocode}
% All fields have the two character sequence \texttt{"@\#"} in it.
% We search for this, if not found, it is an ordinary field.
% \begin{macrocode}
var getIndexOf = fname.indexOf("@#");
if ( (getIndexOf!=-1) %
&& (fname.substring(0,getIndexOf)==ddName) ) {
var f=this.getField(fname);
if (f.readonly) {
f.readonly=false;
f.strokeColor=color.black;
}
}
}
if (typeof ddCustomResetAction=="function")
ddCustomResetAction(page,ddName);
this.dirty=false;
}
var ddGoodVersion=true;
var ddNotification=false;
function ddAlertInBrowser() {
app.alert({cMsg:\ddExternalMsg,
nIcon: 3, cTitle: "AeB DAD Match"});
}
function ddAlertBadApp() {
app.alert({cMsg:\ddBadAppMsg,
nIcon: 3, cTitle: "AeB DAD Match"});
}
function ddOpenDocAction() {
if (this.external) {
% \end{macrocode}
% \changes{v1.0a}{2012/11/14}{Stamps cannot be moved in a browser, even
% when using the Acrobat plug-in.}
% Stamps cannot be moved in a browser, even
% when using the Acrobat plug-in.
% \begin{macrocode}
if (!ddNotification) {
ddNotification=true;
ddTO=app.setTimeOut("ddAlertInBrowser()",250);
}
ddGoodVersion=false;
} else {
if (app.viewerType == "Reader" && app.viewerVersion<11) {
if (!ddNotification) {
ddNotification=true;
ddTO=app.setTimeOut("ddAlertBadApp()",250);
}
ddGoodVersion=false;
}
}
}
function ddPageOpen(page) {
% \end{macrocode}
% We want to execute the stamp code only once, the first time the page
% is opened. The array \texttt{aDDPageCtrl} keeps track of whether this
% \changes{v1.2a}{2016/08/22}{Fixed issue with reset button not working as expected when
% there are more than one reset buttons on different pages.}
% Fixed issue with reset button not working as expected when
% there are more than one reset buttons on different pages.
% page has been already opened. Traced problem to the assignment of \texttt{bDDInit}, using
% array \texttt{aDDPageCtrl} to track the pages.
% \begin{macrocode}
var bDDInit=false;
if (!aDDPageCtrl[page]) {
var bDDInit=true;
aDDPageCtrl[page]=true;
}
if (bDDInit) {
console.println("Executing ddPageOpen for page "+(page+1));
this.syncAnnotScan();
% \end{macrocode}
% We get the array of all annots on this page.
% \begin{macrocode}
var stamps=this.getAnnots(page);
if (stamps==null) return;
for (var i=0; i<stamps.length; i++) {
var si=stamps[i];
if ( si.type=="Stamp") {
% \end{macrocode}
% We store only annots of type Stamp.
% \begin{macrocode}
var index=si.subject+page;
% \end{macrocode}
% If \texttt{oDADStamp[stamps[i].subject+this.pageNum]}, is undefined,
% we define it.
% \begin{macrocode}
if (typeof oDADStamp[index]=="undefined" ) {
oDADStamp[index]=new Array();
% \end{macrocode}
% \texttt{oDADCnt} will keep track of the score. The first entry
% is the number correct, the second entry is the number of tries.
% \begin{macrocode}
oDADCnt[index]=[0,0];
% \end{macrocode}
% Grant user right to permanently dismiss alert box.
% \begin{macrocode}
oDADAlerts[si.subject]=new Object();
oDADAlerts[si.subject].oAlrtChk={bAfterValue:false};
}
% \end{macrocode}
% Stamp data is stored by \texttt{<subject><page>}, a particular stamp
% is referenced by its \texttt{AP} name. We save the original rectangle
% and a boolean \texttt{false}. When the stamp is placed correctly, we
% change this to \texttt{true}.
% \begin{macrocode}
oDADStamp[index][si.AP]=[si.rect, false];
}
}
} else console.println("Bypassing ddPageOpen for page "+page);
}
function resetFocus(fname) {
this.getField(fname).setFocus();
}
var gDDStats=new Object();
var ddStats=new Object();
function ddCorrectAction(event,ddName) {
var page = event.target.page;
oDADCnt[ddName+page][0] += 1;
oDADCnt[ddName+page][1] += 1;
gDDStats[ddName]={nCorrect: oDADCnt[ddName+page][0],
nTries: oDADCnt[ddName+page][1]};
ddStats=gDDStats[ddName];
if (typeof ddCustomCorrectAction == "function")
% \end{macrocode}
% Customization: If \texttt{ddCustomCorrectAction()} is defined, we use it.
% \begin{macrocode}
ddCustomCorrectAction(event,ddName);
else
ddCorrectActionDef(event,ddName);
}
% \end{macrocode}
% Added JavaScript functions \texttt{ddCorrectActionDef()} and
% \texttt{ddWrongActionDef()}, these are used to create both custom and default response actions.
% \changes{v1.2}{2016/08/22}{Added ddCorrectActionDef and
% ddWrongActionDef}
% \begin{macrocode}
function ddCorrectActionDef(event,ddName) {
if (!oDADAlerts[ddName].oAlrtChk.bAfterValue)
app.alert({cMsg: \ddRightMsg, nIcon: 3,
cTitle: "AeB DAD Matching",
oCheckbox:oDADAlerts[ddName].oAlrtChk});
}
function ddWrongAction(event,ddName) {
var page = event.target.page;
oDADCnt[ddName+page][1] += 1;
gDDStats[ddName]={nCorrect: oDADCnt[ddName+page][0],
nTries: oDADCnt[ddName+page][1]};
ddStats=gDDStats[ddName];
if (typeof ddCustomWrongAction == "function")
% \end{macrocode}
% Customization: If \texttt{ddCustomWrongAction()} is defined, we use it.
% \begin{macrocode}
ddCustomWrongAction(event,ddName);
else
ddWrongActionDef(event,ddName);
}
function ddWrongActionDef(event,ddName) {
if (!oDADAlerts[ddName].oAlrtChk.bAfterValue)
app.alert({cMsg: \ddWrongMsg, nIcon:0,
cTitle: "AeB DAD Matching",
oCheckbox:oDADAlerts[ddName].oAlrtChk});
else
app.beep(4);
}
\end{insDLJS}
% \end{macrocode}
% \begin{macrocode}
\catcode`\_=\dad@subCat
%</package>
% \end{macrocode}
%\Finale