#e[Player]	//@XNvgł邱Ƃ܂
#ScriptVersion[2]	//XNvgo[W2K{ł
#Menu[GH ]		//@Iʂŕ\郁j[ł
#Text[GH @-zVۂ-
@@[U[L[Ń[hύXA
@@ᑬɊeVbgB
@@[h1FOgUVbg
@@[h2FSʃVbg
@@[h3FЗ̓Vbg
@@{F
@@@FuKtAv
@@@ᑬFTueCjAT]	//@Iʂŕ\eLXgł
#Image[.\img\Select_Player666.png]	//@Iʂŕ\摜t@Cւ̃pXł
#ReplayName[Utsuho]	//vCIɕ\镶łB8ȓłB

script_player_main {
	#include_function".\txt\ShotTask.txt"
	#include_function".\txt\LocalData.txt"
    let PCenterX=GetPlayerX;
    let PCenterY=GetPlayerY;
    let StarX=[PCenterX-24,PCenterX+24];
    let StarY=[PCenterY,PCenterY];
    let FireFlag=true;
    let nukeType = 0;


    @Initialize {
        ascent(n in 0..length(Graphics)){LoadGraphic(Graphics[n]);}
        ascent(n in 0..length(SE)){LoadSE(SE[n]);}
        LoadPlayerShotData(ShotData);
	SetRibirthFrame(10);
	SetGrazeCircle(40);
        SetPlayerLifeImage(Graphics[0], 121, 14, 156, 47);
        SetItemCollectLine(1000);
	SetSpeed(3.7, 1.3);
	PCenterX=GetPlayerX;
    	PCenterY=GetPlayerY;

        TMain;
    }

    @MainLoop {
	if(nukeType==1){
	        SetPlayerLifeImage(Graphics[0], 101, 66, 136, 99);
	}
	else if(nukeType==0){
        SetPlayerLifeImage(Graphics[0], 101, 16, 136, 49);
	}
	else{SetPlayerLifeImage(Graphics[0],101,119,136,152)}
	if(OnBomb){CollectItems;}
	if(PCenterX>GetPlayerX+0.7){
		if(PCenterX-GetPlayerX>10){PCenterX=GetPlayerX+10;}
		PCenterX-=1;
		}
	else if(PCenterX<GetPlayerX-0.7){
		if(PCenterX-GetPlayerX<-10){PCenterX=GetPlayerX-10;}
		PCenterX+=1;
		}
	else{PCenterX=GetPlayerX;}
	if(PCenterY>GetPlayerY+0.7){
		if(PCenterY-GetPlayerY>10){PCenterY=GetPlayerY+10;}
		PCenterY-=1;
		}
	else if(PCenterY<GetPlayerY-0.7){
		if(PCenterY-GetPlayerY<-10){PCenterY=GetPlayerY-10;}
		PCenterY+=1;
		}
	else{PCenterY=GetPlayerY;}
        SetIntersectionCircle(GetPlayerX, GetPlayerY, 0);
        yield;
    }

    @Missed{MainLoop}

    @SpellCard {
	if(!bSlow){
		UseSpellCard("Karasu", [Graphics[1],SE[2]]);
                CutIn(YOUMU, "uKtAv", Graphics[1]);
		}
	else{
		UseSpellCard("STAR", [Graphics[1],SE[2]]);
                CutIn(YOUMU, "TueCjAT", Graphics[1]);
		}
    	}

    @DrawLoop {
	SetTexture(Graphics[0]);
	SetGraphicAngle(0,0,0);
	SetAlpha(255);
	SetGraphicScale(1.0,1.0);
        if(bLeft){SetGraphicRect(1, 121, 60, 180);}
        else if(bRight) {SetGraphicRect(1, 61, 60, 120);}
	else{SetGraphicRect(1, 1, 60, 60);}
        DrawGraphic(GetPlayerX, GetPlayerY);

	ascent(n in 0..2){
		SetGraphicRect(0,0,0,0);
		SetGraphicAngle(0,0,0);
		SetAlpha(255);
		SetGraphicScale(1.0,1.0);	
        	DrawGraphic(StarX[n], StarY[n]);
		}
	
    }

    @Finalize {
	ascent(n in 0..length(Graphics)){DeleteGraphic(Graphics[n]);}
        ascent(n in 0..length(SE)){DeleteSE(SE[n]);}
    }

    task TMain {
        yield;

        TKeyCheck;

        TShot;
	TSubShot;
	
    }

   task TKeyCheck {
        let state;

        loop {
            state  = GetKeyState(VK_SHOT);
            bShot  = (state == KEY_PUSH || state == KEY_HOLD);
        
            state  = GetKeyState(VK_LEFT);
            bLeft  = (state == KEY_PUSH || state == KEY_HOLD);
	   
            state  = GetKeyState(VK_RIGHT);
            bRight = (state == KEY_PUSH || state == KEY_HOLD);
	   
            state  = GetKeyState(VK_SLOWMOVE);
            bSlow  = (state == KEY_PUSH || state == KEY_HOLD);

            state  = GetKeyState(VK_USER);
            bUser = (state == KEY_PUSH || state == KEY_HOLD);
            if(bUser == true && state != KEY_HOLD){
	nukeType++;
	if(nukeType > 2){
		nukeType = 0;
	}
            }
	  
            yield;
        }
    }


		}
		}
	}

	#include_function".\txt\ShotTask.txt"
	#include_function".\txt\LocalData.txt"
}

#include_script".\txt\spell1.txt"
#include_script".\txt\spell2.txt"
