説明
画面上にある10個の$を回収するゲームです。カーソルキーで自分(@)を操作します。障害物である#にあたると即ゲームオーバーとなります。なお、$の数を変更したい場合はvar k=0,c=10;の10の数値を変更してください。
// Get $
var k=0,c=10;
function key(n){ k=n; }
function main(){
lc(15,11);
log(" ");
if(k==28){ scroll(1,1); }
if(k==29){ scroll(3,1); }
if(k==30){ scroll(2,1); }
if(k==31){ scroll(0,1); }
var s=scr(15,11);
if (s==36){
c=c-1;
if(c==0){
lc(10,13);
log("Game Clear\n");
exit();
}
}
if (s==35){
lc(15,11);
log("*");
lc(10,13);
log("Game Over\n");
exit();
}
lc(15,11);
log("@");
setTout(main,100);
}
cls();
var i=0;
while(i<40){
lc(rnd(31),rnd(22));
log("#");
i=i+1;
}
var i=0;
while(i<10){
lc(rnd(31),rnd(10)+(i>5)*13);
log("$");
i=i+1;
}
setKprs(key);
main();
目次に戻る