Viewing Program

Program Data

Program thumbnail for "{props.program.title}"

Title	Candy Crush
ID	5342751384666112
Created	11 years ago, 1404333269088
Updated	11 years ago, 1404774114520
Code	/* Candy Crush (7/14) * * A programming exercise to make a game similar to Candy * Crush Saga by King.com. * * -- Removed localStorage since it's not allowed by the * -- Program Guidelines (my bad), so it no longer keeps * -- track of the level completed if you exit out and * -- then start up again. * * Match 3 of the same color to clear the squares. * Matching 4 makes a character (Mr Pink, Hopper, etc..) * Making a 3x3 match makes a gem or red heart or yellow key. * Matching 5 in row/column makes a star. * Making a match with a character clears the row or column. * Match with a gem/heart/key clears the 8 squares around it. * Doing a swap with a star clears some random squares. * Doing a star swap with a character or gem clears more. * Doing a 2 star swap is the best. * Two 'non-leaf' of any color can be swapped at any time. / // level number - increase this and restart to jump ahead var lv = 0; //square color - 0 clear, 1 thin, 2 thick, 3 solid, 4 locked var sc = [[],[],[],[],[],[],[],[],[],[],[],[]]; var sn = [[],[],[],[],[],[],[],[],[],[],[],[]]; //square number (1-5,16) var sm = [[],[],[],[],[],[],[],[],[],[],[],[]]; //square multiple (0,5,10) var sx = [[],[],[],[],[],[],[],[],[],[],[],[]]; //square x position var sy = [[],[],[],[],[],[],[],[],[],[],[],[]]; //square y position var f = (400/9) -1; // display factor var cnt = 99; // frame counter (20 is 'end of level' check) var mcnt = 0; // move counter var scr = 0; // score var cm = 8; // 'check for match' or 'allow move' based on cnt & cm var cd = 1; // 'check for drop' ... var si = 0; // selected i var sj = 0; // selected j var ri = 9; // 'rotate' with 'selected' square var rj = 9; var rxf = 0; // 'rotate' factor (increment) var ryf = 0; var rcnt = 0; // 'rotate' count var vmove = false; var acnt = 0; // animate count var af = 8; // animate factor var sm5i = 9; // found a sm=5 or sm=10 during fs() or 'sm15' swap... var sm5j = 9; var sm10i = 9; var sm10j = 9; var sm15i = 9; // sm=15 swapped square var sm15j = 9; var double15 = false; // two sm=15s swapped var sn17i = 9; // 'home' square for lines to sn17's var sn17j = 9; var sm15cnt = -20; // extra long count/cnt for sm15 swap/match var si2 = 9; // swapped ij for 510/510 swap var sj2 = 9; var sm5dir = floor(random(2)); // vertical/horizontal removal controller var lc = true; // level complete flag var oom = false; // 'out of moves' flag var pmx = 0; var pmy = 0; var mo = false; // mouse out ????/ var hp = false; // help screen flag var img = [getImage("space/background"), getImage("avatars/leaf-blue"), // sm = 0 getImage("avatars/leaf-green"), getImage("avatars/leaf-orange"), getImage("avatars/leaf-red"), getImage("avatars/leaf-yellow"), getImage("avatars/spunky-sam"), // sm = 5 (4 in a row) getImage("avatars/old-spice-man"), getImage("avatars/orange-juice-squid"), getImage("avatars/mr-pink"), getImage("creatures/Hopper-Happy"), getImage("cute/GemBlue"), // sm = 10 (3&3 cross) getImage("cute/GemGreen"), getImage("cute/GemOrange"), getImage("cute/Heart"), getImage("cute/Key"), getImage("space/star"), // 16 (5 in a row) getImage("avatars/mr-pants") // 17 (bonus 16 swap) ]; // 'free' the square var fs = function(i,j) { scr ++; if (sc[i][j] < 3) { if (i < 8 && sc[i+1][j] === 3) {sc[i+1][j] --;} //right if (j < 7 && sc[i][j+1] === 3) {sc[i][j+1] --;} //down if (i > 0 && sc[i-1][j] === 3) {sc[i-1][j] --;} //left if (j > 0 && sc[i][j-1] === 3) {sc[i][j-1] --;} //down } if (sc[i][j] === 4) {sc[i][j] = 2;} if (sc[i][j] > 0) {sc[i][j] --;} if (sm[i][j] === 5 \|\| sm[i][j] === 10) { if (sm10i === 9) { if (sm[i][j] === 10) {sm10i = i; sm10j = j;} else { if (sm5i === 9) {sm5i = i; sm5j = j;} // 16??? } } } sn[i][j] = 0; sm[i][j] = 0; }; // flash white square for the sm5 & sm10...... var rfs = function(i,j) { if (i >= 0 && i <= 8 && j >= 0 && j <= 7) { fill(192, 238, 250); rect(if+6,jf+6,40,40,5); if (sm15i === 9 & sm[i][j] === 15) { // extra credit for a 15 sm15i = i; sm15j = j; } fs(i,j);} }; // process the removal of a sm = 5 or sm = 10 square var process510 = function() { if (sm10i < 9) { for (var a=sm10i-1; a<=sm10i+1; a++) { for (var b=sm10j-1; b<=sm10j+1; b++) {rfs(a,b);} } } else { if (sm5i < 9) { // if (random(2) < 1) { //random direction... sm5dir ++; // every other one is a different direction if (sm5dir%2 === 0) { for (var z=0; z<=8; z++) {rfs(z,sm5j);} // horizontal } else { for (var z=0; z<=7; z++) {rfs(sm5i,z);} // vert } } } sm10i = 9; sm5i = 9; }; //-------------------------------------------------------------- //-------------------------------------------------------------- textAlign(CENTER,CENTER); textFont(createFont("cursive")); var draw = function() { image(img[0],0,0); if (lv < 0) { stroke(255, 0, 0); strokeWeight(9); fill(250, 250, 165); rect(50,50,300,300,15); } else { fill(250, 242, 153); stroke(250, 30, 60); strokeWeight(4); rect(2,357,396,41); strokeWeight(3); rect(339,364,51,27,5); fill(199, 6, 22); textSize(20); text("Score: "+scr,58,378); text("Move: "+mcnt,174,378); text("Level: "+lv,279,378); textSize(18); text("Help",365,378); noFill(); textSize(13); // text(mo,280,376); // text("si:"+si+" sj:"+sj,90,376); // text("di:"+di+" dj:"+dj,100,393); // text("sn:"+sn[si][sj]+" sm:"+sm[si][sj],90,393); // text("sm5i:"+sm5i+" sm5j:"+sm5j,180,376); // text("sm10i:"+sm10i+" sm10j:"+sm10j,180,393); // text("si2:"+si2+" sj2:"+sj2,290,376); // text(df+" "+di+" "+dj,290,376); // text("sm15i:"+sm15i+" sm15j:"+sm15j,290,376); // text(double15,290,393); // text(ri+" "+rj,290,393); // text("cnt: "+cnt,340,393); stroke(0, 0, 0,60); strokeWeight(2); //------------------------------------------------------- // check for end of level //------------------------------------------------------- if (cnt === 20) { if (!oom) { lc = true; for (var i=0; i<=8; i++) { for (var j=0; j<=7; j++) { if (sc[i][j] > 0) {lc = false; } } } } if (!lc && mcnt <= 0) {oom = true;} // out of moves } // ---------------------------------------------------------- // 'rotate' ---- rotate for a valid move (vmove) - full circle rotate otherwise // ---------------------------------------------------------- if (ri < 9) { if (rxf === 0 && ryf === 0) { rcnt = 10; if (ri > si) {rxf = f/5;} else { if (ri < si) {rxf = -f/5;} else { if (rj > sj) {ryf = f/5;} else { if (rj < sj) {ryf = -f/5;}}}} } else { sx[si][sj] += rxf; sy[si][sj] += ryf; sx[ri][rj] -= rxf; sy[si][rj] -= ryf; rcnt --; if (rcnt === 5) { if (vmove) { var snhold = sn[si][sj]; var smhold = sm[si][sj]; sn[si][sj] = sn[ri][rj]; sm[si][sj] = sm[ri][rj]; sn[ri][rj] = snhold; sm[ri][rj] = smhold; mcnt --; vmove = false; rcnt = 0; } else { rxf = -1; ryf = -1; } } if (rcnt === 0) { rxf = 0; ryf = 0; sx[si][sj] = sif+6; sy[si][sj] = sjf+6; sx[ri][rj] = rif+6; sy[ri][rj] = rjf+6; ri = 9; rj = 9; } } } //---------------------------------------------------------- //display //---------------------------------------------------------- for (var i=0; i<=8; i++) { for (var j=0; j<=7; j++) { if (sc[i][j] === 0) {noFill();} else { if (sc[i][j] === 1) {fill(219, 170, 247);} else { //light if (sc[i][j] === 2) {fill(188, 102, 242);} else { //thick if (sc[i][j] === 3) {fill(222, 220, 224);} else { //solid if (sc[i][j] === 4) {noFill();}}}}} //locked rect(if+6,jf+6,40,40,5); } } for (var i=0; i<=8; i++) { for (var j=0; j<=7; j++) { if (sn[i][j] > 0 && sc[i][j] !== 3) { if (sn[i][j] === 17) { stroke(205, 241, 247,50); // lines for sm 15 match line(sx[i][j]+22,sy[i][j]+22,sx[sn17i][sn17j]+22,sy[sn17i][sn17j]+22); stroke(0, 0, 0,60); image(img[17],sx[i][j]-5,sy[i][j]-5,50,50); } else { if (sn[i][j] === 16) { fill(0, 0, 0); rect(sx[i][j]+6,sy[i][j]+6,28,28,-5); image(img[16],sx[i][j],sy[i][j],40,40); } else { if (sm[i][j] !== 10) { image(img[sn[i][j]+sm[i][j]],sx[i][j],sy[i][j],40,40); } else { image(img[sn[i][j]+sm[i][j]],sx[i][j]+5,sy[i][j]-11,32,50); } } } } if (sc[i][j] === 4) { strokeWeight(2); stroke(0, 0, 0); noFill(); line(sx[i][j]+5,sy[i][j]+5,sx[i][j]+f-6,sy[i][j]+f-6); line(sx[i][j]+f-8,sy[i][j]+5,sx[i][j]+4,sy[i][j]+f-6); rect(if+8,jf+8,36,36,5); strokeWeight(1); stroke(0, 0, 0,60); } } } //------------------------------------------ // animate - moving between boxes //------------------------------------------- if (!oom) { if (acnt > 0) { for (var i=0; i<=8; i++) { for (var j=0; j<=7; j++) { if (sy[i][j] < (jf+6)-f/af) { sy[i][j] += f/af; } else {sy[i][j] = jf+6;} } } acnt --; } else { cnt ++; //---------------------------------------------------------- // drop (after each match or after all matches complete?) //---------------------------------------------------------- if (cnt === cd) { for (var i=0; i<=8; i++) { for (var j=0; j<=7; j++) { if (sc[i][j] !== 3 && (sn[i][j] === 0 \|\| sn[i][j] === 17)) { for (var n=j; n>=0; n--) { if (n === 0) { sn[i][n] = floor(random(1,6)); sm[i][n] = 0; if (random(150) < 1) {sm[i][n] = 5;} else { if (random(350) < 1) {sm[i][n] = 10;} else { if (random(700) < 1) { sn[i][n]=16; sm[i][n] = 15; } } } } else { sn[i][n] = sn[i][n-1]; sm[i][n] = sm[i][n-1];} sy[i][n] = (n-1)f+6; } acnt = af; cnt = 0; j = 9; } } } } // sm15s, 5 vert, 5 horz, 3x3 corner, 4 vert, 4 horz, 3 vert, 3 horz //---------------------------------------------------------- //check for match //--------------------------------------------------------- if (cnt === cm) { // sm15 'swapped' --------------------------- // sm15/sm15 swap if (cnt > 0) { if (double15 && sm15i < 9) { for (var i=0; i<=8; i++) { for (var j=0; j<=7; j++) { if (sn[i][j] > 0 && sc[i][j] < 3) { rfs(i,j); sn[i][j] = 17; } } } sn17i = sm15i; sn17j = sm15j; sm5i = 9; sm10i = 9; cnt = sm15cnt; sm5i = 9; sm10i = 9;sm15i=9; sm15j=9; double15 = false; scr+=500; } } // sm15/sm0-5-10 swap if (cnt > 0) { if (sm15i < 9) { var f17 = 5; if (sm10i < 9) {f17=20; process510();} else { //sm10 # if (sm5i < 9) {f17=10; process510();} //sm5 # } for (var a=0; a<=f17; a++) { var i = floor(random(9)); var j = floor(random(8)); if (sn[i][j] > 0 && sc[i][j] < 3) { rfs(i,j); sn[i][j] = 17; } } rfs(sm15i,sm15j); sn[sm15i][sm15j] = 17; process510(); sn17i = sm15i; sn17j = sm15j; cnt = sm15cnt; sm15i=9; sm15j=9; scr+=25; } } // sm5/10 & sm5/10 swap if (cnt > 0) { if (si2 < 9) { var sm2 = sm[si2][sj2]; if (sm[si][sj] === 10) {sm10i = si; sm10j = sj; process510();} else { if (sm[si][sj] === 5) {sm5i = si; sm5j = sj; process510();} } if (sm2 === 10) {sm10i = si2; sm10j = sj2; process510();} else { if (sm2 === 5) {sm5i = si2; sm5j = sj2; process510();} } cnt = 0; si2 = 9; scr+=25; } } // vert 5 if (cnt > 0) { for (var i=0; i<=8; i++) { for (var j=0; j<=3; j++) { if (sn[i][j] > 0 && (sn[i][j] === sn[i][j+1] && sn[i][j] === sn[i][j+2] && sn[i][j] === sn[i][j+3] && sn[i][j] === sn[i][j+4])) { for (var z=0; z<=4; z++) {fs(i,j+z);} process510(); sn[i][j+2] = 16; sm[i][j+2] = 15; cnt = 0; i=9; j=9; scr+=10; } } } } // horz 5 if (cnt > 0) { for (var i=0; i<=4; i++) { for (var j=0; j<=7; j++) { if (sn[i][j] > 0 && (sn[i][j] === sn[i+1][j] && sn[i][j] === sn[i+2][j] && sn[i][j] === sn[i+3][j] && sn[i][j] === sn[i+4][j])) { for (var z=0; z<=4; z++) {fs(i+z,j);} process510(); sn[i+2][j] = 16; sm[i+2][j] = 15; cnt = 0; i=9; j=9; scr+=10; } } } } // corner 3&3 if (cnt > 0) { for (var i=0; i<=8; i++) { for (var j=0; j<=5; j++) { if (sn[i][j] > 0 && (sn[i][j] === sn[i][j+1] && sn[i][j] === sn[i][j+2])) { var snhold = sn[i][j]; for (var k=0; k<=2; k++) { for (var l=-2; l<=0; l++) { if (i+l >=0 && (sn[i][j] === sn[i+l][j+k] && sn[i][j] === sn[i+l+1][j+k] && sn[i][j] === sn[i+l+2][j+k])) { for (var z=0; z<=2; z++) {fs(i,j+z);} fs(i+l,j+k); fs(i+l+1,j+k); fs(i+l+2,j+k); process510(); sn[i][j+k] = snhold; sm[i][j+k] = 10; cnt = 0; i=9; j=9; k=9; l=9; scr+=5; } } } } } } } // vert 4 if (cnt > 0) { for (var i=0; i<=8; i++) { for (var j=0; j<=4; j++) { if (sn[i][j] > 0 && (sn[i][j] === sn[i][j+1] && sn[i][j] === sn[i][j+2] && sn[i][j] === sn[i][j+3])) { var snhold = sn[i][j]; for (var z=0; z<=3; z++) {fs(i,j+z);} process510(); sn[i][j+1] = snhold; sm[i][j+1] = 5; cnt = 0; i=9; j=9; scr+=2; } } } } // horz 4 if (cnt > 0) { for (var i=8; i>=3; i--) { for (var j=7; j>=0; j--) { if (sn[i][j] > 0 && (sn[i][j] === sn[i-1][j] && sn[i][j] === sn[i-2][j] && sn[i][j] === sn[i-3][j])) { var snhold = sn[i][j]; for (var z=0; z<=3; z++) {fs(i-z,j);} process510(); sn[i-2][j] = snhold; sm[i-2][j] = 5; cnt = 0; i=9; j=9; scr+=2; } } } } // vert 3 if (cnt > 0) { for (var i=0; i<=8; i++) { for (var j=0; j<=5; j++) { // & not 16 if (sn[i][j] > 0 && (sn[i][j] === sn[i][j+1] && sn[i][j] === sn[i][j+2])) { for (var z=0; z<=2; z++) {fs(i,j+z);} process510(); cnt = 0; i=9; j=9; } } } } // horz 3 if (cnt > 0) { for (var i=8; i>=2; i--) { for (var j=7; j>=0; j--) { // & not 16 if (sn[i][j] > 0 && (sn[i][j] === sn[i-1][j] && sn[i][j] === sn[i-2][j])) { for (var z=0; z<=2; z++) {fs(i-z,j);} process510(); cnt = 0; i=0; j=0; } } } } } // if (cnt === cm) } // else of if (acnt > 0) } // if (!oom) { else { stroke(242, 250, 10); strokeWeight(4); fill(38, 227, 227); rect(80,120,240,100,15); fill(0, 0, 0); textSize(17); text("Oops, you ran out of moves.",200,159); text("Click here to retry.",200,189); } //------------------------------------------------- // next level set-up //------------------------------------------------ if (lc && cnt > 90) { lv ++; cnt = 0; mcnt = 45; // lv 9,17... oom = false; scr = 0; for (var i=0; i<=8; i++) { for (var j=0; j<=7; j++) { sc[i][j] = 2; // lv 9,17,... if (lv === 1) { mcnt = 70; if (j<6) {sc[i][j] = 0;} else {sc[i][j] = 2;}} if (lv%8 === 2) { mcnt = 60; if (j<4) {sc[i][j] = 0;} else { if (j<5) {sc[i][j] = 1;} else { if (j<6) {sc[i][j]=2;} else {sc[i][j]=3;}}}} if (lv%8 === 3) { mcnt = 65; if (j<4) {sc[i][j] = 0;} else { if (j===4) {sc[i][j] = 4;} else { sc[i][j] = 3;}}} if (lv%8 === 4) { mcnt = 60; if (i<1 \|\| i>7 \|\| j>6) { sc[i][j] = 3;} else {sc[i][j] = 1;}} if (lv%8 === 5) { mcnt = 40; if (i<3 \|\| i>5 \|\| j<2) { sc[i][j] = 0;} else {sc[i][j] = 3;}} if (lv%8 === 6) { mcnt = 55; if (i+j < 9) {sc[i][j] = 0;} else {sc[i][j] = 3;} if (i+j === 8) {sc[i][j] = 4;}} if (lv%8 === 7) { mcnt = 40; if (i === 3 \|\| i === 5) {sc[i][j] = 4;} else { if (i===4) {sc[i][j]=3;} else {sc[i][j]=0;}}} if (lv%8 === 0) { mcnt = 55; if (random(2)<1) {sc[i][j] = 1;} else { if (random(2)<1) {sc[i][j] = 2;} else { if (random(3)<1) {sc[i][j] = 3;} else { sc[i][j]=4;}}}} sn[i][j] = 0; sm[i][j] = 0; sx[i][j] = if+6; sy[i][j] = jf+6; } } mcnt -= floor(lv/8)*5; if (mcnt < 20) {mcnt = 25;} lc = false; } if (lc) { stroke(242, 250, 10); strokeWeight(4); fill(38, 227, 227); rect(80,120,240,100,15); fill(13, 0, 13); textSize(19); text("Level Completed!",200,169); } // help screen -------------------------------------------- if (hp) { stroke(255, 0, 0); strokeWeight(5); fill(250, 250, 165); rect(50,50,300,300,15); strokeWeight(3); rect(310,310,30,30,5); fill(255, 0, 0); textSize(29); text("x",324,321); fill(0, 0, 148); textSize(15); text("Clear the 'jelly' to complete the level\nbefore you run out of 'Moves'.",200,84); text("Click & drag an image for a 'three of\na color' match, which clears the jelly.",200,128); text("Make bigger matches to get more \npowerful images, which clears more jelly.",200,173); text("You can 'swap' any two adjacent\n'more powerful' images at any time.",200,218); text("You can swap a star with any image\nat any time, but you'll clear more\nsquares if you swap it with a more\npowerfull image.",200,282); } if (mouseY > 360) {mo = true;} } // lv }; // written by phil fulks(7/14) var mouseClicked = function() { if (mouseX > 339 && mouseY > 364 && lv > 0) {hp = true;} if (mouseX > 305 && mouseY > 305 && mouseX < 345 && mouseY < 345 && hp) {hp = false;} if (oom && mouseX > 80 && mouseX < 320 && mouseY > 120 && mouseY < 220) { lc = true; lv --; cnt=99; } }; var mousePressed = function() { mo = false; pmx = mouseX; pmy = mouseY; if (mouseY <= 360 && !hp) { si = floor(mouseX/(f+1)); sj = floor(mouseY/(f+1)); } if (sc[si][sj] >= 3) {si = 9; sj = 9;} }; //---------------------------------------------------------- // swap movement (sets cnt to -5 for the 'animated rotate' //--------------------------------------------------------- var validmove = function(i2,j2) { ri = i2; rj = j2; // swap sm=15 square if (sm[si][sj] === 15) { sm15i = i2; sm15j = j2; if (sm[i2][j2] === 10) {sm10i = si; sm10j = sj;} else { if (sm[i2][j2] === 5) {sm5i = si; sm5j = sj;} } cnt = -5; vmove = true; } if (sm[i2][j2] === 15) { if (sm15i < 9) {double15 = true;} sm15i = si; sm15j = sj; if (sm[si][sj] === 10) {sm10i = i2; sm10j = j2;} else { if (sm[si][sj] === 5) {sm5i = i2; sm5j = j2;} } cnt = -5; vmove = true; } // swap sm5/sm10... if (cnt > 0) { if ((sm[si][sj] === 5 \|\| sm[si][sj] === 10) && (sm[i2][j2] === 5 \|\| sm[i2][j2] === 10)) { si2 = i2; sj2 = j2; cnt = -5; vmove = true; } } // tn for only -3 to 3 around the si/sj? if (cnt > 0) { var tn = [[],[],[],[],[],[],[],[],[],[],[],[]]; //test number for (var i=0; i<=8; i++) { for (var j=0; j<=7; j++) { tn[i][j] = sn[i][j]; } } tn[si][sj] = tn[i2][j2]; tn[i2][j2] = sn[si][sj]; // vert 3 for (var i=0; i<=8; i++) { for (var j=0; j<=5; j++) { if (tn[i][j] > 0 && (tn[i][j] === tn[i][j+1] && tn[i][j] === tn[i][j+2])) { cnt = -5; i=9; j=9; vmove = true; } } } // horz 3 if (cnt > 0) { for (var i=0; i<=6; i++) { for (var j=0; j<=7; j++) { if (tn[i][j] > 0 && (tn[i][j] === tn[i+1][j] && tn[i][j] === tn[i+2][j])){ cnt = -5; i=9; j=9; vmove = true; } } } } } }; var mouseDragged = function() { if (!hp && cnt > cm && ri === 9 && !mo && !oom) { if (dist(mouseX,mouseY,pmx,pmy) > 15) { if (abs(mouseX-pmx) > abs(mouseY-pmy)) { if (mouseX > pmx+5) { if (si < 8 && sn[si+1][sj] > 0 && sc[si+1][sj] < 3) { validmove(si+1,sj); //right } } else { if (mouseX < pmx-5) { if (si > 0 && sn[si-1][sj] > 0 && sc[si-1][sj] < 3) { validmove(si-1,sj); //left } } } } else { if (mouseY > pmy+5) { if (sj < 7 && sn[si][sj+1] > 0 && sc[si][sj+1] < 3) { validmove(si,sj+1); //down } } else { if (mouseY < pmy-5) { if (sj > 0 && sn[si][sj-1] > 0 && sc[si][sj-1] < 3) { validmove(si,sj-1); //up } } } } } } }; var mouseOut = function() { mo = true; };
Folds
Fork	false
Key	ag5zfmtoYW4tYWNhZGVteXIXCxIKU2NyYXRjaHBhZBiAgKDzw-a-CQw
Votes	286
Spin-Offs	10
Type	PJS
Width	400
Height	400
User Flagged	false
Origin Scratchpad	null
Hidden From Hotlist	false
Restricted Posting	false
By Child	false
Author Nick	Phil Fulks
Author Name	phfraf
Author ID	kaid_601674336850790775699252
Author Profile Access	COACH

Archive Data

Added	10 months ago, 1739380538524
Updated	8 months ago, 1744845019423
Source Deleted	unknown