% \iffalse
%<*copyright>
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% acromemory.sty package, 2006-10-11 %%
%% Copyright (C) 2006 D. P. Story %%
%% dpstory@acrotex.net %%
%% storyd@owc.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{acromemory}
%<package> [2006/10/31 v1.0 AcroMemory (dps)]
%<*driver>
\documentclass{ltxdoc}
\usepackage[dviwindo,colorlinks,hyperindex]{hyperref}
\pdfstringdefDisableCommands{\let\\\textbackslash}%
\EnableCrossrefs \CodelineIndex
\OnlyDescription % comment out for implementation details
\begin{document}
\GetFileInfo{acromemory.sty}
\title{The \texttt{AcroMemory} Package\texorpdfstring{\\}{: }
A member of the AeB Pro family}
\author{D. P. Story\\
Email: \texttt{storyd@owc.edu}}
\date{processed \today}
\maketitle
\tableofcontents
\let\Email\texttt
\DocInput{acromemory.dtx}
\PrintIndex
\end{document}
%</driver>
% \fi
% \section{What is the AeB Pro Family?}
% Through the years, I have tried to make my AeB software
% ({Acro\negthinspace\TeX} eDucation Bundle) compatible with
% \textsf{pdftex} and \textsf{dvipdfm}; however, during that time,
% I've developed a number of techniques that require the use of
% Acrobat and distiller. Therefore, I have set off in a new direction and
% will be publishing a new line of {\LaTeX} packages, one that require the use
% of Acrobat.
%
% The current package, \textsf{AcroMemory}, requires the use of Acrobat Pro~7.0 or later.
% \section{Introduction}
%
% At the instigation of my erstwhile friend, J\"{u}ergen, I present to you \textsf{AcroMemory}, and
% for the life of me, I can't remember why.
%
% Oh, yes, \textsf{AcroMemory} is a memory game in which you find the matching tiles. There are two versions
% ---available as options of this package---for your enjoyment,
% \texttt{acromemory1} and \texttt{acromemory2} (the default).
% \begin{itemize}
% \item \texttt{acromemory1}: Here you have a single game board, a rectangular region divided
% by rows and columns. The total number of tiles should
% be even, each tile should have a matching twin. The
% game begins with all the tiles hidden. the user clicks a tile,
% then another. If the tiles do not match, they become become hidden again
% (you did remember the position of those tiles, didn't you?); otherwise,
% they remain visible and are now read-only. The game is complete when the user, with
% a lot of time on his/her hands, matches all tiles. There is a running tabulation kept
% on the number of tries. There is also a button which resets the game and randomizes the
% tiles.
% \item \texttt{acromemory2}: For this game you have two identical rectangular images subdivided in%to tiles
% (or slices) arrayed in rows and columns. The tiles for
% one of the two images has been randomly re-arranged. The object of the game is to find all the
% matching tiles by choosing a tiles from one image, and tile from the other image. As in the
% first case, if the selected tiles do not match, they are hidden after an short interval of time
% (you did remember the position of those tiles, didn't you?); otherwise, they remain visible and
% are now read-only. The game is over when all tiles are matched, when this occurs, end-of-game
% special effects occur that will dazzle the senses. There is an option to view a small image to
% help you locate the matching tiles on the non-randomized; useful if the image is complex. There
% is no reset button at this time, to play again, the user must close and open the document.
% \end{itemize}
% The demo files are \texttt{acromemory1.tex} and \texttt{acromemory2.tex}. These files show how to
% lay out the various elements of this package.
%
% \section{Creating the Image Tiles}
%
% There are a couple of ways you can package your image tiles: (1) place all tiles (all of identical size)
% into a single PDF and use the \texttt{iconfile} option to tell AcroMemory you are using this method; (2)
% each image file is a separate PDF. In the latter case, there is a naming convention that must be followed;
% the files must be named \texttt{<basename>\_01.pdf}, \texttt{<basename>\_02.pdf}, \dots,
% \texttt{<basename>\_10.pdf}, \texttt{<basename>\_11.pdf}, \dots. You'll note the consistent two digit
% numbering system is used.
% For \texttt{acromemory2}, slicing of the image is at the very heart
% of this game. You can slice an image in to rectangular tiles using
% any of several applications: \textsf{Adobe Illustrator},
% \textsf{Photoshop} and \textsf{ImageReady}, for example. But these are
% expensive applications and you have already bought \textsf{Acrobat Pro}. For this purpose,
% AeB Pro provides the \textsf{AcroSlicing} batch sequence.
%
% \begin{macrocode}
%<*package>
\RequirePackage{xkeyval}
% \end{macrocode}
% \begin{macro}{acromemory1}
% One playing board, where you try to match identical icons.
% \begin{macrocode}
\DeclareOptionX{acromemory1}{\acromemoryitrue}
% \end{macrocode}
% \end{macro}
% \begin{macro}{acromemory2}
% Two playing boards, one board randomized the other not. Try to find the matching icons,
% one from each of the two boards.
% \begin{macrocode}
\DeclareOptionX{acromemory2}{\acromemoryifalse}
% \end{macrocode}
% \end{macro}
% \begin{macro}{acromemory2}
% Two playing boards, one board randomized the other not. Try to find the matching icons,
% one from each of the two boards.
% \begin{macrocode}
\DeclareOptionX{iconfile}{\def\iconsInOneFile{true}}
\def\iconsInOneFile{false}
% \end{macrocode}
% \end{macro}
% \begin{macro}{includehelp}
% Only valid when \texttt{acromemory2} is taken, this option allows you to provide a
% figure showing the completed puzzle.
% \begin{macrocode}
\DeclareOptionX{includehelp}{\includehelptrue}
% \end{macrocode}
% \end{macro}
% \begin{macrocode}
\newif\ifincludehelp \includehelpfalse
\newif\ifacromemoryi \acromemoryifalse
\ProcessOptionsX
\RequirePackage{comment}
\ifacromemoryi
\def\RanIdentifier{\@gobble}
\includecomment{acromemory1}
\excludecomment{acromemory2}
\excludecomment{needhelp}
\else
\def\RanIdentifier{R\@gobble}
\includecomment{acromemory2}
\excludecomment{acromemory1}
\ifincludehelp
\includecomment{needhelp}
\else
\excludecomment{needhelp}
\fi
\fi
% \end{macrocode}
% \section{Main Macro Code}
% When setting up your AcroMemory document, you need to provide this package with
% certain information, as listed below.
% \begin{macro}{\theTotalTiles}
% \begin{macro}{\theNumRows}
% \begin{macro}{\theNumCols}
% \begin{macro}{\theImportPath}
% \begin{macro}{\theIconExt}
% \begin{macro}{\theTeXImageWidth}
% \begin{macro}{\provideDimensions}
%\begin{itemize}
% \item \cs{theTotalTiles}: The total number of tiles in the game board. For example,
% \verb!\theTotalTiles{20}!. This parameter is required.
% \item \cs{theNumRows}: The number of rows in the game board. For example,
% \verb!\theNumRows{5}!. This parameter is required.
% \item \cs{theNumCols}: The number of columns in the game board. For example,
% \verb!\theNumCols{4}!. This parameter is required.
% \item \cs{theImportPath}: The import path to the basename of the image. The path
% should use the path specification as defined in the PDF Ref, and the file name should
% have no extension. For example, \verb!\theImportPath{myFig/myimages}!. Required.
% There is an optional argument that is typically used when the iconfile is in effect
% with the acromemory2 option, and an image of the game board is different from the
% path given by the optional argument; for example,
%\begin{verbatim}
% \theImportPath[dpsweb/dpsweb]{dpsweb/dpsweb_package}
%\end{verbatim}
% The required argument points the packaged icons, the optional argument points to
% a file showing the entire image
% \item \cs{theIconExt}: The extension of the image file(s), Required if different
% from \texttt{pdf}.
% \item \cs{theTeXImageWidth}: The scaled width of the rectangular game board. The
% game board will be rescaled so that its width is equal to the value specified
% by the argument of this command, e.g., \verb!\theTeXImageWidth{2in}!.
% \item\cs{provideDimensions}: If the dimension of the game board is known, the width
% and height can be entered with this command using the two parameters. For example,
% \verb!\provideDimensions{2in}{2.5in}! (width, height).
%\end{itemize}
% \begin{macrocode}
\def\theTotalTiles#1{\def\nTotalTiles{#1}}
\def\theNumRows#1{\def\nRows{#1}}
\def\theNumCols#1{\def\nCols{#1}}
\newcommand{\theImportPath}[2][]{%
\ifacromemoryi
\def\imageImportPath{#2}
\def\importpath{#2}
\else
\def\argi{#1}\ifx\argi\@empty
\def\imageImportPath{#2}
\def\importpath{#2}
\else
\def\imageImportPath{#1}
\def\importpath{#2}
\fi
\fi
}
\def\theIconExt#1{\def\iconsExt{#1}}
\def\iconsExt{pdf}
\def\theTeXImageWidth#1{\def\texImageWidth{#1}%
{\dimen0 = \texImageWidth \xdef\imageWidth{\strip@pt\dimen0 }}%
}
\newcommand{\provideDimensions}[3][]{%
\def\argi{#1}\ifx\argi\@empty
{\dimen0 = #2 \xdef\trueImageWidth{\strip@pt\dimen0 }%
\dimen0 = #3 \xdef\trueImageHeight{\strip@pt\dimen0 }}%
\else
\def\trueImageWidth{#1}\def\trueImageHeight{#2}%
\fi
\def\bProvideDimen{true}%
}
\def\bProvideDimen{false}%
\def\trueImageWidth{0}\def\trueImageHeight{0}%
% \end{macrocode}
% \end{macro}
% \end{macro}
% \end{macro}
% \end{macro}
% \end{macro}
% \end{macro}
% \end{macro}
% \begin{macro}{\bDebug}
% A debugging command. When executed in the preamble, more is written to the Acrobat console
% as the document is opened the first time, also, the icons are initially visible so you can
% see the layout, and quickly play the game. This was used in development extensively to help
% develop the JavaScript.
% \begin{macrocode}
\def\bDebug{\def\memDebug{true}}
\def\memDebug{false}
% \end{macrocode}
% \end{macro}
% \begin{macro}{\helpImage}
% \begin{macro}{\rolloverHelpButton}
% \begin{macro}{\setHelpImageWidth}
% \begin{macro}{\theHelpCaption}
% When \texttt{acromemory2} options and the \texttt{includehelp}
% options are taken, these commands are available. The command
% \cs{helpImage} will contain an icon of the puzzle, and it width
% is set by the command \cs{setHelpImageWidth}. The image is normally
% hidden until the user rolls over the \cs{rolloverHelpButton}. The
% icons appears with an caption under it, the content of the caption
% can be entered using \cs{theHelpCaption}.
% \begin{macrocode}
\newcommand{\helpImage}[1][]{{%
\ifincludehelp{\setbox0 = \hbox{%
\includegraphics[draft,width=\helpImageWidth]%
{\imageImportPath}}%[\Ff\FfReadOnly]
\dimen0=\ht0 \advance\dimen0by14bp\ht0=\dimen0
\pushButton[\BC{}\BG{}\S{S}#1]{memoryhelp}{\the\wd0}{\the\ht0}}\fi
}}
\newcommand{\rolloverHelpButton}[3][]{%
\ifincludehelp
\pushButton[\CA{Help}\BC{0 0 1}\BG{0.89 0.9 0.9}
\AA{\AAMouseEnter{\JS{%
var f = this.getField("memoryhelp");\r
oIcon = f.buttonGetIcon(1);\r
f.buttonPosition = position.iconTextV;\r
f.buttonSetIcon(oIcon,0);\r
f.buttonSetCaption({cCaption: "\helpCaption"});\r
f.textColor=color.blue;\r
}}%
\AAMouseExit{\JS{%
var f = this.getField("memoryhelp");\r
f.buttonPosition = position.iconOnly;\r
f.buttonSetIcon(nullIcon,0);
}}}#1]{checkhelp}{#2}{#3}%
\fi
}
\newcommand{\setHelpImageWidth}[1]{\def\helpImageWidth{#1}}
\def\helpImageWidth{1in}
\def\theHelpCaption#1{\def\helpCaption{#1}}
\theHelpCaption{A little help}
% \end{macrocode}
% \end{macro}
% \end{macro}
% \end{macro}
% \end{macro}
% \begin{macro}{\messageBox}
% A message text field, as the user works the puzzle, the progress is reported
% to this field.
% \begin{macrocode}
\newcommand{\messageBox}[3][]{%
\textField[#1\Ff\FfMultiline]{MsgBox}{#2}{#3}}
% \end{macrocode}
% \end{macro}
% \begin{macro}{\playItAgain}
% For the \texttt{acromemory1} option, this button can be placed to reset
% the game board, the icons are rearranged hand hidden again.
% \begin{macrocode}
\newcommand{\playItAgain}[3][]{\ifacromemoryi{\small
\pushButton[\CA{Play again}#1\A{\JS{playagain();}}]%
{playAgain}{#2}{#3}}%
\fi
}
% \end{macrocode}
% \end{macro}
% \begin{macro}{\ulCornerHere}
% \begin{macro}{\LulCornerHere}
% \begin{macro}{\RulCornerHere}
% \begin{macro}{\reserveSpaceByDimension}
% \begin{macro}{\reserveSpaceByFile}
% This group of buttons appear together. \cs{ulCornerHere} is used to
% set the upper left corner of the game board in the case of the
% \texttt{acromemory1} option; while \cs{LulCornerHere} and \cs{RulCornerHere}
% do the same thing for the \texttt{acromemory2} option. One of the two commands
% \cs{reserveSpaceByDimension} or \cs{reserveSpaceByFile} immediately follow
% the `corner' commands.
% \begin{macrocode}
\def\ulCornerHere{\makebox[0pt][l]%
{\pushButton[\autoCenter{n}]{ulcorner}{0pt}{0pt}}}
\def\LulCornerHere{\makebox[0pt][l]%
{\pushButton[\autoCenter{n}]{Lulcorner}{0pt}{0pt}}}
\def\RulCornerHere{\makebox[0pt][l]%
{\pushButton[\autoCenter{n}]{Rulcorner}{0pt}{0pt}}}
% \end{macrocode}
% The two arguments are $\texttt{\#1} = \mbox{width}$ and $\texttt{\#2} = \mbox{height}$.
% \begin{macrocode}
\def\reserveSpaceByDimension#1#2{%
\hbox{\ifpreview\setlength\fboxrule{0.4pt}\setlength\fboxsep{0pt}%
\@tempdima=#1\advance\@tempdima by-\fboxrule
\@tempdimb=#2\advance\@tempdimb by-\fboxrule
\fbox{\parbox[t][\@tempdimb][t]{\@tempdima}{\kern0pt\hfill\vfill}}%
\else\parbox[t][#2][t]{#1}{\kern0pt\hfill\vfill}\fi}%
}
% \end{macrocode}
% The optional argument can be used to insert a file that has the same aspect ratio as
% the puzzle, the default is the one specified by the optional argument of
% \cs{theImportPath}, which, if not specified, is the same as the required argument
% of \cs{theImportPath}
% \begin{macrocode}
\newcommand{\reserveSpaceByFile}[1][\imageImportPath]%
{{\setbox0=\hbox{\includegraphics[draft,width=\texImageWidth]{#1}}%
\reserveSpaceByDimension{\wd0}{\ht0}}}
% \end{macrocode}
% \end{macro}
% \end{macro}
% \end{macro}
% \end{macro}
% \end{macro}
% \section{Document JavaScript for \textsf{AcroMemory}}
% Most of the work of this package is done with document JavaScript, and here
% it is.
%\par\medskip\noindent
%\StopEventually{JavaScript listing suppressed,
% comment out \cs{OnlyDescription} at the beginning of this file to see
% the JavaScript.}
% \begin{macrocode}
\begin{insDLJS*}[_MemLoaded]{memjs}
\begin{newsegment}{AcroMemory 1: Global Data and Initialization}
// Global Data:
_MemLoaded=true;
var randomDPS = new Array(\nTotalTiles+1);
var imageNames = new Array();
imageNames.push("null");
var dpsl = randomDPS.length;
var timeout = 10;
var shutdown, rAE;
var ok2Continue = true;
var nRows = \nRows;
var nCols = \nCols;
var nCorrect = 0;
var nAttempts = 0;
for (i=1; i<=\nTotalTiles; i++) randomDPS[i]=i;
if ( typeof nullIcon == "undefined" ) {
this.addIcon("nullIcon", this.createIcon("", 0, 0));
var nullIcon = this.getIcon("nullIcon");
}
var debug = \memDebug;
\end{newsegment}
\begin{acromemory1}
\begin{newsegment}{AcroMemory 2: Initialize Pic Names}
var nttl = \nTotalTiles/2;
for ( var i = 1; i <= nttl; i++)
{
imageNames.push("pic"+i +".0");
imageNames.push("pic"+i +".1");
}
var currentChoice = "";
var currentTile1 = 0;
var currentTile2 = 0;
var currentIconName = "";
\end{newsegment}
\end{acromemory1}
\begin{acromemory2}
\begin{newsegment}{AcroMemory 2: Initialize Pic Names}
var nttl = \nTotalTiles;
for ( var i = 1; i <= nttl; i++)
{
imageNames.push("pic."+i);
}
var LcurrentChoice = 0;
var LcurrentTile = 0;
var RcurrentChoice = 0;
var RcurrentTile = 0;
\end{newsegment}
\end{acromemory2}
\begin{newsegment}{AcroMemory 3: Bubble Sort}
// Clear DPS:
function clearDPS()
{
for ( var i=1; i<=\nTotalTiles; i++ )
{
var f = this.getField("Mem\RanIdentifier button."+i);
f.buttonSetIcon(nullIcon);
}
}
// Mixup DPS:
function mixupDPS()
{
var i, rand;
for (i=1; i<= \nTotalTiles; i++)
{
var rand = Math.random();
rand *= dpsl*dpsl;
rand = Math.ceil(rand);
rand = rand \% dpsl;
if (rand == 0 ) rand = 1;
temp = randomDPS[i];
randomDPS[i]=randomDPS[rand];
randomDPS[rand]=temp;
}
}
// Show DPS:
function showDPS()
{
for ( var i=1; i<=\nTotalTiles; i++ )
{
var oIcon = this.getIcon(imageNames[randomDPS[i]]);
var f = this.getField("Mem\RanIdentifier button."+i);
f.buttonSetIcon(oIcon);
}
}
// Sortout DPS: begin bubble sort
function sortoutDPS()
{
outerLoop(randomDPS.length-1);
}
function outerLoop(i)
{
if ( ok2Continue && (i >= 0) ) shutdown = app.setTimeOut("app.clearTimeOut(shutdown); innerLoop("+i+",1);", timeout);
}
function innerLoop(i,j)
{
if ( j <= i )
{
if (randomDPS[j-1] > randomDPS[j])
{
var temp = randomDPS[j-1];
randomDPS[j-1] = randomDPS[j];
randomDPS[j] = temp;
var oIcon = this.getIcon(imageNames[randomDPS[j-1]]);
var f = this.getField("Mem\RanIdentifier button."+(j-1));
f.buttonSetIcon(oIcon);
var oIcon = this.getIcon(imageNames[randomDPS[j]]);
var f = this.getField("Mem\RanIdentifier button."+j);
f.buttonSetIcon(oIcon);
}
j++
if ( ok2Continue ) shutdown = app.setTimeOut("app.clearTimeOut(shutdown); innerLoop("+i+","+j+");", timeout);
}
else
{
i--;
outerLoop(i);
}
}
function randomizePuzzle() {
mixupDPS();
for ( var i=1; i<=\nTotalTiles; i++) {
var g = this.getField("Mem\RanIdentifier button."+i);
var oIcon = this.getIcon(imageNames[randomDPS[i]]);
g.buttonSetIcon(oIcon,1);
if (debug) g.buttonSetIcon(oIcon,0);
}
}
\end{newsegment}
\begin{acromemory1}
\begin{newsegment}{AcroMemory 4: Tile Processing}
function selectTile() // right side randomly arranged
{
var f = event.target;
var oIcon = f.buttonGetIcon(1);
f.buttonSetIcon(oIcon,0);
var fname = f.name;
var re1 = /Membutton\.(\d+)/;
var index = re1.exec(fname);
if (debug) console.println("index = " + index[1]);
var thisiconName = imageNames[randomDPS[index[1]]];
if (debug) console.println("thisiconName = " + thisiconName);
var re = /pic(\d+)\.(\d)/;
var image = re.exec(thisiconName)
if (debug) console.println("selected: " + image[1] + "." + image[2]);
if ( currentChoice == "" ) {
currentChoice = fname;
currentTile1=image[1];
currentTile2=image[2];
currentIconName = thisiconName;
return;
}
if ( (image[1] == currentTile1) && (image[2] != currentTile2) )
{ // right choice
nCorrect++;
nAttempts++
f.readonly = true;
var g = this.getField(currentChoice);
g.readonly = true;
reportProgress(nCorrect,nAttempts);
resetCounters();
} else { // wrong choice
nAttempts++
reportProgress(nCorrect,nAttempts);
rAE = app.setTimeOut("resetAfterError(\""+currentChoice+"\",\""+fname+"\")", 1000);
resetCounters();
}
}
function resetCounters ()
{
currentChoice = "";
currentTile1 = 0;
currentTile2 = 0;
currentIconName = "";
}
function resetAfterError(l,r)
{
try { app.clearTimeOut(rAE); } catch(e) {};
var f = this.getField(l);
var g = this.getField(r);
if (!debug) g.buttonSetIcon(nullIcon,0);
// g.strokeColor=color.black;
if (!debug) f.buttonSetIcon(nullIcon,0);
// f.strokeColor=color.black;
}
function executePostGameEffects() {return;}
function playagain()
{
for ( var i=1; i<=\nTotalTiles; i++) {
var g = this.getField("Membutton."+i);
g.buttonSetIcon(nullIcon,0);
}
g = this.getField("Membutton");
g.readonly=false;
resetCounters();
nCorrect = 0;
nAttempts = 0;
reportProgress(nCorrect,nAttempts);
randomizePuzzle();
}
\end{newsegment}
\end{acromemory1}
\begin{acromemory2}
\begin{newsegment}{AcroMemory 4: Tile Processing}
function selectRandomTile(nCnt,n) // right side randomly arranged
{
if ( RcurrentChoice != 0 ) return;
RcurrentChoice = nCnt;
RcurrentTile = n;
nAttempts++;
var f = event.target;
f.strokeColor = ["RGB", 0, .6, 0];
var oIcon = f.buttonGetIcon(1);
f.buttonSetIcon(oIcon,0);
if ( LcurrentChoice != 0 ) {
if (debug) console.println("LcurrentChoice = " + LcurrentChoice + ", RcurrentChoice = " + RcurrentChoice);
if ( LcurrentChoice == nCnt ) {// right answer
// need to make right side hidden and readonly
// need to make this button readonly
var g = this.getField("MemLbutton."+LcurrentChoice);
g.strokeColor=color.transparent;
g.readonly = true;
f.strokeColor=color.transparent;
f.readonly = true;
if (++nCorrect == \nTotalTiles ) // game complete
executePostGameEffects();
reportProgress(nCorrect,nAttempts);
resetCounters();
} else { // wrong answer
// need to set current choices back to zero
reportProgress(nCorrect,nAttempts);
rAE = app.setTimeOut("resetAfterError("+LcurrentTile+","+RcurrentTile+")", 1000);
resetCounters();
}
}
}
function selectNonRandomTile(nCnt,n) // left side, arranged in natural order
{
if ( LcurrentChoice != 0 ) return;
LcurrentChoice = nCnt;
LcurrentTile = n;
var f = event.target;
f.strokeColor = ["RGB", 0, .6, 0];
var oIcon = f.buttonGetIcon(1);
f.buttonSetIcon(oIcon,0);
if ( RcurrentChoice != 0 ) {
if (debug) console.println("LcurrentChoice = " + LcurrentChoice + ", RcurrentChoice = " + RcurrentChoice);
if ( RcurrentChoice == nCnt ) {// right answer
// need to make right side hidden and readonly
// need to make this button readonly
var g = this.getField("MemRbutton."+RcurrentTile);
g.strokeColor=color.transparent;
g.readonly = true;
f.readonly = true;
f.strokeColor=color.transparent;
if (++nCorrect == \nTotalTiles ) // game complete
executePostGameEffects();
reportProgress(nCorrect,nAttempts);
resetCounters();
} else { // wrong answer
// need to set current choices back to zero
reportProgress(nCorrect,nAttempts);
rAE = app.setTimeOut("resetAfterError("+LcurrentTile+","+RcurrentTile+")", 1000);
resetCounters();
}
}
}
function resetCounters ()
{
LcurrentChoice = 0;
RcurrentChoice = 0;
LcurrentTile = 0;
RcurrentTile = 0;
}
function resetAfterError(l,r)
{
try { app.clearTimeOut(rAE); } catch(e) {};
var f = this.getField("MemLbutton."+l);
var g = this.getField("MemRbutton."+r);
if (!debug) g.buttonSetIcon(nullIcon,0);
g.strokeColor=color.black;
if (!debug) f.buttonSetIcon(nullIcon,0);
f.strokeColor=color.black;
}
function executePostGameEffects() {
sortoutDPS();
var fL = this.getField("MemLbutton.1");
var fR = this.getField("MemRbutton.1");
var LulCorner = fL.rect;
var RulCorner = fR.rect;
var mWidth = LulCorner[2]-LulCorner[0];
var mHeight = LulCorner[1]-LulCorner[3];
var nCnt = 0;
for ( var i=0; i<nRows; i++) {
for ( var j=0; j<nCols; j++ ) {
nCnt++;
try {
var g = this.getField("MemLbutton."+nCnt);
g.rect = [ LulCorner[0]+j*mWidth, LulCorner[1]-i*mHeight, LulCorner[0]+(j+1)*mWidth, LulCorner[1]-(i+1)*mHeight ]
g.lineWidth = 0;
g.strokeColor = color.transparent;
var h = this.getField("MemRbutton."+nCnt);
h.rect = [ RulCorner[0]+j*mWidth, RulCorner[1]-i*mHeight, RulCorner[0]+(j+1)*mWidth, RulCorner[1]-(i+1)*mHeight ]
h.lineWidth = 0;
h.strokeColor = color.transparent;
} catch(e) { console.println("set properties: " + e.toSource()) }
}
}
}
\end{newsegment}
\end{acromemory2}
\begin{newsegment}{AcroMemory 5: Reporting}
function reportProgress(nCorrect,nAttempts) {
var Msg = this.getField("MsgBox")
if ( Msg != null ) {
Msg.value = "Number matched = " + nCorrect
+ "\n Number of attempts = " + nAttempts;
}
}
try { randomizePuzzle(); } catch(e) {}
\end{newsegment}
\end{insDLJS*}
\begin{acromemory1}
\begin{execJS}{acromemjs}
var l = \nTotalTiles/2;
var pt2bpScaleFactor = 72/72.27;
if (\iconsInOneFile) {
for ( var i = 0; i < l; i++)
{
try {
aebTrustedFunctions(this, aebImportIcon, {cName: "pic"+(i+1) +".0", cDIPath: "\importpath.pdf", nPage: i }, this);
aebTrustedFunctions(this, aebImportIcon, {cName: "pic"+(i+1) +".1", cDIPath: "\importpath.pdf", nPage: i }, this);
}
catch(e) {console.println("exception: " + e.toSource())}
}
} else {
var index, j;
for ( var i = 0; i < l; i++)
{
try {
j = i+1;
index = ( j < 10 ) ? "0"+j : ""+j;
if (debug) console.println("Importing: \importpath_"+index+".\iconsExt")
aebTrustedFunctions(this, aebImportIcon, {cName: "pic"+j+".0", cDIPath: "\importpath_"+index+".\iconsExt"}, this);
aebTrustedFunctions(this, aebImportIcon, {cName: "pic"+j+".1", cDIPath: "\importpath_"+index+".\iconsExt"}, this);
}
catch(e) {console.println("import exception: " + e.toSource())}
}
}
// Now lay out the icon fields.
var f = this.getField("ulcorner");
var ulCorner = f.rect;
var nPage = f.page;
this.removeField("ulcorner");
if (\bProvideDimen) {
var width = \trueImageWidth*pt2bpScaleFactor;
var height =\trueImageHeight*pt2bpScaleFactor;
} else {
var doc = aebTrustedFunctions( this, aebAppOpenDoc, { cPath: "\importpath.pdf", oDoc: this });
var aRect = doc.getPageBox({cBox:"Crop"})
doc.closeDoc(true);
var width = aRect[2]-aRect[0];
var height = aRect[1]-aRect[3];
}
var scaleFactor = (\imageWidth*pt2bpScaleFactor)/width;
var scaledWidth = width*scaleFactor;
var scaledHeight = height*scaleFactor;
if (debug) {
console.println("scaleFactor = " + scaleFactor);
console.println("scaledWidth = " + scaledWidth);
console.println("scaledHeight = " + scaledHeight);
}
var mWidth = scaledWidth/nCols
var mHeight = scaledHeight/nRows
var nCnt = 0;
for ( var i=0; i<nRows; i++) {
for ( var j=0; j<nCols; j++ ) {
nCnt++;
try {
var g = this.addField({
cName: "Membutton."+nCnt,
cFieldType: "button",
nPageNum: nPage,
oCoords: [ ulCorner[0]+j*mWidth, ulCorner[1]-i*mHeight, ulCorner[0]+(j+1)*mWidth, ulCorner[1]-(i+1)*mHeight ]
});
} catch(e) { console.println( e.toSource() ); }
try {
g.highlight=highlight.p
g.buttonPosition = position.iconOnly;
g.lineWidth = 1;
g.strokeColor = color.black;
g.setAction("MouseDown", "selectTile();")
} catch(e) { console.println("set properties: " + e.toSource()) }
try {
var pNCnt = nCnt + 1;
var index = parseInt( pNCnt/2)
var oIcon = this.getIcon("pic"+index+"."+ ( pNCnt \% 2 ));
g.buttonSetIcon(oIcon,1);
if (debug) g.buttonSetIcon(oIcon,0);
} catch(e) { console.println("set properties: " + e.toSource()) }
}
}
try { randomizePuzzle(); } catch(e) { console.println("execJS--randomizePuzzle exceptions: " + e.toSource()) }
var isRandomized = true;
\end{execJS}
\end{acromemory1}
\begin{acromemory2}
\begin{execJS}{execjs}
var index;
var pt2bpScaleFactor = 72/72.27;
if (\iconsInOneFile) {
for ( var i = 1; i <= \nTotalTiles; i++)
{
index = ( i < 10 ) ? "0"+i : ""+i;
if (debug) console.println("\importpath_"+index+".\iconsExt")
try { aebTrustedFunctions(this, aebImportIcon, {cName: "pic."+i, cDIPath: "\importpath.pdf", nPage: (i-1) }, this);
}
catch(e) {console.println("exception: " + e.toSource())}
}
} else {
for ( var i = 1; i <= \nTotalTiles; i++)
{
index = ( i < 10 ) ? "0"+i : ""+i;
if (debug) console.println("\importpath_"+index+".\iconsExt")
try { aebTrustedFunctions(this, aebImportIcon, {cName: "pic."+i, cDIPath: "\importpath_"+index+".\iconsExt"}, this);
}
catch(e) {console.println("exception: " + e.toSource())}
}
}
// Now lay out the icon fields.
var f = this.getField("Lulcorner");
var ulCorner = f.rect;
var nPage = f.page;
this.removeField("Lulcorner");
if (\bProvideDimen) {
var width = \trueImageWidth*pt2bpScaleFactor;
var height =\trueImageHeight*pt2bpScaleFactor;
} else {
var doc = aebTrustedFunctions( this, aebAppOpenDoc, { cPath: "\imageImportPath.pdf", oDoc: this });
var aRect = doc.getPageBox({cBox:"Crop"})
doc.closeDoc(true);
var width = aRect[2]-aRect[0];
var height = aRect[1]-aRect[3];
}
var scaleFactor = (\imageWidth*pt2bpScaleFactor)/width;
var scaledWidth = width*scaleFactor;
var scaledHeight = height*scaleFactor;
if (debug) {
console.println("scaleFactor = " + scaleFactor);
console.println("scaledWidth = " + scaledWidth);
console.println("scaledHeight = " + scaledHeight);
}
var mWidth = scaledWidth/nCols
var mHeight = scaledHeight/nRows
%console.println("mWidth = " + mWidth);
%console.println("mHeight = " + mHeight);
var nCnt = 0;
for ( var i=0; i<nRows; i++) {
for ( var j=0; j<nCols; j++ ) {
nCnt++;
try {
var g = this.addField({
cName: "MemLbutton."+nCnt,
cFieldType: "button",
nPageNum: nPage,
oCoords: [ ulCorner[0]+j*mWidth, ulCorner[1]-i*mHeight, ulCorner[0]+(j+1)*mWidth, ulCorner[1]-(i+1)*mHeight ]
});
} catch(e) { console.println( e.toSource()); }
try {
g.highlight=highlight.p
g.buttonPosition = position.iconOnly;
g.lineWidth = 1;
g.strokeColor = color.black;
g.setAction("MouseDown", "selectNonRandomTile("+nCnt+","+nCnt+");")
} catch(e) { console.println("set properties: " + e.toSource()) }
var oIcon = this.getIcon("pic."+nCnt);
g.buttonSetIcon(oIcon,1);
if (debug) g.buttonSetIcon(oIcon,0);
}
}
// Now lay out the icon fields.
var f = this.getField("Rulcorner");
var ulCorner = f.rect;
this.removeField("Rulcorner");
var nCnt = 0;
for ( var i=0; i<nRows; i++) {
for ( var j=0; j<nCols; j++ ) {
nCnt++;
try {
var g = this.addField({
cName: "MemRbutton."+nCnt,
cFieldType: "button",
nPageNum: nPage,
oCoords: [ ulCorner[0]+j*mWidth, ulCorner[1]-i*mHeight, ulCorner[0]+(j+1)*mWidth, ulCorner[1]-(i+1)*mHeight ]
});
} catch(e) { console.println( e.toSource()); }
try {
g.highlight=highlight.p
g.buttonPosition = position.iconOnly;
g.lineWidth = 1;
g.strokeColor = color.black;
g.setAction("MouseDown", "selectRandomTile(randomDPS["+nCnt+"],"+nCnt+");")
} catch(e) { console.println("set properties: " + e.toSource()) }
}
}
try { randomizePuzzle(); } catch(e) { console.println("randomizePuzzle exceptions: " + e.toSource()) }
var isRandomized = true;
\end{execJS}
\end{acromemory2}
\begin{needhelp}
\begin{execJS}{helpjs}
try {
aebTrustedFunctions(this, aebImportIcon, {cName: "helpicon", cDIPath: "\imageImportPath.\iconsExt"}, this);
var f = this.getField("memoryhelp");
var oIcon = this.getIcon("helpicon");
f.buttonPosition = position.iconOnly;
f.buttonSetIcon(oIcon,1);
f.buttonSetCaption({cCaption: "\helpCaption"});
} catch(e) {console.println("exception: " + e.toSource())}
\end{execJS}
\end{needhelp}
%</package>
% \end{macrocode}
% \Finale
\endinput