説明
野火から女の子を救助してください。女の子は全部で7人います。女の子に重なると救助したことになります。全員救助するとゲームクリアです。ゲームは7人を救助するまでのタイムアタックになっていますので、素早く女の子を救助しましょう。また、炎に当たると即ゲームオーバーです。
// Girls
var pc=new PanCake();
pc.reset();
pc.wbuf(1);
var girl=7,stime=tick();
var s=mem("s");
var i=0;
while(i<32*24){
mem(s+i,0x62);
i=i+1;
}
i=0;
while(i<60){
lc(rnd(32),rnd(23));log("A");
i=i+1;
}
i=0;
while(i<girl){
lc(rnd(32),rnd(23));log(chr(9));
i=i+1;
}
lc(15,11);
log("bbb");
// key
function key(k){
var dir=0,c;
if(k==28){scroll(1,1);dir=2;}
if(k==29){scroll(3,1);dir=4;}
if(k==30){scroll(2,1);}
if(k==31){scroll(0,1);}
pc.clear(0);
var y=0;
while(y<6){
var x=0;
while(x<10){
var c=scr(x+11,y+9);
pc.stamps(x*8,y*8,0x62);
pc.stamps(x*8,y*8,c);
x=x+1;
}
y=y+1;
}
pc.stamps(40,16,dir);
pc.stamps(2,1,0xa6+girl);
pc.wbuf(1);
// check
c=scr(16,11);
if(c==0x41){
pc.clear(2);
sleep(500);
pc.clear(0);
cls();
log("Game Over\n");
exit();
}
if(c==9){
lc(16,11);
log("b");
girl=girl-1;
if(girl==0){
var time=(tick()-stime)/1000;
cls();
log("Game Clear\ntime:",time,"\n");
exit();
}
}
}
function main(){
setTout(main,0);
}
setKprs(key);
key(0);
main();
目次に戻る