VIL Ierakstīts Oktobris 17, 2004 Share Ierakstīts Oktobris 17, 2004 Reiz sensenos laikos (1999.g) iepazīšanās nolūkos ar javascript pārsis stundās uzrakstīju vienu spēlīti. Pārceļot vecās sources, atradu. Tādēļ nolēmu padalīties. Statuss: opensource, brīvi izplatāms un modificējams. Atsauce uz autoru vēlama. Trūkumi: iet uz IE, bet neiet uz FF. <html> <head> <meta http-equiv="Content-Language" content="lv"> <meta http-equiv="Content-Type" content="text/html; charset=windows-1257"> <title>Spēle 15</title> <SCRIPT> function Klik(obj) { if (Der(obj.id)!=1) { alert("Šo lauciņu nedrīkst kustināt"); } if (VaiPabeigts()==1) { alert("Malacis! Tu esi tautas varonis! Šī spēle ir pabeigta..."); } } function FindFree() { objid=-1; for (i=0;i<document.all.tbl1.rows.length;i++) { for (j=0;j<document.all.tbl1.rows(i).cells.length;j++) { if (document.all.tbl1.rows(i).cells(j).innerText==" ") { objid=4*i+j+1; } } } return(objid); } function Der(cellid) //Arguments- cell id, kurā ir ieklikšķināts { atrasts=0; s=cellid.substr(1,3); brivais=FindFree(); //Pārbaude uz augšu if (s*1-4==brivais) { atrasts=1; } //Pārbaude uz leju if (s*1+4==brivais) { atrasts=1; } //Pa labi if ((s*1+1==brivais)&&(s!=4)&&(s!=8)&&(s!=12)) { atrasts=1; } //Pa kreisi if ((s*1-1==brivais)&&(s!=1)&&(s!=5)&&(s!=9)&&(s!=13)) { atrasts=1; } if (atrasts==1) { //Apmaina vietām rūtiņu saturus s1=document.all.tbl1.all(cellid).innerHTML; s2=eval("document.all.tbl1.all('c"+brivais+"').innerHTML"); document.all.tbl1.all(cellid).innerHTML=s2; eval("document.all.tbl1.all('c"+brivais+"').innerHTML=s1"); } return(atrasts); } function VaiPabeigts() { pabeigts=0; if ((c1.innerText*1<c2.innerText*1)&&(c2.innerText*1<c3.innerText*1)&&(c3.innerText*1<c4.innerText*1)&&(c4.innerText*1<c5.innerText*1)&&(c5.innerText*1<c6.innerText*1)&&(c6.innerText*1<c7.innerText*1)&&(c7.innerText*1<c8.innerText*1)&&(c8.innerText*1<c9.innerText*1)&&(c9.innerText*1<c10.innerText*1)&&(c10.innerText*1<c11.innerText*1)&&(c11.innerText*1<c12.innerText*1)&&(c12.innerText*1<c13.innerText*1)&&(c13.innerText*1<c14.innerText*1)&&(c14.innerText*1<c15.innerText*1)&&(c16.innerText=" ")) { pabeigts=1; } return(pabeigts) } function Randomize() { //Attīra masīvu for (i=1;i<=16;i++) { eval("document.all.tbl1.all('c"+i+"').innerHTML=''"); } //Izvēlos tukšo lauciņu x=Math.round(Math.random()*15+1); eval("document.all.tbl1.all('c"+x+"').innerHTML=' '"); //Aizpildu skaitļus for (i=1;i<16;i++) { x=Math.round(Math.random()*15+1); eval("sat=document.all.tbl1.all('c"+x+"').innerHTML"); while (sat!='') { x++; if (x>16) x=1; eval("sat=document.all.tbl1.all('c"+x+"').innerHTML"); } eval("document.all.tbl1.all('c"+x+"').innerHTML=Formats("+i+")"); } } function Formats(s) { s="<B>"+s+"</B>"; return(s) } </SCRIPT> </head> <body onLoad="Randomize()"> <h1 align="center"><font color="#FF0000" face="Arial"> Spēle "15"</font></h1> <div align="center"> <center> <table border="1" width="200" id=tbl1 height="200"> <tr id=r1> <td width="25%" id=c1 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> <td width="25%" id=c2 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> <td width="25%" id=c3 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> <td width="25%" id=c4 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> </tr> <tr id=r2> <td width="25%" id=c5 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> <td width="25%" id=c6 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> <td width="25%" id=c7 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> <td width="25%" id=c8 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> </tr> <tr id=r3> <td width="25%" id=c9 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> <td width="25%" id=c10 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> <td width="25%" id=c11 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> <td width="25%" id=c12 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> </tr> <tr id=r4> <td width="25%" id=c13 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> <td width="25%" id=c14 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> <td width="25%" id=c15 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> <td width="25%" id=c16 onClick="Klik(this)" align="center" bgcolor="#FFFF00"> </td> </tr> </table> </center> </div> <h2 align="center"><font size="5"><input type="button" value="Sajaukt" name="B3" ID="B3" onClick="Randomize()"></font></h2> </body> </html> Kā palaist: iekopējam programmas saturu teksta failā, saglabājam ar paplašinājumu .htm un atveram ar pārlūkprogrammu (vēlams IE). Link to comment Share on other sites More sharing options...
Recommended Posts
Izveido kontu, vai pieraksties esošajā, lai komentētu
Jums ir jābūt šī foruma biedram, lai varētu komentēt tēmas
Izveidot jaunu kontu
Piereģistrējies un izveido jaunu kontu, tas būs viegli!
Reģistrēt jaunu kontuPierakstīties
Jums jau ir konts? Pierakstieties tajā šeit!
Pierakstīties tagad!