説明
カーソルキーでパドルを移動させ玉を跳ね返すだけのゲームです。玉が画面下から出てしまうとゲームオーバーになります。なお、このプログラムはPanCakeのスプライト機能を使っています。
// Squash (sprite ver)
var pc=new PanCake();
var bx=0,by=0,x=25,y=43;
var dx=1,dy=1,r=0;
var score=0;
pc.reset();
pc.sStart(0x10);
pc.sCreate(0,0x66);
pc.sCreate(1,0x66);
pc.sCreate(2,0x66);
pc.sCreate(3,0x35);
function key(k){
if ((k==28)*(x>0)){x=x-8;}
if ((k==29)*(x<55)){x=x+8;}
pc.sMove(0,x,y);
pc.sMove(1,x+8,y);
pc.sMove(2,x+16,y);
}
function main(){
bx=bx+dx;
by=by+dy;
if(bx<0){bx=0;dx=-dx;}
if(bx>72){bx=71;dx=-dx;}
if(by<0){by=1;dy=-dy;}
if(by>47){
log("\nGame Over\nScore:",score);
exit();
}
if ((by==y-5)*(bx>=x-3)*(bx<x+29)){
dy=-dy;
score=score+1;
}
pc.sMove(3,bx,by);
setTout(main,10);
}
setKprs(key);
key(0);
main();
目次に戻る