Guest User

fail

a guest
Jun 6th, 2011
105
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.56 KB | None | 0 0
  1. #TouhouDanmakufu
  2. #Title[Hell "- Edge of the fire blade -"]
  3. #Text[Not everyone can see...]
  4. #Player[FREE]
  5. #ScriptVersion[2]
  6. #BGM[bgm\Touhou Soccer Mima's Theme.mp3]
  7.  
  8. script_enemy_main{
  9.  
  10. let CSD = GetCurrentScriptDirectory;
  11.  
  12. let imgBoss = CSD ~ "system\Kora.png";
  13. let cut = CSD ~ "system\Koracut.png";
  14. let bg = CSD ~ "system\Temple.png";
  15.  
  16. @Initialize{
  17. SetLife(2500);
  18. SetTimer(80);
  19. SetScore(100000);
  20. SetMovePosition01(GetCenterX,GetCenterY,5);
  21. LoadGraphic(imgBoss);
  22. LoadGraphic(cut);
  23. LoadGraphic(bg);
  24.  
  25. CutIn(YOUMU,"Hell - Edge of the fire blade -",cut,0,0,300,384);
  26.  
  27. mainTask;
  28. }
  29.  
  30. @MainLoop{
  31. SetCollisionA(GetX,GetY,32);
  32. SetCollisionB(GetX,GetY,16);
  33. yield;
  34. }
  35.  
  36. @DrawLoop{
  37.  
  38. // data for the boss
  39. SetTexture(imgBoss);
  40. SetRenderState(ALPHA);
  41. SetAlpha(225);
  42. SetGraphicRect(0,0,110,110);
  43. SetGraphicScale(0.5,0.5);
  44. SetGraphicAngle(0,0,0);
  45. DrawGraphic(GetX,GetY);
  46.  
  47. }
  48.  
  49. @BackGround{
  50. SetTexture(bg);
  51. SetRenderState(ALPHA);
  52. SetAlpha(225);
  53. SetGraphicRect(0,0,512,512);
  54. SetGraphicScale(1,1);
  55. SetGraphicAngle(0,0,0);
  56. DrawGraphic(GetCenterX,GetCenterY);
  57.  
  58. }
  59.  
  60. @Finalize{
  61. // delete the image from memory
  62. DeleteGraphic(imgBoss);
  63. DeleteGraphic(cut);
  64. DeleteGraphic(bg);
  65.  
  66. }
  67.  
  68. task mainTask{
  69. wait(60);
  70. yield;
  71. fire;
  72. }
  73.  
  74.  
  75. task fire{
  76. let x = 0;
  77. let dir = 0;
  78.  
  79. loop{
  80. while(x<36){
  81. CreateShotA(1,GetEnemyX+50*cos(dir),GetEnemyY+50*sin(dir),30);
  82. SetShotDataA(1,0,0,dir,0,0,0,RED03);
  83. SetShotDataA(1,60,2,dir,0.6,0,2,RED03);
  84. CreateShot01(GetEnemyX,GetEnemyY,3,GetAngleToPlayer,RED31,10);
  85.  
  86. CreateShot01(GetEnemyX,GetEnemyY,3,GetAngleToPlayer-20,RED31,10);
  87. CreateShot01(GetEnemyX,GetEnemyY,3,GetAngleToPlayer+20,RED31,10);
  88. CreateShot01(GetEnemyX,GetEnemyY,3,GetAngleToPlayer-10,RED31,10);
  89. CreateShot01(GetEnemyX,GetEnemyY,3,GetAngleToPlayer+10,RED31,10);
  90. CreateShot01(GetEnemyX,GetEnemyY,3,GetAngleToPlayer-60,RED31,10);
  91. CreateShot01(GetEnemyX,GetEnemyY,3,GetAngleToPlayer+60,RED31,10);
  92.  
  93. FireShot(1);
  94.  
  95. dir+=360/9;
  96. x++;
  97. }
  98. x = 0;
  99. dir = 0;
  100. wait(15);
  101.  
  102. yield;
  103. }
  104. }
  105.  
  106. task fire2{
  107. let x = 0;
  108. let dir = 0;
  109.  
  110. loop{
  111. while(x<36){
  112. CreateShotA(2,GetEnemyX-50*cos(dir),GetEnemyY-50*sin(dir),30);
  113. SetShotDataA(2,0,0,dir,0,0,0,RED03);
  114. SetShotDataA(2,60,2,dir,0.6,0,2,RED03);
  115.  
  116. FireShot(2);
  117.  
  118. dir+=360/9;
  119. x++;
  120. }
  121. x = 0;
  122. dir = 0;
  123. wait(15);
  124.  
  125. yield;
  126. }
  127. }
  128.  
  129. // wait function
  130. function wait(w){
  131. loop(w){yield;}
  132. }
  133.  
  134.  
  135.  
  136.  
  137. }
Advertisement
Add Comment
Please, Sign In to add comment