Advertisement
Jousway

Untitled

Nov 28th, 2016
179
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.63 KB | None | 0 0
  1. --AFT fade
  2. t[#t+1] = Def.ActorFrame{
  3.     InitCommand=cmd(visible,true;diffuse,1,1,1,1),
  4.     Def.ActorFrameTexture{
  5.         Name = "Memory",
  6.         InitCommand=function(self)
  7.             self:SetTextureName( "Memory" )
  8.             self:SetWidth( SCREEN_WIDTH )
  9.             self:SetHeight( SCREEN_HEIGHT )
  10.             self:EnableAlphaBuffer( true )
  11.             self:Create()
  12.             self:visible(true)
  13.             self:diffuse(1,1,1,1)
  14.         end,
  15.         -- Cannot call the second AFT's texture by name as it has not been created when this Sprite loads.
  16.         Def.Sprite{ Name = "Sprite", InitCommand=cmd(Center;visible,true;diffuse,1,1,1,1), },
  17.     },
  18.     Def.ActorFrameTexture{
  19.         InitCommand=function(self)
  20.             self:SetTextureName( "Output" )
  21.             self:SetWidth( SCREEN_WIDTH )
  22.             self:SetHeight( SCREEN_HEIGHT )
  23.             self:EnableAlphaBuffer( true )
  24.             self:Create()
  25.             self:visible(true)
  26.             self:diffuse(1,1,1,1)
  27.             -- Set the first AFT's child's texture to this AFT's texture, now that it has been created.
  28.             self:GetParent():GetChild("Memory"):GetChild("Sprite"):SetTexture( self:GetTexture() )
  29.         end,
  30.         -- A sprite to draw the 'trail' with.
  31.         Def.Sprite{ Texture = "Memory", InitCommand=cmd(Center;diffuse,1,1,1,.995;visible,true), },
  32.         Def.ActorProxy{
  33.             BeginCommand=function(self)
  34.                 local oldfield;
  35.                 if SCREENMAN:GetTopScreen():GetName() == "ScreenEdit" then
  36.                     oldfield = SCREENMAN:GetTopScreen():GetChild("")[5]
  37.                 else
  38.                     oldfield = SCREENMAN:GetTopScreen():GetChild("PlayerP1")
  39.                 end
  40.                 self:SetTarget(oldfield)
  41.                 oldfield:visible(false)
  42.                 self:visible(true)
  43.                 self:diffuse(1,1,1,1)
  44.             end,
  45.         },
  46.     },
  47.     Def.Sprite{ Texture = "Output", InitCommand=cmd(Center;visible,true;diffuse,1,1,1,1), },
  48. }--]]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement