Advertisement
Trickysticks

Untitled

Mar 30th, 2015
302
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.90 KB | None | 0 0
  1. task RunReflectCode(obj)
  2. {
  3. while(!Obj_IsDeleted(obj))
  4. {
  5.  
  6. if(trunc(ObjMove_GetX(obj))>384)
  7. {
  8. return //comment out the return to run this bit;
  9. //PlaySE(ping);
  10. ObjMove_SetX(obj,384-ObjMove_GetX(obj)+384);
  11. ObjMove_SetAngle(obj,180 - ObjMove_GetAngle(obj));
  12. CreateShotA1(ObjMove_GetX(obj),ObjMove_GetY(obj),ObjMove_GetSpeed(obj)-0.55,ObjMove_GetAngle(obj)-0.55,WHITE04,15);
  13. Obj_Delete(obj);
  14. return;
  15. }
  16.  
  17. if(trunc(ObjMove_GetX(obj))<0)
  18. {
  19. return; //see above
  20. // PlaySE(ping);
  21. ObjMove_SetX(obj,-ObjMove_GetX(obj));
  22. ObjMove_SetAngle(obj,180 - ObjMove_GetAngle(obj));
  23. CreateShotA1(ObjMove_GetX(obj),ObjMove_GetY(obj),ObjMove_GetSpeed(obj)-0.55,ObjMove_GetAngle(obj),WHITE04,15);
  24. Obj_Delete(obj);
  25. return;
  26. }
  27.  
  28. if(trunc(ObjMove_GetY(obj))>448)
  29. {
  30. return;// comment out to have bottom screen bouncing
  31. ObjMove_SetY(obj,448-ObjMove_GetY(obj)+448);
  32. ObjMove_SetAngle(obj,360 - ObjMove_GetAngle(obj));
  33. }
  34. if(trunc(ObjMove_GetY(obj))<0)
  35. {
  36.  
  37. ObjMove_SetY(obj,-ObjMove_GetY(obj));
  38. ObjMove_SetAngle(obj,360 - ObjMove_GetAngle(obj));
  39. CreateShotA1(ObjMove_GetX(obj),ObjMove_GetY(obj),ObjMove_GetSpeed(obj),ObjMove_GetAngle(obj),ObjShot_GetImageID(obj),15);
  40. Obj_Delete(obj);
  41. return;
  42. }
  43. yield;
  44. }
  45. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement