Marco

task uno(angle,angolo,g){let gr=0;
let obj=Obj_Create(OBJ_LASER);
Obj_SetPosition(obj, GetCenterX, GetCenterY);
Obj_SetAngle(obj, angle+gr);
ObjShot_SetGraphic(obj, g);
ObjShot_SetDelay  (obj, 30);
ObjShot_SetBombResist (obj, true);
ObjLaser_SetLength(obj, 200);
ObjLaser_SetWidth (obj, 15);
ObjLaser_SetSource(obj, false);
loop{
Obj_SetPosition(obj, Obj_GetX(obj)+(1/60)*cos(angolo),  Obj_GetY(obj)+(1/60)*sin(angolo));yield;}
gr+=1/60;
loop(600){
	while(Obj_BeDeleted(obj)==false) {

	if(Obj_GetX(obj)<GetClipMinX) {
		angolo=atan2(Obj_GetY(obj)+(Obj_GetY(obj)-(Obj_GetY(obj)-sin(angolo-180)))-Obj_GetY(obj),Obj_GetX(obj)-cos(angolo-180)-Obj_GetX(obj));
	}
	if(Obj_GetX(obj)>GetClipMaxX) {
		Obj_SetAngle(obj, Obj_GetAngle(obj)+180 );
	}
	if(Obj_GetY(obj)<GetClipMinY) {
		Obj_SetAngle(obj, Obj_GetAngle(obj)+180 );
             }
	if(Obj_GetY(obj)>GetClipMaxY) {
		Obj_SetAngle(obj, Obj_GetAngle(obj)+180 );
	}
             yield;
	}
yield;
}
ObjShot_FadeDelete(obj);}