old forest rm_end

//instance_activate_object(parent_instances_misc);
//instance_activate_object(parent_fences);
if(room==rm_forest)
{
	instance_activate_object(parent_instances_misc);
	instance_activate_object(obj_fiber1);
	/// AZ A BAJ, hogy nem minden object parent_instances_misc a gridben
	var db = instance_number(parent_instances_misc);

	if(db==0) {	ds_grid_clear(ds_forest_data,-1); }
	else
	{
		show_debug_message(string(db)+" darab forest instanc van.");
		ds_grid_resize(ds_forest_data, ds_grid_width(ds_forest_data),db);
		show_debug_message("ROOM END forest grid height:" + string(db));
		var gw = ds_grid_width(ds_forest_grid);
		var gh = ds_grid_height(ds_forest_grid);

		var slot=0;
		var xx=0;repeat(gw){
			var yy=0; repeat(gh)
			{
				var inst = ds_forest_grid[# xx,yy];
				if(inst != 0 and inst.o_name!="obj_player"){
					if(inst.o_name!=-1){
						ds_forest_data[# 0, slot] = xx;
						ds_forest_data[# 1, slot] = yy;
						ds_forest_data[# 2, slot] = inst.o_name;
						ds_forest_data[# 3,slot] = -1;
						ds_forest_data[# 4, slot] = -1;
						if(inst.o_name == "obj_tree"){
							ds_forest_data[# 3,slot] =  inst.bdaysOld;
							ds_forest_data[# 4, slot] = inst.cut;
						}
						ds_forest_data[# 5, slot] = -1;
						if(variable_instance_exists(inst,"custom_id")){
							ds_forest_data[# 6, slot] = inst.custom_id;
						} else ds_forest_data[# 6, slot] = -1;
						slot+=1;
					}
				}
				yy+=1;

			}
			xx+=1;
		}


	}
	if(ds_exists(ds_forest_grid,ds_type_grid)){
		ds_grid_destroy(ds_forest_grid);
		ds_forest_grid = -1;
	}
	// Diggable area in rm_forest
	var lay_id = layer_get_id("T_Digged");
	var map_id = layer_tilemap_get_id(lay_id);
	for (var gx = 23; gx <= 49; gx += 1){
		for (var gy = 14; gy <= 30; gy += 1){
			var i = gx - 23;
			var j = gy - 14;
			ds_forest_digged_grid[# i,j] = tilemap_get(map_id,gx,gy);
		}
	}
	/*
	ds_grid_clear(ds_forest_tile_data,-1);

	var gw = ds_grid_width(ds_forest_tile_grid);
	var gh = ds_grid_height(ds_forest_tile_grid);
	var slot=0;
	var xx=0;repeat(gw){
		var yy=0; repeat(gh)
		{
			var inst=ds_forest_tile_grid[# xx,yy];
			if(inst!=0)
			{
				ds_forest_tile_data[# 0, slot] = xx;
				ds_forest_tile_data[# 1, slot] = yy;
				ds_forest_tile_data[# 2, slot] = inst;



				slot+=1;
				ds_grid_resize(ds_forest_tile_data,3,slot+1);

			}
			yy+=1;

		}
		xx+=1;
	}


	if(ds_exists(ds_forest_tile_grid,ds_type_grid)){
		ds_grid_destroy(ds_forest_tile_grid);
		ds_forest_tile_grid = -1;
	}
	*/
}
show_debug_message("ROOM END vege");