object Form1: TForm1 Left = 0 Top = 0 Caption = 'Particle Masking' ClientHeight = 535 ClientWidth = 790 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = False WindowState = wsMaximized OnCreate = FormCreate OnMouseWheel = FormMouseWheel PixelsPerInch = 96 TextHeight = 13 object Splitter1: TSplitter Left = 600 Top = 0 Width = 8 Height = 499 Align = alRight Beveled = True MinSize = 200 ResizeStyle = rsLine ExplicitLeft = 576 ExplicitTop = -65 ExplicitHeight = 569 end object MaskBox: TGroupBox Left = 608 Top = 0 Width = 182 Height = 499 Align = alRight Caption = 'Particle Masks' TabOrder = 0 object XImage: TImage Left = 16 Top = 32 Width = 150 Height = 150 Stretch = True end object XLabel: TLabel Left = 16 Top = 16 Width = 33 Height = 13 Caption = 'X Mask' end object YLabel: TLabel Left = 16 Top = 200 Width = 33 Height = 13 Caption = 'Y Mask' end object ZLabel: TLabel Left = 16 Top = 400 Width = 33 Height = 13 Caption = 'Z Mask' end object YImage: TImage Left = 16 Top = 224 Width = 150 Height = 150 Stretch = True end object ZImage: TImage Left = 16 Top = 416 Width = 150 Height = 150 Stretch = True end object Button1: TButton Left = 64 Top = 12 Width = 99 Height = 17 Caption = 'View from XMask' TabOrder = 0 OnClick = Button1Click end object Button2: TButton Left = 72 Top = 196 Width = 99 Height = 17 Caption = 'View from YMask' TabOrder = 1 OnClick = Button2Click end object Button3: TButton Left = 72 Top = 396 Width = 99 Height = 17 Caption = 'View from ZMask' TabOrder = 2 OnClick = Button3Click end end object SceneViewer: TGLSceneViewer Left = 0 Top = 0 Width = 600 Height = 499 Camera = Camera Buffer.BackgroundColor = clBackground FieldOfView = 175.409606933593800000 Align = alClient OnMouseMove = SceneViewerMouseMove TabOrder = 1 end object Panel1: TPanel Left = 0 Top = 499 Width = 790 Height = 36 Align = alBottom TabOrder = 2 object Label1: TLabel Left = 8 Top = 11 Width = 29 Height = 13 Caption = 'Depth' end object Label2: TLabel Left = 88 Top = 11 Width = 48 Height = 13 Caption = 'Character' end object Label3: TLabel Left = 176 Top = 11 Width = 53 Height = 13 Caption = 'Pitch Angle' end object Label4: TLabel Left = 304 Top = 11 Width = 47 Height = 13 Caption = 'Roll Angle' end object Label5: TLabel Left = 424 Top = 11 Width = 52 Height = 13 Caption = 'Turn Angle' end object Edit1: TEdit Left = 40 Top = 8 Width = 33 Height = 21 TabOrder = 0 Text = '50' end object Edit2: TEdit Left = 144 Top = 8 Width = 25 Height = 21 TabOrder = 1 Text = 'A' OnChange = Edit2Change end object Edit3: TEdit Left = 240 Top = 8 Width = 57 Height = 21 TabOrder = 2 Text = '0' OnChange = Edit3Change end object Edit4: TEdit Left = 360 Top = 8 Width = 57 Height = 21 TabOrder = 3 Text = '0' OnChange = Edit4Change end object Edit5: TEdit Left = 488 Top = 7 Width = 57 Height = 21 TabOrder = 4 Text = '0' OnChange = Edit5Change end object CheckBox1: TCheckBox Left = 551 Top = 6 Width = 97 Height = 17 Caption = 'Target Sphere' Checked = True State = cbChecked TabOrder = 5 OnClick = CheckBox1Click end object Button4: TButton Left = 654 Top = 3 Width = 43 Height = 30 Caption = 'GO' TabOrder = 6 OnClick = Button4Click end end object GLScene: TGLScene ObjectsSorting = osRenderFarthestFirst Left = 8 Top = 8 object Target: TGLDummyCube CubeSize = 1.000000000000000000 EffectsData = { 0458434F4C02010201061254474C536F75726365504658456666656374020202 001200000000020002000609504C4D616E61676572050000000000000080FF3F 0206020008020008020008050000000000000000000005000000000000000000 00050000000000FAEDEBF43F02000200090500000000000000000000080200} end object XPlane: TGLPlane Material.MaterialLibrary = MatLib Material.LibMaterialName = 'XMask' Direction.Coordinates = {0000803F000000002EBD3BB300000000} Position.Coordinates = {000040C000000000000000000000803F} TurnAngle = 90.000000000000000000 Up.Coordinates = {00000000FFFF7F3F0000000000000000} Height = 3.000000000000000000 Width = 3.000000000000000000 end object YPlane: TGLPlane Material.MaterialLibrary = MatLib Material.LibMaterialName = 'YMask' Direction.Coordinates = {000000000000803F31BD3BB300000000} PitchAngle = 90.000000000000000000 Position.Coordinates = {00000000000040C0000000000000803F} RollAngle = 180.000000000000000000 Up.Coordinates = {010000B331BD3B330000803F00000000} Height = 3.000000000000000000 Width = 3.000000000000000000 end object ZPlane: TGLPlane Material.MaterialLibrary = MatLib Material.LibMaterialName = 'ZMask' Direction.Coordinates = {00000000010000B30000803F00000000} Position.Coordinates = {0000000000000000000040C00000803F} Up.Coordinates = {000000000000803F0100003300000000} Hint = '0' Height = 3.000000000000000000 Width = 3.000000000000000000 end object PFXRenderer: TGLParticleFXRenderer end object Sphere: TGLSphere Direction.Coordinates = {0000000000000000FFFF7F3F00000000} Position.Coordinates = {0000004000000000000000000000803F} Visible = False Radius = 0.250000000000000000 object GLArrowLine1: TGLArrowLine Direction.Coordinates = {0000803F000000002EBD3BB300000000} Position.Coordinates = {CDCCCC3D00000000000000000000803F} TurnAngle = 90.000000000000000000 Up.Coordinates = {00000000FFFF7F3F0000000000000000} BottomRadius = 0.100000001490116100 Height = 0.500000000000000000 TopRadius = 0.100000001490116100 TopArrowHeadHeight = 0.500000000000000000 TopArrowHeadRadius = 0.200000002980232200 BottomArrowHeadHeight = 0.500000000000000000 BottomArrowHeadRadius = 0.200000002980232200 end end object Camera: TGLCamera DepthOfView = 100.000000000000000000 FocalLength = 10.000000000000000000 TargetObject = Target CameraStyle = csOrthogonal Position.Coordinates = {0000803F00000040000040400000803F} object Light: TGLLightSource ConstAttenuation = 1.000000000000000000 SpotCutOff = 180.000000000000000000 end end end object GLCadencer: TGLCadencer Scene = GLScene OnProgress = GLCadencerProgress Left = 72 Top = 8 end object MatLib: TGLMaterialLibrary Materials = < item Name = 'XMask' Tag = 0 Material.Texture.Image.Picture.Data = {07544269746D617000000000} Material.Texture.ImageAlpha = tiaInverseLuminance Material.Texture.MagFilter = maNearest Material.Texture.MinFilter = miNearest Material.Texture.Disabled = False end item Name = 'YMask' Tag = 0 Material.Texture.Image.Picture.Data = {07544269746D617000000000} Material.Texture.ImageAlpha = tiaInverseLuminance Material.Texture.MagFilter = maNearest Material.Texture.MinFilter = miNearest Material.Texture.Disabled = False end item Name = 'ZMask' Tag = 0 Material.Texture.Image.Picture.Data = {07544269746D617000000000} Material.Texture.ImageAlpha = tiaInverseLuminance Material.Texture.MagFilter = maNearest Material.Texture.MinFilter = miNearest Material.Texture.Disabled = False end> Left = 40 Top = 8 end object WinFont: TGLWindowsBitmapFont Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Left = 104 Top = 8 end object PLManager: TGLPointLightPFXManager Cadencer = GLCadencer Renderer = PFXRenderer OnCreateParticle = PLManagerCreateParticle Friction = 1.000000000000000000 ColorMode = scmFade ParticleSize = 0.200000002980232200 ColorInner.Color = {00000000000000000000000000000000} LifeColors = < item ColorInner.Color = {9A99993E9A99993E0000803F0000803F} LifeTime = 3.000000000000000000 SizeScale = 1.000000000000000000 end> Left = 136 Top = 8 end object GLEParticleMasksManager1: TGLEParticleMasksManager ParticleMasks = < item Scale.Coordinates = {0000A0400000A0400000A04000000000} Name = 'mask' MaterialLibrary = MatLib XMask = 'XMask' YMask = 'YMask' ZMask = 'ZMask' BackgroundColor = clBlack MaskColor = clWhite end> Left = 168 Top = 8 end object AsyncTimer1: TGLAsyncTimer Enabled = True OnTimer = AsyncTimer1Timer ThreadPriority = tpNormal Left = 200 Top = 8 end end