//==============================================================================
// ネタ支援　http://ro-server.net84.net/
//==============================================================================
//============================================================
// 遅延蝶の羽
//	callfunc "DelayButterflyWing",<delay>
//	<delay>	遅延する秒数。1000で1秒
//------------------------------------------------------------
function	script	DelayButterflyWing	{
	//名前の保存
		set '@name$,strcharinfo(0);
	//MAPの保存
		set '@map,getmapname('@name$);
	//待機→再アタッチ
		if(!sleep2(getarg(0)))
			return;
	//MAPの相違、死亡チェック
		if('@map == getmapname('@name$) && checkdead() == 0)
			warp "SavePoint",0,0;
		return;
}
//============================================================
// PT支援
//	callfunc "ItemdbPartyAssist"
//	アイテム使用でPT支援(プリ用)
//	それぞれ覚えてるスキルLvで使用
//------------------------------------------------------------
function	script	ItemdbPartyAssist	{
	if(Sp < 300)
		return;
	heal 0,-300;
	set '@name$,strcharinfo(0);
	set '@map$,getmapname('@name);
	setarray '@ID[1],29,34,66,67,361;	//スキルID、IA・ブレス・IM・サフラ・アスム
	setarray '@SC[1],12,10,15,16,110;	//状態番号、IA・ブレス・IM・サフラ・アスム
	setarray '@Time[1][1],60,80,100,120,140,160,180,200,220,240;	//IA
	setarray '@Time[2][1],60,80,100,120,140,160,180,200,220,240;	//ブレス
	setarray '@Time[3][1],60,60,60,60,60;	//IM
	setarray '@Time[4][1],30,20,10;	//サフラ
	setarray '@Time[5][1],20,40,60,80,100;	//アスム

	for(set '@j,1; '@j < 6; set '@j,'@j+1) {
		set '@LV['@j],getskilllv('@ID['@j]);
	}
	getpartymember getcharid(1);
	for(set '@i,0; '@i < $@partymembercount; set '@i,'@i+1) {
		if(getmapname($@partymembername$['@i]) != '@map$)	// MAPが違う
			continue;
		if(attachrid(getcharid(3,$@partymembername$['@i]))) {
			if(!checkdead()) {
				for(set '@j,1; '@j < 6; set '@j,'@j+1) {
					if('@LV['@j] == 0)
						continue;
					sc_start '@SC['@j],('@Time['@j]['@LV['@j]] * 1000),'@LV['@j];
				}
			}
			detachrid;
		}
	}
	return;
}