Advertisement
Guest User

Untitled

a guest
Jun 9th, 2014
264
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.70 KB | None | 0 0
  1. //Animating a red fairy
  2. task redAnim(enemyObj) {
  3. let dir;
  4. let speed;
  5. let f = 0;
  6. let f2 = 0;
  7.  
  8. ObjEnemy_SetIntersectionCircleToShot(enemyObj,ObjMove_GetX(enemyObj),ObjMove_GetY(enemyObj),16);
  9. ObjEnemy_SetIntersectionCircleToPlayer(enemyObj,ObjMove_GetX(enemyObj),ObjMove_GetY(enemyObj),10);
  10.  
  11. while(!Obj_IsDeleted(enemyObj)) {
  12. dir = ObjMove_GetAngle(enemyObj);
  13. speed = ObjMove_GetSpeed(enemyObj);
  14.  
  15. if(sin(dir)==1||sin(dir)==-1) {
  16. if (f<10) {ObjSprite2D_SetSourceRect(enemyObj,0,288,32,320); }
  17. if (f>=10&&f<20) {ObjSprite2D_SetSourceRect(enemyObj,32,288,64,320);}
  18. if (f>=20&&f<30) {ObjSprite2D_SetSourceRect(enemyObj,64,288,96,320);}
  19. if (f>=30&&f<40) {ObjSprite2D_SetSourceRect(enemyObj,96,288,128,320);}
  20. f2 = 0;
  21. ObjRender_SetAngleXYZ(enemyObj,0,0,0);
  22. }
  23.  
  24. else if(cos(dir) > 0) {
  25. ObjRender_SetAngleXYZ(enemyObj,0,0,0);
  26. if (f2<5) {ObjSprite2D_SetSourceRect(enemyObj,128,288,160,320); }
  27. if (f2>=5&&f2<10) {ObjSprite2D_SetSourceRect(enemyObj,160,288,192,320);}
  28. if (f2>=10&&f2<15) {ObjSprite2D_SetSourceRect(enemyObj,192,288,224,320);}
  29. if (f2>=15&&f2<20) {ObjSprite2D_SetSourceRect(enemyObj,224,288,256,320);}
  30. if (f2>=20&&f2<25) {ObjSprite2D_SetSourceRect(enemyObj,256,288,288,320);}
  31.  
  32. if (f2>=20) {
  33. loop {
  34. ObjSprite2D_SetSourceRect(enemyObj,288,288,320,320);
  35. wait(10);
  36. ObjSprite2D_SetSourceRect(enemyObj,320,288,352,320);
  37. wait(10);
  38. ObjSprite2D_SetSourceRect(enemyObj,352,288,384,320);
  39. wait(10);
  40. }
  41. }
  42. f2++;
  43. }
  44.  
  45. else if(cos(dir) < 0) {
  46. if (f2<5) {ObjSprite2D_SetSourceRect(enemyObj,128,288,160,320); }
  47. if (f2>=5&&f2<10) {ObjSprite2D_SetSourceRect(enemyObj,160,288,192,320);}
  48. if (f2>=10&&f2<15) {ObjSprite2D_SetSourceRect(enemyObj,192,288,224,320);}
  49. if (f2>=15&&f2<20) {ObjSprite2D_SetSourceRect(enemyObj,224,288,256,320);}
  50. if (f2>=20&&f2<25) {ObjSprite2D_SetSourceRect(enemyObj,256,288,288,320);}
  51. if (f2>=25&&f2<30) {ObjSprite2D_SetSourceRect(enemyObj,288,288,320,320);}
  52. if (f2>=30) {
  53. loop {
  54. ObjSprite2D_SetSourceRect(enemyObj,320,288,352,320);
  55. wait(5);
  56. ObjSprite2D_SetSourceRect(enemyObj,352,288,384,320);
  57. wait(5);
  58. }
  59. }
  60. f2++;
  61. ObjRender_SetAngleXYZ(enemyObj,0,180,0);
  62. }
  63.  
  64. f++;
  65. if(f==40) {f = 0;}
  66. yield;
  67. }
  68. }
  69.  
  70. //Drawing a red fairy
  71. task openFairy {
  72. let enemyObj = ObjEnemy_Create(OBJ_ENEMY);
  73. ObjEnemy_Regist(enemyObj);
  74.  
  75. ObjEnemy_SetLife(enemyObj,100);
  76. ObjPrim_SetTexture(enemyObj,imgEnemy);
  77. ObjSprite2D_SetSourceRect(enemyObj,0,0,32,32);
  78. ObjSprite2D_SetDestCenter(enemyObj);
  79. redAnim(enemyObj);
  80.  
  81. ObjMove_SetPosition(enemyObj,cx,-10);
  82. ObjMove_SetAngle(enemyObj,90);
  83. ObjMove_SetSpeed(enemyObj,1);
  84. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement