Viewing Program

Program Data

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

Title	Bowling
ID	4790543296495616
Created	11 years ago, 1408810591145
Updated	11 years ago, 1409258056788
Code	/* Bowling (8/14) * * Click the 'Info' button for how to play. * * You'll get more strikes if the red target * arrow is on the far right or left and you * use maximum 'spin'. * * It is possible to pick up a split. * * Variables kf (knockdown factor), * sf (split pickup factor) and * af (aim factor) can be adjusted * to make it easier or harder. / var kf = 3; // knockdown factor [1 (hard) - 20 (easy)] var sf = 2; // split pickup factor [1 - 10 (easy)] var af = 5; // aim factor [1 - 10 (less accurate)] frameRate(30); var bx = 0; // ball x/y positions var by = 0; var bxi = -1; // ball x increment (curve) var byi = -10; // ball y increment (speed) var spina = 0; // spin angle var spini = -1; // spin increment var tcnt = 0; // rolling ball display counter var startx = 240; // green 'Bowl' button var targetx = 220; // red arrow var gutter = false; // gutter ball flag var inproc = false; // shot inprocess flag var bcontact1 = false; // ball contact with pins 1,2,3 var bcontact2 = false; // ball contact with pins 4-10 var bcnt = 0; // ball count var bcntd = 0; // ball count display delay var pcnt = 0; // player count var infoflag = false; // display info screen var plyr = 0; // which player is bowling // player top line score var ptop = [[],[[],[],[],[]],[[],[],[],[]]]; var pscr = [[0],[0],[0]]; // player score var frm = 0; // frame var scr = 0; // # of pins knocked down var x11 = 0; // '11th' frame x position var gameover = []; // game over flags var strkcnt = 0; // strike display count var rcnt = 0; // reset display count // pin position, up/down, movement var pinx = [0,200,191,209,182,200,218,173,191,209,227]; var piny = [0,100,94,94,88,88,88,82,82,82,82]; var pinp = [0,0,0,0,0,0,0,0,0,0,0]; // 0 up, 1 down var pinxa = []; // animate fall x/y var pinya = []; var pina = []; // fall rotate angle // bowling pin display var bpin = function(px,py) { var ps=0.1; fill(237, 230, 220); noStroke(); quad(px-21ps,py,px-34ps,py+226ps,px+34ps,py+226ps,px+21ps,py); stroke(0, 0, 0,120); line(px-32ps,py+226ps,px+32ps,py+226ps); bezier(px-20ps,py,px-34ps,py+60ps,px-105ps,py+92ps,px-33ps,py+226ps); bezier(px+20ps,py,px+34ps,py+60ps,px+105ps,py+92ps,px+33ps,py+226ps); bezier(px-20ps,py-40ps,px-75ps,py-180ps,px+75ps,py-180ps,px+20ps,py-40ps); fill(255, 0, 0); rect(px-20ps,py-40ps,40ps,40ps); }; //animate of falling pin var pindown = function(n) { pinp[n] = 1; pinxa[n] = round(random(2,5)); pinya[n] = round(random(-2,3)); pina[n] = round(random(12,25)); if (random(2) < 1) {pinxa[n] = -1;} if (random(2) < 1) {pina[n] = -1;} scr ++; }; var resetpins = function() { bcnt = 0; bcntd = 0; for (var n=1; n<=10; n++) {pinp[n] = 0;} }; var initgame = function() { plyr = 1; frm = 1; gameover[0] = false; gameover[1] = false; gameover[2] = false; resetpins(); for (var m=1; m<=2; m++) { for (var n=1; n<=12; n++) { pscr[m][n] = -1; for (var o=1; o<=3; o++) { ptop[m][o][n] = -1; } } } }; // blue pin setter display var resetdisp = function (n) { fill(82, 183, 250); stroke(50, 50, 180); if (n > 35) {n = (70-n);} rect(160,n-20,79,70); arc(200,n,101,155,40,140); arc(200,n-30,101,155,40,140); fill(0, 0, 0,35); noStroke(); rect(150,64,100,5); rect(150,64,100,9); }; kf+=15; // ---------------------------------------------- var draw = function() { background(247, 218, 145); textSize(14); strokeWeight(1); // room display ------------------ noStroke(); fill(51, 1, 51); // gutter/back quad(128,100,166,100,66,370,-88,370); quad(272,100,234,100,334,370,488,370); quad(23,100,63,100,0,140,0,112); quad(377,100,337,100,400,140,400,112); rect(0,65,400,35); fill(82, 183, 250); //blue ball return if (strkcnt > 0) { strkcnt --; if (strkcnt%2 === 0) { fill(219, 248, 252); } } quad(132,115,145,115,12,370,-35,370); quad(268,115,255,115,388,370,435,370); quad(10,115,22,115,0,128,0,121); quad(390,115,378,115,400,128,400,121); rect(132,65,13,50); rect(255,65,13,50); rect(10,65,12,50); rect(378,65,12,50); fill(234, 247, 247); quad(-12,370,-2,370,141,116,138,116); quad(412,370,420,370,264,116,263,116); stroke(2, 0, 0,35); // floor boards for (var n=85; n<=320; n+=19) { line(200,0,n,370); } line(0,386,400,386); stroke(0, 0, 0); //foul line line(0,370,400,370); textSize(17); noFill(); stroke(179, 114, 2); rect(325,126,47,27,5); fill(179, 114, 2); textSize(17); text("Info",335,145); if (pcnt === 2 && !gameover[0]) { textSize(22); fill(143, 89, 2,130); if (plyr === 1) { text("Player One",150,340); } else { text("Player Two",150,340); } } if (gameover[0]) { noFill(); rect(113,305,174,30,7); fill(255, 0, 0); text("Game Over ~ Restart?",119,325); } // target arrows ---------------------------------- if (mouseIsPressed && mouseX > 120 && mouseX < 280 && mouseY > 220 && mouseY < 280) { targetx = mouseX; if (targetx >= 200) {spini = -1;} else {spini = 1;} } var tx = 128; var ty = 260; fill(133, 128, 133); noStroke(); for (var n=0; n<=145; n+=24) { if (abs(targetx-(tx+n)) < 12) { fill(255, 0, 0); targetx = tx+n;} else {fill(133, 128, 133);} triangle(tx+n,ty,tx+n+4,ty+12,tx+n-4,ty+12); if (n<=60) {ty -=3;} else {ty += 3;} } // pin display ---------------------------------- for (var n=10; n>0; n--) { if (pinp[n] === 0) {bpin(pinx[n],piny[n]);} else { if (pinp[n] < 8/bcnt) { pinp[n] ++; translate(pinx[n]+(pinxa[n]pinp[n]),piny[n]+(pinya[n]pinp[n])); rotate(pina[n]pinp[n]); bpin(0,0); resetMatrix(); } } } // 'Spin' purple arrow ------------------------------- if (!gameover[0] && !inproc && bcnt<2 && mouseIsPressed) { if (mouseX > 75 && mouseX < 325 && mouseY > 365) { startx = mouseX; fill(150, 0, 150); textSize(20); text("Spin",180,235); translate(200,210); stroke(150, 0, 150); ellipse(0,0,8,8); noFill(); arc(0,0,99,99,230,310); strokeWeight(4); rotate(spina); line(0,-40,0,0); line(0,-40,-5,-30); line(0,-40,5,-30); strokeWeight(1); resetMatrix(); spina += spini; if (abs(spina) > 40) {spini = -1;} } } // 'Bowl!' green button -------------------------------- if (bcntd < 40 && !gameover[0]) { noStroke(); fill(0, 255, 0); beginShape(); vertex(startx, 372); vertex(startx+30, 383); vertex(startx+30, 398); vertex(startx-30, 398); vertex(startx-30, 383); endShape(); fill(0, 0, 0); textSize(22); text("Bowl!",startx-27,396); } // ball movement --------------------------------------- by += byi; if (!gutter) {byi = 0.98;} if (!gutter && by < 300) {bxi += spina/500;} //500????? bx += bxi; // 0.4516 is the tangent of the gutter angle if (!gutter) { if (bx < ((320-by)0.4516 + 58)) { byi = 0.8; bxi = -(156-bx)/((by-103)/byi); gutter = true; } else { if (bx > (342 - (320-by)0.4516)) { byi = 0.8; bxi = -(244-bx)/((by-103)/byi); gutter = true; } } } if (gutter && by > 80 && by < 100) {by = 80;} // end of lane if (by < 86 && by > -50) { // end of lane by=-50; inproc = false; spina = 0; if (targetx >= 200) {spini = -1;} else {spini = 1;} // scoring ========================================== if (pcnt > 0) { if (bcnt === 1) { pscr[plyr][frm] = 0; // strikes if (ptop[plyr][1][frm-1] === 10) { pscr[plyr][frm-1] += scr; if (ptop[plyr][1][frm-2] === 10) { pscr[plyr][frm-2] += scr; pscr[plyr][frm-1] += scr; } } else { // spare if ((ptop[plyr][1][frm-1] + ptop[plyr][2][frm-1]) === 10) { pscr[plyr][frm-1] += scr; } } pscr[plyr][frm] = pscr[plyr][frm-1] + scr; } else { // strike if (ptop[plyr][1][frm-1] === 10) { pscr[plyr][frm-1] += scr; pscr[plyr][frm] += scr; } pscr[plyr][frm] += scr; } ptop[plyr][bcnt][frm] = scr; // check for strike ---------------------------------- if (bcnt === 1 && scr === 10) { bcnt = 2; strkcnt = 20; ptop[plyr][2][frm] = 0; } // game over for 'plyr'? ---------------------- if (frm >= 10 && ptop[plyr][2][10] >= 0) { if ((ptop[plyr][1][10] + ptop[plyr][2][10] < 10) \|\| (ptop[plyr][1][10] < 10 && (ptop[plyr][1][10] + ptop[plyr][2][10]) === 10 && ptop[plyr][1][11] >= 0) \|\| (ptop[plyr][1][10] === 10 && ptop[plyr][1][11] < 10 && ptop[plyr][2][11] >= 0) \|\| (ptop[plyr][1][10] === 10 && ptop[plyr][1][11] === 10 && ptop[plyr][1][12] >= 0)) { gameover[plyr] = true; bcnt = 2; } } // next frame? ----------------------------------- if (frm < 10 \|\| pcnt < 2 \|\| plyr === 2) { if (bcnt===2 && plyr===pcnt) {frm ++;} } else { if (gameover[1]) { frm = 10; plyr = 2; } else { if (bcnt === 2) { frm ++; } } } } } // ball hits pins 1, 2, 3 ---- if (!gutter && !bcontact1 && by < 104) { bcontact1 = true; //d1 = bx; d2 = by; for (var n=1; n<=3; n++) { if (pinp[n] === 0 && (bx-16-abs(spina)/4) < pinx[n] && (bx+16+abs(spina)/4) > pinx[n]) {pindown(n);} } } // ball hits pins 4 through 10 ---- if (!gutter && !bcontact2 && by < 92) { bcontact2 = true; // 7,10 split---- if (pinp[7] === 0 && pinp[8] > 0 && pinp[9] > 0 && pinp[10] === 0 && random(10)/sf < 1) { for (var n=7; n<=10; n+=3) { if (pinp[7] === 0 && pinp[10] === 0 && (bx-kf-(abs(bxi)3.3)/bcnt) < pinx[n] && (bx+kf+(abs(bxi)3.3)/bcnt) > pinx[n]) {pindown(7); pindown(10);} } } // remaining 4-10 pins -- for (var n=4; n<=10; n++) { if (pinp[n] === 0 && (bx-kf-(abs(bxi)3.3)/bcnt) < pinx[n] && (bx+kf+(abs(bxi)3.3)/bcnt) > pinx[n]) {pindown(n);} } } // ball display ------------------------------------- var bd = 10 + by/7; // ball diameter if (gutter) {bd = 0.8;} // smaller in gutter... translate(bx,by); noStroke(); if (by<340) { fill(107, 48, 16,70); ellipse(0,bd/2.2,bd1.3,bd/3); //shadow ellipse(0,bd/2.2,bd/1.2,bd/5); } rotate(spina); if (pcnt === 2 && plyr === 2) {fill(0, 122, 0);} else {fill(255, 0, 0);} ellipse(0,0,bd,bd); fill(250, 227, 227); rect(bd/6,-bd/3.5,5bd/55,7bd/55); //highlight fill(128, 10, 10); if (tcnt > 10) {tcnt = 0;} else {tcnt ++;} if (tcnt === 0) { ellipse(bd/7,bd/2.8,bd/7,bd/8); } else { if (tcnt === 1) { ellipse(bd/7,bd/17,bd/7,bd/7); ellipse(bd/8,bd/2.8,bd/8,bd/9); ellipse(bd/3.2,bd/3,bd/11,bd/12); } else { if (tcnt === 2) { ellipse(bd/7,-bd/7,bd/7,bd/7); ellipse(bd/8,bd/6,bd/7,bd/7); ellipse(bd/3,bd/8,bd/8,bd/7); } else { if (tcnt === 3) { ellipse(bd/7,-bd/3,bd/8,bd/9); ellipse(bd/8,0,bd/7,bd/7); ellipse(bd/3,-bd/18,bd/9,bd/8); } else { if (tcnt === 4) { ellipse(bd/8,-bd/5,bd/7,bd/7); ellipse(bd/3,-bd/4,bd/9,bd/9); } else { if (tcnt === 5) { ellipse(bd/8,-bd/2.5,bd/8,bd/9); }}}}}} resetMatrix(); // check for strike when practicing -------------------?? if (pcnt === 0 && by === -50 && bcnt === 1 && scr === 10) { bcnt = 2; strkcnt = 20; } // reset pins ---------------------------------------- if (bcntd === 65) {rcnt = 70;} if (rcnt > 0) { rcnt -= 1; resetdisp(rcnt); } if (bcnt === 2) { bcntd ++; if (bcntd > 100) { // reset delay resetpins(); // switch players (plyr) ---------------------------- if (pcnt === 2) { if (frm < 10 \|\| (plyr === 2 && !gameover[1])) { if (plyr === 1) {plyr = 2; } else {plyr = 1;} } } } } // display back wall if not keeping score ----------- if (pcnt === 0) { noFill(); stroke(179, 114, 2); rect(26,116,78,19,5); rect(1,141,81,19,5); fill(179, 114, 2); textSize(14); text("One Player",30,130); text("Two Players",3,156); fill(199, 245, 245); //back wall/yellow... noStroke(); rect(0,0,400,65); fill(247, 250, 68); stroke(250, 8, 40); strokeWeight(5); rect(-106,37,119,25,3); rect(18,37,119,25,3); rect(142,37,119,25,3); rect(266,37,119,25,3); rect(390,37,119,25,3); strokeWeight(1); fill(82, 183, 250); textSize(30); text("~~ Khan Academy Lanes ~~",2,26); } // scorecard ----------------------------------- if (pcnt > 0) { fill(255, 255, 255); noStroke(); rect(0,0,400,65); stroke(0, 0, 0); line(0,10,400,10); line(0,38,400,38); for (var n=0; n<=349; n+=39) { line(39+n,10,39+n,65); rect(19+n,10,20,14); rect(19+n,38,20,14);} rect(368,10,17,14); rect(385,10,16,14); rect(368,38,17,14); rect(385,38,16,14); fill(0, 0, 0); textSize(10); for (var m=1; m<=pcnt; m++) { for (var n=1; n<=12; n++) { text(n,n39-20,8); if (pscr[m][n] > -1) { text(pscr[m][n],n39-24,(m27)+8);} if (n <= 9) { if (ptop[m][1][n] === 10) { text("X",n39-53+40,(m27)-6); } else { for (var o=1; o<=2; o++) { if (ptop[m][o][n] === 0) { text("-",n39-53+(o20),(m27)-6); } else { if (o === 2 && (ptop[m][1][n] + ptop[m][2][n] === 10)) { text("/",n39-53+(o20),(m27)-6); } else { if (ptop[m][o][n] > 0 && ptop[m][o][n] < 10) { text(ptop[m][o][n],n39-53+(o20),(m27)-6); } } } } // for (var o } // else of if (ptop[m][1][n] === 10 } else { // 10th frame 'top line' if (n === 10) { if (ptop[m][1][n] === 10) { text("X",357,(m27)-6); x11 = 374; } else { x11 = 390; if (ptop[m][1][n] === 0) { text("-",357,(m27)-6); } else { if (ptop[m][1][n] > 0) { text(ptop[m][1][n],357,(m27)-6); } } } if (ptop[m][1][n] < 10 && ptop[m][2][n] > -1) { if ((ptop[m][1][n]+ptop[m][2][n]) === 10) { text("/",374,(m27)-6); } else { if (ptop[m][2][n] === 0) { text("-",374,(m27)-6); } else { if (ptop[m][2][n] > 0) { text(ptop[m][2][n],374,(m27)-6); } } } } } // '11th' frame 'top line' if (n === 11 && ptop[m][1][n] > -1) { if (ptop[m][1][n] === 10) { text("X",x11,(m27)-6); } else { if (ptop[m][1][n] === 0) { text("-",x11,(m27)-6); } else { text(ptop[m][1][n],x11,(m27)-6);} } if (ptop[m][1][n] < 10 && ptop[m][2][n] > -1) { if ((ptop[m][1][n]+ptop[m][2][n]) === 10) { text("/",391,(m27)-6); } else { if (ptop[m][2][n] === 0) { text("-",391,(m27)-6); } else { text(ptop[m][2][n],391,(m27)-6);} } } } // '12th' frame 'top line' if (n === 12 && ptop[m][1][n] > -1) { if (ptop[m][1][n] === 10) { text("X",390,(m27)-6); } else { if (ptop[m][1][n] === 0) { text("-",390,(m27)-6); } else { if (ptop[m][1][n] > 1) { text(ptop[m][1][n],390,(m*27)-6); } } } } } // else of if (n <=9) } // for (var n } // for (var m } if ((pcnt === 1 && gameover[1]) \|\| (pcnt === 2 && gameover[1] && gameover[2])) { gameover[0] = true; } // Info screen -------------------------------------- if (infoflag) { fill(255, 255, 255,230); stroke(0, 0, 0); rect(10,10,380,380,55); fill(0, 0, 0); textSize(18); text("Click on one of the target arrows. The\nselected arrow will be highlighted in red.",40,50); text("Click on and drag the green 'Bowl' box\nto the spot you want to bowl from.",40,105); text("The purple 'spin' indicator will vary from\nleft to right while you hold the mouse\nbutton down. The 'spin' will make the\nball curve left or right.",40,160); fill(204, 2, 2); text("You will knock",224,223); text("down more pins with more 'spin'.",40,245); fill(0, 0, 0); text("Release the mouse button to bowl.",40,280); text("Click one of the 'players' buttons when\nyou're ready to start keeping score.",40,315); textSize(30); text("X",340,360); noFill(); rect(333,333,32,32,9); } }; // written by phil fulks 8/14 var mouseClicked = function() { if (pcnt === 0 && mouseX > 25 && mouseX < 110 && mouseY > 115 && mouseY < 135) {pcnt = 1; initgame();} if (pcnt === 0 && mouseX < 85 && mouseY > 135 && mouseY < 165) {pcnt = 2; initgame(); } if (mouseX > 325 && mouseX < 375 && mouseY > 126 && mouseY < 155) {infoflag = true;} if (infoflag && mouseX > 333 && mouseX < 375 && mouseY > 333 && mouseY < 375) {infoflag = false;} if (gameover[0] && mouseX > 110 && mouseX < 290 && mouseY > 300 && mouseY < 340) { resetpins(); gameover[0] = false; pcnt = 0; bcnt = 0;} }; var mouseReleased = function() { if (!inproc && bcnt < 2 && mouseY > 370 && mouseX > 75 && mouseX < 325 && !gameover[0]) { by=370; bx=startx; byi = -10; bxi = (targetx - startx +random(-af,af))/17; gutter = false; bcontact1 = false; bcontact2 = false; inproc = true; bcnt ++; scr = 0; } };
Folds
Fork	false
Key	ag5zfmtoYW4tYWNhZGVteXIXCxIKU2NyYXRjaHBhZBiAgOC7lJ_BCAw
Votes	271
Spin-Offs	8
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	6 months ago, 1739369831942
Updated	4 months ago, 1744845331508
Source Deleted	unknown