function SetFail()
	local sFail = "";

	if GetGamePref("DefaultFail") then
		sFail = string.format("Fail%s", GetGamePref("DefaultFail"));
	else
		sFail = "FailOff";
	end

	sFail = tostring(sFail);
	SCREENMAN:SystemMessage( 'NEW FAIL IS: ' .. tostring(sFail) );

	for pn in ivalues(GAMESTATE:GetHumanPlayers()) do
		GAMESTATE:ApplyGameCommand( "stagemod,FailImmediateContinue", pn );
		GAMESTATE:GetPlayerState(pn):SetPlayerOptions( "ModsLevel_Song", 'mod,FailImmediateContinue' );
		MESSAGEMAN:Broadcast( "PlayerOptionsChanged", {PlayerNumber = pn} );
	end

	GAMESTATE:SetSongOptions( "ModsLevel_Preferred", 'mod,FailImmediateContinue'  );
	GAMESTATE:SetSongOptions( "ModsLevel_Stage", 'mod,FailImmediateContinue' );
	GAMESTATE:SetSongOptions( "ModsLevel_Song",'mod,FailImmediateContinue'  );
	GAMESTATE:ApplyGameCommand( "mod,FailImmediateContinue");
	GAMESTATE:ApplyGameCommand( "stagemod,FailImmediateContinue");
	MESSAGEMAN:Broadcast( "SongOptionsChanged" );
end