From 3c2d96054d408fb2afd3687dc4876cc1da12338a Mon Sep 17 00:00:00 2001
From: Glenn Maynard <gmaynard@users.sourceforge.net>
Date: Sun, 15 Oct 2006 08:03:18 +0000
Subject: [PATCH] convert to Lua; this one creates several actors cleanly, and
 uses upvalues

---
 .../ScreenWithMenuElements stage/default.lua     | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)
 create mode 100644 stepmania/Themes/default/Graphics/ScreenWithMenuElements stage/default.lua

diff --git a/stepmania/Themes/default/Graphics/ScreenWithMenuElements stage/default.lua b/stepmania/Themes/default/Graphics/ScreenWithMenuElements stage/default.lua
new file mode 100644
index 0000000000..2f3af30c16
--- /dev/null
+++ b/stepmania/Themes/default/Graphics/ScreenWithMenuElements stage/default.lua	
@@ -0,0 +1,16 @@
+local stages = { }
+for _, s in ipairs(Stage) do
+	if GAMESTATE:IsStagePossible(s) then
+		local t = LoadActor("_stage " .. s)() .. {
+			InitCommand = cmd(playcommand,"Update"),
+			CurrentSongChangedMessageCommand=cmd(playcommand,"Update"),
+
+			UpdateCommand=cmd(hidden,GAMESTATE:GetCurrentStage() == s and 0 or 1)
+		}
+		table.insert( stages, t )
+	end
+end
+
+return Def.ActorFrame {
+	children = stages
+}