Mewkyuu

Tails Doll - Spell 1

May 8th, 2011
243
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.21 KB | None | 0 0
  1. #TouhouDanmakufu
  2. #Title[Spell Card 1] #Text[7 Chaos Emeralds
  3. "Can You Feel The Sunshine"] #BackGround[Default] #BGM[.\music.ogg]
  4. #PlayLevel[Normal] #Player[MARISA] #ScriptVersion[2]
  5.  
  6. script_enemy_main {
  7. SetLife(1000); SetDamageRate(25, 30); SetTimer(75);
  8. #include_function ".\bossinclude.txt"
  9. task TMain {
  10. SetMovePosition02(GetCenterX, GetCenterY-75, 1);
  11. CutinL("7カオスエメラルズ「太陽光感じことでき」", 500000, false, false); waitI(120);
  12. SetShotAutoDeleteClip(200, 200, 200, 200);
  13. loop {
  14. ascent(i in 0..7) { ascent(j in -1..2) { ascent(k in -3..4) { ascent(l in -3..4) {
  15. CreateShotA(0, GetX, GetY, 0);
  16. SetShotDataA(0, 0, 3, GetAngleToPlayer+i*360/7, 1/2, 0, 0, 96);
  17. SetShotDataA(0, 45, 0, NULL, 180+j*19, 0, 0, 99);
  18. SetShotDataA(0, 46, 5/2, NULL, -2*j, 0, 0, NULL);
  19. SetShotDataA(0, 90, 0, NULL, 105+k*17, 0, 0, 98);
  20. SetShotDataA(0, 91, 2, NULL, -3/2*k, 0, 0, NULL);
  21. SetShotDataA(0, 135, 0, NULL, 165+l*39, 0, 0, 107);
  22. SetShotDataA(0, 136, 3-absolute(l)*1/2, NULL, -l, -((3-absolute(l)*1/2)-(-2))/120, -2, NULL);
  23. SetShotDataA(0, 136+120, -2, NULL, 0, 0, 0, NULL);
  24. FireShot(0);
  25. } } } }
  26. loop(3) { wait(30); ExMove; } wait(120);
  27. }
  28. }
  29. }
Advertisement
Add Comment
Please, Sign In to add comment