Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #TouhouDanmakufu[Single]
- #ScriptVersion[3]
- #Title["NS1"]
- #include"./shot/AllStarShot_Const.txt"
- #include"./functions/functions.txt"
- let objBoss;
- @Event{
- alternative(GetEventType())
- case(EV_REQUEST_LIFE){
- SetScriptResult(2000);
- }
- case(EV_REQUEST_TIMER){
- SetScriptResult(51);
- }
- }
- @Initialize{
- objBoss = ObjEnemy_Create(OBJ_ENEMY_BOSS);
- ObjEnemy_Regist(objBoss);
- let imgExRumia = GetCurrentScriptDirectory() ~ "ExRumia.png";
- ObjPrim_SetTexture(objBoss, imgExRumia);
- ObjSprite2D_SetSourceRect(objBoss, 64, 1, 127, 64);
- ObjSprite2D_SetDestCenter(objBoss);
- ObjMove_SetDestAtFrame(objBoss, GetCenterX(), 60, 60);
- genericshots;
- }
- task genericshots{
- let angleT = GetAngleToPlayer(objBoss);
- while(ObjEnemy_GetInfo(objBoss,INFO_LIFE) > 0){
- loop(20){
- CreateShotA1(ObjMove_GetX(objBoss), ObjMove_GetY(objBoss), 2, angleT, T_NOTE_BLUE, 20);
- angleT+=360/20;
- }
- wait(30);
- }
- }
- @MainLoop{
- ObjEnemy_SetIntersectionCircleToShot(objBoss, ObjMove_GetX(objBoss), ObjMove_GetY(objBoss), 32);
- ObjEnemy_SetIntersectionCircleToPlayer(objBoss, ObjMove_GetX(objBoss), ObjMove_GetY(objBoss), 24);
- yield;
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement