//By Im the Red Spy
//execute this script via: scr_collision(object being collided with, radius of collision) or whatever you decide to name it. eg (collide(oSolid,16))
//This can be put in either a collision event or the step event. Works best in a step event.
var object, radius; //object
object=argument0;
radius=argument1
for(col=0;col<360;col+=20) //A for loop checks for every direction that is a multiple of 20 (0, 20, 40...etc)
//20 can be changed to higher numbers (faster but probably less efficient) or lower numbers (slower but more precise)
    {
    while(position_meeting(x+lengthdir_x(radius,col),y+lengthdir_y(radius,col),object)) //checks for the object colliding at a spot around the circle for which radius defines
        {
        x-=lengthdir_x(.2,col); //move the object back according to the direction (col)
        y+=lengthdir_y(.2,col); //move the object back according to the direction (col)
        }
    }

intersectingDistance = point_distance(object1.x,object1.y,object2.x,object2.y) - (r1+r2)
if (intersectingDistance <= 0)
 return false;
angle = degtorad(point_direction(object1.x,object1.y,object2.x,object2.y))

x -= cos(angle)*intersectingDistance
y -= sin(angle)*intersectingDistance

return true;

//argument0: current direction
//argument1: direction to face

compareDirection = argument1;
compareDirection -= argument0;

if (compareDirection < 0)
   compareDirection = 360+compareDirection;

if (compareDirection > 180)
    plusMinus = -1;
else
    plusMinus = 1;

return plusMinus;

move = 0;
respx = xstart; //Set the 'x' position where the enemy will respawn.
respy = ystart; //Set the 'y' position where the enemy will respawn.
respobj = object_index; //Sets the object that will appear after respawning. (I recommend using the name of the original object.)

if (move == 0) {
    if (x > view_xview[0]-32)
    && (y > view_yview[0]-32)
    && (x < view_xview[0]+458)
    && (y < view_yview[0]+272) {
        move = 1;
        //Add here some movement code and make sure 'move = 1' is present on the code, otherwise it will not work.
    }
}
else if (move == 1) {
    if (x < view_xview[0]-32)
    || (y < view_yview[0]-32)
    || (x > view_xview[0]+458)
    || (y > view_yview[0]+272) {
        move = 2;
        instance_destroy();
        respawn = instance_create(respx,respy,obj_enemy_respawn)
            respawn.npc = respobj;
    }
    //Add here the movement code.
}

if (x < view_xview[0]-32)
|| (y < view_yview[0]-32)
|| (x > view_xview[0]+458)
|| (y > view_yview[0]+272) {
    instance_create(xstart,ystart,npc);
    instance_destroy();
}

enemy = instance_create(x,y,obj_enemy)
with (enemy) {
    move = 1;
    respx = respx;
    respy = respy;
    respobj = respobj;
}

// In the Create Event of an object designated for backgrounds
step_vert = 0;
spd = 1;    // speed of the moving background
bg = background
 

// In the End Step Event of an object designate for backgrounds
step_vert += spd;
if (step_vert > background_get_height(bg) step_vert = -background_get_height(bg);
 

// In the Draw Event of an object designated for backgrounds
for (i=-background_get_height(bg) + step_vert; i < room_height; i += background_get_height(bg)) {
    draw_background(bg,view_xview[0],view_yview[0],i);
}