Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #TouhouDanmakufu
- #Title[Shrine Maiden: Border of Yin and Yang]
- #Text[Whaaat]
- #Player[FREE]
- #ScriptVersion[2]
- script_enemy_main{
- let imgExRumia="script\ExRumia\img\ExRumia.png";
- let frame = 0;
- let frame2 = 0;
- let ANG = 0;
- let ANGinc = 0.1;
- let CW=true;
- @Initialize{
- SetLife(4000);
- SetInvincibility(30);
- LoadGraphic(imgExRumia);
- SetMovePosition02(GetCenterX, GetCenterY - 120, 60);
- }
- @MainLoop{
- SetCollisionA(GetX, GetY, 32);
- SetCollisionB(GetX, GetY, 16);
- frame++;
- if(frame==60){
- CreateShot01(GetX + 60*cos(ANG), GetY + 60*sin(ANG), 1, ANG, RED21, 23);
- CreateShot01(GetX + 60*cos(ANG+180), GetY + 60*sin(ANG+180), 1, ANG+180, WHITE21, 23);
- frame = 59;
- if(ANGinc>=180){
- CW=false;
- }
- if(ANGinc<=(-180)){
- CW=true;
- }
- if(CW==true){
- ANG+=ANGinc;
- }else{
- ANG-=ANGinc;
- }
- if(ANGinc>=0 && CW==true){
- ANGinc+=0.1;
- }
- if(ANGinc>0 && CW==false){
- ANGinc-=0.1;
- }
- if(ANGinc<=0 && CW==false){
- ANGinc-=0.1;
- }
- if(ANGinc<0 && CW==true){
- ANGinc+=0.1;
- }
- }
- }
- @DrawLoop{
- SetColor(255,255,255);
- SetRenderState(ALPHA);
- SetTexture(imgExRumia);
- SetGraphicRect(64,1,127,64);
- DrawGraphic(GetX,GetY);
- }
- @Finalize
- {
- DeleteGraphic(imgExRumia);
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement