home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ring.yamanashi.ac.jp/pub/pc/freem/action/
/
action.zip
/
baku100.zip
/
baku100
/
Usr
/
zk01.tonyu
< prev
next >
Wrap
Text File
|
2011-10-10
|
19KB
|
666 lines
extends dxChar;
$screenWidth=600;
$screenHeight=400;
randomize();
//$hpé┼âyü[âWɺîΣü@â|ü[âYéαhpê╦æ╢
rn1=rnd(28);
p1=0;
if(rn1==p1)se=$se_bell00;
p1++;
if(rn1==p1)se=$se_bell02;
p1++;
if(rn1==p1)se=$se_bell05;
p1++;
if(rn1==p1)se=$se_bell15a;
p1++;
if(rn1==p1)se=$se_clock01;
p1++;
if(rn1==p1)se=$se_crash27;
p1++;
if(rn1==p1)se=$se_drag00;
p1++;
if(rn1==p1)se=$se_fall01;
p1++;
if(rn1==p1)se=$se_fm003;
p1++;
if(rn1==p1)se=$se_freeze01;
p1++;
if(rn1==p1)se=$se_gas02;
p1++;
if(rn1==p1)se=$se_insect00;
p1++;
if(rn1==p1)se=$se_insect05;
p1++;
if(rn1==p1)se=$se_kachi00;
p1++;
if(rn1==p1)se=$se_loop000;
p1++;
if(rn1==p1)se=$se_mecha04;
p1++;
if(rn1==p1)se=$se_mecha15;
p1++;
if(rn1==p1)se=$se_mizu04;
p1++;
if(rn1==p1)se=$se_noise00;
p1++;
if(rn1==p1)se=$se_open51;
p1++;
if(rn1==p1)se=$se_puu55;
p1++;
if(rn1==p1)se=$se_step00;
p1++;
if(rn1==p1)se=$se_type01;
p1++;
if(rn1==p1)se=$se_valve00;
p1++;
if(rn1==p1)se=$se_voice003;
p1++;
if(rn1==p1)se=$se_voice011;
p1++;
if(rn1==p1)se=$se_voice010;
p1++;
if(rn1==p1)se=$se_voice023_c;
p1++;
if(rn1==p1)se=$se_voice031;
p1++;
if(rn1==p1)se=$se_water00;
p1++;
if(rn1==p1)se=$se_weapon04;
setFont("Meiryo UI");
$map.setBGColor(color(20,20,20));
x=0;
y=-20;
scalex=1.5;
f=0;
mtk=10;
zorder=-10;
$hp=200;
//if($clear==1){$hp=150;}//âXâeü[âWâNâèâAîπé═âXâeü[âWæIæ≡ëµû╩é⌐éτ
ca=color(200,200,200);
cb=color(120,120,120);
cc=color(255,255,255);
tks=28;
tt=0;//Ä₧è╘
$sp=100;//ûCæΣÅóè½âQü[âW
$score=0;//ôGé≡ô|é╡é╜Éö
$sc2=0;//âAâCâeâÇô╛ô_
$tx1="";//âAâCâeâÇùÜù≡
$dm=0;//öφâ_âüü[âW
$hk=0;//öwîiò\ĪÉöɺî└ùp
xh=0;//ë±ò£âAâCâeâÇÅóè½
if($nd==null){$nd=1;}
yg=0;//âXâ^ü[âgëµû╩
yh=-40;//âXâeü[âWâNâèâA
yj=-300;
sw2=0;//âXâ^ü[âgëµû╩
sw3=0;
sw4=0;
sw5=0;
sw6=0;//âXâeü[âWâNâèâA
sw7=0;
$sg=0;//âXâeü[âWâZâîâNâg
sgk=5;//âXâeü[âWÉö
rr=20;//öwîiÉFùp
rn1=0;rn2=0;rn3=0;rn4=0;rn5=0;rn6=0;rn7=0;rn8=0;rn9=0;rn10=0;rn11=0;rn12=0;
t=null;
$mplayer.play($se_loop000,1,80);
//âXâ^ü[âgëµû╩
while($hp==200) {
//centerText(90+$viewX,40,rn1,ca,20,-501);
//centerText(90+$viewX,40,$mousex+"/"+$mousey,ca,20,-501);
//fillrect($viewX,0,20+$viewX+600,yg,color(20,0,0),-600);
drawSprite(300,200,$pat_taitoru+0,0,-500);
if(sw4==0){
if(getkey(38)==1){sw3--;}
if(getkey(40)==1){sw3++;}
if(amod(sw3,3)==0){
drawdxSprite(300,288,$pat_zxc+4,0,-520,0,50,4,1);
if(getkey(90)==1){sw2=1;}
}
if(amod(sw3,3)==1){
drawdxSprite(300,324,$pat_zxc+4,0,-520,0,50,3,1);
if(getkey(90)==1){ $mplayer.play($se_bell00,0,80);sw4=1;}
}
if(amod(sw3,3)==2){
drawdxSprite(300,363,$pat_zxc+4,0,-520,0,50,2,1);
if(getkey(90)==1){$System.exit();}
}
}
if(sw4==1){
if(getkey(38)==1){$nd--;}
if(getkey(40)==1){$nd++;}
centerText(470,270,"âmü[â}âï",cc,20,-501);
centerText(470,310,"ânü[âh",cc,20,-501);
centerText(470,350,"âwâï",cc,20,-501);
if(amod($nd,3)==0){
drawdxSprite(470,285,$pat_zxc+4,0,-520,0,50,2,0.6);
if(getkey(90)==1 && sw5==1){$nd=0;sw4=0;sw5=0;}
}
if(amod($nd,3)==1){
drawdxSprite(470,325,$pat_zxc+4,0,-520,0,50,2,0.6);
if(getkey(90)==1&& sw5==1){$nd=1;sw4=0;sw5=0;}
}
if(amod($nd,3)==2){
drawdxSprite(470,365,$pat_zxc+4,0,-520,0,50,2,0.6);
if(getkey(90)==1&& sw5==1){$nd=2;sw4=0;sw5=0;}
}
if(getkey(90)==1){$mplayer.play($se_bell00,0,80);}
if(getkey(90)==0){sw5=1;}
}
if(sw2==1){yg+=400;}
if(yg>400){$mplayer.stop($se_loop000,1,80);
$mplayer.play($se_bell00,0,80);
$hp=150;
}
update();
}
//âXâeü[âWâZâîâNâg
while($hp==150) {
//centerText(90+$viewX,40,$mousex+"/"+$mousey,ca,20,-501);
if(getkey(38)==1){$sg--;}
if(getkey(40)==1){$sg++;}
if(getkey(90)==1){$sg=amod($sg,sgk);
$mplayer.play($se_bell00,0,80);
if($sg==0){$mplayer.play($se_loop_65,1,100);}
if($sg==1){$mplayer.play($se_loop_77,1,100);}
if($sg==2){$mplayer.play($se_loop_65,1,100);}
if($sg==3){$mplayer.play($se_loop_77,1,100);}
if($sg==4){$mplayer.play($se_loop_65,1,100);}
$hp=100;}
drawSprite(300,200,$pat_sentaku+0,0,-500);
if(amod($sg,sgk)==0){
drawdxSprite(300,70,$pat_zxc+4,0,-520,0,50,2,1);
}
if(amod($sg,sgk)==1){
drawdxSprite(300,135,$pat_zxc+4,0,-520,0,50,2,1);
}
if(amod($sg,sgk)==2){
drawdxSprite(300,200,$pat_zxc+4,0,-520,0,50,2,1);
}
if(amod($sg,sgk)==3){
drawdxSprite(300,265,$pat_zxc+4,0,-520,0,50,2,1);
}
if(amod($sg,sgk)==4){
drawdxSprite(300,330,$pat_zxc+4,0,-520,0,50,2,1);
}
ala=255;
alb=0;
update();
}
while($hp>0 && $hp<=130) {
if(getkey(3)>0){
t=new tk01($mousex+$viewX,$mousey+$viewy,$pat_zxc+4);
t.f=f;
appear(t);
}
tt++;
if(ala>0){
ala-=5;
$map.scrollTo(x-300,0);
drawdxSprite(x,200,$pat_sentaku+0,0,-520,0,ala,1,1);
}
if(getkey(65)==1){st++;if(st>=8){st=0;}}
//ôαæƒò¼Åo
//t=new ef03(x,y,$pat_zxc+5);appear(t);
//âèâZâbâg
if (getkey(32)==1) {
$projectManager.loadPage($page_stage1);
}
//ë±ò£âAâCâeâÇ
if(x>xh*5000+5000){
t=new kh01(x+400,-40,$pat_asd+5);
appear(t);
xh++;
}
//âXâeü[âWé▓é╞é╠ôGÅoî╗èmùªü@öwîi
//âXâeü[âWéOüAôⁿî√
cd=color(200,0,0);
if($sg==0){
centertext(-600,170,"ì╢é╔é═üuò╟üvé¬éáéΦÉié▀é▄é╣é±",ca,20,30);
centertext(0,100,"â`âàü[âgâèâAâï",cd,40,30);
centertext(0,170,"ì╢ëEûεê≤âLü[é┼ê┌ô«é┼é½é▄é╖",ca,20,30);
centertext(0,200,"é▄é╜üAZâLü[é┼ìUîéé¬é┼é½é▄é╖",ca,20,30);
centertext(0,230,"é▒é╠âQü[âÇé═ëEé╔êΩÆΦé╠ïùùúÉié▐é▒é╞é¬û┌ôIé┼é╖",ca,20,30);
centertext(0,260,"ôGé≡ô|é╡é┬é┬üAëEé╔Éié±é┼é¡é╛é│éó",ca,20,30);
centertext(1200,100,"HPé╔é┬éóé─",cd,40,30);
centertext(1200,170,"ôGé╔ÉGéΩéΘé╞HPé¬î╕éΦé▄é╖",ca,20,30);
centertext(1200,200,"HPé¬0é╔é╚éΘé╞âQü[âÇâIü[âoü[é╔é╚éΦé▄é╖",ca,20,30);
centertext(1200,230,"HPé═ì╢Åπé╔É╘éóâQü[âWé┼ò\Īé│éΩé─éóé▄é╖",ca,20,30);
centertext(2400,100,"ûCæΣé╔é┬éóé─",cd,40,30);
centertext(2400,170,"XâLü[é┼ûCæΣé≡î─é╘é▒é╞é¬é┼é½é▄é╖",ca,20,30);
centertext(2400,200,"ûCæΣé═ôGé≡100æ╠ô|é╖é▓é╞é╔1æΣî─é╫é▄é╖",ca,20,30);
centertext(2400,230,"ûCæΣé═ôGé≡êΩæ|é┼é½éΘï¡ù═é╚òÉèφé┼é╖",ca,20,30);
centertext(2400,260,"ôGé¬æσù╩é╔Åoé─é½é╜é╞é½é╔ÅπÄΦé¡Åóè½é╡é─é¡é╛é│éó",ca,20,30);
centertext(3600,100,"âWâââôâvé╔é┬éóé─",cd,40,30);
centertext(3600,170,"Åπûεê≤âLü[é┼âWâââôâvé╖éΘé▒é╞é¬é┼é½é▄é╖",ca,20,30);
centertext(3600,200,"ÆnÅπé╠ôGé≡é⌐éφé╡é╜éΦüAï≤Æåé╠ôGé≡ìUîéé┼é½é▄é╖",ca,20,30);
centerText(3600,230,"é▄é╜üAspaseé┼âèâZâbâgü@enteré┼â|ü[âYé┼é╖",ca,20,30);
centertext(5400,100,"ë±ò£é╔é┬éóé─",cd,40,30);
centerText(5400,170,"ë±ò£û≥é¬ùÄé┐é─éóéΘé▒é╞é¬éáéΦé▄é╖",ca,20,30);
centerText(5400,200,"ÉGéΩéΘé╞HPé¬ë±ò£é╡é▄é╖",ca,20,30);
centerText(6500,170,"ê╚Åπé┼â`âàü[âgâèâAâïé═ÅIù╣é┼é╖",ca,20,30);
centerText(6500,200,"é¿öµéΩùlé┼é╡é╜",ca,20,30);
//ôGÅoî╗ùª
if(0<x && x<=3000){rn1=200;rn2=0;rn3=0;rn4=0;rn5=0;rn6=0;rn7=0;rn8=0;rn9=0;rn10=0;}
if(3000<x){rn1=150;rn2=0;rn3=500;rn4=400;rn5=0;rn6=0;rn7=0;rn8=0;rn9=0;rn10=0;}
//âXâeü[âWâNâèâA
if(x>6700){sw6=1;}
if(sw6==1){sw7++;
yh+=5;if(yh>180){yh=180;}
centerText($viewx+300,yh,"û┌òWÆnô_é╔ô₧ÆBé╡é▄é╡é╜",color(200,110,110),40,30);
if(sw7>150){alb+=5;drawdxSprite(x,200,$pat_haikei+0,0,-520,0,alb,1,1);}
if(sw7>300){$tt=tt;$projectManager.loadPage($page_index);}
}
}
//âXâeü[âWéP
if($sg==1){
if(0<x && x<=3000){rn1=200;rn2=0;rn3=0;rn4=0;rn5=0;rn6=0;rn7=0;rn8=0;rn9=0;rn10=0;}
if(3000<x && x<=6000){rn1=200;rn2=600;rn3=0;rn4=1000;rn5=0;rn6=0;rn7=0;rn8=0;rn9=0;rn10=0;}
if(6000<x && x<=9000){rn1=600;rn2=600;rn3=1200;rn4=800;rn5=0;rn6=0;rn7=0;rn8=0;rn9=0;rn10=0;}
if(9000<x && x<=12000){rn1=0;rn2=0;rn3=0;rn4=200;rn5=0;rn6=0;rn7=0;rn8=0;rn9=0;rn10=0;}
if(12000<x && x<=15000){rn1=700;rn2=1000;rn3=1200;rn4=600;rn5=0;rn6=0;rn7=0;rn8=0;rn9=0;rn10=0;}
if(15000<x && x<=18000){rn1=800;rn2=1000;rn3=1800;rn4=0;rn5=0;rn6=500;rn7=0;rn8=0;rn9=0;rn10=0;}
if(18000<x && x<=21000){rn1=1000;rn2=600;rn3=0;rn4=1000;rn5=0;rn6=1000;rn7=0;rn8=1600;rn9=0;rn10=0;}
//öwîiÉFò╧ìX
if(15000<x && x<16000){
if(rr<60){rr++;trunc(rr);}
$map.setBGColor(color(20,20,rr));
}
//öwîi
if(rnd(100)==0 && $hk<=20){
$hk++;
t=new ef04(x+rnd(200)+400,-40,$pat_asd+5);
appear(t);
}
//âXâeü[âWâNâèâA
if(x>20000){sw6=1;}
if(sw6==1){sw7++;
yh+=5;if(yh>180){yh=180;}
centerText($viewx+300,yh,"û┌òWÆnô_é╔ô₧ÆBé╡é▄é╡é╜",color(200,110,110),40,30);
if(sw7>150){alb+=5;drawdxSprite(x,200,$pat_haikei+0,0,-520,0,alb,1,1);}
if(sw7>300){$tt=tt;$projectManager.loadPage($page_index);}
}
}
//âXâeü[âWéQ
if($sg==2){
if(0<x && x<=4000){rn1=100;rn2=200;rn3=0;rn4=0;rn5=0;rn6=0;rn7=0;rn8=0;rn9=0;rn10=0;}
if(4000<x && x<=7000){rn1=0;rn2=0;rn3=0;rn4=200;rn5=0;rn6=200;rn7=0;rn8=0;rn9=0;rn10=0;}
if(7000<x && x<=10000){rn1=300;rn2=400;rn3=900;rn4=0;rn5=0;rn6=0;rn7=0;rn8=900;rn9=0;rn10=0;}
if(10000<x && x<=13000){rn1=0;rn2=0;rn3=0;rn4=400;rn5=0;rn6=300;rn7=0;rn8=300;rn9=0;rn10=0;}
if(13000<x && x<=16000){rn1=400;rn2=0;rn3=0;rn4=0;rn5=400;rn6=0;rn7=0;rn8=0;rn9=0;rn10=0;}
if(16000<x && x<=19000){rn1=400;rn2=400;rn3=0;rn4=0;rn5=0;rn6=0;rn7=700;rn8=990;rn9=0;rn10=0;}
if(19000<x && x<=22000){rn1=30;rn2=0;rn3=0;rn4=0;rn5=0;rn6=0;rn7=0;rn8=0;rn9=0;rn10=0;}
if(22000<x && x<=25000){rn1=300;rn2=0;rn3=0;rn4=300;rn5=0;rn6=0;rn7=0;rn8=0;rn9=0;rn10=300;}
if(15000<x && x<16000){
if(rr<130){rr++;trunc(rr);}
$map.setBGColor(color(rr,0,21));
}
//öwîi
if(rnd(100)==0 && $hk<=20){
$hk++;
t=new ef02(x+rnd(200)+400,400,$pat_asd+5);
appear(t);
}
//âXâeü[âWâNâèâA
if(x>25000){sw6=1;}
if(sw6==1){sw7++;
yh+=5;if(yh>180){yh=180;}
centerText($viewx+300,yh,"û┌òWÆnô_é╔ô₧ÆBé╡é▄é╡é╜",color(200,110,110),40,30);
if(sw7>150){alb+=5;drawdxSprite(x,200,$pat_haikei+0,0,-520,0,alb,1,1);}
if(sw7>300){$tt=tt;$projectManager.loadPage($page_index);}
}
}
//âXâeü[âWéR
if($sg==3){
if(0<x && x<=3000){rn1=200;rn2=0;rn3=0;rn4=0;rn5=0;rn6=400;rn7=0;rn8=0;rn9=0;rn10=500;}
if(3000<x && x<=6000){rn1=0;rn2=200;rn3=0;rn4=0;rn5=0;rn6=0;rn7=200;rn8=0;rn9=50;rn10=0;}
if(6000<x && x<=9000){rn1=300;rn2=0;rn3=0;rn4=300;rn5=0;rn6=100;rn7=0;rn8=0;rn9=60;rn10=0;}
if(9000<x && x<=12000){rn1=0;rn2=150;rn3=0;rn4=0;rn5=0;rn6=100;rn7=0;rn8=0;rn9=0;rn10=0;}
if(12000<x && x<=15000){rn1=200;rn2=400;rn3=400;rn4=0;rn5=0;rn6=0;rn7=0;rn8=0;rn9=0;rn10=500;}
if(15000<x && x<=18000){rn1=0;rn2=0;rn3=0;rn4=300;rn5=0;rn6=0;rn7=300;rn8=300;rn9=0;rn10=0;}
if(18000<x && x<=21000){rn1=1100;rn2=1100;rn3=1100;rn4=1100;rn5=1100;rn6=1100;rn7=1100;rn8=0;rn9=1100;rn10=1100;}
if(21000<x && x<=24000){rn1=200;rn2=0;rn3=0;rn4=300;rn5=0;rn6=0;rn7=0;rn8=600;rn9=0;rn10=0;}
if(24000<x && x<=27000){rn1=300;rn2=300;rn3=900;rn4=500;rn5=0;rn6=500;rn7=0;rn8=500;rn9=0;rn10=0;}
if(27000<x && x<=30000){rn1=200;rn2=0;rn3=0;rn4=400;rn5=800;rn6=0;rn7=500;rn8=0;rn9=0;rn10=0;}
//öwîiÉFò╧ìX
if(15000<x && x<16000){
if(rr<50){rr++;trunc(rr);}
$map.setBGColor(color(rr,rr,0));
}
//öwîi
if(rnd(100)==0 && $hk<=3){
$hk++;
xm+=100+rnd(200);
if(xm<x+400)xm=x+400;
t=new ef06(xm,-40,4);
appear(t);
}
//âXâeü[âWâNâèâA
if(x>30000){sw6=1;}
if(sw6==1){sw7++;
yh+=5;if(yh>180){yh=180;}
centerText($viewx+300,yh,"û┌òWÆnô_é╔ô₧ÆBé╡é▄é╡é╜",color(200,110,110),40,30);
if(sw7>150){alb+=5;drawdxSprite(x,200,$pat_haikei+0,0,-520,0,alb,1,1);}
if(sw7>300){$tt=tt;$projectManager.loadPage($page_index);}
}
}
//âXâeü[âWéS
if($sg==4){
if(0<x && x<=3000){rn1=400;rn2=500;rn3=1600;rn4=700;rn5=800;rn6=900;rn7=990;rn8=0;rn9=0;rn10=0;}
if(3000<x && x<=6000){rn1=0;rn2=0;rn3=0;rn4=0;rn5=0;rn6=0;rn7=0;rn8=200;rn9=0;rn10=0;}
if(6000<x && x<=9000){rn1=0;rn2=50;rn3=0;rn4=0;rn5=0;rn6=0;rn7=500;rn8=0;rn9=0;rn10=0;}
if(9000<x && x<=12000){rn1=0;rn2=0;rn3=0;rn4=0;rn5=0;rn6=0;rn7=0;rn8=0;rn9=0;rn10=50;}
if(12000<x && x<=15000){rn1=0;rn2=0;rn3=0;rn4=0;rn5=300;rn6=0;rn7=0;rn8=300;rn9=0;rn10=0;}
if(15000<x && x<=18000){rn1=60;rn2=0;rn3=0;rn4=500;rn5=0;rn6=0;rn7=0;rn8=500;rn9=0;rn10=0;}
if(18000<x && x<=21000){rn1=300;rn2=0;rn3=0;rn4=300;rn5=0;rn6=0;rn7=0;rn8=0;rn9=3;rn10=0;}
if(21000<x && x<=24000){rn1=100;rn2=100;rn3=0;rn4=0;rn5=0;rn6=100;rn7=0;rn8=0;rn9=60;rn10=0;}
if(24000<x && x<=27000){rn1=300;rn2=0;rn3=0;rn4=0;rn5=0;rn6=0;rn7=0;rn8=600;rn9=20;rn10=0;}
if(27000<x && x<=30000){rn1=400;rn2=400;rn3=400;rn4=400;rn5=400;rn6=400;rn7=400;rn8=400;rn9=400;rn10=400;}
//öwîiÉFò╧ìX
if(0<=x && x<100){$map.setBGColor(color(30,30,30));}
if(15000<x && x<16000){
if(rr<80){rr++;}
$map.setBGColor(color(rr,0,0));
}
//öwîi
if(rnd(100)==0 && $hk<=3){
$hk++;
xm+=100+rnd(200);
if(xm<x+400)xm=x+400;
t=new ef08(xm,-40,$pat_zxc+15);
appear(t);
}
//âXâeü[âWâNâèâA
if(x>30000){sw6=1;}
if(sw6==1){sw7++;
yh+=5;if(yh>180){yh=180;}
centerText($viewx+300,yh,"û┌òWÆnô_é╔ô₧ÆBé╡é▄é╡é╜",color(200,110,110),40,30);
if(sw7>150){alb+=5;drawdxSprite(x,200,$pat_haikei+0,0,-520,0,alb,1,1);}
if(sw7>300){$tt=tt;$projectManager.loadPage($page_index);}
}
}
//ôGÅoî╗Åêù¥
if(rnd(rn1)==1){
xa=rnd(400)+200;
if(rnd(2)==1){xa=-xa;}
t=new tk01(x+xa,-300,$pat_asd+0);
appear(t);
}
if(rnd(rn2)==1){
xa=rnd(400)+200;
if(rnd(2)==1){xa=-xa;}
t=new tk02(x+xa,0,$pat_asd+3);
appear(t);
}
if(rnd(rn3)==1){
xa=rnd(400)+200;
if(rnd(2)==1){xa=-xa;}
t=new tk03(x+xa,0,$pat_asd+9);
appear(t);
}
if(rnd(rn4)==1){
xa=rnd(400)+200;
if(rnd(2)==1){xa=-xa;}
t=new tk04(x+xa,0,$pat_asd+2);
appear(t);
}
if(rnd(rn5)==1){
xa=rnd(400)+200;
if(rnd(2)==1){xa=-xa;}
t=new tk05(x+xa,0,$pat_asd+2);
appear(t);
}
if(rnd(rn6)==1){
xa=rnd(400)+200;
if(rnd(2)==1){xa=-xa;}
t=new tk06(x+xa,0,$pat_asd+12);
appear(t);
}
if(rnd(rn7)==1){
xa=rnd(400)+200;
if(rnd(2)==1){xa=-xa;}
t=new tk07(x+xa,0,$pat_asd+14);
appear(t);
}
if(rnd(rn8)==1){
xa=rnd(100)+600;
t=new tk08(x+xa,0,$pat_asd+15);
appear(t);
}
if(rnd(rn9)==1){
xa=rnd(400)+200;
if(rnd(2)==1){xa=-xa;}
t=new tk09(x+xa,0,$pat_asd+17);
appear(t);
}
if(rnd(rn10)==1){
xa=rnd(400)+200;
if(rnd(2)==1){xa=-xa;}
t=new tk10(x+xa,0,$pat_asd+16);
appear(t);
}
//ê╚ë║ê┌ô«
if(y<400-tks){
y+=vy;
vy+=0.4;
x+=vb;
angle+=10-20*f;
}
if(y>=400-tks){
angle=0;
vb=0;
y=400-tks;
vy=0;
if(getkey(38)==1){
vy=-12;
y-=1;
}
}
if(mtk>20){x+=vx;}
if (getkey(39)>0) {x+=2.5;f=0;aruku++;}
if (getkey(37)>0) {x-=2.5;f=1;aruku++;}
if (getkey(37)==0 && getkey(39)==0){p=$pat_zxc+0;
}else{
arukuz=amod(aruku,45);
if(arukuz>0)p=$pat_zxc+0;
if(arukuz>15)p=$pat_zxc+1;
if(arukuz>30)p=$pat_zxc+2;
}
//â}âbâvâXâNâìü[âï
$map.scrollTo(x-300,0);
scx=$viewX;
scy=$viewY;
//ô∩ê╒ôxé╔éµéΘÄ⌐ô«ë±ò£
if($nd==0){$hp+=0.004;}
if($nd==1){$hp+=0.002;}
//âXâeü[â^âXâoü[ hpÅCÉ│
//centerText(90+$viewX,220,$mousex+"/"+$mousey,ca,20,-501);
if($hp>100){$hp=100;}
if(mtk<0){
drawSprite($viewx+47,47,$pat_Actor83+0,0,-4);
}else{
drawSprite($viewx+47,47,$pat_Actor83+5,0,-4);
}
la=-50;
lb=85;
fillrect(lb+20+$viewX,60+la,lb+20+$viewX+$hp*1.5,79+la,color(220,0,0),-10);
fillrect(lb+19+$viewX,59+la,lb+21+$viewX+150,80+la,color(130,130,130),-5);
drawText(lb+50+$viewX,85+la,"ü~"+trunc($mp/50)+"/6",ca,20,-30);
drawdxSprite(lb+$viewX+30,100+la,$pat_zxc+3,0,20,45,255,2);
drawText(lb+50+$viewX,115+la,"ü~"+trunc($sp/100)+"/3",ca,20,-30);
drawdxSprite(lb+$viewX+30,125+la,$pat_zxc+6,0,20,0,255,0.5);
drawText(5+$viewX,95,trunc(x/100)+"m"+"/"+$score+"Å≥ë╗",ca,20,-30);
//ê╚ë║ìUîé
$mp+=1;
if($mp>300){$mp=300;}
if(getkey(90)==1 && $mp>=50){
$mp-=50;
t=new tm01(x,y,$pat_zxc+3);
t.vy=-rnd()-5;
t.vx=3-6*f;
appear(t);
}
/*
â~âTâCâï
if(getkey(67)==1 && $mp>=50){
$mp-=50;
t=new tm04(x,y,$pat_zxc+9);
t.vy=-2*rnd()-4;
t.vx=3-6*f;
t.f=f;
t.x+=40-80*f;
appear(t);
}
*/
if($sp>300){$sp=300;}
if(getkey(88)==1 && $sp>=100){
$sp-=100;
t=new tm03(x,y,$pat_zxc+6);
t.f=f;
appear(t);
}
//ê╚ë║ôûé╜éΦö╗ÆΦ
// for (e in $chars) {if (e [[is]] tm02 && [[crashTo]](e) ) {vy-=1;y-=1;} }
if(mtk<0 && sw6==0){ alpha=255;
for (e in $chars) {
if (e [[is]] tk01 && [[crashTo]](e) ) {vy=-3;y-=1;$hp-=10;mtk=50;$dm+=10;if(e.x>x){vx=-3;}else{vx=3;}break;}
}
for (e in $chars) {
if (e [[is]] tk02 && [[crashTo]](e) ) {vy=-3;y-=1;$hp-=10;mtk=50;$dm+=10;if(e.x>x){vx=-3;}else{vx=3;}break;}
}
for (e in $chars) {
if (e [[is]] tk03 && [[crashTo]](e) ) {vy=-3;y-=1;$hp-=10;mtk=50;$dm+=10;if(e.x>x){vx=-3;}else{vx=3;}break;}
}
for (e in $chars) {
if (e [[is]] tk04 && [[crashTo]](e) ) {vy=-3;y-=1;$hp-=10;mtk=50;$dm+=10;if(e.x>x){vx=-3;}else{vx=3;}break;}
}
for (e in $chars) {
if (e [[is]] tk05 && [[crashTo]](e) ) {vy=-3;y-=1;$hp-=10;mtk=50;$dm+=10;if(e.x>x){vx=-3;}else{vx=3;}break;}
}
for (e in $chars) {
if (e [[is]] tk06 && [[crashTo]](e) ) {vy=-3;y-=1;$hp-=10;mtk=50;$dm+=10;if(e.x>x){vx=-3;}else{vx=3;}break;}
}
for (e in $chars) {
if (e [[is]] tk07 && [[crashTo]](e) ) {vy=-3;y-=1;$hp-=10;mtk=50;$dm+=10;if(e.x>x){vx=-3;}else{vx=3;}break;}
}
for (e in $chars) {
if (e [[is]] tk08 && [[crashTo]](e) ) {vy=-3;y-=1;$hp-=10;mtk=50;$dm+=10;if(e.x>x){vx=-3;}else{vx=3;}break;}
}
for (e in $chars) {
if (e [[is]] tk09 && [[crashTo]](e) ) {vy=-3;y-=1;$hp-=10;mtk=50;$dm+=10;if(e.x>x){vx=-3;}else{vx=3;}break;}
}
for (e in $chars) {
if (e [[is]] tk10 && [[crashTo]](e) ) {vy=-3;y-=1;$hp-=10;mtk=50;$dm+=10;if(e.x>x){vx=-3;}else{vx=3;}break;}
}
}else{alpha=100;mtk-=1;}
update();
}
while($hp<=0) {
ca=color(200,100,100);
drawText(20+$viewX,10,trunc(x/100)+"m"+"/"+$score+"Å≥ë╗",ca,30,30);
drawText(20+$viewX,60,"âXâyü[âXé┼âèâZâbâg",ca,30,30);
alpha=150;
f=1;
angle=80;
if(y<387){y++;}
tt++;
if(amod(tt,4)==0){
t=new ef03(x,y,$pat_zxc+5);
appear(t);}
if (getkey(32)==1) {
$projectManager.loadPage($page_stage1);
}
update();
}