script_event Start0{
	@Initialize{}

	@MainLoop{
		Wait(10);
		if(GetPlayerType==REIMU_A || GetPlayerType==REIMU_B){
			TextOutA("\c[BLUE]ccǂDɗȂ");
			TextOutA("\c[BLUE]{̎ǧ΂ɑ^ԂȂācc");
			TextOutA("\c[BLUE]͗dcc\n܂oJ̗VтɕtĂƂH");
			TextOutA("\c[BLUE]܂cc˂");
			}
		else if(GetPlayerType==MARISA_A || GetPlayerType==MARISA_B){
			TextOutA("\c[BLUE]ccȂDɗȂ");
			TextOutA("\c[BLUE]{̎gȏꏊɌȂācc");
			TextOutA("\c[BLUE]dɗpAH");
			TextOutA("\c[BLUE]`mƂȂ񂩂̂H");
			} else {
			TextOutA("\c[RED]Ƒ҂ĂI");
			}
		Wait(50);
		End;
	}
	@Finalize{}
}

script_event Start1{
	@Initialize{}

	@MainLoop{
		Wait(10);
		if(GetPlayerType==REIMU_A || GetPlayerType==REIMU_B){
			TextOutA("\c[RED]H@_Ђ̛ޏłˁH");
			TextOutA("\c[RED]gقɌrł傤H");
			TextOutA("\c[BLUE]Agقɗp͂Ȃǁcc");
			TextOutA("\c[BLUE]{̎gɗĂ̂\nƋCɂȂĂ");
			TextOutA("\c[RED]i]̎łH");
			TextOutA("\c[BLUE]\nȂ񂩗dɗpȂ񂽂ƂĂ");
			TextOutA("\c[RED]A̎ł");
			TextOutA("\c[BLUE]́ccH");
			TextOutA("\c[RED]ǂ玄ɂ́AVg̗͂hĂ݂Łcc");
			TextOutA("\c[RED]̗͂o߂ɁA\ni]񂪋͂ĂĂ̂ł");
			TextOutA("\c[BLUE]Vǵ̗A˂cc");
			TextOutA("\c[BLUE]܂AgĈٕςłANƂ́cc");
			TextOutA("\c[BLUE]ccȂ\nȂ݂ȗǎdȂ");
			TextOutA("\c[RED]͂cc\ngłAٕςN̂͂Ɓcc");
			TextOutA("\c[BLUE]łAB͎hĂق");
			TextOutA("\c[BLUE]͂҂pƁA\nςȂƂɂȂ邩");
			TextOutA("\c[BLUE]ɁA̓Vg̗͂Ă̂\n߂Ă܂傤H");
			TextOutA("\c[RED]AłccH");
			TextOutA("\c[RED]ȂA̗͂\nt܂Ă܂");
			}
		else if(GetPlayerType==MARISA_A || GetPlayerType==MARISA_B){
			TextOutA("\c[RED]H@̓D_łˁH");
			TextOutA("\c[RED]gقɌrł傤H");
			TextOutA("\c[BLUE]ȂlD_");
			TextOutA("\c[BLUE]Ȏ͂A{̎gɗĂ炵");
			TextOutA("\c[RED]i]̎łH");
			TextOutA("\c[BLUE]\nȂ񂩗dɗp");
			TextOutA("\c[RED]A̎ł");
			TextOutA("\c[BLUE]ccH");
			TextOutA("\c[RED]ǂ玄ɂ́AVg̗͂hĂ݂Łcc");
			TextOutA("\c[RED]̗͂o߂ɁA\ni]񂪋͂ĂĂ̂ł");
			TextOutA("\c[BLUE]قA͂");
			TextOutA("\c[BLUE]łA̗͂oĉȂ񂾁H");
			TextOutA("\c[BLUE]ٕς炵ٕςłN̂H");
			TextOutA("\c[RED]cc\ngłAٕςN̂͂Ɓcc");
			TextOutA("\c[BLUE]łȁA͂ƈpāAĂ");
			TextOutA("\c[BLUE]߂ɑގĂ");
			TextOutA("\c[RED]AłccH");
			TextOutA("\c[RED]ȂA̗͂\nt܂Ă܂");
			} else {
			TextOutA("\c[RED]ȏA\Ȃł");
			TextOutA("\c[RED]~߂Ȃ\n̗͂ŒǂԂ܂I");
			}
		Wait(50);
		End;
	}
	@Finalize{}
}

script_enemy_main
{
        let count=0;
        let csd     = GetCurrentScriptDirectory;
        let imgBoss =csd~"img\dot_daiyousei.png";
	let Motion=0;
	let angle=0;
        let cx=GetCenterX();
        let cy=GetCenterY();
	let AnimationA=0;
	let AnimationB=0;

    @Initialize {
        SetLife(50);
        SetScore(10);
        SetDamageRate(0,0);
        SetX(458);
        SetY(50);
	LoadGraphic(imgBoss);
        TAnime1;
	TEvent;
    }

    @MainLoop {
        SetCollisionA(GetX(),GetY(),18);
        SetCollisionB(GetX(),GetY(),18);
        count++;
        yield;
    }

        @DrawLoop {
		SetRenderState(ALPHA);
		SetTexture(imgBoss);
		SetGraphicScale(1,1);
		SetAlpha(255);
		SetColor(255,255,255);
		SetGraphicAngle(0,0,0);
		if(int(GetSpeedX())==0)
		{SetGraphicRect(0,128*AnimationB,127,127+128*AnimationB);}
		else if(GetSpeedX()>0){SetGraphicRect(256,256+128*AnimationA,383,383+128*AnimationA);}
		else if(GetSpeedX()<0){SetGraphicRect(256,128*AnimationA,383,127+128*AnimationA);}
		DrawGraphic(GetX(),GetY());
	}

        @Finalize
        {
        } 
    	task TAnime1{
		loop{
			AnimationB=0;
        		loop(10){yield;}
			AnimationB=1;
        		loop(10){yield;}
			AnimationB=2;
        		loop(10){yield;}
			AnimationB=3;
        		loop(10){yield;}
			}
		}

    	task TAnime2{
			AnimationA=0;
        		loop(10){yield;}
			AnimationA=1;
        		loop(40){yield;}
			AnimationA=0;
        		loop(10){yield;}
		}
	task TEvent{
		CreateEventFromScript("Start0");
		while(OnEvent){yield;}
		TAnime2;
        	SetMovePosition02(GetCenterX(),150,60);
		CreateEventFromScript("Start1");
		while(OnEvent){yield;}
		AddLife(-1000);
		}
}