Фил, не "паук" а "панк"

"Все машины, претендующие на "разумность", должны обладать способностью преследовать определенные цели и приспосабливаться, т.е. обучаться"/

draw_set_alpha(0.4)
draw_set_color(c_red);
var x1, y1;
x1 = max_l(0, 0);
y1 = max_l(1, 0);
draw_line_width(x, y, x1, y1, 2);
draw_set_alpha(1);

var _x, _y, dist, k;
_x = x;
_y = y;
k = argument0;
while(1)
{
if (argument1 = 0)
{
_x += lengthdir_x(7, direction);
_y += lengthdir_y(7, direction);
}
dist = point_distance(x, y, _x, _y);
if (dist >= 450) // 450 - максимальная длина лазера
break;
if (collision_point(_x, _y, объект_который_лазер_не_может_пересечь, true, true) or collision_point(_x, _y, объект_который_лазер_не_может_пересечь, true, true)) *можно еще целую кучу добавить*
break;
}
if (k = 0)
return(_x);
else
return(_y);