Files
itgmania212121/Docs/Themerdocs/ScreenAMVTest overlay.lua
2014-04-14 22:06:02 -05:00

473 lines
12 KiB
Lua

-- General guide:
-- ActorMultiVertex is an actor class that can have any number of vertices.
-- Use it for drawing anything that needs to have some arbitrary shape
-- This screen file contains a simple demo for each draw mode.
-- Each demo starts with a diagram of how its verts are connected.
-- Each of these actors has three commands as part of its demo.
-- The Reset command sets the actor to some initial state.
-- The FirstMove command moves some verts around.
-- The SecondMove command changes the first and num to draw.
-- Testing this screen:
-- To add this screen to your theme so you can observe each of these actors, add these lines to your metrics.ini: (Remove the "-- " from the start of each line, of course)
-- [ScreenAMVTest]
-- Fallback="ScreenWithMenuElements"
-- Class="ScreenWithMenuElements"
-- CodeNames="left,right,reset"
-- Codeleft="Left"
-- Coderight="Right"
-- Codereset="Up"
-- Then set the InitialScreen value in the Common section to the name of this screen. This will make your theme go to this screen when starting.
-- When on the screen, use left and right to change which demo is displayed, and up to send the Reset command to the currently displayed demo so you can watch its animation again.
local function quad_demo(x, y)
-- Minimum verts: 4
-- Verts per group: 4
-- Vert diagram:
-- 1 - 4 5 - 8
-- | | | |
-- 2 - 3 6 - 7
local verts= {
{{0, 0, 0}, Color.Red},
{{0, 20, 0}, Color.Blue},
{{20, 20, 0}, Color.Green},
{{20, 0, 0}, Color.Yellow},
{{40, 0, 0}, Color.Orange},
{{40, 20, 0}, Color.Purple},
{{60, 20, 0}, Color.Black},
{{60, 0, 0}, Color.White},
}
return Def.ActorMultiVertex{
Name= "AMV_Quads",
InitCommand=
function(self)
self:visible(false)
self:xy(x, y)
self:SetDrawState{Mode="DrawMode_Quads"}
end,
ResetCommand=
function(self)
self:SetDrawState{First= 1, Num= -1}
verts[1][1][1]= 0
verts[4][1][1]= 20
verts[7][1][2]= 20
verts[8][1][2]= 0
self:SetVertices(verts)
self:finishtweening()
self:queuecommand("FirstMove")
self:queuecommand("SecondMove")
end,
FirstMoveCommand=
function(self)
self:linear(1)
verts[1][1][1]= verts[1][1][1]+10
verts[4][1][1]= verts[4][1][1]-10
verts[7][1][2]= verts[7][1][2]+10
verts[8][1][2]= verts[8][1][2]-10
self:SetVertices(verts)
end,
SecondMoveCommand=
function(self)
self:linear(1)
self:SetDrawState{First= 3, Num= 4}
end
}
end
local function quadstrip_demo(x, y)
-- Minimum verts: 4
-- Verts per group: 2
-- Vert diagram:
-- 1 - 3 - 5 - 7
-- | | | |
-- 2 - 4 - 6 - 8
local verts= {
{{0, 0, 0}, Color.Red},
{{0, 20, 0}, Color.Blue},
{{20, 0, 0}, Color.Green},
{{20, 20, 0}, Color.Yellow},
{{40, 0, 0}, Color.Orange},
{{40, 20, 0}, Color.Purple},
{{60, 0, 0}, Color.Black},
{{60, 20, 0}, Color.White},
}
return Def.ActorMultiVertex{
Name= "AMV_QuadStrip",
InitCommand=
function(self)
self:visible(false)
self:xy(x, y)
self:SetDrawState{Mode="DrawMode_QuadStrip"}
end,
ResetCommand=
function(self)
self:SetDrawState{First= 1, Num= -1}
verts[1][1][1]= 0
verts[4][1][1]= 20
verts[7][1][2]= 0
verts[8][1][2]= 20
self:SetVertices(verts)
self:finishtweening()
self:queuecommand("FirstMove")
self:queuecommand("SecondMove")
end,
FirstMoveCommand=
function(self)
self:linear(1)
verts[1][1][1]= verts[1][1][1]+10
verts[4][1][1]= verts[4][1][1]-10
verts[7][1][2]= verts[7][1][2]+10
verts[8][1][2]= verts[8][1][2]-10
self:SetVertices(verts)
end,
SecondMoveCommand=
function(self)
self:linear(1)
self:SetDrawState{First= 3, Num= 4}
end
}
end
local function fan_demo(x, y)
-- Minimum verts: 3
-- Verts per group: 1
-- Vert diagram:
-- 2 - 3
-- | / |
-- 8 - 1 - 4
-- | / | \ |
-- 7 - 6 - 5
local verts= {
{{0, 0, 0}, Color.Red},
{{0, -20, 0}, Color.Blue},
{{20, -20, 0}, Color.Green},
{{20, 0, 0}, Color.Yellow},
{{20, 20, 0}, Color.Orange},
{{0, 20, 0}, Color.Purple},
{{-20, 20, 0}, Color.Black},
{{-20, 0, 0}, Color.White},
}
return Def.ActorMultiVertex{
Name= "AMV_Fan",
InitCommand=
function(self)
self:visible(false)
self:xy(x, y)
self:SetDrawState{Mode="DrawMode_Fan"}
end,
ResetCommand=
function(self)
self:SetDrawState{First= 1, Num= -1}
verts[2][1][2]= -20
verts[4][1][1]= 20
verts[6][1][2]= 20
verts[8][1][1]= -20
self:SetVertices(verts)
self:finishtweening()
self:queuecommand("FirstMove")
self:queuecommand("SecondMove")
end,
FirstMoveCommand=
function(self)
self:linear(1)
verts[2][1][2]= verts[2][1][2]-10
verts[4][1][1]= verts[4][1][1]+10
verts[6][1][2]= verts[6][1][2]+10
verts[8][1][1]= verts[8][1][1]-10
self:SetVertices(verts)
end,
SecondMoveCommand=
function(self)
self:linear(1)
self:SetDrawState{First= 3, Num= 6}
end
}
end
local function strip_demo(x, y)
-- Minimum verts: 3
-- Verts per group: 1
-- Suspiciously similar to quad strip,
-- Vert diagram:
-- 1 - 3 - 5 - 7
-- | / | / | / |
-- 2 - 4 - 6 - 8
local verts= {
{{0, 0, 0}, Color.Red},
{{0, 20, 0}, Color.Blue},
{{20, 0, 0}, Color.Green},
{{20, 20, 0}, Color.Yellow},
{{40, 0, 0}, Color.Orange},
{{40, 20, 0}, Color.Purple},
{{60, 0, 0}, Color.Black},
{{60, 20, 0}, Color.White},
}
return Def.ActorMultiVertex{
Name= "AMV_Strip",
InitCommand=
function(self)
self:visible(false)
self:xy(x, y)
self:SetDrawState{Mode="DrawMode_Strip"}
end,
ResetCommand=
function(self)
self:SetDrawState{First= 1, Num= -1}
verts[1][1][1]= 0
verts[4][1][1]= 20
verts[7][1][2]= 0
verts[8][1][2]= 20
self:SetVertices(verts)
self:finishtweening()
self:queuecommand("FirstMove")
self:queuecommand("SecondMove")
end,
FirstMoveCommand=
function(self)
self:linear(1)
verts[1][1][1]= verts[1][1][1]+10
verts[4][1][1]= verts[4][1][1]-10
verts[7][1][2]= verts[7][1][2]+10
verts[8][1][2]= verts[8][1][2]-10
self:SetVertices(verts)
end,
SecondMoveCommand=
function(self)
self:linear(1)
self:SetDrawState{First= 3, Num= 4}
end
}
end
local function triangles_demo(x, y)
-- Minimum verts: 3
-- Verts per group: 3
-- Vert diagram:
-- 2 5 8
-- / \ / \ / \
-- 1 - 3 4 - 6 7 - 9
local verts= {
{{0, 0, 0}, Color.Red},
{{10, -20, 0}, Color.Blue},
{{20, 0, 0}, Color.Green},
{{30, 0, 0}, Color.Yellow},
{{40, -20, 0}, Color.Orange},
{{50, 0, 0}, Color.Purple},
{{60, 20, 0}, Color.Black},
{{70, 0, 0}, Color.White},
{{80, 20, 0}, Color.Orange},
}
return Def.ActorMultiVertex{
Name= "AMV_Triangles",
InitCommand=
function(self)
self:visible(false)
self:xy(x, y)
self:SetDrawState{Mode="DrawMode_Triangles"}
end,
ResetCommand=
function(self)
verts[2][1][2]= -20
verts[4][1][2]= 0
verts[6][1][2]= 0
verts[8][1][2]= -20
self:SetDrawState{First= 1, Num= -1}
self:SetVertices(verts)
self:finishtweening()
self:queuecommand("FirstMove")
self:queuecommand("SecondMove")
end,
FirstMoveCommand=
function(self)
self:linear(1)
verts[2][1][2]= verts[2][1][2]-20
verts[4][1][2]= verts[4][1][2]+20
verts[6][1][2]= verts[6][1][2]+20
verts[8][1][2]= verts[8][1][2]-20
self:SetVertices(verts)
end,
SecondMoveCommand=
function(self)
self:linear(1)
self:SetDrawState{First= 3, Num= 6}
end
}
end
local function linestrip_demo(x, y)
-- Minimum verts: 2
-- Verts per group: 1
-- Vert diagram:
-- 1 - 2 - 3
-- |
-- 8 4
-- | |
-- 7 - 6 - 5
local verts= {
{{-40, -40, 0}, Color.Red},
{{0, -40, 0}, Color.Blue},
{{40, -40, 0}, Color.Green},
{{40, 0, 0}, Color.Yellow},
{{40, 40, 0}, Color.Orange},
{{0, 40, 0}, Color.Purple},
{{-40, 40, 0}, Color.Black},
{{-40, 0, 0}, Color.White},
}
return Def.ActorMultiVertex{
Name= "AMV_LineStrip",
InitCommand=
function(self)
self:visible(false)
self:xy(x, y)
self:SetDrawState{Mode="DrawMode_LineStrip"}
end,
ResetCommand=
function(self)
self:SetLineWidth(1)
self:SetDrawState{First= 1, Num= -1}
verts[1][1][2]= -40
verts[4][1][1]= 40
verts[6][1][2]= 40
verts[8][1][1]= -40
self:SetVertices(verts)
self:finishtweening()
self:queuecommand("FirstMove")
self:queuecommand("SecondMove")
end,
FirstMoveCommand=
function(self)
self:linear(1)
verts[1][1][2]= verts[1][1][2]+20
verts[4][1][1]= verts[4][1][1]+20
verts[6][1][2]= verts[6][1][2]-10
verts[8][1][1]= verts[8][1][1]+10
self:SetLineWidth(20)
self:SetVertices(verts)
end,
SecondMoveCommand=
function(self)
self:linear(1)
self:SetDrawState{First= 3, Num= 4}
end
}
end
local function symmetric_quadstrip_demo(x, y)
-- Minimum verts: 6
-- Verts per group: 3
-- Vert diagram:
-- 1 - 2 - 3
-- | | |
-- 4 - 5 - 6
-- | | |
-- 7 - 8 - 9
local verts= {
{{0, 0, 0}, Color.Red},
{{20, 0, 0}, Color.Blue},
{{40, 0, 0}, Color.Green},
{{-10, 20, 0}, Color.Yellow},
{{20, 20, 0}, Color.Orange},
{{50, 20, 0}, Color.Purple},
{{0, 40, 0}, Color.Black},
{{20, 40, 0}, Color.White},
{{40, 40, 0}, Color.Orange},
}
return Def.ActorMultiVertex{
Name= "AMV_SymmetricQuadStrip",
InitCommand=
function(self)
self:visible(false)
self:xy(x, y)
self:SetDrawState{Mode="DrawMode_SymmetricQuadStrip"}
end,
ResetCommand=
function(self)
self:SetDrawState{First= 1, Num= -1}
verts[2][1][2]= 0
verts[5][1][1]= 20
verts[7][1][1]= 00
verts[7][1][2]= 40
verts[9][1][1]= 40
verts[9][1][2]= 40
self:SetVertices(verts)
self:finishtweening()
self:queuecommand("FirstMove")
self:queuecommand("SecondMove")
end,
FirstMoveCommand=
function(self)
self:linear(1)
verts[2][1][2]= verts[2][1][2]-20
verts[5][1][1]= verts[5][1][1]-20
verts[7][1][1]= verts[7][1][1]-10
verts[7][1][2]= verts[7][1][2]+10
verts[9][1][1]= verts[9][1][1]+10
verts[9][1][2]= verts[9][1][2]+10
self:SetVertices(verts)
end,
SecondMoveCommand=
function(self)
self:linear(1)
self:SetDrawState{First= 4, Num= 6}
end
}
end
local children= {}
local prev_child_index= 1
local current_child_index= 1
local name_disp= false
local args= {
quad_demo(SCREEN_CENTER_X, SCREEN_CENTER_Y),
quadstrip_demo(SCREEN_CENTER_X, SCREEN_CENTER_Y),
fan_demo(SCREEN_CENTER_X, SCREEN_CENTER_Y),
strip_demo(SCREEN_CENTER_X, SCREEN_CENTER_Y),
triangles_demo(SCREEN_CENTER_X, SCREEN_CENTER_Y),
linestrip_demo(SCREEN_CENTER_X, SCREEN_CENTER_Y),
symmetric_quadstrip_demo(SCREEN_CENTER_X, SCREEN_CENTER_Y),
LoadFont("Common Normal") .. {
Name= "NameDisp",
InitCommand=
function(self)
self:xy(SCREEN_CENTER_X, 24)
self:diffuse(Color.White)
end
},
InitCommand=
function(self)
for n, c in pairs(self:GetChildren()) do
if n:find("AMV") then
Trace("Adding " .. n .. " to children list for manipulation.")
children[#children+1]= c
end
end
name_disp= self:GetChild("NameDisp")
children[current_child_index]:visible(true)
children[current_child_index]:queuecommand("Reset")
name_disp:settext(children[current_child_index]:GetName())
end,
CodeMessageCommand=
function(self, param)
if param.Name == "left" then
current_child_index= current_child_index - 1
if current_child_index < 1 then
current_child_index= #children
end
elseif param.Name == "right" then
current_child_index= current_child_index + 1
if current_child_index > #children then
current_child_index= 1
end
end
children[prev_child_index]:visible(false)
children[current_child_index]:visible(true)
children[current_child_index]:queuecommand("Reset")
name_disp:settext(children[current_child_index]:GetName())
prev_child_index= current_child_index
end
}
return Def.ActorFrame(args)