task TGainSpell(score){
	let path = GetCurrentScriptDirectory ~ "img/frame2.png";
	let pathDigit = GetCurrentScriptDirectory() ~ "img/SystemDigit.png";
	let objText = ObjPrim_Create(OBJ_SPRITE_2D);
	ObjPrim_SetTexture(objText, path);
	ObjSprite2D_SetSourceRect(objText, 0, 99, 264, 131);
	ObjSprite2D_SetDestRect(objText, 0, 0, 264, 32);
	Obj_SetRenderPriority(objText, 0.8);
	ObjRender_SetX(objText, 64);
	ObjRender_SetY(objText, 98);

	let objScore = ObjPrim_Create(OBJ_SPRITE_LIST_2D);
	let count = GetNumSize(score);
	let listNum = DigitToArray(score, count);
	ObjPrim_SetTexture(objScore, pathDigit);
	Obj_SetRenderPriority(objScore, 0.8);
	ObjRender_SetY(objScore, 140);

	RefreshVertex;
	loop(120){
		yield;
	}
	let alpha = 255;
	while(alpha>0){
		alpha-=15;
		RefreshVertex;
		ObjRender_SetAlpha(objText, alpha);
		ObjRender_SetAlpha(objScore, alpha);
		yield;
	}

	ObjSpriteList2D_ClearVertexCount(objScore);
	Obj_Delete(objText);
	Obj_Delete(objScore);

	task RefreshVertex{
		ObjSpriteList2D_ClearVertexCount(objScore);
		ascent(iObj in 0 .. count){
			let num = listNum[iObj];
			ObjRender_SetX(objScore, 182 + iObj * 20);
			ObjSpriteList2D_SetSourceRect(objScore, num * 16, 0, (num + 1) * 16, 20);
			ObjSpriteList2D_SetDestRect(objScore, 0, 0, 20, 25);
			ObjSpriteList2D_AddVertex(objScore);
		}
	}else{TFailSpell;}
}

task TFailSpell{