From 9a5d28f92727ff2e5c36c32b1936253feefffae8 Mon Sep 17 00:00:00 2001
From: Flameshadowxeroshin <flameshadowxeroshin@gmail.com>
Date: Sun, 9 Jan 2011 21:11:54 -0600
Subject: [PATCH] migs scoring

---
 Themes/default/Scripts/03 ThemePrefs.lua     |  2 +-
 Themes/default/Scripts/04 SpecialScoring.lua | 15 ++++++++++++++-
 2 files changed, 15 insertions(+), 2 deletions(-)

diff --git a/Themes/default/Scripts/03 ThemePrefs.lua b/Themes/default/Scripts/03 ThemePrefs.lua
index 6864836ad8..526b6ca897 100644
--- a/Themes/default/Scripts/03 ThemePrefs.lua	
+++ b/Themes/default/Scripts/03 ThemePrefs.lua	
@@ -234,7 +234,7 @@ function UserPrefShowLotsaOptions()
 end
 
 function UserPrefSpecialScoringMode()
-	local baseChoices = { 'DDR 1stMIX', 'DDR 4thMIX', 'DDR SuperNOVA', 'DDR SuperNOVA 2' }; --'[SSC] Radar Master'
+	local baseChoices = { 'DDR 1stMIX', 'DDR 4thMIX', 'DDR SuperNOVA', 'DDR SuperNOVA 2', 'MIGS' }; --'[SSC] Radar Master'
 	local t = {
 		Name = "UserPrefSpecialScoringMode";
 		LayoutType = "ShowAllInRow";
diff --git a/Themes/default/Scripts/04 SpecialScoring.lua b/Themes/default/Scripts/04 SpecialScoring.lua
index 09280b2912..43c7f66f27 100644
--- a/Themes/default/Scripts/04 SpecialScoring.lua	
+++ b/Themes/default/Scripts/04 SpecialScoring.lua	
@@ -67,5 +67,18 @@ end;
 		finalScore = finalScore + curPortion*(500000000*(v/totalRadar));
 	end;
 	pss:SetScore(finalScore);
-end;]]	 
+end;]]
+------------------------------------------------------------
+--Marvelous Incorporated Grading System (or MIGS for short)
+--basically like DP scoring with locked DP values
+------------------------------------------------------------
+r['MIGS'] = function(params,pss)
+	local curScore = 0;
+	local tapScoreTable = { ['TapNoteScore_W1'] = 3, ['TapNoteScore_W2'] = 2, ['TapNoteScore_W3'] = 1, ['TapNoteScore_W5'] = -4, ['TapNoteScore_Miss'] = -8 };
+	for k,v in pairs(tapScoreTable) do
+		curScore = curScore + ( pss:GetTapNoteScores(k) * v );
+	end;
+	curScore = curScore + ( pss:GetHoldNoteScores('HoldNoteScore_Held') * 6 );
+	pss:SetScore(clamp(curScore,0,math.big));
+end;
 SpecialScoring = r;