#東方弾幕風 #Title[ケイブ風分裂弾] #Text[陰蜂っぽく…?] #ScriptVersion[2] script_enemy_main { @Initialize { SetX(GetCenterX); SetY(GetClipMinY + 120); SetLife(2000); LoadGraphic("script\img\ExRumia.png"); SetTexture("script\img\ExRumia.png"); SetGraphicRect(0, 0, 63, 63); Divide; } @MainLoop { SetCollisionA(GetX, GetY, 24); SetCollisionB(GetX, GetY, 24); yield; } @DrawLoop { DrawGraphic(GetX,GetY); } @Finalize { DeleteGraphic("script\img\ExRumia,png"); } task Divide { let Angle1=0; let Angle2=0; let speed=0; loop(30){yield;} Circleway(GetX,GetY,4,GetAngleToPlayer,100,PURPLE01,0,10);//最初の全方位(100way) loop(5){yield;} loop { Angle1=rand(0,359); Angle2=Angle1-90;//旋回弾の最初の角度を決定 speed=0;//5way弾速度変数の初期化 loop(15) { Circleway(GetX+100,GetY-40,2,Angle1,1,RED02,1,10); Circleway(GetX-100,GetY-40,2,Angle2,1,RED02,1,10); Angle1+=15; Angle2-=15; loop(21){yield;}//ここまで旋回弾 } loop(20){yield;} loop(20) { loop(3){yield;} nway(5+speed*0.3,12); speed++;//幅が広い方の5way } loop(40){yield;} Angle1=rand(0,359); Angle2=Angle1-90;//旋回弾の基準角の設定し直し speed=0;//5way弾速度変数の初期化 loop(15) { Circleway(GetX+100,GetY-40,3,Angle1,2,RED02,1,10); Circleway(GetX-100,GetY-40,3,Angle2,2,RED02,1,10); Angle1+=15; Angle2-=15; loop(21){yield;}//ここまで旋回弾 } loop(20){yield;} loop(20) { loop(2){yield;} nway(4+speed*0.3,3); speed++;//幅が狭い方の5way } loop(25){yield;} Circleway(GetX,GetY,3,GetAngleToPlayer,80,PURPLE01,0,10);//最後の全方位(80way) loop(25){yield;} } } function Circleway(let x,let y,let speed,let angle,let way,let color,let ID,let t)//全方位弾を撃つ関数(x座標,y座標,速度,基準角,way数,弾の種類,CreateShotA関数のID,遅延時間) { let Angle=angle; let a; let b; let i=0; while(i