Files
itgmania212121/Themes/_fallback/Scripts/_Branches.oldlua
T
2010-01-26 21:00:30 -06:00

287 lines
9.2 KiB
Plaintext

function ScreenTitleBranch()
-- Don't show the title menu (says "Press Start") if there are 0 credits
-- inserted and CoinMode is pay.
if GAMESTATE:GetCoinsNeededToJoin() > GAMESTATE:GetCoins() then
return THEME:GetMetric( "Common", "InitialScreen" )
end
if GAMESTATE:GetCoinMode() == "CoinMode_Home" then return "ScreenTitleMenu" end
return "ScreenTitleJoin"
end
function ScreenCautionBranch()
if PREFSMAN:GetPreference("ShowCaution") then return "ScreenCaution" end
return "ScreenSelectStyle"
end
function ScreenSelectGroupBranch()
if PREFSMAN:GetPreference("ShowSelectGroup") then return "ScreenSelectGroup" end
return GetScreenInstructions()
end
function SongSelectionScreen()
local pm = GAMESTATE:GetPlayMode()
if pm ~= "PlayMode_Regular" and IsNetConnected() then
SCREENMAN:SystemMessage( THEME:GetString("NetworkSyncManager","Not Supported") )
return "ScreenSelectDifficulty"
end
if pm == "PlayMode_Nonstop" then return "ScreenSelectCourse" end
if pm == "PlayMode_Oni" then return "ScreenSelectCourse" end
if pm == "PlayMode_Endless" then return "ScreenSelectCourse" end
if IsNetConnected() then ReportStyle() end
if IsNetSMOnline() then return SMOnlineScreen() end
if IsNetConnected() then return "ScreenNetSelectMusic" end
return "ScreenSelectMusic"
end
function ScreenSelectMusicBranch()
if IsNetConnected() then ReportStyle() end
if IsNetSMOnline() then return SMOnlineScreen() end
if IsNetConnected() then return "ScreenNetSelectMusic" end
return "ScreenSelectMusic"
end
function NextNetworkScreen()
if IsNetConnected() then return "ScreenCaution" end
return "ScreenTitleMenu"
end
function SMOnlineScreen()
if not IsSMOnlineLoggedIn(PLAYER_1) and GAMESTATE:IsPlayerEnabled(PLAYER_1) then return "ScreenSMOnlineLogin" end
if not IsSMOnlineLoggedIn(PLAYER_2) and GAMESTATE:IsPlayerEnabled(PLAYER_2) then return "ScreenSMOnlineLogin" end
return "ScreenNetRoom"
end
function GetSelectMusicNext()
if SCREENMAN:GetTopScreen():GetGoToOptions() then
return SelectFirstOptionsScreen()
else
return "ScreenStageInformation"
end
end
function SelectFirstOptionsScreen()
if GAMESTATE:GetPlayMode() == "PlayMode_Rave" then return "ScreenRaveOptions" end
return "ScreenPlayerOptions"
end
function ScreenPlayerOptionsNext()
if SCREENMAN:GetTopScreen():GetGoToOptions() then
return "ScreenSongOptions"
else
return "ScreenStageInformation"
end
end
function GetGameplayScreen()
local st = GAMESTATE:GetCurrentStyle():GetStyleType()
if st == "StyleType_TwoPlayersSharedSides" then return "ScreenGameplayShared" end
return "ScreenGameplay"
end
function SelectEvaluationScreen()
if IsNetConnected() then return "ScreenNetEvaluation" end
local pm = GAMESTATE:GetPlayMode()
if( GAMESTATE:GetMultiplayer() ) then return "ScreenEvaluationMultiplayer" end
if( pm == "PlayMode_Regular" ) then return "ScreenEvaluationStage" end
if( pm == "PlayMode_Nonstop" ) then return "ScreenEvaluationNonstop" end
if( pm == "PlayMode_Oni" ) then return "ScreenEvaluationOni" end
if( pm == "PlayMode_Endless" ) then return "ScreenEvaluationEndless" end
if( pm == "PlayMode_Rave" ) then return "ScreenEvaluationRave" end
if( pm == "PlayMode_Battle" ) then return "ScreenEvaluationBattle" end
end
function GetTopScreenMetric( sElement )
local sClass = SCREENMAN:GetTopScreen():GetName();
return THEME:GetMetric( sClass, sElement )
end
local function GetEvaluationNextScreenInternal( sNextScreen, sFailedScreen, sEndScreen )
Trace( "GetEvaluationNextScreen: " .. sNextScreen .. ", " .. sFailedScreen .. ", " .. sEndScreen )
if GAMESTATE:IsEventMode() then
Trace( "IsEventMode" )
return sNextScreen
end
local bIsExtraStage = GAMESTATE:IsAnExtraStage()
-- Not in event mode. If failed, go to the game over screen.
if STATSMAN:GetCurStageStats():AllFailed() and not bIsExtraStage then
Trace( "Failed" )
return sFailedScreen
end
local sIsStage = not GetTopScreenMetric( "Summary" ) and not GAMESTATE:IsCourseMode()
if sIsStage then
local bLastStage = GAMESTATE:GetSmallestNumStagesLeftForAnyHumanPlayer() <= 0
if not bLastStage then
Trace( "Another" )
return sNextScreen
end
end
Trace( "End" )
return sEndScreen
end
function GetEvaluationSummaryNextScreen()
return GetEvaluationNextScreenInternal( "ScreenNameEntry", "ScreenProfileSave", "ScreenNameEntry" );
end
function GetEvaluationNextScreen()
if IsEventMode() then
return "ScreenProfileSave";
end
local sFailedScreen;
local sEndScreen;
local pm = GAMESTATE:GetPlayMode();
if pm == "PlayMode_Regular" or
pm == "PlayMode_Rave" then
sFailedScreen = "ScreenProfileSave";
sEndScreen = "ScreenEvaluationSummary";
elseif pm == "PlayMode_Nonstop" or
pm == "PlayMode_Oni" or
pm == "PlayMode_Endless" then
sFailedScreen = "ScreenNameEntry";
sEndScreen = "ScreenNameEntry";
else
assert(false);
end
local sNextScreen;
if IsNetSMOnline() then sNextScreen = "ScreenNetRoom"
elseif( IsNetConnected() ) then sNextScreen = "ScreenNetSelectMusic"
else sNextScreen = SongSelectionScreen(); end
return GetEvaluationNextScreenInternal( sNextScreen, sFailedScreen, sEndScreen );
end
function ScreenBranchNetAfterEval()
if IsNetSMOnline() then return "ScreenSMOnlineSelectMusic" end
if IsNetConnected() then return "ScreenNetSelectMusic" end
return "ScreenSelectMusic"
end
function SelectEndingScreen()
local bIsExtraStage = GAMESTATE:IsAnExtraStage()
if STATSMAN:GetCurStageStats():AllFailed() and not bIsExtraStage then
return "ScreenGameOver"
end
local grade = STATSMAN:GetBestFinalGrade()
if Grade:Compare( grade, "Grade_Tier03" ) >= 0 then return "ScreenEnding3" end
if Grade:Compare( grade, "Grade_Tier05" ) >= 0 then return "ScreenEnding2" end
return "ScreenEnding1"
end
function ScreenProfileSaveNextScreen()
if IsEventMode() then
return SongSelectionScreen();
end
return SelectEndingScreen();
end
function IsEventMode()
return PREFSMAN:GetPreference( "EventMode" )
end
-- For "EvalOnFail", do:
-- function GetGameplayNextScreen() return SelectEvaluationScreen() end
function GetGameplayNextScreen()
Trace( "GetGameplayNextScreen: " )
local Passed = not STATSMAN:GetCurStageStats():AllFailed()
Trace( " Passed = "..tostring(Passed) )
Trace( " IsCourseMode = "..tostring(GAMESTATE:IsCourseMode()) )
Trace( " IsExtraStage = "..tostring(GAMESTATE:IsExtraStage()) )
Trace( " IsExtraStage2 = "..tostring(GAMESTATE:IsExtraStage2()) )
Trace( " Event mode = "..tostring(IsEventMode()) )
return SelectEvaluationScreen()
-- if Passed or GAMESTATE:IsCourseMode() or
-- GAMESTATE:IsExtraStage() or GAMESTATE:IsExtraStage2()
-- then
-- Trace( "Go to evaluation screen" )
-- return SelectEvaluationScreen()
-- end
--
-- if IsEventMode() then
-- Trace( "Go to song selection screen" )
-- -- DeletePreparedScreens()
-- return SongSelectionScreen()
-- end
--
-- Trace( "ScreenGameOver" )
-- return "ScreenGameOver"
end
local function ShowScreenInstructions()
if not PREFSMAN:GetPreference("ShowInstructions") then
return false
end
if not GAMESTATE:GetPlayMode() then
Trace( "ShowScreenInstructions: called without PlayMode set" )
return true
end
if GAMESTATE:GetPlayMode() ~= "PlayMode_Regular" then
return true
end
for pn in ivalues(PlayerNumber) do
if Difficulty:Compare( GAMESTATE:GetPreferredDifficulty(pn), "Difficulty_Easy" ) <= 0 then
return true
end
end
return false
end
function GetScreenInstructions()
if not ShowScreenInstructions() then
return THEME:GetMetric("ScreenInstructions","NextScreen")
else
return "ScreenInstructions"
end
end
function OptionsMenuAvailable()
if GAMESTATE:IsAnExtraStage() then return false end
if GAMESTATE:GetPlayMode() == "PlayMode_Oni" then return false end
return true
end
function ModeMenuAvailable()
if GAMESTATE:IsAnExtraStage() then
return false
end
return true
end
-- (c) 2005 Glenn Maynard, Chris Danford
-- All rights reserved.
--
-- Permission is hereby granted, free of charge, to any person obtaining a
-- copy of this software and associated documentation files (the
-- "Software"), to deal in the Software without restriction, including
-- without limitation the rights to use, copy, modify, merge, publish,
-- distribute, and/or sell copies of the Software, and to permit persons to
-- whom the Software is furnished to do so, provided that the above
-- copyright notice(s) and this permission notice appear in all copies of
-- the Software and that both the above copyright notice(s) and this
-- permission notice appear in supporting documentation.
--
-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
-- OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
-- MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF
-- THIRD PARTY RIGHTS. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR HOLDERS
-- INCLUDED IN THIS NOTICE BE LIABLE FOR ANY CLAIM, OR ANY SPECIAL INDIRECT
-- OR CONSEQUENTIAL DAMAGES, OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS
-- OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
-- OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
-- PERFORMANCE OF THIS SOFTWARE.