Vesuvius

#TouhouDanmakufu
#Title[Volcano Sign "Mt. Vesuvius"]
#Text[Fire rains down, threatening to smother you in flaming

destruction.]
#BackGround[Default]
#PlayLevel[Easy]
#Player[FREE]
#ScriptVersion[2]

script_enemy_main {
    #include_function "lib\SHOT_REPLACE\shot_replace.dnh"
    let BossImage = ("script\img\ExRumia.png");
    let BossCutIn = ("script\img\ExRumia.png");
    let frame = 0;
    let frameV = 0;
    let frameB = 0;
    @Initialize {
        shotinit;
	LoadGraphic(BossImage);
	SetGraphicRect(1,1,64,64);
	SetX(GetCenterX);
	SetY(GetCenterY-45);
	SetLife(2000);
        SetDamageRate(50, 50);
        SetTimer(50);
        SetInvincibility(30);
        CutIn(YOUMU, "Volcano Sign"\""Mt. Vesuvius"\", BossCutIn, 0,

0, 200, 600);
        SetScore(3000000);
        SetEnemyMarker(true);
        Concentration01(60);
        Concentration02(60);
        MagicCircle(false);
        SetEffectForZeroLife(60, 100, 1);
    }

    @MainLoop {
	SetCollisionA(GetX, GetY, 24);
	SetCollisionB(GetX, GetY, 24);

	if(frame==32){
		CreateShotA(1, rand(GetClipMinX, GetClipMaxX), 0, 0);
		SetShotDataA(1, 0, 2, rand(45, 135), 0.3, 0, 3, SP01);
		SetShotDataA(1, 40, 2, rand(45, 135), rand(-0.05,

0.05), 0.1, 3, SP01);
		FireShot(1);
		frame=30;
	}

	if(frameB==43){
		CreateShotA(2, rand(GetClipMinX, GetClipMaxX), 0, 0);
		SetShotDataA(2, 0, 2, rand(45, 135), 0.3, 0, 3,

RED02);
		SetShotDataA(2, 40, 1, rand(45, 135), rand(-0.05,

0.05), 0.1, 2, RED02);
		FireShot(2);
		frameB=30;
	}

	if(frameV==1){
		CreateShotA(0, rand(GetX-3, GetX+3), rand(GetY-3,

GetY+3), 0);
		SetShotDataA(0, 0, 10, 270, rand(-3, 3), 0, 10, SP01);
		FireShot(0);
		frameV=0;
	}

	frame++;
	frameV++;
	frameB++;
    }

    @DrawLoop {
        SetTexture(BossImage);
        DrawGraphic(GetX,GetY);

    }

    @Finalize {
    }

}