Guest User

Untitled

a guest
Dec 11th, 2017
73
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.46 KB | None | 0 0
  1. #TouhouDanmakufu
  2. #Title[Proiettile Ciel "Heat of the Falling Ice"]
  3. #Text[The main shot of the Eight Gods.]
  4. #BGM[.\bgm\Rumia's theme - Apparations Stalk The Night.mp3]
  5. #Background[.\img\IceMountain.png, 1, 1]
  6. #ScriptVersion[2]
  7.  
  8. script_enemy_main {
  9.  
  10. let imgBoss = "script\img\ExRumia.png";
  11. let frame = 0;
  12. let angle = 0;
  13.  
  14. @Initialize {
  15. SetLife(1000);
  16. SetMovePosition01 (GetCenterX,GetCenterY,5);
  17. SetTimer(65);
  18. LoadGraphic(imgBoss);
  19. }
  20.  
  21. @MainLoop {
  22. SetCollisionA(GetX, GetY, 24);
  23. SetCollisionB(GetX, GetY, 24);
  24. if (frame == 60)
  25. {
  26. CreateShot01(GetX, GetY, 3, GetAngleToPlayer, RED01, 10);
  27. frame=0;
  28. CreateShot01(GetX, GetY, 4, GetAngleToPlayer, RED02, 11);
  29. frame=0;
  30. CreateShot01(GetX, GetY, 5, GetAngleToPlayer, RED03, 12);
  31. frame=0;
  32. CreateShot01(GetX, GetY, 6, GetAngleToPlayer, RED02, 13);
  33. frame=0;
  34. CreateShot01(GetX, GetY, 7, GetAngleToPlayer, RED01, 14);
  35. frame=61
  36. }
  37. if (frame == 180)
  38. {
  39. CreateLaser01(GetX, GetY, 5, GetAngleToPlayer, 200, 5, RED22, 60);
  40. frame=120;
  41. CreateLaser01(GetX, GetY, 5, GetAngleToPlayer, 200, 10, RED22, 120);
  42. frame=120;
  43. CreateLaser01(GetX, GetY, 5, GetAngleToPlayer, 200, 15, RED32, 150);
  44. frame=120;
  45. CreateLaser01(GetX, GetY, 5, GetAngleToPlayer, 200, 20, RED22, 165);
  46. frame=120;
  47. CreateLaser01(GetX, GetY, 5, GetAngleToPlayer, 200, 25, RED22, 170);
  48. frame=181;
  49. }
  50. if (frame == 260)
  51. {
  52. loop(36){
  53. CreateShot01(GetX, GetY, 0, angle, BLUE12, 170);
  54. angle += 360/36;
  55. frame == 182
  56. loop(36){
  57. CreateShot01(GetX, GetY, 180, angle, BLUE12, 170);
  58. angle += 360/36;
  59. frame == 182
  60. loop(36){
  61. CreateShot01(GetX, GetY, 360, angle, BLUE12, 170);
  62. angle += 360/36;
  63. frame=0
  64. }
  65. frame++;
  66. }
  67.  
  68. @DrawLoop {
  69. SetTexture(imgBoss);
  70. SetRenderState(ALPHA);
  71. SetAlpha(255);
  72. SetGraphicRect(0,0,50,50);
  73. SetGraphicScale(1,1);
  74. SetGraphicAngle(0,0,0);
  75. DrawGraphic(GetX, GetY);
  76.  
  77. }
  78.  
  79. @Finalize {
  80. DeleteGraphic(imgBoss);
  81. }
  82. }
Add Comment
Please, Sign In to add comment