void load_level_fade_black(STRING* _levelname)
{
	PANEL* TempPan = pan_create("alpha = 0; flags = SHOW | TRANSLUCENT", 1000); // Create a new temp-panel
	BMAP* BmapBlack = bmap_createblack(8, 8, 24); // create an 8x8 black texture
	
	TempPan.bmap = BmapBlack;
	TempPan.size_x = screen_size.x; // set x and y size of the panel to the game-resolution
	TempPan.size_y = screen_size.y;
	
	var p = 0; // percent (1 - 100)
	var Speed = 1.5; // fade-speed per frame
	
	while(p < 100) // fade in
	{
		p += Speed;
		TempPan.alpha = p;
		wait(1);
	}
	
	TempPan.alpha = 100;
	
	level_load(_levelname); // screen is black, load the level now
	
	p = 100;
	while(p > 0) // now the same just backwards
	{
		p -= Speed;
		TempPan.alpha = p;
		wait(1);
	}
	
	TempPan.alpha = 0;
	
	ptr_remove(TempPan);
	ptr_remove(BmapBlack);
}