スカッシュ(グラフィック版)

説明

カーソルキーでパドルを移動させ玉を跳ね返すだけのゲームです。玉が画面下から出てしまうとゲームオーバーになります。なお、このプログラムはPanCakeのグラフィック機能を使っています。

[サンプルプログラムをダウンロード]

// Squash (graphic ver)
var pc=new PanCake();
var bx=0,by=0,x=25,y=43;
var dx=1,dy=1;
var score=0;
pc.reset();
pc.wbuf(1);
function key(k){
 if ((k==28)*(x>0)){x=x-8;}
 if ((k==29)*(x<55)){x=x+8;}
}
function main(){
 pc.clear(0);
 var k=inkey();
 pc.line(x,y,x+24,y,1);
 bx=bx+dx;
 by=by+dy;
 if(bx<0){bx=0;dx=-dx;}
 if(bx>78){bx=77;dx=-dx;}
 if(by<0){by=1;dy=-dy;}
 if(by>47){
  log("\nGame Over\nScore:",score);
  exit();
 }
 if ((by==y-2)*(bx>=x)*(bx<x+26)){
  dy=-dy;
  score=score+1;
  }
 pc.circle(bx,by,2,1);
 pc.wbuf(1);
 setTout(main,10);
}
setKprs(key);
main();

目次に戻る