/////////////////////////////////
// Global Variables for this game
//var iconplus = "p/plus.gif"
//var iconmins = "p/mins.gif"
//var iconzero = "p/zero.gif"
var iconplus = new Image (15,15);
iconplus.src = "p/plus.gif";
var iconmins = new Image (15,15);
iconmins.src = "p/mins.gif";
var iconzero = new Image (15,15);
iconzero.src = "p/zero.gif";
var iconundo = new Image (40,40);
iconundo.src = "p/undo.gif";
var iconnoundo = new Image (40,40);
iconnoundo.src = "p/noundo.gif";
var iconself = new Image (40,40);
iconself.src = "p/self.gif";
var iconauto = new Image (40,40);
iconauto.src = "p/auto.gif";
var help = 'Los de puzzel logisch op.\n'+
'\n' +
'Deze puzzel lijkt op het eerste oog misschien ingewikkeld, maar\n'+
'met een gezond verstand en een systematische aanpak is hij\n'+
'door iedereen op te lossen.\n'+
'\n'+
'Ieder probleem bestaat uit een inleiding, aanwijzingen en een tabel.\n'+
'In de tabel kunt u de gegevens weergeven. Met gewoon clicken plaatst\n'+
'u een min (-) bij een onmogelijke combinatie, en met ctrl-clicken een\n'+
'plus (+) bij een goede combinatie. Door de aanwijzingen door te\n'+
'lopen en de gegevens te combineren, komt u vanzelf bij de oplossing.\n'+
'\n'+
'Daarnaast beschikt u over een Undo knop, waarmee u eventueel\n'+
'een stap ongedaan kunt maken. En wilt u liever niet geholpen worden\n'+
'met het invullen van de puzzel, klik dan op de Auto knop.\n'+
'\n'+
'Veel plezier!\n'+
'\n'+
'Steven@deBrouwer.org (23-jul-07)'+
'';
var INeedHelp = true;
var oplossing = (typeof myLQ.opl != "undefined") ;
function show(a) {alert(a)};
function klaar()
{
var uitslag="";
var x,y;
with (myLQ)
{
uitslag +=
"\n\nUitslag: "+title+"\n"+
'\n'+
'\n'+
"\n"+
"
Uitslag
"+title+"
"+
"
\n"
allesgoed=true;
uitslag += "
";
uitslag+="
"+item[nr_of_cats].cat+"
\n";
for (var i=1; i < nr_of_cats; i++)
{
uitslag+="
"+item[i].cat+"
\n";
}
uitslag += "
\n";
for (var i=1; i<=nr_of_items; i++)
{
uitslag += "
";
uitslag += "
"+item[nr_of_cats][i]+"
";
for (var j=1; j< nr_of_cats; j++)
{
x = v_hor[j][i];
kleur = " ";
if (oplossing)
{
kleur=" style='color: ";
if (x==opl[j][i])
{
kleur=" style='color: green'";
} else
{
kleur=" style='color: red'";
allesgoed=false;
}
}
uitslag += "
"+item[j][x]+"
";
}
uitslag += "
\n";
}
uitslag += "
\n
";
if (oplossing)
{
if (allesgoed)
{
uitslag+="
Alles goed! Proficiat!
";
} else
{
uitslag+="
Helaas, niet alles goed...
Probeer het nog eens...";
}
} else
{
uitslag+='
Oplossing helaas nog niet bekend bij Steven....
Kan dus helaas niet controleren, of jouw oplossing klopt. Zou je hem mij willen mailen?
Thanks! Steven <Steven@deBrouwer.org>';
}
uitslag+="\n\n\n";
} // myLQ
newWindow = window.open('','newWin','width=400,height=400');
newWindow.document.write(uitslag);
newWindow.document.close();
}
function nospaces(entry)
{
out = " "; // replace this
add = " "; // with this
temp = "" + entry; // temporary holder
while (temp.indexOf(out)>-1) {
poep=true;
pos= temp.indexOf(out);
temp = "" + (temp.substring(0, pos) + add +
temp.substring((pos + out.length), temp.length));
}
out = "-"; // replace this
add = "−"; // with this
while (temp.indexOf(out)>-1) {
poep=true;
pos= temp.indexOf(out);
temp = "" + (temp.substring(0, pos) + add +
temp.substring((pos + out.length), temp.length));
}
return temp;
}
var alfabet="ABCDEFGHIJKLMNOPQRSTUVWXYZ";
var totmatmax = myLQ.nr_of_cats * (myLQ.nr_of_cats - 1) / 2;
var sol = new Array(totmatmax+1);
var v_hor = new Array(totmatmax+1);
var v_ver = new Array(totmatmax+1);
var GlobCount = 0;
var saveAll = new Array(100);
for (var sa=0;sa<100 ;sa++ ) saveAll[sa] = new Array(totmatmax+1);
with (myLQ)
{
for (var i=1; i<=totmatmax; i++ )
{
for (var sa=0;sa<100 ;sa++ ) saveAll[sa][i] = new Array(maxItems+1);
sol[i] = new Array(maxItems+1);
v_hor[i] = new Array(maxItems+1);
v_ver[i] = new Array(maxItems+1);
for (var j=1; j<=maxItems; j++ )
{
for (var sa=0;sa<100 ;sa++ ) saveAll[sa][i][j] = new Array(maxItems+1);
sol[i][j] = new Array(maxItems+1);
for (var k=1; k<=maxItems; k++ )
{
for (var sa=0;sa<100 ;sa++ ) saveAll[sa][i][j][k] = 0;
sol[i][j][k] = 0;
}
v_hor[i][j] = 0;
v_ver[i][j] = 0;
}
}
}
var ImageArray = new Array();
////////////////////
function getImages()
{
for (var t=0; t 1)
{
GlobCount--;
for (var i=1; i<=totmatmax; i++)
for (var j=1; j<=myLQ.nr_of_items; j++)
{
for (var k=1; k<=myLQ.nr_of_items; k++)
sol[i][j][k] = saveAll[GlobCount-1][i][j][k];
v_hor[i][j]=0;
v_ver[i][j]=0;
}
// sol=saveAll[GlobCount-1]
refresh();
}
if (GlobCount <= 1)
{
var t = ImageArray['undo'];
document.images[t].src=iconnoundo.src;
}
}
///////////////
function savedo()
{
for (var i=1; i<=totmatmax; i++)
for (var j=1; j<=myLQ.nr_of_items; j++)
for (var k=1; k<=myLQ.nr_of_items; k++)
saveAll[GlobCount][i][j][k] = sol[i][j][k];
// saveAll[GlobCount] = sol;
GlobCount++;
if (GlobCount > 1)
{
var t = ImageArray['undo'];
document.images[t].src=iconundo.src;
}
}
////////////////////////////
function fill_in(i, nofound)
{
with (myLQ)
{
var hlp, j,k,count,dum;
do
{
hlp=true;
for (j=1; j<=nr_of_items; j++)
{
count=0;
dum=v_hor[i][j];
for (k=1 ; k<=nr_of_items; k++)
{
count=count+sol[i][j][k];
}
if ((dum!=0) && (count!=(nr_of_items+1)) )
{
for (k=1; k<=nr_of_items; k++)
{
setsign(i,j,k,1);
}
setsign(i,j,dum,2);
hlp=false;
}
}
for (k=1 ; k<=nr_of_items; k++)
{
count=0;
dum=v_ver[i][k];
for (j=1 ; j<=nr_of_items; j++)
{
count=count+sol[i][j][k];
}
if ((dum!=0) && (count!=(nr_of_items+1)) )
{
for (j=1 ; j<=nr_of_items; j++)
{
setsign(i,j,k,1);
}
setsign(i,dum,k,2);
hlp=false;
}
}
for (j=1 ; j<=nr_of_items; j++)
{
count=0;
dum=v_hor[i][j];
for (k=1 ; k<=nr_of_items; k++)
{
count=count+sol[i][j][k];
}
if ((dum==0) && (count==(nr_of_items-1)) )
{
k=1;
while (sol[i][j][k]==1)
{
k++;
}
setsign(i,j,k,2);
//x v_hor[i][j]=k; v_ver[i][k]=j;
hlp=false;
}
}
for (k=1 ; k<=nr_of_items; k++)
{
count=0;
dum=v_ver[i][k];
for (j=1 ; j<=nr_of_items; j++)
{
count=count+sol[i][j][k];
}
if ((dum==0) && (count==(nr_of_items-1)))
{
j=1;
while (sol[i][j][k]==1)
{
j++;
}
setsign(i,j,k,2);
//x v_hor[i][j]=k; v_ver[i][k]=j;
hlp=false;
}
}
nofound=nofound && hlp;
}
while (!hlp);
return nofound;
}
}
//////////////////////////////
function combineer(i,j,k, nofound)
{
with (myLQ)
{
var hlp, l, m, dum;
var vec = new Array(maxItems);
do
{
hlp=true;
hlp=fill_in(i,hlp);
hlp=fill_in(j,hlp);
hlp=fill_in(k,hlp);
for (l=1; l<=nr_of_items; l++)
{
dum=v_hor[i][l];
if (dum!=0)
{
for (m=1; m<=nr_of_items; m++)
{
vec[m]=0;
if ( (sol[j][l][m]==1) || (sol[k][m][dum]==1) ) vec[m]=1;
if ( (sol[j][l][m]==2) || (sol[k][m][dum]==2) ) vec[m]=2;
}
for (m=1; m<=nr_of_items; m++)
{
if (sol[j][l][m]!=vec[m])
{
setsign(j,l,m, vec[m]);
//x if (vec[m]==2) { v_hor[j][l]=m; v_ver[j][m]=l;}
hlp=false;
}
if (sol[k][m][dum]!=vec[m])
{
setsign(k,m,dum, vec[m]);
//x if (vec[m]==2) {v_hor[k][m]=dum; v_ver[k][dum]=m; }
hlp=false;
}
}
}
}
for (l=1 ; l<=nr_of_items; l++)
{
dum=v_hor[j][l];
if (dum!=0)
{
for (m=1; m<=nr_of_items; m++)
{
vec[m]=0;
if ((sol[i][l][m]==1) || (sol[k][dum][m]==1)) vec[m]=1;
if ((sol[i][l][m]==2) || (sol[k][dum][m]==2)) vec[m]=2;
}
for (m=1; m<=nr_of_items; m++)
{
if (sol[i][l][m]!=vec[m])
{
setsign(i,l,m, vec[m]);
//x if (vec[m]==2) {v_hor[i][l]=m; v_ver[i][m]=l;}
hlp=false;
}
if (sol[k][dum][m]!=vec[m])
{
setsign(k,dum,m, vec[m]);
//x if (vec[m]==2) {v_hor[k][dum]=m; v_ver[k][m]=dum; }
hlp=false;
}
}
}
}
for (l=1; l<=nr_of_items; l++)
{
dum=v_hor[k][l];
if (dum!=0)
{
for (m=1 ; m<=nr_of_items; m++)
{
vec[m]=0;
if ((sol[i][m][dum]==1) || (sol[j][m][l]==1)) vec[m]=1;
if ((sol[i][m][dum]==2) || (sol[j][m][l]==2)) vec[m]=2;
}
for (m=1 ; m<=nr_of_items; m++)
{
if (sol[i][m][dum]!=vec[m])
{
setsign(i,m,dum, vec[m]);
//x if (vec[m]==2) {v_hor[i][m]=dum; v_ver[i][dum]=m; }
hlp=false;
}
if (sol[j][m][l]!=vec[m])
{
setsign(j,m,l, vec[m]);
//x if (vec[m]==2) { v_hor[j][m]=l; v_ver[j][l]=m; }
hlp=false;
}
}
}
}
nofound=nofound && hlp;
}
while (!hlp);
}
return nofound;
}
function ptest(w)
{
var l,x,y;
var nofound;
var splitArray = w.split('_');
l=splitArray[0];
x=splitArray[1];
y=splitArray[2];
if (sol[l][x][y] == 0)
{
if (CtrlKeyDown)
{
setsign(l,x,y,2)
//x v_hor[l][x] = y; v_ver[l][y] = x;
}
else
{
setsign(l,x,y,1)
}
if (INeedHelp)
{
do
{
nofound = true;
if (myLQ.nr_of_cats==3)
{
nofound = combineer(1,2,3, nofound);
}
if (myLQ.nr_of_cats==4)
{
nofound = combineer(4,5,6, nofound);
nofound = combineer(2,3,5, nofound);
nofound = combineer(1,2,6, nofound);
nofound = combineer(1,3,4, nofound);
}
} while (!nofound);
}
savedo();
}
else
{
alert ('mag niet!');
}
if (foundall())
{
klaar();
}
}
function printMatrix() {
with (myLQ) {
document.write
(
"