Guest User

Enemy example

a guest
Aug 21st, 2013
220
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.25 KB | None | 0 0
  1. #include"script/default_system/Default_ShotConst.txt"
  2. #include"script/default_system/Default_Effect.txt"
  3.  
  4. @Initialize{
  5.  
  6. Enemy(40,100,100);
  7. Enemy(100,100,100);
  8. Enemy(160,100,100);
  9. Enemy(220,100,100);
  10. Enemy(280,100,100);
  11.  
  12. TEnd;
  13. }
  14.  
  15. @MainLoop{
  16. yield;
  17. }
  18.  
  19. @Event{}
  20.  
  21.  
  22. function Enemy(x,y,life){
  23. let obj = ObjEnemy_Create(OBJ_ENEMY);
  24. ObjEnemy_Regist(obj);
  25. ObjEnemy_SetLife(obj, life);
  26. ObjMove_SetPosition(obj, x, y);
  27.  
  28. ObjPrim_SetTexture(obj, GetCurrentScriptDirectory~"ExRumia.png");
  29. ObjSprite2D_SetSourceRect(obj, 64, 1, 127, 64);
  30. ObjSprite2D_SetDestCenter(obj);
  31.  
  32. FairyShot(obj);
  33. FairyMaintenance(obj);
  34.  
  35. return obj;
  36. }
  37.  
  38. task FairyMaintenance(fairy){
  39. while(!Obj_IsDeleted(fairy) && ObjEnemy_GetInfo(fairy, INFO_LIFE) > 0){
  40. let ex = ObjMove_GetX(fairy);
  41. let ey = ObjMove_GetY(fairy);
  42. ObjEnemy_SetIntersectionCircleToShot(fairy, ex, ey, 16);
  43. ObjEnemy_SetIntersectionCircleToPlayer(fairy, ex, ey, 16);
  44. yield;
  45. }
  46.  
  47. Obj_Delete(fairy);
  48. }
  49.  
  50. task FairyShot(fairy){
  51. while(!Obj_IsDeleted(fairy)){
  52. loop(60){yield;}
  53. CreateShotA1(ObjMove_GetX(fairy),ObjMove_GetY(fairy),2,90,402,10);
  54. }
  55. }
  56.  
  57. task TEnd{
  58. while(length(GetAllEnemyID()) > 0){
  59. yield;
  60. }
  61.  
  62. loop(30){yield;}
  63.  
  64. CloseScript(GetOwnScriptID());
  65. }
Advertisement
Add Comment
Please, Sign In to add comment