h

#TouhouDanmakufu
#Title[My First Script]
#Text[AKA character testing script!]
#ScriptVersion [2]

script_enemy_main {

	let CSD = GetCurrentScriptDirectory;

	#include_function[".\function_cutin.txt"];

	let yukari = CSD ~ "system\yukari1.png";
	let bg = CSD ~ "system\yukaribg.png";
	let cut = CSD ~ "system\yukaricutin.png";
	let count = 0;

@Initialize {
        SetX(GetCenterX);
        SetY(GetClipMinY + 80);
        SetLife(5000);
	SetTimer(99);
	SetScore(100000);

	LoadGraphic(yukari);
	LoadGraphic(cut);
	LoadGraphic(bg);

	cutin("KANAKO","Test - Boundary of Beginner and Master -",cut,0,0,512,512);
    }

    @MainLoop{
	let x = 0;
	let dir = 0;

        SetCollisionA(GetX, GetY, 24);
        SetCollisionB(GetX, GetY, 24);

	while (x<36){
       				CreateShotA(1,GetEnemyX,GetEnemyY,30);
				SetShotDataA(1,5,1,dir,0.2,3,2,PURPLE31);

				CreateShotA(1,30,GetEnemyY,30);
				SetShotDataA(1,4,1,dir,0.1,1,5,AQUA21);

				FireShot(1);
				dir+=360/36;
				x++;

		}
		x = 0;
		dir = 0;

	if(count==60){
		while(x < 36){
				CreateShotA(1,GetEnemyX,GetEnemyY,43);
				SetShotDataA(1,13,1,dir,0.3,0,2,AQUA01);
				SetShotDataA(1,6,2,dir,0.2,3,4,WHITE22);

				FireShot(1);
				dir+=360/36;
				x++;
		}
		       		CreateShotA(1,GetEnemyX,GetEnemyY,60);
				SetShotDataA(1,4,2,dir,0.3,0,2,PURPLE03);
				SetShotDataA(1,25,1,dir,0.1,0,29,RED31);


				CreateShot01(GetEnemyX,GetEnemyY,10,-85,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,-45,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,5,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,45,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,95,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,105,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,115,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,85,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,75,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,65,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,55,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,45,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,35,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,25,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,15,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,5,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,-5,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,-15,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,-25,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,-35,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,-45,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,-65,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,-75,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,-85,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,125,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,135,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,145,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,155,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,165,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,175,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,185,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,195,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,5,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,15,YELLOW04,60);
				CreateShot01(GetEnemyX,GetEnemyY,10,25,YELLOW04,60);


				FireShot(1);
				FireShot(01);
				dir+=360/36;
				x++;
		count = 0;
	}
	count++;
            }

    @DrawLoop {
	SetTexture(yukari);
	SetRenderState(ALPHA);
	SetAlpha(255);
	SetGraphicRect(0,0,80,96);
	SetGraphicScale(1,1);
	SetGraphicAngle(0,0,0);
        DrawGraphic(GetX, GetY);

    }

    @BackGround{
	SetTexture(bg);
	SetRenderState(ALPHA);
	SetAlpha(255);
	SetGraphicRect(0,0,385,449);
	SetGraphicScale(1,1);
	SetGraphicAngle(0,0,0);
        DrawGraphic(GetCenterX, GetCenterY);

    }

    @Finalize {
        DeleteGraphic(yukari);
	DeleteGraphic(bg);
	DeleteGraphic(cut);
    }
}