JS1k: The JavaScript code golfing competition

var d=!1;a.a=a.fill;a.b=a.fillRect;var e=Math.PI,f="#090",g="#FFF",h="#000",j=100,k,l,m=500,n=0,p=d;c.width=400;c.height=200;a.fillStyle=h;a.b(0,0,500,500);var r=[function(b){q("#FF0");a.moveTo(b-40,j);a.quadraticCurveTo(b,j-50,b+40,j);a.quadraticCurveTo(b,j+50,b-40,j);a.a()},function(b){q("#FC0");a.arc(b,j,30,0,2*e,d);a.a();q(f);a.arc(b+7,j-20,3,0,2*e,d);a.a()},function(b){q("#F00");a.arc(b,j,25,0,2*e,d);a.a();a.beginPath();a.arc(b+30,j-5,30,1.1*e,1.5*e,d);a.strokeStyle=f;a.lineWidth=5;a.stroke()}];function q(b){a.beginPath();a.fillStyle=b}function s(){for(i=1;4>i;i++){l[i]=Math.floor(3*Math.random());var b=100*i;a.fillStyle=g;a.b(b-48,j-48,96,96);r[l[i]](100*i)}30>k++?setTimeout(s,60):(l[1]==l[2]&&l[2]==l[3]?n=30*(l[1]+1):l[1]==l[2]&&(n=15*(l[1]+1)),0<n?t():p=d)}function u(){a.fillStyle=h;a.b(50,165,200,35);a.fillStyle=f;a.font="14px san-serif";a.fillText("Credits: "+m,55,180)}function t(){m+=1;n-=1;u();0<n?setTimeout(t,75):p=d}c.onclick=function(){p||(p=!0,m-=5,n=0,u(),k=0,l=[0,0,0,0],s())};u();

dmFyIGQ9ITE7YS5hPWEuZmlsbDthLmI9YS5maWxsUmVjdDt2YXIgZT1NYXRoLlBJLGY9IiMwOTAiLGc9IiNGRkYiLGg9IiMwMDAiLGo9MTAwLGssbCxtPTUwMCxuPTAscD1kO2Mud2lkdGg9NDAwO2MuaGVpZ2h0PTIwMDthLmZpbGxTdHlsZT1oO2EuYigwLDAsNTAwLDUwMCk7dmFyIHI9W2Z1bmN0aW9uKGIpe3EoIiNGRjAiKTthLm1vdmVUbyhiLTQwLGopO2EucXVhZHJhdGljQ3VydmVUbyhiLGotNTAsYis0MCxqKTthLnF1YWRyYXRpY0N1cnZlVG8oYixqKzUwLGItNDAsaik7YS5hKCl9LGZ1bmN0aW9uKGIpe3EoIiNGQzAiKTthLmFyYyhiLGosMzAsMCwyKmUsZCk7YS5hKCk7cShmKTthLmFyYyhiKzcsai0yMCwzLDAsMiplLGQpO2EuYSgpfSxmdW5jdGlvbihiKXtxKCIjRjAwIik7YS5hcmMoYixqLDI1LDAsMiplLGQpO2EuYSgpO2EuYmVnaW5QYXRoKCk7YS5hcmMoYiszMCxqLTUsMzAsMS4xKmUsMS41KmUsZCk7YS5zdHJva2VTdHlsZT1mO2EubGluZVdpZHRoPTU7YS5zdHJva2UoKX1dO2Z1bmN0aW9uIHEoYil7YS5iZWdpblBhdGgoKTthLmZpbGxTdHlsZT1ifWZ1bmN0aW9uIHMoKXtmb3IoaT0xOzQ+aTtpKyspe2xbaV09TWF0aC5mbG9vcigzKk1hdGgucmFuZG9tKCkpO3ZhciBiPTEwMCppO2EuZmlsbFN0eWxlPWc7YS5iKGItNDgsai00OCw5Niw5Nik7cltsW2ldXSgxMDAqaSl9MzA+aysrP3NldFRpbWVvdXQocyw2MCk6KGxbMV09PWxbMl0mJmxbMl09PWxbM10/bj0zMCoobFsxXSsxKTpsWzFdPT1sWzJdJiYobj0xNSoobFsxXSsxKSksMDxuP3QoKTpwPWQpfWZ1bmN0aW9uIHUoKXthLmZpbGxTdHlsZT1oO2EuYig1MCwxNjUsMjAwLDM1KTthLmZpbGxTdHlsZT1mO2EuZm9udD0iMTRweCBzYW4tc2VyaWYiO2EuZmlsbFRleHQoIkNyZWRpdHM6ICIrbSw1NSwxODApfWZ1bmN0aW9uIHQoKXttKz0xO24tPTE7dSgpOzA8bj9zZXRUaW1lb3V0KHQsNzUpOnA9ZH1jLm9uY2xpY2s9ZnVuY3Rpb24oKXtwfHwocD0hMCxtLT01LG49MCx1KCksaz0wLGw9WzAsMCwwLDBdLHMoKSl9O3UoKTs=

function (x) //orange
        {
          begin(ORANGE);
          a.arc(x, y, 30, 0, 2*P, false);
          a.F();
          begin(GREEN);
          a.arc(x+7, y-20, 3, 0, 2*P, false);
          a.F();
        },/* Can't get seven minified enough
        function(x) //seven
        {
          begin(RED);
          a.font="72px bold serif";
          a.fillText('7', x-20, y+28);
        },*/
        function(x) //cherry
        {
          begin(RED);
          a.arc(x, y, 25, 0, 2*P, false);
          a.F();
          a.beginPath();
          a.arc(x+30, y-5, 30, 1.1*P, 1.5*P, false);
          a.strokeStyle=GREEN;
          a.lineWidth=5;
          a.stroke();
        }];
    
        function begin(c) {
          a.beginPath();
          a.fillStyle=c;
        };
    
        function erase (x){
          a.fillStyle=WHITE;
          a.R(x-48, y-48, 96, 96);
        };
        
        function cycle(){
          for (i=1;i<4;i++)
          {
            Holder[i]=rand();
            erase(i*100);
            Shapes[Holder[i]](i*100);
          }
          if (SpinCycle++<30) setTimeout(cycle, 60); else afterspin();
        };
        function rand() {
          return Math.floor(Math.random()*3);
        };
        
        function spin() {
          if (Running) return;
          Running=true;
          Credits-=5;
          Won=0;
          display();
          SpinCycle=0;
          Holder=[0,0,0,0];
          cycle();
        };
        
        function afterspin() {
          if (Holder[1]==Holder[2] && Holder[2]==Holder[3])
          {
            Won=30*(Holder[1]+1);
          } else if (Holder[1]==Holder[2]) {
            Won=15*(Holder[1]+1);
          }
          if (Won>0) {
            win();
          } else {
            Running=false;
          }
        };
        
        function display() {
          a.fillStyle=BLACK;
          a.R(50, 165, 200, 35);
          a.fillStyle=GREEN;
          a.font="14px san-serif";
          a.fillText('Credits: ' + Credits, 55, 180);
        };
        
        function win() {
          Credits+=1;
          Won-=1;
          display();
          if (Won>0) setTimeout(win, 75); else Running=false;
        };
        c.onclick=spin;
        display();