Advertisement
Guest User

Untitled

a guest
Mar 28th, 2017
55
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.17 KB | None | 0 0
  1. //Step
  2.  
  3. //Get the player's input
  4.  
  5. key_right = keyboard_check(vk_right);
  6. key_left = -keyboard_check(vk_left);
  7. key_up = keyboard_check_pressed(vk_up);
  8.  
  9. //Changing sprites
  10.  
  11. if keyboard_check_pressed(vk_left)
  12. {
  13. sprite_index = spr_DolphyLeft
  14. }
  15. if keyboard_check_pressed(vk_right)
  16. {
  17. sprite_index = spr_Dolphy
  18. }
  19.  
  20. //React to inputs
  21.  
  22. move = key_left + key_right;
  23. hsp = move * movespeed;
  24. if (vsp < 10) vsp += grav;
  25.  
  26. if (place_meeting(x+1,y+1,obj_wall))
  27. {
  28. vsp = key_up * -jumpspeed
  29. }
  30.  
  31. //Horizontal Collision
  32.  
  33. if (place_meeting(x+hsp,y,obj_wall))
  34. {
  35. while(!place_meeting(x+sign(hsp),y,obj_wall))
  36. {
  37. x += sign(hsp);
  38. }
  39. hsp = 0;
  40. }
  41. x += hsp;
  42.  
  43. //Vertical Collision
  44.  
  45. if (place_meeting(x,y+vsp,obj_wall))
  46. {
  47. while(!place_meeting(x,y+sign(vsp),obj_wall))
  48. {
  49. y += sign(vsp);
  50. }
  51. vsp = 0;
  52. }
  53. y += vsp;
  54.  
  55. //Diagonal collision
  56.  
  57. if(place_meeting(x+hsp, y+vsp, obj_wall))
  58. {
  59. while(!place_meeting(x+sign(hsp), y + sign(vsp), obj_wall))
  60. {
  61. x+= sign(hsp);
  62. y+= sign(vsp);
  63. }
  64. hsp = 0;
  65. vsp = 0;
  66. }
  67. //Dolphys Movement
  68. if((place_meeting(x,y+vsp,obj_wall)))
  69. {
  70. move = false;
  71. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement