Lunarethic

Untitled

Nov 11th, 2013
141
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.14 KB | None | 0 0
  1. task mainTask{
  2. yield;
  3. cage;
  4. wait(60);
  5. PlaySE(concenfx);
  6. Concentration01(60);
  7. Concentration02(60);
  8. movement;
  9. }
  10.  
  11. // movement
  12. task movement{
  13. wait(60);
  14. loop{
  15. wait(120);
  16. shot;
  17. wait(100);
  18. spin;
  19. spin2;
  20. wait(120);
  21. SetMovePosition03(GetCenterX-125,GetCenterY,7,5);//goes left
  22. wait(90);
  23. circle(GetEnemyX,GetEnemyY,3,0,RED01);
  24. wait(240);
  25. SetMovePosition03(GetCenterX+125,GetCenterY,7,5);//goes right
  26. wait(240);
  27. SetMovePosition03(GetCenterX, GetClipMinY + 120,7,5);//goes center
  28. wait(1);
  29. }
  30. }
  31.  
  32. //object bullet cage
  33. task cage{
  34. wait(190);
  35. PlaySE(sfx1);
  36. loop{
  37. right(GetCenterX+185,GetClipMaxY,20,270);
  38. left(GetCenterX-185,GetClipMaxY,20,270);
  39. top(GetCenterX-185,GetClipMinY,20,0);
  40. bottom(GetCenterX+185,GetClipMaxY,20,180);
  41. diag1(GetCenterX-185,GetClipMinY,20,51); // left side
  42. diag2(GetCenterX+185,GetClipMinY,20,129); // right side
  43. yield;
  44. }
  45. }
  46.  
  47. //right object bullet
  48. task right(x,y,speed,angle){
  49. let obj=Obj_Create(OBJ_SHOT);
  50.  
  51. Obj_SetPosition(obj,x,y);
  52. Obj_SetAngle(obj,angle);
  53. Obj_SetSpeed(obj,speed);
  54. ObjShot_SetGraphic(obj,WHITE04);
  55. ObjShot_SetDelay(obj,5);
  56. ObjShot_SetBombResist(obj,true);
  57.  
  58. while(Obj_BeDeleted(obj)==false) {
  59. yield;
  60. }
  61. }
  62.  
  63. task left(x,y,speed,angle){
  64. let obj=Obj_Create(OBJ_SHOT);
  65.  
  66. Obj_SetPosition(obj,x,y);
  67. Obj_SetAngle(obj,angle);
  68. Obj_SetSpeed(obj,speed);
  69. ObjShot_SetGraphic(obj,WHITE04);
  70. ObjShot_SetDelay(obj,5);
  71. ObjShot_SetBombResist(obj,true);
  72.  
  73. while(Obj_BeDeleted(obj)==false) {
  74. yield;
  75. }
  76. }
  77.  
  78. task top(x,y,speed,angle){
  79. let obj=Obj_Create(OBJ_SHOT);
  80.  
  81. Obj_SetPosition(obj,x,y);
  82. Obj_SetAngle(obj,angle);
  83. Obj_SetSpeed(obj,speed);
  84. ObjShot_SetGraphic(obj,WHITE04);
  85. ObjShot_SetDelay(obj,5);
  86. ObjShot_SetBombResist(obj,true);
  87.  
  88. while(Obj_BeDeleted(obj)==false) {
  89. yield;
  90. }
  91. }
  92.  
  93. task bottom(x,y,speed,angle){
  94. let obj=Obj_Create(OBJ_SHOT);
  95.  
  96. Obj_SetPosition(obj,x,y);
  97. Obj_SetAngle(obj,angle);
  98. Obj_SetSpeed(obj,speed);
  99. ObjShot_SetGraphic(obj,WHITE04);
  100. ObjShot_SetDelay(obj,5);
  101. ObjShot_SetBombResist(obj,true);
  102.  
  103. while(Obj_BeDeleted(obj)==false) {
  104. yield;
  105. }
  106. }
  107.  
  108. task diag1(x,y,speed,angle){
  109. let obj=Obj_Create(OBJ_SHOT);
  110.  
  111. Obj_SetPosition(obj,x,y);
  112. Obj_SetAngle(obj,angle);
  113. Obj_SetSpeed(obj,speed);
  114. ObjShot_SetGraphic(obj,WHITE04);
  115. ObjShot_SetDelay(obj,5);
  116. ObjShot_SetBombResist(obj,true);
  117.  
  118. while(Obj_BeDeleted(obj)==false) {
  119. yield;
  120. }
  121. }
  122.  
  123. task diag2(x,y,speed,angle){
  124. let obj=Obj_Create(OBJ_SHOT);
  125.  
  126. Obj_SetPosition(obj,x,y);
  127. Obj_SetAngle(obj,angle);
  128. Obj_SetSpeed(obj,speed);
  129. ObjShot_SetGraphic(obj,WHITE04);
  130. ObjShot_SetDelay(obj,5);
  131. ObjShot_SetBombResist(obj,true);
  132.  
  133. while(Obj_BeDeleted(obj)==false) {
  134. yield;
  135. }
  136. }
  137.  
  138. // Attack Center Side
  139. task spin{
  140. let x = 0;
  141. let dir = 0;
  142. wait(1);
  143. loop(1){
  144. PlaySE(sfx3);
  145. while(x<36){
  146. CreateShotA(1,GetEnemyX,GetEnemyY,1);
  147. SetShotDataA(1,0,1,dir,1,-1,3,BLUE21);
  148. SetShotDataA(1,160,1,dir,0,-1,NULL,BLUE21);
  149. FireShot(1);
  150.  
  151. dir+=360/36;
  152. x++;
  153. }
  154. x = 0;
  155. dir = 0;
  156. wait(10);
  157. yield;
  158.  
  159. }
  160. }
  161.  
  162. task spin2{
  163. let x = 0;
  164. let dir = 0;
  165. wait(1);
  166. loop(1){
  167. PlaySE(sfx3);
  168. while(x<36){
  169. CreateShotA(1,GetEnemyX,GetEnemyY,1);
  170. SetShotDataA(1,0,1,dir,-1,-1,3,GREEN21);
  171. SetShotDataA(1,160,1,dir,0,-1,NULL,BLUE21);
  172. FireShot(1);
  173.  
  174. dir+=360/36;
  175. x++;
  176. }
  177. x = 0;
  178. dir = 0;
  179. wait(10);
  180. yield;
  181.  
  182. }
  183. }
  184.  
  185. task shot{
  186. let x = 0;
  187. let dir = 0;
  188. wait(1);
  189. loop(10){
  190. PlaySE(sfx2);
  191. while(x<36){
  192. CreateShotA(1,GetEnemyX,GetEnemyY,1);
  193. SetShotDataA(1,0,1,dir,0,-10,1,BLUE02);
  194. SetShotDataA(1,30,3,dir,0,1,2,NULL);
  195. FireShot(1);
  196.  
  197. dir+=360/5;
  198. x++;
  199. }
  200. x = 0;
  201. dir += 20;
  202. wait(10);
  203. yield;
  204.  
  205. }
  206. }
  207.  
  208. //Attack Left Side
  209.  
  210. task circle(x,y,v,dir,graphic,delay){
  211. let obj=Obj_Create(OBJ_SHOT);
  212. Obj_SetPosition(obj,x,y);
  213. Obj_SetSpeed(obj,v);
  214. Obj_SetAngle(obj,dir);
  215. ObjShot_SetGraphic(obj,graphic);
  216. ObjShot_SetDelay(obj,delay);
  217. ObjShot_SetBombResist(obj,true);
  218.  
  219. //as long as the object exist
  220. while(!Obj_BeDeleted(obj)){
  221.  
  222. //Scatter Shot
  223. if(Obj_GetY(obj) > GetClipMaxX) {
  224.  
  225. loop(5){CreateShot01(Obj_GetX(obj),Obj_GetY(obj),3,dir,BLUE23,0); dir+=360/8; }
  226. Obj_Delete(obj);
  227. }
  228. yield;
  229. }
  230. }
Advertisement
Add Comment
Please, Sign In to add comment