Spellcard Trial (see Trial#2 of the FireBalls)

#TouhouDanmakufu
#Title[Utsuho Encounter Spell-1]
#Text[1st Spellcard of Utsuho]
#Player[FREE]
#ScriptVersion[2]

script_enemy_main{

	#include_function ".\function_cutin.txt"
	#include_function ".\System\variables.txt"
	#include_function ".\System\functions.txt"
	#include_function ".\System\caution.txt"
	#include_function ".\System\FireBalls.txt"
	#include_function ".\Animations\UtsuhoAnimationLibrary.txt"

	@Initialize{
		LoadGraphic(okuutex);
		LoadGraphic(okuuBg1);
		LoadGraphic(okuuLay);
		LoadGraphic(okuucut);
		LoadUserShotData(shots);
		SetScore(6700000);
		SetLife(4000);
		SetTimer(64);
		SetDamageRate(80,65);
		cutin("NAZRIN","text "\""text2"\",okuucut,0,0,400,400);
		SetMovePosition01(GetCenterX,GetCenterY-100,5);
		SetInvincibility(120);
		mainTask;
		InitBoss;
	}


	@MainLoop{
		SetCollisionA(GetX,GetY,30);
		SetCollisionB(GetX,GetY,25);
		yield;
	}


	@DrawLoop{
		spellCirc;
		SetTexture(okuutex);
		SetGraphicAngle(0,0,0);
		SetRenderState(ALPHA);
		SetAlpha(255);
		SetGraphicScale(0.8,0.8);
		OkuuAnimations;
		DrawGraphic(GetX,GetY);
	}


	@BackGround{
		BgDScroll(okuuBg1,1,255);
		BgRotate(okuuLay,255,1.8,0.3);
	}


	@Finalize{
		DeleteGraphic(okuutex);
	}

	task mainTask{
		wait(120);
		cautionSign;
		wait(60);
		//fireBalls;
		//movement;
		fire;
		yield;
	}

	task fire{
		let dir = 0;
		let count = 8;
		let x = 0;
		loop{
			while(x < count){
				NuclearFireBalls(GetEnemyX,GetEnemyY,2,dir);
				dir+=360/count;
				x++;
			}
			x = 0;
			wait(90);
		}
	}
}